47 Double_t xa = exp(
Y)*sqrt(s/s0);
48 Double_t
xb = exp(-
Y)*sqrt(s/s0);
51 Double_t weightu = 0.5;
52 Double_t weightd = 0.5;
53 Double_t weightc = 1.0;
54 Double_t weights = 1.0;
55 Double_t weightb = 1.0;
61 Double_t u0par0 = 0.03134; Double_t u0par1 =-2.068e-05; Double_t u0par2 = 1.283e-08;
62 Double_t u1par0 = 0.9; Double_t u1par1 =-0.0004307; Double_t u1par2 = 2.458e-07;
63 Double_t u2par0 =-0.1369; Double_t u2par1 = 0.003423; Double_t u2par2 =-2.155e-06;
64 Double_t u3par0 =-0.4013; Double_t u3par1 =-0.0002574; Double_t u3par2 = 1.561e-07;
65 Double_t u4par0 = 0.5782; Double_t u4par1 =-0.004728; Double_t u4par2 = 2.906e-06;
66 Double_t ubar0par0 = 0.02856; Double_t ubar0par1 =-2.112e-05; Double_t ubar0par2 = 1.272e-08;
67 Double_t ubar1par0 =-0.06822; Double_t ubar1par1 = 3.172e-05; Double_t ubar1par2 =-2.008e-08;
68 Double_t ubar2par0 = 0.1967; Double_t ubar2par1 =-0.000118; Double_t ubar2par2 = 6.871e-08;
69 Double_t ubar3par0 =-0.2251; Double_t ubar3par1 = 0.0001295; Double_t ubar3par2 =-7.181e-08;
70 Double_t ubar4par0 =-0.4068; Double_t ubar4par1 =-0.0002956; Double_t ubar4par2 = 1.783e-07;
71 Double_t ubar5par0 =-2.251; Double_t ubar5par1 =-0.0001699; Double_t ubar5par2 = 1.492e-07;
73 Double_t d0par0 = 0.03278; Double_t d0par1 =-2.915e-05; Double_t d0par2 = 1.809e-08;
74 Double_t d1par0 = 0.479; Double_t d1par1 =-0.0002559; Double_t d1par2 = 1.557e-07;
75 Double_t d2par0 =-0.5972; Double_t d2par1 = 0.0003118; Double_t d2par2 =-1.905e-07;
76 Double_t d3par0 =-0.3892; Double_t d3par1 =-0.000317; Double_t d3par2 = 1.944e-07;
77 Double_t d4par0 = 0.5007; Double_t d4par1 =-0.001665; Double_t d4par2 = 9.895e-07;
78 Double_t dbar0par0 = 0.02328; Double_t dbar0par1 =-1.367e-05; Double_t dbar0par2 = 8.246e-09;
79 Double_t dbar1par0 = 0.09422; Double_t dbar1par1 =-0.0001019; Double_t dbar1par2 = 6.375e-08;
80 Double_t dbar2par0 =-0.5296; Double_t dbar2par1 = 0.000466; Double_t dbar2par2 =-2.896e-07;
81 Double_t dbar3par0 = 0.5354; Double_t dbar3par1 =-0.0004404; Double_t dbar3par2 = 2.728e-07;
82 Double_t dbar4par0 =-0.4386; Double_t dbar4par1 =-0.0002605; Double_t dbar4par2 = 1.582e-07;
83 Double_t dbar5par0 =-1.289; Double_t dbar5par1 =-0.001618; Double_t dbar5par2 = 9.601e-07;
85 Double_t c0par0 = 0.01829; Double_t c0par1 =-6.93e-06; Double_t c0par2 = 3.796e-09;
86 Double_t c1par0 = 0.03081; Double_t c1par1 = 4.325e-05; Double_t c1par2 =-3.95e-08;
87 Double_t c2par0 = 0.5398; Double_t c2par1 =-4.284e-05; Double_t c2par2 =-1.362e-08;
88 Double_t c3par0 =-0.5986; Double_t c3par1 = 0.002565; Double_t c3par2 =-1.937e-06;
89 Double_t c4par0 =-0.4534; Double_t c4par1 =-0.0002329; Double_t c4par2 = 1.343e-07;
90 Double_t c5par0 =-8.657; Double_t c5par1 =-0.005157; Double_t c5par2 = 3.68e-06;
91 Double_t s0par0 = 0.01312; Double_t s0par1 =-3.743e-06; Double_t s0par2 = 2.076e-09;
92 Double_t s1par0 =-0.001416; Double_t s1par1 =-7.649e-06; Double_t s1par2 = 4.757e-09;
93 Double_t s2par0 = 0.2864; Double_t s2par1 =-6.693e-05; Double_t s2par2 = 3.566e-08;
94 Double_t s3par0 =-0.4857; Double_t s3par1 =-0.000253; Double_t s3par2 = 1.541e-07;
95 Double_t s4par0 =-10.33; Double_t s4par1 =-0.001601; Double_t s4par2 = 9.718e-07;
96 Double_t b0par0 = 0.005934; Double_t b0par1 = 2.516e-06; Double_t b0par2 =-1.828e-09;
97 Double_t b1par0 =-0.003063; Double_t b1par1 =-6.761e-06; Double_t b1par2 = 4.298e-09;
98 Double_t b2par0 = 0.1174; Double_t b2par1 = 3.752e-05; Double_t b2par2 =-2.863e-08;
99 Double_t b3par0 =-0.5549; Double_t b3par1 =-0.0002205; Double_t b3par2 = 1.334e-07;
100 Double_t b4par0 =-10.18; Double_t b4par1 =-0.001136; Double_t b4par2 = 6.931e-07;
104 Double_t up0 = u0par0 + u0par1*
Q + u0par2*
Q*
Q;
105 Double_t up1 = u1par0 + u1par1*
Q + u1par2*
Q*
Q;
106 Double_t up2 = u2par0 + u2par1*
Q + u2par2*
Q*
Q;
107 Double_t up3 = u3par0 + u3par1*
Q + u3par2*
Q*
Q;
108 Double_t up4 = u4par0 + u4par1*
Q + u4par2*
Q*
Q;
109 Double_t antiup0 = ubar0par0 + ubar0par1*
Q + ubar0par2*
Q*
Q;
110 Double_t antiup1 = ubar1par0 + ubar1par1*
Q + ubar1par2*
Q*
Q;
111 Double_t antiup2 = ubar2par0 + ubar2par1*
Q + ubar2par2*
Q*
Q;
112 Double_t antiup3 = ubar3par0 + ubar3par1*
Q + ubar3par2*
Q*
Q;
113 Double_t antiup4 = ubar4par0 + ubar4par1*
Q + ubar4par2*
Q*
Q;
114 Double_t antiup5 = ubar5par0 + ubar5par1*
Q + ubar5par2*
Q*
Q;
115 Double_t down0 = d0par0 + d0par1*
Q + d0par2*
Q*
Q;
116 Double_t down1 = d1par0 + d1par1*
Q + d1par2*
Q*
Q;
117 Double_t down2 = d2par0 + d2par1*
Q + d2par2*
Q*
Q;
118 Double_t down3 = d3par0 + d3par1*
Q + d3par2*
Q*
Q;
119 Double_t down4 = d4par0 + d4par1*
Q + d4par2*
Q*
Q;
120 Double_t antidown0 = dbar0par0 + dbar0par1*
Q + dbar0par2*
Q*
Q;
121 Double_t antidown1 = dbar1par0 + dbar1par1*
Q + dbar1par2*
Q*
Q;
122 Double_t antidown2 = dbar2par0 + dbar2par1*
Q + dbar2par2*
Q*
Q;
123 Double_t antidown3 = dbar3par0 + dbar3par1*
Q + dbar3par2*
Q*
Q;
124 Double_t antidown4 = dbar4par0 + dbar4par1*
Q + dbar4par2*
Q*
Q;
125 Double_t antidown5 = dbar5par0 + dbar5par1*
Q + dbar5par2*
Q*
Q;
126 Double_t charm0 = c0par0 + c0par1*
Q + c0par2*
Q*
Q;
127 Double_t charm1 = c1par0 + c1par1*
Q + c1par2*
Q*
Q;
128 Double_t charm2 = c2par0 + c2par1*
Q + c2par2*
Q*
Q;
129 Double_t charm3 = c3par0 + c3par1*
Q + c3par2*
Q*
Q;
130 Double_t charm4 = c4par0 + c4par1*
Q + c4par2*
Q*
Q;
131 Double_t charm5 = c5par0 + c5par1*
Q + c5par2*
Q*
Q;
132 Double_t strange0 = s0par0 + s0par1*
Q + s0par2*
Q*
Q;
133 Double_t strange1 = s1par0 + s1par1*
Q + s1par2*
Q*
Q;
134 Double_t strange2 = s2par0 + s2par1*
Q + s2par2*
Q*
Q;
135 Double_t strange3 = s3par0 + s3par1*
Q + s3par2*
Q*
Q;
136 Double_t strange4 = s4par0 + s4par1*
Q + s4par2*
Q*
Q;
137 Double_t bottom0 = b0par0 + b0par1*
Q + b0par2*
Q*
Q;
138 Double_t bottom1 = b1par0 + b1par1*
Q + b1par2*
Q*
Q;
139 Double_t bottom2 = b2par0 + b2par1*
Q + b2par2*
Q*
Q;
140 Double_t bottom3 = b3par0 + b3par1*
Q + b3par2*
Q*
Q;
141 Double_t bottom4 = b4par0 + b4par1*
Q + b4par2*
Q*
Q;
143 Double_t FuncAu1 = (up0+up1*xa+up2*pow(xa,2))*pow((1-xa),4)*pow(xa,up3)*exp(1.0+up4*xa);
144 Double_t FuncBu1 = (antiup0+antiup1*
xb+antiup2*pow(
xb,2)+antiup3*pow(
xb,3))*pow((1-
xb),4)*pow(
xb,antiup4)*exp(1.0+antiup5*
xb);
145 Double_t FuncAu2 = (up0+up1*
xb+up2*pow(
xb,2))*pow((1-
xb),4)*pow(
xb,up3)*exp(1.0+up4*
xb);
146 Double_t FuncBu2 = (antiup0+antiup1*xa+antiup2*pow(xa,2)+antiup3*pow(xa,3))*pow((1-xa),4)*pow(xa,antiup4)*exp(1.0+antiup5*xa);
147 Double_t FuncABu = FuncAu1/xa*FuncBu1/
xb+FuncAu2/xa*FuncBu2/
xb;
150 Double_t FuncAd1 = (down0+down1*xa+down2*pow(xa,2))*pow((1-xa),4)*pow(xa,down3)*exp(1.0+down4*xa);
151 Double_t FuncBd1 = (antidown0+antidown1*
xb+antidown2*pow(
xb,2)+antidown3*pow(
xb,3))*pow((1-
xb),4)*pow(
xb,antidown4)*exp(1.0+antidown5*
xb);
152 Double_t FuncAd2 = (down0+down1*
xb+down2*pow(
xb,2))*pow((1-
xb),4)*pow(
xb,down3)*exp(1.0+down4*
xb);
153 Double_t FuncBd2 = (antidown0+antidown1*xa+antidown2*pow(xa,2)+antidown3*pow(xa,3))*pow((1-xa),4)*pow(xa,antidown4)*exp(1.0+antidown5*xa);
154 Double_t FuncABd = FuncAd1/xa*FuncBd1/
xb+FuncAd2/xa*FuncBd2/
xb;
156 Double_t Funcca = (charm0+charm1*xa+charm2*pow(xa,2)+charm3*pow(xa,3))*pow((1-xa),4)*pow(xa,charm4)*exp(1.0+charm5*xa);
157 Double_t Funccb = (charm0+charm1*
xb+charm2*pow(
xb,2)+charm3*pow(
xb,3))*pow((1-
xb),4)*pow(
xb,charm4)*exp(1.0+charm5*
xb);
158 Double_t Funcsa = (strange0+strange1*xa+strange2*pow(xa,2))*pow((1-xa),4)*pow(xa,strange3)*exp(1.0+strange4*xa);
159 Double_t Funcsb = (strange0+strange1*
xb+strange2*pow(
xb,2))*pow((1-
xb),4)*pow(
xb,strange3)*exp(1.0+strange4*
xb);
160 Double_t Funcba = (bottom0+bottom1*xa+bottom2*pow(xa,2))*pow((1-xa),4)*pow(xa,bottom3)*exp(1.0+bottom4*xa);
161 Double_t Funcbb = (bottom0+bottom1*
xb+bottom2*pow(
xb,2))*pow((1-
xb),4)*pow(
xb,bottom3)*exp(1.0+bottom4*
xb);
162 Double_t FuncABc = Funcsa*Funcsb/xa/
xb;
163 Double_t FuncABs = Funcca*Funccb/xa/
xb;
164 Double_t FuncABb = Funcba*Funcbb/xa/
xb;
167 Double_t totSec = 2*
m*(
175 if((
m <= 600. && TMath::Abs(
Y) > 20*pow(
m,-0.32)) || (
m > 600. && TMath::Abs(
Y) > 21*pow(
m,-0.34)))
178 Double_t xa0 = sqrt(s/s0);
182 FuncAu1 = (up0+up1*xa0+up2*pow(xa0,2))*pow((1-xa0),4)*pow(xa0,up3)*exp(1.0+up4*xa0);
183 FuncBu1 = (antiup0+antiup1*xa0+antiup2*pow(xa0,2)+antiup3*pow(xa0,3))*pow((1-xa0),4)*pow(xa0,antiup4)*exp(1.0+antiup5*xa0);
184 FuncABu = 2*(FuncAu1/xa0*FuncBu1/xa0);
188 FuncAd1 = (down0+down1*xa0+down2*pow(xa0,2))*pow((1-xa0),4)*pow(xa0,down3)*exp(1.0+down4*xa0);
189 FuncBd1 = (antidown0+antidown1*xa0+antidown2*pow(xa0,2)+antidown3*pow(xa0,3))*pow((1-xa0),4)*pow(xa0,antidown4)*exp(1.0+antidown5*xa0);
190 FuncABd = 2*(FuncAd1/xa0*FuncBd1/xa0);
193 Funcca = (charm0+charm1*xa0+charm2*pow(xa0,2)+charm3*pow(xa0,3))*pow((1-xa0),4)*pow(xa0,charm4)*exp(1.0+charm5*xa0);
194 Funcsa = (strange0+strange1*xa0+strange2*pow(xa0,2))*pow((1-xa0),4)*pow(xa0,strange3)*exp(1.0+strange4*xa0);
195 Funcba = (bottom0+bottom1*xa0+bottom2*pow(xa0,2))*pow((1-xa0),4)*pow(xa0,bottom3)*exp(1.0+bottom4*xa0);
196 FuncABc = Funcsa*Funcsa/xa0/xa0;
197 FuncABs = Funcca*Funcca/xa0/xa0;
198 FuncABb = Funcba*Funcba/xa0/xa0;
199 Double_t totSec0 = 2*
m*(
206 totSec = 1.e-5*totSec0;
209 if (totSec <= 0.) totSec = 0.00001;