#include "TMath.h"
#include "TRandom.h"
+#include "TDatabasePDG.h"
#include "AliGenMUONlib.h"
//
// pt-distribution
//____________________________________________________________
+Double_t AliGenMUONlib::PtJpsiPPdummy(Double_t x, Double_t energy)
+{
+// J/Psi pT
+// pp
+// from the fit of RHIC, CDF & LHC data, see arXiv:1103.2394
+//
+ const Double_t kpt0 = 1.04*TMath::Power(energy,0.101);
+ const Double_t kxn = 3.9;
+ //
+ Double_t pass1 = 1.+0.363*(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtJpsiPP7000(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+// pp 7 TeV
+//
+ return PtJpsiPPdummy(*px,7000);
+}
+
+Double_t AliGenMUONlib::PtJpsiPP8000(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+// pp 7 TeV
+//
+ return PtJpsiPPdummy(*px,8000);
+}
+
+Double_t AliGenMUONlib::PtJpsiPP2760(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+// pp 2.76 TeV
+//
+ return PtJpsiPPdummy(*px,2760);
+}
+
+Double_t AliGenMUONlib::PtJpsiPP4400(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+// pp 4.4 TeV
+//
+ return PtJpsiPPdummy(*px,4400);
+}
+
+Double_t AliGenMUONlib::PtJpsiPP5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+// pp 5.03 TeV
+//
+ return PtJpsiPPdummy(*px,5030);
+}
+
+Double_t AliGenMUONlib::PtJpsiPP8800(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+// pp 8.8 TeV
+//
+ return PtJpsiPPdummy(*px,8800);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs pT for PbPb min. bias and 11 centr. bins (in 2.5<y<4)
+//
+// PbPb 2.76 TeV, for EKS98, minimum bias shadowing factor = 0.66 in 4pi
+// S.Grigoryan, details presented at the PWG3-Muon meeting (05.10.2011)
+// https://indico.cern.ch/conferenceDisplay.py?confId=157367
+//
+ const Double_t f1[12] = {1, 1.128, 1.097, 1.037, 0.937, 0.821, 0.693, 0.558,
+ 0.428, 0.317, 0.231, 0.156};
+ const Double_t f2[12] = {1, 1.313, 1.202, 1.039, 0.814, 0.593, 0.391, 0.224,
+ 0.106, 0.041, 0.013, 0.002};
+ const Double_t c1[7] = {1.6077e+00, 7.6300e-02,-7.1880e-03, 3.4067e-04,
+ -9.2776e-06,1.5138e-07, 1.4652e-09};
+ const Double_t c2[7] = {6.2047e-01, 5.7653e-02,-4.1414e-03, 1.0301e-04,
+ 9.6205e-07,-7.4098e-08, 5.0946e-09};
+ Double_t y1, y2;
+ Int_t j;
+ y1 = c1[j = 6]; y2 = c2[6];
+ while (j > 0) {y1 = y1 * x + c1[--j]; y2 = y2 * x + c2[j];}
+
+ y1 /= 1.+c1[6]*TMath::Power(x,6);
+ y2 /= 1.+c2[6]*TMath::Power(x,6);
+ //
+ y1 = 1 + (y1-2)*f1[n] + (y2+1-y1)*f2[n];
+ if(y1<0) y1=0;
+ return y1;
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, minimum bias 0-100 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 0) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c1(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 1st centrality bin 0-5 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 1) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c2(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 2nd centrality bin 5-10 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 2) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c3(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 3rd centrality bin 10-20 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 3) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c4(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 4th centrality bin 20-30 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 4) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c5(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 5th centrality bin 30-40 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 5) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c6(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 6th centrality bin 40-50 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 6) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c7(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 7th centrality bin 50-60 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 7) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c8(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 8th centrality bin 60-70 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 8) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c9(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 9th centrality bin 70-80 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 9) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c10(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 10th centrality bin 80-90 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 10) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb2760c11(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// PbPb 2.76 TeV, 11th centrality bin 90-100 %
+//
+ return PtJpsiPbPb2760ShFdummy(*px, 11) * PtJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb5030ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs pT for pPb min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// pPb 5.03 TeV, for EPS09-LO, minimum bias shadowing factor = 0.81 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {6.675e-01, 1.808e-02, 2.721e-03,-7.793e-04, 7.504e-05,-3.884e-06, 5.759e-07};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[6]*TMath::Power(x,6);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb5030(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 5.03 TeV, minimum bias 0-100 %
+//
+ return PtJpsiPPb5030ShFdummy(*px, 0) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb5030c1(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 5.03 TeV, 1st centrality bin 0-20 %
+//
+ return PtJpsiPPb5030ShFdummy(*px, 1) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb5030c2(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ return PtJpsiPPb5030ShFdummy(*px, 2) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb5030c3(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ return PtJpsiPPb5030ShFdummy(*px, 3) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb5030c4(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 5.03 TeV, 4th centrality bin 60-100 %
+//
+ return PtJpsiPPb5030ShFdummy(*px, 4) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP5030ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs pT for Pbp min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// Pbp 5.03 TeV, for EPS09-LO, minimum bias shadowing factor = 0.81 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {8.966e-01, 3.498e-02, 6.637e-03,-1.765e-03, 1.240e-04,-2.086e-06, 4.062e-07};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[6]*TMath::Power(x,6);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP5030(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 5.03 TeV, minimum bias 0-100 %
+//
+ return PtJpsiPbP5030ShFdummy(*px, 0) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP5030c1(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 5.03 TeV, 1st centrality bin 0-20 %
+//
+ return PtJpsiPbP5030ShFdummy(*px, 1) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP5030c2(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ return PtJpsiPbP5030ShFdummy(*px, 2) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP5030c3(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ return PtJpsiPbP5030ShFdummy(*px, 3) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP5030c4(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 5.03 TeV, 4th centrality bin 60-100 %
+//
+ return PtJpsiPbP5030ShFdummy(*px, 4) * PtJpsiPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb8800ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs pT for pPb min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// pPb 8.8 TeV, for EKS98, minimum bias shadowing factor = 0.78 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {6.4922e-01, 6.4857e-03, 4.7268e-03,-9.5075e-04,
+ 8.4075e-05,-4.2006e-06, 4.9970e-07};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[6]*TMath::Power(x,6);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb8800(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 8.8 TeV, minimum bias 0-100 %
+//
+ return PtJpsiPPb8800ShFdummy(*px, 0) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb8800c1(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 8.8 TeV, 1st centrality bin 0-20 %
+//
+ return PtJpsiPPb8800ShFdummy(*px, 1) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb8800c2(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 8.8 TeV, 2nd centrality bin 20-40 %
+//
+ return PtJpsiPPb8800ShFdummy(*px, 2) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb8800c3(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 8.8 TeV, 3rd centrality bin 40-60 %
+//
+ return PtJpsiPPb8800ShFdummy(*px, 3) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPPb8800c4(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// pPb 8.8 TeV, 4th centrality bin 60-100 %
+//
+ return PtJpsiPPb8800ShFdummy(*px, 4) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP8800ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs pT for Pbp min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// Pbp 8.8 TeV, for EKS98, minimum bias shadowing factor = 0.78 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {8.7562e-01, 2.1944e-02, 7.8509e-03,-1.3979e-03,
+ 3.8513e-05, 4.2008e-06, 1.7088e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[6]*TMath::Power(x,6);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP8800(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 8.8 TeV, minimum bias 0-100 %
+//
+ return PtJpsiPbP8800ShFdummy(*px, 0) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP8800c1(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 8.8 TeV, 1st centrality bin 0-20 %
+//
+ return PtJpsiPbP8800ShFdummy(*px, 1) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP8800c2(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 8.8 TeV, 2nd centrality bin 20-40 %
+//
+ return PtJpsiPbP8800ShFdummy(*px, 2) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP8800c3(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 8.8 TeV, 3rd centrality bin 40-60 %
+//
+ return PtJpsiPbP8800ShFdummy(*px, 3) * PtJpsiPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiPbP8800c4(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+// Pbp 8.8 TeV, 4th centrality bin 60-100 %
+//
+ return PtJpsiPbP8800ShFdummy(*px, 4) * PtJpsiPP8800(px, dummy);
+}
+
Double_t AliGenMUONlib::PtJpsi( const Double_t *px, const Double_t */*dummy*/)
{
// J/Psi pT
return x/TMath::Power(pass1,kxn);
}
-Double_t AliGenMUONlib::PtJpsiFlat( const Double_t */*px*/, const Double_t */*dummy*/ )
+Double_t AliGenMUONlib::PtJpsiCDFscaledPP9( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+//
+// pp 8.8 TeV
+// scaled from CDF data at 2 TeV
+//
+ const Double_t kpt0 = 5.245;
+ const Double_t kxn = 4.071;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPP7( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+//
+// pp 7 TeV
+// scaled from CDF data at 2 TeV
+
+ const Double_t kpt0 = 5.072;
+ const Double_t kxn = 4.071;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPP4( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+//
+// pp 3.94 TeV
+// scaled from CDF data at 2 TeV
+//
+ const Double_t kpt0 = 4.647;
+ const Double_t kxn = 4.071;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPP3( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+//
+// pp 2.76 TeV
+// scaled from CDF data at 1.9 TeV
+//
+ const Double_t kpt0 = 4.435;
+ const Double_t kxn = 4.071;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPP2( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT
+//
+// pp 1.96 TeV
+// fit of the CDF data at 1.96 TeV
+//
+ const Double_t kpt0 = 4.233;
+ const Double_t kxn = 4.071;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPPb9( const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+//
+// pPb 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.79
+//
+ Double_t c[5] = {6.42774e-01, 1.86168e-02, -6.77296e-04, 8.93512e-06, 1.31586e-07};
+ Double_t x=*px;
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ //
+ Double_t d = 1.+c[4]*TMath::Power(x,4);
+ return y/d * AliGenMUONlib::PtJpsiCDFscaledPP9(px,dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPbP9( const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+//
+// Pbp 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.79
+//
+ Double_t c[5] = {8.58557e-01, 5.39791e-02, -4.75180e-03, 2.49463e-04, 5.52396e-05};
+ Double_t x=*px;
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ //
+ Double_t d = 1.+c[4]*TMath::Power(x,4);
+ return y/d * AliGenMUONlib::PtJpsiCDFscaledPP9(px,dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiCDFscaledPbPb4( const Double_t *px, const Double_t *dummy)
+{
+// J/Psi pT
+//
+// PbPb 3.94 TeV, for EKS98 with minimum bias shadowing factor 0.66
+//
+ Double_t c[5] = {6.01022e-01, 4.70988e-02, -2.27917e-03, 3.09885e-05, 1.31955e-06};
+ Double_t x=*px;
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ //
+ Double_t d = 1.+c[4]*TMath::Power(x,4);
+ return y/d * AliGenMUONlib::PtJpsiCDFscaledPP4(px,dummy);
+}
+
+Double_t AliGenMUONlib::PtJpsiFlat( const Double_t */*px*/, const Double_t */*dummy*/ )
+{
+ return 1.;
+}
+
+Double_t AliGenMUONlib::PtJpsiPbPb( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT spectrum
+//
+// R. Vogt 2002
+// PbPb 5.5 TeV
+// MRST HO
+// mc = 1.4 GeV, pt-kick 1 GeV
+//
+ Float_t x = px[0];
+ Float_t c[8] = {
+ -2.13098e+00, 9.46552e+00, -5.06799e+00, 1.27260e+00,
+ -1.83806e-01, 1.55853e-02, -7.23241e-04, 1.42105e-05
+ };
+
+ Double_t y;
+ if (x < 10.) {
+ Int_t j;
+ y = c[j = 7];
+ while (j > 0) y = y * x +c[--j];
+ y = x * TMath::Exp(y);
+ } else {
+ y = 0.;
+ }
+ return y;
+}
+
+Double_t AliGenMUONlib::PtJpsiBPbPb( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT spectrum
+// B -> J/Psi X
+ Double_t x0 = 4.0384;
+ Double_t n = 3.0288;
+
+ Double_t x = px[0];
+ Double_t y = x / TMath::Power((1. + (x/x0)*(x/x0)), n);
+
+ return y;
+}
+
+
+Double_t AliGenMUONlib::PtJpsiPP( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi pT spectrum
+//
+// R. Vogt 2002
+// pp 14 TeV
+// MRST HO
+// mc = 1.4 GeV, pt-kick 1 GeV
+//
+ Float_t x = px[0];
+ Float_t c[4] = {8.47471e+00, -1.93567e+00, 1.50271e-01, -5.51212e-03};
+
+ Double_t y;
+ if (x < 10.) {
+ Int_t j;
+ y = c[j = 3];
+ while (j > 0) y = y * x +c[--j];
+ y = x * TMath::Exp(y);
+ } else {
+ y = 0.;
+ }
+ return y;
+}
+
+//
+// y-distribution
+//____________________________________________________________
+Double_t AliGenMUONlib::YJpsiPPdummy(Double_t x, Double_t energy)
+{
+// J/Psi y
+// pp
+// from the fit of RHIC + LHC data, see arXiv:1103.2394
+//
+ x = x/TMath::Log(energy/3.097);
+ x = x*x;
+ Double_t y = TMath::Exp(-x/0.4/0.4/2);
+ if(x > 1) y=0;
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiPPpoly(Double_t x, Double_t energy)
+{
+// J/Psi y
+// pp
+// from the fit of RHIC + LHC data, see arXiv:1103.2394
+//
+ x = x/TMath::Log(energy/3.097);
+ x = x*x;
+ Double_t y = 1 - 6.9*x*x;
+ if(y < 0) y=0;
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiPP7000(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 7 TeV
+//
+ return YJpsiPPdummy(*px, 7000);
+}
+
+Double_t AliGenMUONlib::YJpsiPP8000(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 7 TeV
+//
+ return YJpsiPPdummy(*px, 8000);
+}
+
+Double_t AliGenMUONlib::YJpsiPP2760(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 2.76 TeV
+//
+ return YJpsiPPdummy(*px, 2760);
+}
+
+Double_t AliGenMUONlib::YJpsiPP4400(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 4.4 TeV
+//
+ return YJpsiPPdummy(*px, 4400);
+}
+
+Double_t AliGenMUONlib::YJpsiPP5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 5.03 TeV
+//
+ return YJpsiPPdummy(*px, 5030);
+}
+
+Double_t AliGenMUONlib::YJpsiPP8800(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 8.8 TeV
+//
+ return YJpsiPPdummy(*px, 8800);
+}
+
+Double_t AliGenMUONlib::YJpsiPPpoly7000(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 7 TeV
+//
+ return YJpsiPPpoly(*px, 7000);
+}
+
+Double_t AliGenMUONlib::YJpsiPPpoly2760(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 2.76 TeV
+//
+ return YJpsiPPpoly(*px, 2760);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs y for PbPb min. bias and 11 centr. bins
+//
+// PbPb 2.76 TeV, for EKS98, minimum bias shadowing factor = 0.66 in 4pi
+//
+ const Double_t f1[12] = {1, 1.128, 1.097, 1.037, 0.937, 0.821, 0.693, 0.558,
+ 0.428, 0.317, 0.231, 0.156};
+ const Double_t f2[12] = {1, 1.313, 1.202, 1.039, 0.814, 0.593, 0.391, 0.224,
+ 0.106, 0.041, 0.013, 0.002};
+ const Double_t c1[5] = {1.5591e+00, 7.5827e-03, 2.0676e-03,-1.1717e-04, 1.5237e-06};
+ const Double_t c2[5] = {6.0861e-01, 4.8854e-03, 1.3685e-03,-7.9182e-05, 1.0475e-06};
+
+ x = x*x;
+ Double_t y1, y2;
+ Int_t j;
+ y1 = c1[j = 4]; y2 = c2[4];
+ while (j > 0) {y1 = y1 * x + c1[--j]; y2 = y2 * x + c2[j];}
+
+ y1 = 1 + (y1-2)*f1[n] + (y2+1-y1)*f2[n];
+ if(y1<0) y1=0;
+ return y1;
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, minimum bias 0-100 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 0) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c1(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 1st centrality bin 0-5 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 1) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c2(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 2nd centrality bin 5-10 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 2) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c3(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 3rd centrality bin 10-20 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 3) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c4(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 4th centrality bin 20-30 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 4) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c5(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 5th centrality bin 30-40 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 5) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c6(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 6th centrality bin 40-50 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 6) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c7(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 7th centrality bin 50-60 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 7) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c8(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 8th centrality bin 60-70 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 8) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c9(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 9th centrality bin 70-80 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 9) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c10(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 10th centrality bin 80-90 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 10) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPbPb2760c11(const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+// PbPb 2.76 TeV, 11th centrality bin 90-100 %
+//
+ return YJpsiPbPb2760ShFdummy(*px, 11) * YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiPP5030dummy(Double_t px)
+{
+ return AliGenMUONlib::YJpsiPP5030(&px, (Double_t*) 0);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb5030ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs y for pPb min. bias and 4 centr. bins
+//
+// pPb 5.03 TeV, for EPS09-LO, minimum bias shadowing factor = 0.81 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {7.641e-01, 1.611e-02, 4.109e-03, 2.818e-03, 3.359e-04,-6.376e-05,-9.717e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+ //
+ return 1 +(y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::YJpsiPPb5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 5.03 TeV, minimum bias 0-100 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 0) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb5030c1(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 5.03 TeV, 1st centrality bin 0-20 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 1) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb5030c2(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 2) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb5030c3(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 3) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb5030c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 5.03 TeV, 4th centrality bin 60-100 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 4) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 5.03 TeV, minimum bias 0-100 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 0) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP5030c1(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 5.03 TeV, 1st centrality bin 0-20 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 1) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP5030c2(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 2) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP5030c3(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 3) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP5030c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 5.03 TeV, 4th centrality bin 60-100 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb5030ShFdummy(x, 4) * YJpsiPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPP8800dummy(Double_t px)
+{
+ return AliGenMUONlib::YJpsiPP8800(&px, (Double_t*) 0);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb8800ShFdummy(Double_t x, Int_t n)
+{
+// J/Psi shadowing factor vs y for pPb min. bias and 4 centr. bins
+//
+// pPb 8.8 TeV, for EKS98, minimum bias shadowing factor = 0.78 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {7.4372e-01, 2.3299e-02, 2.8678e-03, 1.9595e-03,
+ 3.2849e-04,-4.0547e-05,-7.9732e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+ //
+ return 1 +(y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::YJpsiPPb8800(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 8.8 TeV, minimum bias 0-100 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 0) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb8800c1(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 8.8 TeV, 1st centrality bin 0-20 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 1) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb8800c2(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 8.8 TeV, 2nd centrality bin 20-40 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 2) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb8800c3(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 8.8 TeV, 3rd centrality bin 40-60 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 3) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPPb8800c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pPb 8.8 TeV, 4th centrality bin 60-100 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 4) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP8800(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 8.8 TeV, minimum bias 0-100 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 0) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP8800c1(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 8.8 TeV, 1st centrality bin 0-20 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 1) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP8800c2(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 8.8 TeV, 2nd centrality bin 20-40 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 2) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP8800c3(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 8.8 TeV, 3rd centrality bin 40-60 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 3) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiPbP8800c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// Pbp 8.8 TeV, 4th centrality bin 60-100 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YJpsiPPb8800ShFdummy(x, 4) * YJpsiPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsi(const Double_t *py, const Double_t */*dummy*/)
+{
+// J/psi y
+ const Double_t ky0 = 4.;
+ const Double_t kb=1.;
+ Double_t yj;
+ Double_t y=TMath::Abs(*py);
+ //
+ if (y < ky0)
+ yj=kb;
+ else
+ yj=kb*TMath::Exp(-(y-ky0)*(y-ky0)/2);
+ return yj;
+}
+
+Double_t AliGenMUONlib::YJpsiFlat( const Double_t */*py*/, const Double_t */*dummy*/ )
+{
+ return 1.;
+}
+
+
+Double_t AliGenMUONlib::YJpsiPbPb( const Double_t *px, const Double_t */*dummy*/)
+{
+
+//
+// J/Psi y
+//
+//
+// R. Vogt 2002
+// PbPb 5.5 TeV
+// MRST HO
+// mc = 1.4 GeV, pt-kick 1 GeV
+//
+ Double_t c[5] = {-6.03425e+02, 4.98257e+02, -1.38794e+02, 1.62209e+01, -6.85955e-01};
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x < 4.) {
+ y = 31.754;
+ } else if (x < 6) {
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ } else {
+ y =0.;
+ }
+
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaled( const Double_t *px, const Double_t* dummy)
+{
+ // J/Psi y
+ return AliGenMUONlib::YJpsiPbPb(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP( const Double_t *px, const Double_t* dummy)
+{
+ // J/Psi y
+ return AliGenMUONlib::YJpsiPP(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP10( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+//
+// pp 10 TeV
+// scaled from YJpsiPP(14 TeV) using 10 TeV / 14 TeV ratio of y-spectra in LO pQCD.
+// see S.Grigoryan, PWG3 Meeting, 27th Oct 2008
+//
+
+ Double_t c[5] = {2.46681e+01, 8.91486e+01, -3.21227e+01, 3.63075e+00, -1.32047e-01};
+
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x < 3.2) {
+ y = 98.523 - 1.3664 * x * x;
+ } else if (x < 7.5) {
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ } else {
+ y =0.;
+ }
+
+ if(y<0) y=0;
+
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP9( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+//
+// pp 8.8 TeV
+// rescaling of YJpsiPP(14 TeV) using 8.8 TeV / 14 TeV ratio of y-spectra in LO QCD
+//
+ Double_t c[5] = {3.33882e+02, -1.30980e+02, 2.59082e+01, -3.08935e+00, 1.56375e-01};
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x < 3.7) {
+ y = 99.236 - 1.5498 * x * x;
+ } else if (x < 7.4) {
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ } else {
+ y =0.;
+ }
+
+ if(y<0) y=0;
+
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP9dummy(Double_t px)
+{
+ return AliGenMUONlib::YJpsiCDFscaledPP9(&px, (Double_t*) 0);
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP7( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+//
+// pp 7 TeV
+// scaled from YJpsiPP(14 TeV) using 7 TeV / 14 TeV ratio of y-spectra in LO pQCD.
+//
+
+ Double_t c[5] = {6.71181e+02, -3.69240e+02, 8.89644e+01, -1.04937e+01, 4.80959e-01};
+
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x < 4.0) {
+ y = 100.78 - 1.8353 * x * x;
+ } else if (x < 7.3) {
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ } else {
+ y =0.;
+ }
+
+ if(y<0) y=0;
+
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP4( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+//
+// pp 3.94 TeV
+// rescaling of YJpsiPP(14 TeV) using 3.94 TeV / 14 TeV ratio of y-spectra in LO QCD
+//
+ Double_t c[5] = {4.00785e+02, -1.41159e+01, -3.28599e+01, 5.53048e+00, -2.45151e-01};
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x < 5.5) {
+ y = 107.389 - 2.7454 * x * x;
+ } else if (x < 7.0) {
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ } else {
+ y =0.;
+ }
+
+ if(y<0) y=0;
+
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP3( const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+ return AliGenMUONlib::YJpsiPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPP2( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+// pp 1.96 TeV
+//
+ return YJpsiPPdummy(*px, 1960);
+}
+
+Double_t AliGenMUONlib::YJpsiPP( const Double_t *px, const Double_t */*dummy*/)
+{
+
+//
+// J/Psi y
+//
+//
+// R. Vogt 2002
+// pp 14 TeV
+// MRST HO
+// mc = 1.4 GeV, pt-kick 1 GeV
+//
+
+ Double_t c[5] = {1.38532e+00, 1.00596e+02, -3.46378e+01, 3.94172e+00, -1.48319e-01};
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x < 2.5) {
+ y = 96.455 - 0.8483 * x * x;
+ } else if (x < 7.9) {
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ } else {
+ y =0.;
+ }
+
+ return y;
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPPb9( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+//
+// pPb 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.79
+//
+ Double_t c[7] = {7.52296e-01, 2.49917e-02, 3.36500e-03, 1.91187e-03, 2.92154e-04,
+ -4.16509e-05,-7.62709e-06};
+ Double_t y;
+ Double_t x = px[0] + 0.47; // rapidity shift
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+
+ return y * AliGenMUONlib::YJpsiCDFscaledPP9dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPbP9( const Double_t *px, const Double_t */*dummy*/)
+{
+// J/Psi y
+//
+// Pbp 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.79
+//
+ Double_t c[7] = {7.52296e-01, 2.49917e-02, 3.36500e-03, 1.91187e-03, 2.92154e-04,
+ -4.16509e-05,-7.62709e-06};
+ Double_t y;
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+
+ return y * AliGenMUONlib::YJpsiCDFscaledPP9dummy(x);
+}
+
+Double_t AliGenMUONlib::YJpsiCDFscaledPbPb4( const Double_t *px, const Double_t *dummy)
+{
+// J/Psi y
+//
+// PbPb 3.94 TeV, for EKS98 with minimum bias shadowing factor 0.66
+//
+ Double_t c[4] = {5.95228e-01, 9.45069e-03, 2.44710e-04, -1.32894e-05};
+ Double_t x = px[0]*px[0];
+ Double_t y;
+ Int_t j;
+ y = c[j = 3];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+
+ return y * AliGenMUONlib::YJpsiCDFscaledPP4(px,dummy);
+}
+
+Double_t AliGenMUONlib::YJpsiBPbPb( const Double_t *px, const Double_t */*dummy*/)
+{
+
+//
+// J/Psi from B->J/Psi X
+//
+//
+
+
+ Double_t c[7] = {7.37025e-02, 0., -2.94487e-03, 0., 6.07953e-06, 0., 5.39219e-07};
+
+ Double_t x = TMath::Abs(px[0]);
+ Double_t y;
+
+ if (x > 6.) {
+ y = 0.;
+ } else {
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ }
+
+ return y;
+}
+
+
+
+// particle composition
+//
+Int_t AliGenMUONlib::IpJpsi(TRandom *)
+{
+// J/Psi composition
+ return 443;
+}
+Int_t AliGenMUONlib::IpPsiP(TRandom *)
+{
+// Psi prime composition
+ return 100443;
+}
+Int_t AliGenMUONlib::IpJpsiFamily(TRandom *)
+{
+// J/Psi composition
+ Int_t ip;
+ Float_t r = gRandom->Rndm();
+ if (r < 0.98) {
+ ip = 443;
+ } else {
+ ip = 100443;
+ }
+ return ip;
+}
+
+
+
+// Upsilon
+//
+//
+// pt-distribution
+//____________________________________________________________
+Double_t AliGenMUONlib::PtUpsilonPPdummy(Double_t x, Double_t energy)
+{
+// Upsilon pT
+// pp
+// from the fit of CDF & LHC data, like for J/Psi in arXiv:1103.2394
+//
+ const Double_t kpt0 = 1.96*TMath::Power(energy,0.095);
+ const Double_t kxn = 3.4;
+ //
+ Double_t pass1 = 1.+0.471*(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPP7000(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+// pp 7 TeV
+//
+ return PtUpsilonPPdummy(*px,7000);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPP8000(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+// pp 8 TeV
+//
+ return PtUpsilonPPdummy(*px,8000);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPP2760(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+// pp 2.76 TeV
+//
+ return PtUpsilonPPdummy(*px,2760);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPP4400(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+// pp 4.4 TeV
+//
+ return PtUpsilonPPdummy(*px,4400);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPP5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+// pp 5.03 TeV
+//
+ return PtUpsilonPPdummy(*px,5030);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPP8800(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+// pp 8.8 TeV
+//
+ return PtUpsilonPPdummy(*px,8800);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760ShFdummy(Double_t x, Int_t n)
+{
+// Usilon shadowing factor vs pT for PbPb min. bias and 11 centr. bins (in 2.5<y<4)
+//
+// PbPb 2.76 TeV, for EKS98, minimum bias shadowing factor = 0.87 in 4pi
+//
+ const Double_t f1[12] = {1, 1.128, 1.097, 1.037, 0.937, 0.821, 0.693, 0.558,
+ 0.428, 0.317, 0.231, 0.156};
+ const Double_t f2[12] = {1, 1.313, 1.202, 1.039, 0.814, 0.593, 0.391, 0.224,
+ 0.106, 0.041, 0.013, 0.002};
+ const Double_t c1[7] = {1.9089e+00, 1.2969e-03, 8.9786e-05,-5.3062e-06,
+ -1.0046e-06,6.1446e-08, 1.0885e-09};
+ const Double_t c2[7] = {8.8423e-01,-8.7488e-05, 5.9857e-04,-5.7959e-05,
+ 2.0059e-06,-2.7343e-08, 6.6053e-10};
+ Double_t y1, y2;
+ Int_t j;
+ y1 = c1[j = 6]; y2 = c2[6];
+ while (j > 0) {y1 = y1 * x + c1[--j]; y2 = y2 * x + c2[j];}
+
+ y1 /= 1.+c1[6]*TMath::Power(x,6);
+ y2 /= 1.+c2[6]*TMath::Power(x,6);
+ //
+ y1 = 1 + (y1-2)*f1[n] + (y2+1-y1)*f2[n];
+ if(y1<0) y1=0;
+ return y1;
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, minimum bias 0-100 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 0) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c1(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 1st centrality bin 0-5 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 1) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c2(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 2nd centrality bin 5-10 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 2) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c3(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 3rd centrality bin 10-20 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 3) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c4(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 4th centrality bin 20-30 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 4) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c5(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 5th centrality bin 30-40 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 5) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c6(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 6th centrality bin 40-50 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 6) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c7(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 7th centrality bin 50-60 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 7) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c8(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 8th centrality bin 60-70 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 8) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c9(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 9th centrality bin 70-80 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 9) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c10(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 10th centrality bin 80-90 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 10) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbPb2760c11(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// PbPb 2.76 TeV, 11th centrality bin 90-100 %
+//
+ return PtUpsilonPbPb2760ShFdummy(*px, 11) * PtUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb5030ShFdummy(Double_t x, Int_t n)
+{
+// Upsilon shadowing factor vs pT for pPb min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// pPb 5.03 TeV, for EPS09-LO, minimum bias shadowing factor = 0.92 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[5] = {8.069e-01, 1.407e-04, 4.372e-04,-2.797e-05, 4.405e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[4]*TMath::Power(x,4);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb5030(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 5.03 TeV, minimum bias 0-100 %
+//
+ return PtUpsilonPPb5030ShFdummy(*px, 0) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb5030c1(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 5.03 TeV, 1st centrality bin 0-20 %
+//
+ return PtUpsilonPPb5030ShFdummy(*px, 1) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb5030c2(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ return PtUpsilonPPb5030ShFdummy(*px, 2) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb5030c3(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ return PtUpsilonPPb5030ShFdummy(*px, 3) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb5030c4(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 5.03 TeV, 4th centrality bin 60-100 %
+//
+ return PtUpsilonPPb5030ShFdummy(*px, 4) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP5030ShFdummy(Double_t x, Int_t n)
+{
+// Upsilon shadowing factor vs pT for Pbp min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// Pbp 5.03 TeV, for EPS09-LO, minimum bias shadowing factor = 0.92 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[5] = {1.122, 2.565e-03,-3.025e-04, 4.113e-06, 6.140e-07};
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[4]*TMath::Power(x,4);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP5030(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 5.03 TeV, minimum bias 0-100 %
+//
+ return PtUpsilonPbP5030ShFdummy(*px, 0) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP5030c1(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 5.03 TeV, 1st centrality bin 0-20 %
+//
+ return PtUpsilonPbP5030ShFdummy(*px, 1) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP5030c2(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ return PtUpsilonPbP5030ShFdummy(*px, 2) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP5030c3(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ return PtUpsilonPbP5030ShFdummy(*px, 3) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP5030c4(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 5.03 TeV, 4th centrality bin 60-100 %
+//
+ return PtUpsilonPbP5030ShFdummy(*px, 4) * PtUpsilonPP5030(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb8800ShFdummy(Double_t x, Int_t n)
+{
+// Upsilon shadowing factor vs pT for pPb min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// pPb 8.8 TeV, for EKS98, minimum bias shadowing factor = 0.89 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[5] = {7.6561e-01, 1.1360e-04, 4.9596e-04,-3.0287e-05, 3.7555e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[4]*TMath::Power(x,4);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb8800(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 8.8 TeV, minimum bias 0-100 %
+//
+ return PtUpsilonPPb8800ShFdummy(*px, 0) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb8800c1(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 8.8 TeV, 1st centrality bin 0-20 %
+//
+ return PtUpsilonPPb8800ShFdummy(*px, 1) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb8800c2(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 8.8 TeV, 2nd centrality bin 20-40 %
+//
+ return PtUpsilonPPb8800ShFdummy(*px, 2) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb8800c3(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 8.8 TeV, 3rd centrality bin 40-60 %
+//
+ return PtUpsilonPPb8800ShFdummy(*px, 3) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPPb8800c4(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// pPb 8.8 TeV, 4th centrality bin 60-100 %
+//
+ return PtUpsilonPPb8800ShFdummy(*px, 4) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP8800ShFdummy(Double_t x, Int_t n)
+{
+// Upsilon shadowing factor vs pT for Pbp min. bias and 4 centr. bins (in 2.5<y<4)
+//
+// Pbp 8.8 TeV, for EKS98, minimum bias shadowing factor = 0.89 in 4pi
+//
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[5] = {1.0975, 3.1905e-03,-2.0477e-04, 8.5270e-06, 2.5343e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ y /= 1 + c[4]*TMath::Power(x,4);
+ //
+ return 1 + (y-1)*f[n];
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP8800(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 8.8 TeV, minimum bias 0-100 %
+//
+ return PtUpsilonPbP8800ShFdummy(*px, 0) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP8800c1(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 8.8 TeV, 1st centrality bin 0-20 %
+//
+ return PtUpsilonPbP8800ShFdummy(*px, 1) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP8800c2(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 8.8 TeV, 2nd centrality bin 20-40 %
+//
+ return PtUpsilonPbP8800ShFdummy(*px, 2) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP8800c3(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 8.8 TeV, 3rd centrality bin 40-60 %
+//
+ return PtUpsilonPbP8800ShFdummy(*px, 3) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonPbP8800c4(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+// Pbp 8.8 TeV, 4th centrality bin 60-100 %
+//
+ return PtUpsilonPbP8800ShFdummy(*px, 4) * PtUpsilonPP8800(px, dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilon( const Double_t *px, const Double_t */*dummy*/ )
+{
+// Upsilon pT
+ const Double_t kpt0 = 5.3;
+ const Double_t kxn = 2.5;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaled( const Double_t *px, const Double_t */*dummy*/ )
+{
+// Upsilon pT
+ const Double_t kpt0 = 7.753;
+ const Double_t kxn = 3.042;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPP( const Double_t *px, const Double_t */*dummy*/ )
+{
+// Upsilon pT
+//
+// pp 14 TeV
+//
+// scaled from CDF data at 2 TeV
+
+ const Double_t kpt0 = 8.610;
+ const Double_t kxn = 3.051;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPP10( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+//
+// pp 10 TeV
+//
+// scaled from CDF data at 2 TeV
+
+ const Double_t kpt0 = 8.235;
+ const Double_t kxn = 3.051;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPP9( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+//
+// pp 8.8 TeV
+// scaled from CDF data at 2 TeV
+//
+ const Double_t kpt0 = 8.048;
+ const Double_t kxn = 3.051;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPP7( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+//
+// pp 7 TeV
+//
+// scaled from CDF data at 2 TeV
+
+ const Double_t kpt0 = 7.817;
+ const Double_t kxn = 3.051;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPP4( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon pT
+//
+// pp 3.94 TeV
+// scaled from CDF data at 2 TeV
+//
+ const Double_t kpt0 = 7.189;
+ const Double_t kxn = 3.051;
+ Double_t x=*px;
+ //
+ Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
+ return x/TMath::Power(pass1,kxn);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPPb9( const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+//
+// pPb 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.89
+//
+ Double_t c[5] = {7.64952e-01, 1.12501e-04, 4.96038e-04, -3.03198e-05, 3.74035e-06};
+ Double_t x=*px;
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ //
+ Double_t d = 1.+c[4]*TMath::Power(x,4);
+ return y/d * AliGenMUONlib::PtUpsilonCDFscaledPP9(px,dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPbP9( const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+//
+// Pbp 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.89
+//
+ Double_t c[5] = {1.09881e+00, 3.08329e-03, -2.00356e-04, 8.28991e-06, 2.52576e-06};
+ Double_t x=*px;
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ //
+ Double_t d = 1.+c[4]*TMath::Power(x,4);
+ return y/d * AliGenMUONlib::PtUpsilonCDFscaledPP9(px,dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonCDFscaledPbPb4( const Double_t *px, const Double_t *dummy)
+{
+// Upsilon pT
+//
+// PbPb 3.94 TeV, for EKS98 with minimum bias shadowing factor 0.85
+//
+ Double_t c[5] = {8.65872e-01, 2.05465e-03, 2.56063e-04, -1.65598e-05, 2.29209e-06};
+ Double_t x=*px;
+ Double_t y;
+ Int_t j;
+ y = c[j = 4];
+ while (j > 0) y = y * x + c[--j];
+ //
+ Double_t d = 1.+c[4]*TMath::Power(x,4);
+ return y/d * AliGenMUONlib::PtUpsilonCDFscaledPP4(px,dummy);
+}
+
+Double_t AliGenMUONlib::PtUpsilonFlat( const Double_t */*px*/, const Double_t */*dummy*/ )
{
return 1.;
}
-Double_t AliGenMUONlib::PtJpsiPbPb( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::PtUpsilonPbPb( const Double_t *px, const Double_t */*dummy*/)
{
-// J/Psi pT spectrum
+//
+// Upsilon pT
+//
//
// R. Vogt 2002
// PbPb 5.5 TeV
// mc = 1.4 GeV, pt-kick 1 GeV
//
Float_t x = px[0];
- Float_t c[8] = {
- -2.13098e+00, 9.46552e+00, -5.06799e+00, 1.27260e+00,
- -1.83806e-01, 1.55853e-02, -7.23241e-04, 1.42105e-05
+ Double_t c[8] = {
+ -1.03488e+01, 1.28065e+01, -6.60500e+00, 1.66140e+00,
+ -2.34293e-01, 1.86925e-02, -7.80708e-04, 1.30610e-05
};
-
Double_t y;
if (x < 10.) {
Int_t j;
return y;
}
-Double_t AliGenMUONlib::PtJpsiBPbPb( const Double_t *px, const Double_t */*dummy*/)
-{
-// J/Psi pT spectrum
-// B -> J/Psi X
- Double_t x0 = 4.0384;
- Double_t n = 3.0288;
-
- Double_t x = px[0];
- Double_t y = x / TMath::Power((1. + (x/x0)*(x/x0)), n);
-
- return y;
-}
-
-
-Double_t AliGenMUONlib::PtJpsiPP( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::PtUpsilonPP( const Double_t *px, const Double_t */*dummy*/)
{
-// J/Psi pT spectrum
+//
+// Upsilon pT
+//
//
// R. Vogt 2002
// pp 14 TeV
// mc = 1.4 GeV, pt-kick 1 GeV
//
Float_t x = px[0];
- Float_t c[4] = {8.47471e+00, -1.93567e+00, 1.50271e-01, -5.51212e-03};
-
+ Double_t c[8] = {-7.93955e+00, 1.06306e+01, -5.21392e+00, 1.19703e+00,
+ -1.45718e-01, 8.95151e-03, -2.04806e-04, -1.13053e-06};
+
Double_t y;
if (x < 10.) {
Int_t j;
- y = c[j = 3];
+ y = c[j = 7];
while (j > 0) y = y * x +c[--j];
y = x * TMath::Exp(y);
} else {
}
//
-// y-distribution
+// y-distribution
+//
//____________________________________________________________
-Double_t AliGenMUONlib::YJpsi(const Double_t *py, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPPdummy(Double_t x, Double_t energy)
{
-// J/psi y
- const Double_t ky0 = 4.;
- const Double_t kb=1.;
- Double_t yj;
- Double_t y=TMath::Abs(*py);
- //
- if (y < ky0)
- yj=kb;
- else
- yj=kb*TMath::Exp(-(y-ky0)*(y-ky0)/2);
- return yj;
+// Upsilon y
+// pp
+// from the fit of CDF & LHC data, like for J/Psi in arXiv:1103.2394
+//
+ x = x/TMath::Log(energy/9.46);
+ x = x*x;
+ Double_t y = TMath::Exp(-x/0.4/0.4/2);
+ if(x > 1) y=0;
+ return y;
}
-Double_t AliGenMUONlib::YJpsiFlat( const Double_t */*py*/, const Double_t */*dummy*/ )
+Double_t AliGenMUONlib::YUpsilonPPpoly(Double_t x, Double_t energy)
{
- return 1.;
+// Upsilon y
+// pp
+// from the fit of CDF & LHC data, like for J/Psi in arXiv:1103.2394
+//
+ x = x/TMath::Log(energy/9.46);
+ x = x*x;
+ Double_t y = 1 - 6.9*x*x;
+ if(y < 0) y=0;
+ return y;
}
-
-Double_t AliGenMUONlib::YJpsiPbPb( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPP7000(const Double_t *px, const Double_t */*dummy*/)
{
-
+// Upsilon y
+// pp 7 TeV
//
-// J/Psi y
+ return YUpsilonPPdummy(*px, 7000);
+}
+
+Double_t AliGenMUONlib::YUpsilonPP8000(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pp 7 TeV
//
+ return YUpsilonPPdummy(*px, 8000);
+}
+
+Double_t AliGenMUONlib::YUpsilonPP2760(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pp 2.76 TeV
//
-// R. Vogt 2002
-// PbPb 5.5 TeV
-// MRST HO
-// mc = 1.4 GeV, pt-kick 1 GeV
+ return YUpsilonPPdummy(*px, 2760);
+}
+
+Double_t AliGenMUONlib::YUpsilonPP4400(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pp 4.4 TeV
//
- Double_t c[5] = {-6.03425e+02, 4.98257e+02, -1.38794e+02, 1.62209e+01, -6.85955e-01};
- Double_t x = TMath::Abs(px[0]);
- Double_t y;
-
- if (x < 4.) {
- y = 31.754;
- } else if (x < 6) {
- Int_t j;
- y = c[j = 4];
- while (j > 0) y = y * x + c[--j];
- } else {
- y =0.;
- }
-
- return y;
+ return YUpsilonPPdummy(*px, 4400);
}
-Double_t AliGenMUONlib::YJpsiCDFscaled( const Double_t *px, const Double_t* dummy)
+Double_t AliGenMUONlib::YUpsilonPP5030(const Double_t *px, const Double_t */*dummy*/)
{
- // J/Psi y
- return AliGenMUONlib::YJpsiPbPb(px, dummy);
+// Upsilon y
+// pp 5.03 TeV
+//
+ return YUpsilonPPdummy(*px, 5030);
}
-Double_t AliGenMUONlib::YJpsiCDFscaledPP( const Double_t *px, const Double_t* dummy)
+Double_t AliGenMUONlib::YUpsilonPP8800(const Double_t *px, const Double_t */*dummy*/)
{
- // J/Psi y
- return AliGenMUONlib::YJpsiPP(px, dummy);
+// Upsilon y
+// pp 8.8 TeV
+//
+ return YUpsilonPPdummy(*px, 8800);
}
-Double_t AliGenMUONlib::YJpsiCDFscaledPP10( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPPpoly7000(const Double_t *px, const Double_t */*dummy*/)
{
+// Upsilon y
+// pp 7 TeV
+//
+ return YUpsilonPPpoly(*px, 7000);
+}
+Double_t AliGenMUONlib::YUpsilonPPpoly2760(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pp 2.76 TeV
//
-// J/Psi y
+ return YUpsilonPPpoly(*px, 2760);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbPb2760ShFdummy(Double_t x, Int_t n)
+{
+// Upsilon shadowing factor vs y for PbPb min. bias and 11 centr. bins
//
-// pp 10 TeV
-// scaled from YJpsiPP(14 TeV) using 10 TeV / 14 TeV ratio of y-spectra in LO pQCD.
-// see S.Grigoryan, PWG3 Meeting, 27th Oct 2008
+// PbPb 2.76 TeV, for EKS98, minimum bias shadowing factor = 0.87 in 4pi
//
+ const Double_t f1[12] = {1, 1.128, 1.097, 1.037, 0.937, 0.821, 0.693, 0.558,
+ 0.428, 0.317, 0.231, 0.156};
+ const Double_t f2[12] = {1, 1.313, 1.202, 1.039, 0.814, 0.593, 0.391, 0.224,
+ 0.106, 0.041, 0.013, 0.002};
+ const Double_t c1[5] = {1.8547e+00, 1.6717e-02,-2.1285e-04,-9.7662e-05, 2.5768e-06};
+ const Double_t c2[5] = {8.6029e-01, 1.1742e-02,-2.7944e-04,-6.7973e-05, 1.8838e-06};
- Double_t c[5] = {2.46681e+01, 8.91486e+01, -3.21227e+01, 3.63075e+00, -1.32047e-01};
+ x = x*x;
+ Double_t y1, y2;
+ Int_t j;
+ y1 = c1[j = 4]; y2 = c2[4];
+ while (j > 0) {y1 = y1 * x + c1[--j]; y2 = y2 * x + c2[j];}
+
+ y1 = 1 + (y1-2)*f1[n] + (y2+1-y1)*f2[n];
+ if(y1<0) y1=0;
+ return y1;
+}
- Double_t x = TMath::Abs(px[0]);
- Double_t y;
+Double_t AliGenMUONlib::YUpsilonPbPb2760(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, minimum bias 0-100 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 0) * YUpsilonPP2760(px, dummy);
+}
- if (x < 3.2) {
- y = 98.523 - 1.3664 * x * x;
- } else if (x < 7.5) {
- Int_t j;
- y = c[j = 4];
- while (j > 0) y = y * x + c[--j];
- } else {
- y =0.;
- }
+Double_t AliGenMUONlib::YUpsilonPbPb2760c1(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 1st centrality bin 0-5 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 1) * YUpsilonPP2760(px, dummy);
+}
- if(y<0) y=0;
+Double_t AliGenMUONlib::YUpsilonPbPb2760c2(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 2nd centrality bin 5-10 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 2) * YUpsilonPP2760(px, dummy);
+}
- return y;
+Double_t AliGenMUONlib::YUpsilonPbPb2760c3(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 3rd centrality bin 10-20 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 3) * YUpsilonPP2760(px, dummy);
}
-Double_t AliGenMUONlib::YJpsiPP( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPbPb2760c4(const Double_t *px, const Double_t *dummy)
{
+// Upsilon y
+// PbPb 2.76 TeV, 4th centrality bin 20-30 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 4) * YUpsilonPP2760(px, dummy);
+}
+Double_t AliGenMUONlib::YUpsilonPbPb2760c5(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 5th centrality bin 30-40 %
//
-// J/Psi y
+ return YUpsilonPbPb2760ShFdummy(*px, 5) * YUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbPb2760c6(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 6th centrality bin 40-50 %
//
+ return YUpsilonPbPb2760ShFdummy(*px, 6) * YUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbPb2760c7(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 7th centrality bin 50-60 %
//
-// R. Vogt 2002
-// pp 14 TeV
-// MRST HO
-// mc = 1.4 GeV, pt-kick 1 GeV
+ return YUpsilonPbPb2760ShFdummy(*px, 7) * YUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbPb2760c8(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 8th centrality bin 60-70 %
//
+ return YUpsilonPbPb2760ShFdummy(*px, 8) * YUpsilonPP2760(px, dummy);
+}
- Double_t c[5] = {1.38532e+00, 1.00596e+02, -3.46378e+01, 3.94172e+00, -1.48319e-01};
- Double_t x = TMath::Abs(px[0]);
- Double_t y;
-
- if (x < 2.5) {
- y = 96.455 - 0.8483 * x * x;
- } else if (x < 7.9) {
- Int_t j;
- y = c[j = 4];
- while (j > 0) y = y * x + c[--j];
- } else {
- y =0.;
- }
-
- return y;
+Double_t AliGenMUONlib::YUpsilonPbPb2760c9(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 9th centrality bin 70-80 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 9) * YUpsilonPP2760(px, dummy);
}
-Double_t AliGenMUONlib::YJpsiBPbPb( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPbPb2760c10(const Double_t *px, const Double_t *dummy)
{
+// Upsilon y
+// PbPb 2.76 TeV, 10th centrality bin 80-90 %
+//
+ return YUpsilonPbPb2760ShFdummy(*px, 10) * YUpsilonPP2760(px, dummy);
+}
+Double_t AliGenMUONlib::YUpsilonPbPb2760c11(const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+// PbPb 2.76 TeV, 11th centrality bin 90-100 %
//
-// J/Psi from B->J/Psi X
+ return YUpsilonPbPb2760ShFdummy(*px, 11) * YUpsilonPP2760(px, dummy);
+}
+
+Double_t AliGenMUONlib::YUpsilonPP5030dummy(Double_t px)
+{
+ return AliGenMUONlib::YUpsilonPP5030(&px, (Double_t*) 0);
+}
+
+Double_t AliGenMUONlib::YUpsilonPPb5030ShFdummy(Double_t x, Int_t n)
+{
+// Upsilon shadowing factor vs y for pPb min. bias and 4 centr. bins
//
+// pPb 5.03 TeV, for EPS09-LO, minimum bias shadowing factor = 0.92 in 4pi
//
-
-
- Double_t c[7] = {7.37025e-02, 0., -2.94487e-03, 0., 6.07953e-06, 0., 5.39219e-07};
-
- Double_t x = TMath::Abs(px[0]);
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {8.885e-01, 4.620e-02, 1.158e-02, 4.959e-04,-4.422e-04,-5.345e-05, 0.};
Double_t y;
-
- if (x > 6.) {
- y = 0.;
- } else {
- Int_t j;
- y = c[j = 6];
- while (j > 0) y = y * x + c[--j];
- }
-
- return y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+ //
+ return 1 +(y-1)*f[n];
}
-
-
-// particle composition
+Double_t AliGenMUONlib::YUpsilonPPb5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pPb 5.03 TeV, minimum bias 0-100 %
//
-Int_t AliGenMUONlib::IpJpsi(TRandom *)
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 0) * YUpsilonPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPPb5030c1(const Double_t *px, const Double_t */*dummy*/)
{
-// J/Psi composition
- return 443;
+// Upsilon y
+// pPb 5.03 TeV, 1st centrality bin 0-20 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 1) * YUpsilonPP5030dummy(x);
}
-Int_t AliGenMUONlib::IpPsiP(TRandom *)
+
+Double_t AliGenMUONlib::YUpsilonPPb5030c2(const Double_t *px, const Double_t */*dummy*/)
{
-// Psi prime composition
- return 100443;
+// Upsilon y
+// pPb 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 2) * YUpsilonPP5030dummy(x);
}
-Int_t AliGenMUONlib::IpJpsiFamily(TRandom *)
+
+Double_t AliGenMUONlib::YUpsilonPPb5030c3(const Double_t *px, const Double_t */*dummy*/)
{
-// J/Psi composition
- Int_t ip;
- Float_t r = gRandom->Rndm();
- if (r < 0.98) {
- ip = 443;
- } else {
- ip = 100443;
- }
- return ip;
+// Upsilon y
+// pPb 5.03 TeV, 3rd centrality bin 40-60 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 3) * YUpsilonPP5030dummy(x);
}
-
-
-// Upsilon
+Double_t AliGenMUONlib::YUpsilonPPb5030c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pPb 5.03 TeV, 4th centrality bin 60-100 %
//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 4) * YUpsilonPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP5030(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 5.03 TeV, minimum bias 0-100 %
//
-// pt-distribution
-//____________________________________________________________
-Double_t AliGenMUONlib::PtUpsilon( const Double_t *px, const Double_t */*dummy*/ )
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 0) * YUpsilonPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP5030c1(const Double_t *px, const Double_t */*dummy*/)
{
-// Upsilon pT
- const Double_t kpt0 = 5.3;
- const Double_t kxn = 2.5;
- Double_t x=*px;
- //
- Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
- return x/TMath::Power(pass1,kxn);
+// Upsilon y
+// Pbp 5.03 TeV, 1st centrality bin 0-20 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 1) * YUpsilonPP5030dummy(x);
}
-Double_t AliGenMUONlib::PtUpsilonCDFscaled( const Double_t *px, const Double_t */*dummy*/ )
+Double_t AliGenMUONlib::YUpsilonPbP5030c2(const Double_t *px, const Double_t */*dummy*/)
{
-// Upsilon pT
- const Double_t kpt0 = 7.753;
- const Double_t kxn = 3.042;
- Double_t x=*px;
- //
- Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
- return x/TMath::Power(pass1,kxn);
+// Upsilon y
+// Pbp 5.03 TeV, 2nd centrality bin 20-40 %
+//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 2) * YUpsilonPP5030dummy(x);
}
-Double_t AliGenMUONlib::PtUpsilonCDFscaledPP( const Double_t *px, const Double_t */*dummy*/ )
+Double_t AliGenMUONlib::YUpsilonPbP5030c3(const Double_t *px, const Double_t */*dummy*/)
{
-// Upsilon pT
+// Upsilon y
+// Pbp 5.03 TeV, 3rd centrality bin 40-60 %
//
-// pp 14 TeV
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 3) * YUpsilonPP5030dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP5030c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 5.03 TeV, 4th centrality bin 60-100 %
//
-// scaled from CDF data at 2 TeV
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb5030ShFdummy(x, 4) * YUpsilonPP5030dummy(x);
+}
- const Double_t kpt0 = 8.610;
- const Double_t kxn = 3.051;
- Double_t x=*px;
- //
- Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
- return x/TMath::Power(pass1,kxn);
+Double_t AliGenMUONlib::YUpsilonPP8800dummy(Double_t px)
+{
+ return AliGenMUONlib::YUpsilonPP8800(&px, (Double_t*) 0);
}
-Double_t AliGenMUONlib::PtUpsilonCDFscaledPP10( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPPb8800ShFdummy(Double_t x, Int_t n)
{
-// Upsilon pT
+// Upsilon shadowing factor vs y for pPb min. bias and 4 centr. bins
//
-// pp 10 TeV
+// pPb 8.8 TeV, for EKS98, minimum bias shadowing factor = 0.89 in 4pi
//
-// scaled from CDF data at 2 TeV
-
- const Double_t kpt0 = 8.235;
- const Double_t kxn = 3.051;
- Double_t x=*px;
- //
- Double_t pass1 = 1.+(x/kpt0)*(x/kpt0);
- return x/TMath::Power(pass1,kxn);
+ const Double_t f[5] = {1, 1.33, 1.05, 0.67, 0.23};
+ const Double_t c[7] = {8.6581e-01, 4.6111e-02, 7.6911e-03, 8.7313e-04,
+ -1.4700e-04,-5.0975e-05,-3.5718e-06};
+ Double_t y;
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+ //
+ return 1 +(y-1)*f[n];
}
-Double_t AliGenMUONlib::PtUpsilonFlat( const Double_t */*px*/, const Double_t */*dummy*/ )
+Double_t AliGenMUONlib::YUpsilonPPb8800(const Double_t *px, const Double_t */*dummy*/)
{
- return 1.;
+// Upsilon y
+// pPb 8.8 TeV, minimum bias 0-100 %
+//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 0) * YUpsilonPP8800dummy(x);
}
-Double_t AliGenMUONlib::PtUpsilonPbPb( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPPb8800c1(const Double_t *px, const Double_t */*dummy*/)
{
+// Upsilon y
+// pPb 8.8 TeV, 1st centrality bin 0-20 %
//
-// Upsilon pT
-//
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 1) * YUpsilonPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPPb8800c2(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pPb 8.8 TeV, 2nd centrality bin 20-40 %
//
-// R. Vogt 2002
-// PbPb 5.5 TeV
-// MRST HO
-// mc = 1.4 GeV, pt-kick 1 GeV
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 2) * YUpsilonPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPPb8800c3(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// pPb 8.8 TeV, 3rd centrality bin 40-60 %
//
- Float_t x = px[0];
- Double_t c[8] = {
- -1.03488e+01, 1.28065e+01, -6.60500e+00, 1.66140e+00,
- -2.34293e-01, 1.86925e-02, -7.80708e-04, 1.30610e-05
- };
- Double_t y;
- if (x < 10.) {
- Int_t j;
- y = c[j = 7];
- while (j > 0) y = y * x +c[--j];
- y = x * TMath::Exp(y);
- } else {
- y = 0.;
- }
- return y;
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 3) * YUpsilonPP8800dummy(x);
}
-Double_t AliGenMUONlib::PtUpsilonPP( const Double_t *px, const Double_t */*dummy*/)
+Double_t AliGenMUONlib::YUpsilonPPb8800c4(const Double_t *px, const Double_t */*dummy*/)
{
+// Upsilon y
+// pPb 8.8 TeV, 4th centrality bin 60-100 %
//
-// Upsilon pT
+ Double_t x = px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 4) * YUpsilonPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP8800(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 8.8 TeV, minimum bias 0-100 %
//
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 0) * YUpsilonPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP8800c1(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 8.8 TeV, 1st centrality bin 0-20 %
//
-// R. Vogt 2002
-// pp 14 TeV
-// MRST HO
-// mc = 1.4 GeV, pt-kick 1 GeV
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 1) * YUpsilonPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP8800c2(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 8.8 TeV, 2nd centrality bin 20-40 %
//
- Float_t x = px[0];
- Double_t c[8] = {-7.93955e+00, 1.06306e+01, -5.21392e+00, 1.19703e+00,
- -1.45718e-01, 8.95151e-03, -2.04806e-04, -1.13053e-06};
-
- Double_t y;
- if (x < 10.) {
- Int_t j;
- y = c[j = 7];
- while (j > 0) y = y * x +c[--j];
- y = x * TMath::Exp(y);
- } else {
- y = 0.;
- }
- return y;
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 2) * YUpsilonPP8800dummy(x);
}
+Double_t AliGenMUONlib::YUpsilonPbP8800c3(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 8.8 TeV, 3rd centrality bin 40-60 %
//
-// y-distribution
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 3) * YUpsilonPP8800dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonPbP8800c4(const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+// Pbp 8.8 TeV, 4th centrality bin 60-100 %
//
-//____________________________________________________________
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ return YUpsilonPPb8800ShFdummy(x, 4) * YUpsilonPP8800dummy(x);
+}
+
Double_t AliGenMUONlib::YUpsilon(const Double_t *py, const Double_t */*dummy*/)
{
// Upsilon y
Double_t AliGenMUONlib::YUpsilonCDFscaledPP10( const Double_t *px, const Double_t */*dummy*/)
{
-
-//
// Upsilon y
//
// pp 10 TeV
// scaled from YUpsilonPP(14 TeV) using 10 TeV / 14 TeV ratio of y-spectra in LO pQCD.
// see S.Grigoryan, PWG3 Meeting, 27th Oct 2008
//
- Double_t c[4] = {1.12979e+00, -2.46155e-02, -7.37561e-04, 1.58824e-05};
+ Double_t c[4] = {1., -2.17877e-02, -6.52830e-04, 1.40578e-05};
+ Double_t x = TMath::Abs(px[0]);
+ if (x > 6.1) return 0.;
+ Int_t j;
+ Double_t y = c[j = 3];
+ while (j > 0) y = y * x*x +c[--j];
+ return y;
+}
+
+Double_t AliGenMUONlib::YUpsilonCDFscaledPP9( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+//
+// pp 8.8 TeV
+// rescaling of YUpsilonPP(14 TeV) using 8.8 TeV / 14 TeV ratio of y-spectra in LO QCD
+//
+ Double_t c[4] = {1., -2.37621e-02, -6.29610e-04, 1.47976e-05};
Double_t x = TMath::Abs(px[0]);
if (x > 6.1) return 0.;
Int_t j;
return y;
}
+Double_t AliGenMUONlib::YUpsilonCDFscaledPP9dummy(Double_t px)
+{
+ return AliGenMUONlib::YUpsilonCDFscaledPP9(&px, (Double_t*) 0);
+}
+
+Double_t AliGenMUONlib::YUpsilonCDFscaledPP7( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+//
+// pp 7 TeV
+// scaled from YUpsilonPP(14 TeV) using 7 TeV / 14 TeV ratio of y-spectra in LO pQCD.
+//
+ Double_t c[4] = {1., -2.61009e-02, -6.83937e-04, 1.78451e-05};
+ Double_t x = TMath::Abs(px[0]);
+ if (x > 6.0) return 0.;
+ Int_t j;
+ Double_t y = c[j = 3];
+ while (j > 0) y = y * x*x +c[--j];
+ return y;
+}
+
+Double_t AliGenMUONlib::YUpsilonCDFscaledPP4( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+//
+// pp 3.94 TeV
+// rescaling of YUpsilonPP(14 TeV) using 3.94 TeV / 14 TeV ratio of y-spectra in LO QCD
+//
+ Double_t c[4] = {1., -3.91924e-02, -4.26184e-04, 2.10914e-05};
+ Double_t x = TMath::Abs(px[0]);
+ if (x > 5.7) return 0.;
+ Int_t j;
+ Double_t y = c[j = 3];
+ while (j > 0) y = y * x*x +c[--j];
+
+ return y;
+}
+
Double_t AliGenMUONlib::YUpsilonPP( const Double_t *px, const Double_t */*dummy*/)
{
return y;
}
+Double_t AliGenMUONlib::YUpsilonCDFscaledPPb9( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+//
+// pPb 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.89
+//
+ Double_t c[7] = {8.71829e-01, 4.77467e-02, 8.09671e-03, 6.45294e-04, -2.15730e-04,
+ -4.67538e-05,-2.11683e-06};
+ Double_t y;
+ Double_t x = px[0] + 0.47; // rapidity shift
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+
+ return y * AliGenMUONlib::YUpsilonCDFscaledPP9dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonCDFscaledPbP9( const Double_t *px, const Double_t */*dummy*/)
+{
+// Upsilon y
+//
+// Pbp 8.8 TeV, for EKS98 with minimum bias shadowing factor 0.89
+//
+ Double_t c[7] = {8.71829e-01, 4.77467e-02, 8.09671e-03, 6.45294e-04, -2.15730e-04,
+ -4.67538e-05,-2.11683e-06};
+ Double_t y;
+ Double_t x = -px[0] + 0.47; // rapidity shift
+ Int_t j;
+ y = c[j = 6];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+
+ return y * AliGenMUONlib::YUpsilonCDFscaledPP9dummy(x);
+}
+
+Double_t AliGenMUONlib::YUpsilonCDFscaledPbPb4( const Double_t *px, const Double_t *dummy)
+{
+// Upsilon y
+//
+// PbPb 3.94 TeV, for EKS98 with minimum bias shadowing factor 0.85
+//
+ Double_t c[4] = {8.27837e-01, 1.70115e-02, -1.26046e-03, 1.52091e-05};
+ Double_t x = px[0]*px[0];
+ Double_t y;
+ Int_t j;
+ y = c[j = 3];
+ while (j > 0) y = y * x + c[--j];
+ if(y<0) y=0;
+
+ return y * AliGenMUONlib::YUpsilonCDFscaledPP4(px,dummy);
+}
+
+
// particle composition
//
Int_t AliGenMUONlib::IpUpsilon(TRandom *)
Int_t AliGenMUONlib::IpUpsilonFamily(TRandom *)
{
// y composition
+ // Using the LHCb pp data at 7 TeV: CERN-PH-EP-2012-051
+ // (L. Manceau, S. Grigoryan)
Int_t ip;
- Float_t r = gRandom->Rndm();
-
- if (r < 0.712) {
+ Float_t r = gRandom->Rndm();
+ if (r < 0.687) {
+ // if (r < 0.712) {
ip = 553;
- } else if (r < 0.896) {
+ } else if (r < 0.903) {
+ // } else if (r < 0.896) {
ip = 100553;
} else {
ip = 200553;
break;
case kJpsiFamily:
case kPsiP:
+ case kChic1:
+ case kChic2:
case kJpsi:
if (sname == "Vogt" || sname == "Vogt PbPb") {
func=PtJpsiPbPb;
} else if (sname == "Vogt pp") {
func=PtJpsiPP;
+ } else if (sname == "pp 7") {
+ func=PtJpsiPP7000;
+ } else if (sname == "pp 8") {
+ func=PtJpsiPP8000;
+ } else if (sname == "pp 2.76") {
+ func=PtJpsiPP2760;
+ } else if (sname == "pp 4.4") {
+ func=PtJpsiPP4400;
+ } else if (sname == "pp 5.03") {
+ func=PtJpsiPP5030;
+ } else if (sname == "pp 8.8") {
+ func=PtJpsiPP8800;
+ } else if (sname == "pp 7 poly") {
+ func=PtJpsiPP7000;
+ } else if (sname == "pp 2.76 poly") {
+ func=PtJpsiPP2760;
+ } else if (sname == "PbPb 2.76") {
+ func=PtJpsiPbPb2760;
+ } else if (sname == "PbPb 2.76c1") {
+ func=PtJpsiPbPb2760c1;
+ } else if (sname == "PbPb 2.76c2") {
+ func=PtJpsiPbPb2760c2;
+ } else if (sname == "PbPb 2.76c3") {
+ func=PtJpsiPbPb2760c3;
+ } else if (sname == "PbPb 2.76c4") {
+ func=PtJpsiPbPb2760c4;
+ } else if (sname == "PbPb 2.76c5") {
+ func=PtJpsiPbPb2760c5;
+ } else if (sname == "PbPb 2.76c6") {
+ func=PtJpsiPbPb2760c6;
+ } else if (sname == "PbPb 2.76c7") {
+ func=PtJpsiPbPb2760c7;
+ } else if (sname == "PbPb 2.76c8") {
+ func=PtJpsiPbPb2760c8;
+ } else if (sname == "PbPb 2.76c9") {
+ func=PtJpsiPbPb2760c9;
+ } else if (sname == "PbPb 2.76c10") {
+ func=PtJpsiPbPb2760c10;
+ } else if (sname == "PbPb 2.76c11") {
+ func=PtJpsiPbPb2760c11;
+ } else if (sname == "pPb 5.03") {
+ func=PtJpsiPPb5030;
+ } else if (sname == "pPb 5.03c1") {
+ func=PtJpsiPPb5030c1;
+ } else if (sname == "pPb 5.03c2") {
+ func=PtJpsiPPb5030c2;
+ } else if (sname == "pPb 5.03c3") {
+ func=PtJpsiPPb5030c3;
+ } else if (sname == "pPb 5.03c4") {
+ func=PtJpsiPPb5030c4;
+ } else if (sname == "Pbp 5.03") {
+ func=PtJpsiPbP5030;
+ } else if (sname == "Pbp 5.03c1") {
+ func=PtJpsiPbP5030c1;
+ } else if (sname == "Pbp 5.03c2") {
+ func=PtJpsiPbP5030c2;
+ } else if (sname == "Pbp 5.03c3") {
+ func=PtJpsiPbP5030c3;
+ } else if (sname == "Pbp 5.03c4") {
+ func=PtJpsiPbP5030c4;
+ } else if (sname == "pPb 8.8") {
+ func=PtJpsiPPb8800;
+ } else if (sname == "pPb 8.8c1") {
+ func=PtJpsiPPb8800c1;
+ } else if (sname == "pPb 8.8c2") {
+ func=PtJpsiPPb8800c2;
+ } else if (sname == "pPb 8.8c3") {
+ func=PtJpsiPPb8800c3;
+ } else if (sname == "pPb 8.8c4") {
+ func=PtJpsiPPb8800c4;
+ } else if (sname == "Pbp 8.8") {
+ func=PtJpsiPbP8800;
+ } else if (sname == "Pbp 8.8c1") {
+ func=PtJpsiPbP8800c1;
+ } else if (sname == "Pbp 8.8c2") {
+ func=PtJpsiPbP8800c2;
+ } else if (sname == "Pbp 8.8c3") {
+ func=PtJpsiPbP8800c3;
+ } else if (sname == "Pbp 8.8c4") {
+ func=PtJpsiPbP8800c4;
} else if (sname == "CDF scaled") {
func=PtJpsiCDFscaled;
} else if (sname == "CDF pp") {
func=PtJpsiCDFscaledPP;
} else if (sname == "CDF pp 10") {
func=PtJpsiCDFscaledPP10;
- } else if (sname == "Flat") {
+ } else if (sname == "CDF pp 8.8") {
+ func=PtJpsiCDFscaledPP9;
+ } else if (sname == "CDF pp 7" || sname == "CDF pp 7 flat y") {
+ func=PtJpsiCDFscaledPP7;
+ } else if (sname == "CDF pp 3.94") {
+ func=PtJpsiCDFscaledPP4;
+ } else if (sname == "CDF pp 2.76") {
+ func=PtJpsiCDFscaledPP3;
+ } else if (sname == "CDF pp 1.9") {
+ func=PtJpsiCDFscaledPP2;
+ } else if (sname == "CDF pPb 8.8") {
+ func=PtJpsiCDFscaledPPb9;
+ } else if (sname == "CDF Pbp 8.8") {
+ func=PtJpsiCDFscaledPbP9;
+ } else if (sname == "CDF PbPb 3.94") {
+ func=PtJpsiCDFscaledPbPb4;
+ } else if (sname == "Flat" || sname == "CDF pp 7 flat pt") {
func=PtJpsiFlat;
} else {
func=PtJpsi;
func=PtUpsilonPbPb;
} else if (sname == "Vogt pp") {
func=PtUpsilonPP;
+ } else if (sname == "pp 7") {
+ func=PtUpsilonPP7000;
+ } else if (sname == "pp 8") {
+ func=PtUpsilonPP8000;
+ } else if (sname == "pp 2.76") {
+ func=PtUpsilonPP2760;
+ } else if (sname == "pp 4.4") {
+ func=PtUpsilonPP4400;
+ } else if (sname == "pp 5.03") {
+ func=PtUpsilonPP5030;
+ } else if (sname == "pp 8.8") {
+ func=PtUpsilonPP8800;
+ } else if (sname == "pp 7 poly") {
+ func=PtUpsilonPP7000;
+ } else if (sname == "pp 2.76 poly") {
+ func=PtUpsilonPP2760;
+ } else if (sname == "PbPb 2.76") {
+ func=PtUpsilonPbPb2760;
+ } else if (sname == "PbPb 2.76c1") {
+ func=PtUpsilonPbPb2760c1;
+ } else if (sname == "PbPb 2.76c2") {
+ func=PtUpsilonPbPb2760c2;
+ } else if (sname == "PbPb 2.76c3") {
+ func=PtUpsilonPbPb2760c3;
+ } else if (sname == "PbPb 2.76c4") {
+ func=PtUpsilonPbPb2760c4;
+ } else if (sname == "PbPb 2.76c5") {
+ func=PtUpsilonPbPb2760c5;
+ } else if (sname == "PbPb 2.76c6") {
+ func=PtUpsilonPbPb2760c6;
+ } else if (sname == "PbPb 2.76c7") {
+ func=PtUpsilonPbPb2760c7;
+ } else if (sname == "PbPb 2.76c8") {
+ func=PtUpsilonPbPb2760c8;
+ } else if (sname == "PbPb 2.76c9") {
+ func=PtUpsilonPbPb2760c9;
+ } else if (sname == "PbPb 2.76c10") {
+ func=PtUpsilonPbPb2760c10;
+ } else if (sname == "PbPb 2.76c11") {
+ func=PtUpsilonPbPb2760c11;
+ } else if (sname == "pPb 5.03") {
+ func=PtUpsilonPPb5030;
+ } else if (sname == "pPb 5.03c1") {
+ func=PtUpsilonPPb5030c1;
+ } else if (sname == "pPb 5.03c2") {
+ func=PtUpsilonPPb5030c2;
+ } else if (sname == "pPb 5.03c3") {
+ func=PtUpsilonPPb5030c3;
+ } else if (sname == "pPb 5.03c4") {
+ func=PtUpsilonPPb5030c4;
+ } else if (sname == "Pbp 5.03") {
+ func=PtUpsilonPbP5030;
+ } else if (sname == "Pbp 5.03c1") {
+ func=PtUpsilonPbP5030c1;
+ } else if (sname == "Pbp 5.03c2") {
+ func=PtUpsilonPbP5030c2;
+ } else if (sname == "Pbp 5.03c3") {
+ func=PtUpsilonPbP5030c3;
+ } else if (sname == "Pbp 5.03c4") {
+ func=PtUpsilonPbP5030c4;
+ } else if (sname == "pPb 8.8") {
+ func=PtUpsilonPPb8800;
+ } else if (sname == "pPb 8.8c1") {
+ func=PtUpsilonPPb8800c1;
+ } else if (sname == "pPb 8.8c2") {
+ func=PtUpsilonPPb8800c2;
+ } else if (sname == "pPb 8.8c3") {
+ func=PtUpsilonPPb8800c3;
+ } else if (sname == "pPb 8.8c4") {
+ func=PtUpsilonPPb8800c4;
+ } else if (sname == "Pbp 8.8") {
+ func=PtUpsilonPbP8800;
+ } else if (sname == "Pbp 8.8c1") {
+ func=PtUpsilonPbP8800c1;
+ } else if (sname == "Pbp 8.8c2") {
+ func=PtUpsilonPbP8800c2;
+ } else if (sname == "Pbp 8.8c3") {
+ func=PtUpsilonPbP8800c3;
+ } else if (sname == "Pbp 8.8c4") {
+ func=PtUpsilonPbP8800c4;
} else if (sname == "CDF scaled") {
func=PtUpsilonCDFscaled;
} else if (sname == "CDF pp") {
func=PtUpsilonCDFscaledPP;
} else if (sname == "CDF pp 10") {
func=PtUpsilonCDFscaledPP10;
+ } else if (sname == "CDF pp 8.8") {
+ func=PtUpsilonCDFscaledPP9;
+ } else if (sname == "CDF pp 7") {
+ func=PtUpsilonCDFscaledPP7;
+ } else if (sname == "CDF pp 3.94") {
+ func=PtUpsilonCDFscaledPP4;
+ } else if (sname == "CDF pPb 8.8") {
+ func=PtUpsilonCDFscaledPPb9;
+ } else if (sname == "CDF Pbp 8.8") {
+ func=PtUpsilonCDFscaledPbP9;
+ } else if (sname == "CDF PbPb 3.94") {
+ func=PtUpsilonCDFscaledPbPb4;
} else if (sname == "Flat") {
func=PtUpsilonFlat;
} else {
}
break;
case kPion:
- func=PtPion;
+ if (sname == "2010 Pos PP") {
+ func=PtPionPos2010PP;
+ } else if (sname == "2010 Neg PP") {
+ func=PtPionNeg2010PP;
+ } else {
+ func=PtPion;
+ }
break;
case kKaon:
- func=PtKaon;
+ if (sname == "2010 Pos PP") {
+ func=PtKaonPos2010PP;
+ } else if (sname == "2010 Neg PP") {
+ func=PtKaonNeg2010PP;
+ } else {
+ func=PtKaon;
+ }
break;
case kChic0:
func=PtChic0;
break;
- case kChic1:
- func=PtChic1;
- break;
- case kChic2:
- func=PtChic2;
- break;
case kChic:
func=PtChic;
break;
break;
case kJpsiFamily:
case kPsiP:
+ case kChic1:
+ case kChic2:
case kJpsi:
if (sname == "Vogt" || sname == "Vogt PbPb") {
func=YJpsiPbPb;
} else if (sname == "Vogt pp"){
func=YJpsiPP;
+ } else if (sname == "pp 7") {
+ func=YJpsiPP7000;
+ } else if (sname == "pp 8") {
+ func=YJpsiPP8000;
+ } else if (sname == "pp 2.76") {
+ func=YJpsiPP2760;
+ } else if (sname == "pp 4.4") {
+ func=YJpsiPP4400;
+ } else if (sname == "pp 5.03") {
+ func=YJpsiPP5030;
+ } else if (sname == "pp 8.8") {
+ func=YJpsiPP8800;
+ } else if (sname == "pp 7 poly") {
+ func=YJpsiPPpoly7000;
+ } else if (sname == "pp 2.76 poly") {
+ func=YJpsiPPpoly2760;
+ } else if (sname == "PbPb 2.76") {
+ func=YJpsiPbPb2760;
+ } else if (sname == "PbPb 2.76c1") {
+ func=YJpsiPbPb2760c1;
+ } else if (sname == "PbPb 2.76c2") {
+ func=YJpsiPbPb2760c2;
+ } else if (sname == "PbPb 2.76c3") {
+ func=YJpsiPbPb2760c3;
+ } else if (sname == "PbPb 2.76c4") {
+ func=YJpsiPbPb2760c4;
+ } else if (sname == "PbPb 2.76c5") {
+ func=YJpsiPbPb2760c5;
+ } else if (sname == "PbPb 2.76c6") {
+ func=YJpsiPbPb2760c6;
+ } else if (sname == "PbPb 2.76c7") {
+ func=YJpsiPbPb2760c7;
+ } else if (sname == "PbPb 2.76c8") {
+ func=YJpsiPbPb2760c8;
+ } else if (sname == "PbPb 2.76c9") {
+ func=YJpsiPbPb2760c9;
+ } else if (sname == "PbPb 2.76c10") {
+ func=YJpsiPbPb2760c10;
+ } else if (sname == "PbPb 2.76c11") {
+ func=YJpsiPbPb2760c11;
+ } else if (sname == "pPb 5.03") {
+ func=YJpsiPPb5030;
+ } else if (sname == "pPb 5.03c1") {
+ func=YJpsiPPb5030c1;
+ } else if (sname == "pPb 5.03c2") {
+ func=YJpsiPPb5030c2;
+ } else if (sname == "pPb 5.03c3") {
+ func=YJpsiPPb5030c3;
+ } else if (sname == "pPb 5.03c4") {
+ func=YJpsiPPb5030c4;
+ } else if (sname == "Pbp 5.03") {
+ func=YJpsiPbP5030;
+ } else if (sname == "Pbp 5.03c1") {
+ func=YJpsiPbP5030c1;
+ } else if (sname == "Pbp 5.03c2") {
+ func=YJpsiPbP5030c2;
+ } else if (sname == "Pbp 5.03c3") {
+ func=YJpsiPbP5030c3;
+ } else if (sname == "Pbp 5.03c4") {
+ func=YJpsiPbP5030c4;
+ } else if (sname == "pPb 8.8") {
+ func=YJpsiPPb8800;
+ } else if (sname == "pPb 8.8c1") {
+ func=YJpsiPPb8800c1;
+ } else if (sname == "pPb 8.8c2") {
+ func=YJpsiPPb8800c2;
+ } else if (sname == "pPb 8.8c3") {
+ func=YJpsiPPb8800c3;
+ } else if (sname == "pPb 8.8c4") {
+ func=YJpsiPPb8800c4;
+ } else if (sname == "Pbp 8.8") {
+ func=YJpsiPbP8800;
+ } else if (sname == "Pbp 8.8c1") {
+ func=YJpsiPbP8800c1;
+ } else if (sname == "Pbp 8.8c2") {
+ func=YJpsiPbP8800c2;
+ } else if (sname == "Pbp 8.8c3") {
+ func=YJpsiPbP8800c3;
+ } else if (sname == "Pbp 8.8c4") {
+ func=YJpsiPbP8800c4;
} else if (sname == "CDF scaled") {
func=YJpsiCDFscaled;
} else if (sname == "CDF pp") {
func=YJpsiCDFscaledPP;
} else if (sname == "CDF pp 10") {
func=YJpsiCDFscaledPP10;
- } else if (sname == "Flat") {
+ } else if (sname == "CDF pp 8.8") {
+ func=YJpsiCDFscaledPP9;
+ } else if (sname == "CDF pp 7" || sname == "CDF pp 7 flat pt") {
+ func=YJpsiCDFscaledPP7;
+ } else if (sname == "CDF pp 3.94") {
+ func=YJpsiCDFscaledPP4;
+ } else if (sname == "CDF pp 2.76") {
+ func=YJpsiCDFscaledPP3;
+ } else if (sname == "CDF pp 1.9") {
+ func=YJpsiCDFscaledPP2;
+ } else if (sname == "CDF pPb 8.8") {
+ func=YJpsiCDFscaledPPb9;
+ } else if (sname == "CDF Pbp 8.8") {
+ func=YJpsiCDFscaledPbP9;
+ } else if (sname == "CDF PbPb 3.94") {
+ func=YJpsiCDFscaledPbPb4;
+ } else if (sname == "Flat" || sname == "CDF pp 7 flat y") {
func=YJpsiFlat;
} else {
func=YJpsi;
func=YUpsilonPbPb;
} else if (sname == "Vogt pp") {
func = YUpsilonPP;
+ } else if (sname == "pp 7") {
+ func=YUpsilonPP7000;
+ } else if (sname == "pp 8") {
+ func=YUpsilonPP8000;
+ } else if (sname == "pp 2.76") {
+ func=YUpsilonPP2760;
+ } else if (sname == "pp 4.4") {
+ func=YUpsilonPP4400;
+ } else if (sname == "pp 5.03") {
+ func=YUpsilonPP5030;
+ } else if (sname == "pp 8.8") {
+ func=YUpsilonPP8800;
+ } else if (sname == "pp 7 poly") {
+ func=YUpsilonPPpoly7000;
+ } else if (sname == "pp 2.76 poly") {
+ func=YUpsilonPPpoly2760;
+ } else if (sname == "PbPb 2.76") {
+ func=YUpsilonPbPb2760;
+ } else if (sname == "PbPb 2.76c1") {
+ func=YUpsilonPbPb2760c1;
+ } else if (sname == "PbPb 2.76c2") {
+ func=YUpsilonPbPb2760c2;
+ } else if (sname == "PbPb 2.76c3") {
+ func=YUpsilonPbPb2760c3;
+ } else if (sname == "PbPb 2.76c4") {
+ func=YUpsilonPbPb2760c4;
+ } else if (sname == "PbPb 2.76c5") {
+ func=YUpsilonPbPb2760c5;
+ } else if (sname == "PbPb 2.76c6") {
+ func=YUpsilonPbPb2760c6;
+ } else if (sname == "PbPb 2.76c7") {
+ func=YUpsilonPbPb2760c7;
+ } else if (sname == "PbPb 2.76c8") {
+ func=YUpsilonPbPb2760c8;
+ } else if (sname == "PbPb 2.76c9") {
+ func=YUpsilonPbPb2760c9;
+ } else if (sname == "PbPb 2.76c10") {
+ func=YUpsilonPbPb2760c10;
+ } else if (sname == "PbPb 2.76c11") {
+ func=YUpsilonPbPb2760c11;
+ } else if (sname == "pPb 5.03") {
+ func=YUpsilonPPb5030;
+ } else if (sname == "pPb 5.03c1") {
+ func=YUpsilonPPb5030c1;
+ } else if (sname == "pPb 5.03c2") {
+ func=YUpsilonPPb5030c2;
+ } else if (sname == "pPb 5.03c3") {
+ func=YUpsilonPPb5030c3;
+ } else if (sname == "pPb 5.03c4") {
+ func=YUpsilonPPb5030c4;
+ } else if (sname == "Pbp 5.03") {
+ func=YUpsilonPbP5030;
+ } else if (sname == "Pbp 5.03c1") {
+ func=YUpsilonPbP5030c1;
+ } else if (sname == "Pbp 5.03c2") {
+ func=YUpsilonPbP5030c2;
+ } else if (sname == "Pbp 5.03c3") {
+ func=YUpsilonPbP5030c3;
+ } else if (sname == "Pbp 5.03c4") {
+ func=YUpsilonPbP5030c4;
+ } else if (sname == "pPb 8.8") {
+ func=YUpsilonPPb8800;
+ } else if (sname == "pPb 8.8c1") {
+ func=YUpsilonPPb8800c1;
+ } else if (sname == "pPb 8.8c2") {
+ func=YUpsilonPPb8800c2;
+ } else if (sname == "pPb 8.8c3") {
+ func=YUpsilonPPb8800c3;
+ } else if (sname == "pPb 8.8c4") {
+ func=YUpsilonPPb8800c4;
+ } else if (sname == "Pbp 8.8") {
+ func=YUpsilonPbP8800;
+ } else if (sname == "Pbp 8.8c1") {
+ func=YUpsilonPbP8800c1;
+ } else if (sname == "Pbp 8.8c2") {
+ func=YUpsilonPbP8800c2;
+ } else if (sname == "Pbp 8.8c3") {
+ func=YUpsilonPbP8800c3;
+ } else if (sname == "Pbp 8.8c4") {
+ func=YUpsilonPbP8800c4;
} else if (sname == "CDF scaled") {
func=YUpsilonCDFscaled;
} else if (sname == "CDF pp") {
func=YUpsilonCDFscaledPP;
} else if (sname == "CDF pp 10") {
func=YUpsilonCDFscaledPP10;
+ } else if (sname == "CDF pp 8.8") {
+ func=YUpsilonCDFscaledPP9;
+ } else if (sname == "CDF pp 7") {
+ func=YUpsilonCDFscaledPP7;
+ } else if (sname == "CDF pp 3.94") {
+ func=YUpsilonCDFscaledPP4;
+ } else if (sname == "CDF pPb 8.8") {
+ func=YUpsilonCDFscaledPPb9;
+ } else if (sname == "CDF Pbp 8.8") {
+ func=YUpsilonCDFscaledPbP9;
+ } else if (sname == "CDF PbPb 3.94") {
+ func=YUpsilonCDFscaledPbPb4;
} else if (sname == "Flat") {
func=YUpsilonFlat;
} else {
}
break;
case kPion:
- func=YPion;
+ if (sname == "2010 Pos PP") {
+ func=YKaonPion2010PP;
+ } else if (sname == "2010 Neg PP") {
+ func=YKaonPion2010PP;
+ } else {
+ func=YPion;
+ }
break;
case kKaon:
- func=YKaon;
+ if (sname == "2010 Pos PP") {
+ func=YKaonPion2010PP;
+ } else if (sname == "2010 Neg PP") {
+ func=YKaonPion2010PP;
+ } else {
+ func=YKaon;
+ }
break;
case kChic0:
func=YChic0;
break;
- case kChic1:
- func=YChic1;
- break;
- case kChic2:
- func=YChic2;
- break;
case kChic:
func=YChic;
break;
//_____________________________________________________________
typedef Int_t (*GenFuncIp) (TRandom *);
-GenFuncIp AliGenMUONlib::GetIp(Int_t param, const char* /*tname*/) const
+GenFuncIp AliGenMUONlib::GetIp(Int_t param, const char* tname) const
{
// Return pointer to particle type parameterisation
+ TString sname = TString(tname);
GenFuncIp func;
switch (param)
{
func=IpBeauty;
break;
case kPion:
- func=IpPion;
+ if (sname == "2010 Pos PP") {
+ func=IpPionPos;
+ } else if (sname == "2010 Neg PP") {
+ func=IpPionNeg;
+ } else {
+ func=IpPion;
+ }
break;
case kKaon:
- func=IpKaon;
+ if (sname == "2010 Pos PP") {
+ func=IpKaonPos;
+ } else if (sname == "2010 Neg PP") {
+ func=IpKaonNeg;
+ } else {
+ func=IpKaon;
+ }
break;
case kChic0:
func=IpChic0;
return y1;
}
+//=============================================================================
+Double_t AliGenMUONlib::PtPionPos2010PP(const Double_t *px, const Double_t* /*dummy*/)
+{
+// Pos pion
+ const Double_t par[3] = {2.27501, 0.116141, 5.59591};
+ Double_t pt = px[0];
+ Double_t m0 = TDatabasePDG::Instance()->GetParticle(211)->Mass();
+ Double_t mt = TMath::Sqrt(m0*m0 + pt*pt);
+ Double_t nc = par[1]*par[2];
+ Double_t t1 = (par[2]-1.)/nc/(nc/(par[2]-2.)+m0);
+ Double_t t2 = TMath::Power(1.+(mt-m0)/nc, -1.*par[2]);
+ Double_t fn = par[0] * pt * t1 * t2;
+ return fn;
+}
+
+//=============================================================================
+Double_t AliGenMUONlib::PtPionNeg2010PP(const Double_t *px, const Double_t* /*dummy*/)
+{
+// Neg pion
+ const Double_t par[3] = {2.25188, 0.12176, 5.91166};
+ Double_t pt = px[0];
+ Double_t m0 = TDatabasePDG::Instance()->GetParticle(211)->Mass();
+ Double_t mt = TMath::Sqrt(m0*m0 + pt*pt);
+ Double_t nc = par[1]*par[2];
+ Double_t t1 = (par[2]-1.)/nc/(nc/(par[2]-2.)+m0);
+ Double_t t2 = TMath::Power(1.+(mt-m0)/nc, -1.*par[2]);
+ Double_t fn = par[0] * pt * t1 * t2;
+ return fn;
+}
+
+//=============================================================================
+Double_t AliGenMUONlib::PtKaonPos2010PP(const Double_t *px, const Double_t* /*dummy*/)
+{
+// Pos kaons
+ const Double_t par[3] = {0.279386, 0.195466, 6.59587};
+ Double_t pt = px[0];
+ Double_t m0 = TDatabasePDG::Instance()->GetParticle(321)->Mass();
+ Double_t mt = TMath::Sqrt(m0*m0 + pt*pt);
+ Double_t nc = par[1]*par[2];
+ Double_t t1 = (par[2]-1.)/nc/(nc/(par[2]-2.)+m0);
+ Double_t t2 = TMath::Power(1.+(mt-m0)/nc, -1.*par[2]);
+ Double_t fn = par[0] * pt * t1 * t2;
+ return fn;
+}
+
+//=============================================================================
+Double_t AliGenMUONlib::PtKaonNeg2010PP(const Double_t *px, const Double_t* /*dummy*/)
+{
+// Neg kaons
+ const Double_t par[3] = {0.278927, 0.189049, 6.43006};
+ Double_t pt = px[0];
+ Double_t m0 = TDatabasePDG::Instance()->GetParticle(321)->Mass();
+ Double_t mt = TMath::Sqrt(m0*m0 + pt*pt);
+ Double_t nc = par[1]*par[2];
+ Double_t t1 = (par[2]-1.)/nc/(nc/(par[2]-2.)+m0);
+ Double_t t2 = TMath::Power(1.+(mt-m0)/nc, -1.*par[2]);
+ Double_t fn = par[0] * pt * t1 * t2;
+ return fn;
+}
+
+//=============================================================================
+Double_t AliGenMUONlib::YKaonPion2010PP(const Double_t *px, const Double_t* /*dummy*/)
+{
+// pions and kaons
+ Double_t y = px[0];
+ Double_t sigma = 2.35;
+ Double_t kernal = y/2./sigma;
+ Double_t fxn = TMath::Exp(-1.*kernal*kernal);
+ return fxn;
+}
+
+//=============================================================================
+Int_t AliGenMUONlib::IpPionPos(TRandom *)
+{
+// Pos pions
+ return 211;
+}
+//=============================================================================
+Int_t AliGenMUONlib::IpPionNeg(TRandom *)
+{
+// Neg pions
+ return -211;
+}
+
+//=============================================================================
+Int_t AliGenMUONlib::IpKaonPos(TRandom *)
+{
+// pos Kaons
+ return 321;
+}
+
+//=============================================================================
+Int_t AliGenMUONlib::IpKaonNeg(TRandom *)
+{
+// neg Kaons
+ return -321;
+}