106 m_massHad = { 0, 0.0625995, 0.125199, 0.187798, 0.250398, 0.312997,
107 0.375597, 0.438196, 0.500796, 0.563395, 0.625995, 0.688594,
108 0.751194, 0.813793, 0.876392, 0.938992, 1.00159, 1.06419,
109 1.12679, 1.18939, 1.25199, 1.31459, 1.37719, 1.43979,
110 1.50239, 1.56499, 1.62759, 1.69019, 1.75278, 1.81538,
111 1.87798, 1.94058, 2.00318, 2.06578, 2.12838, 2.19098,
112 2.25358, 2.31618, 2.37878, 2.44138, 2.50398, 2.56658,
113 2.62918, 2.69178, 2.75438, 2.81698, 2.87958, 2.94217,
114 3.00477, 3.06737, 3.12997, 3.19257, 3.25517, 3.31777,
115 3.38037, 3.44297, 3.50557, 3.56817, 3.63077, 3.69337,
116 3.75597, 3.81857, 3.88117, 3.94377, 4.00637, 4.06896,
117 4.13156, 4.19416, 4.25676, 4.31936, 4.38196, 4.44456,
118 4.50716, 4.56976, 4.63236, 4.69496, 4.75756, 4.82016,
119 4.88276, 4.94536, 5.00796 };
120 m_brHad = { 0, 1.03244e-09, 3.0239e-08, 1.99815e-07, 7.29392e-07,
121 1.93129e-06, 4.17806e-06, 7.86021e-06, 1.33421e-05, 2.09196e-05,
122 3.07815e-05, 4.29854e-05, 5.74406e-05, 7.3906e-05, 9.2003e-05,
123 0.000111223, 0.000130977, 0.000150618, 0.000169483, 0.000186934,
124 0.000202392, 0.000215366, 0.000225491, 0.000232496, 0.000236274,
125 0.000236835, 0.000234313, 0.000228942, 0.000221042, 0.000210994,
126 0.000199215, 0.000186137, 0.000172194, 0.000157775, 0.000143255,
127 0.000128952, 0.000115133, 0.000102012, 8.97451e-05, 7.84384e-05,
128 6.81519e-05, 5.89048e-05, 5.06851e-05, 4.34515e-05, 3.71506e-05,
129 3.1702e-05, 2.70124e-05, 2.30588e-05, 1.96951e-05, 1.68596e-05,
130 1.44909e-05, 1.25102e-05, 1.08596e-05, 9.48476e-06, 8.34013e-06,
131 7.38477e-06, 6.58627e-06, 5.91541e-06, 5.35022e-06, 4.87047e-06,
132 4.46249e-06, 4.11032e-06, 3.80543e-06, 3.54051e-06, 3.30967e-06,
133 3.10848e-06, 2.93254e-06, 2.78369e-06, 2.65823e-06, 2.55747e-06,
134 2.51068e-06, 2.57179e-06, 2.74684e-06, 3.02719e-06, 3.41182e-06,
135 3.91387e-06, 4.56248e-06, 5.40862e-06, 6.53915e-06, 8.10867e-06,
146 int fermiFunction = (int)args[1];
164 <<
"EvtBtoXsgammaKagan: calculating new hadronic mass spectra. This takes a while..."
171 double _mubar =
m_mu;
180 m_rer2 = -4.092 + 12.78 * ( sqrt(
m_z ) - .29 );
192 double eGammaMax = 0.5 *
m_mB;
193 double yMin = 2. * eGammaMin /
m_mB;
194 double yMax = 2. * eGammaMax /
m_mB;
195 double _CKMrat = 0.976;
212 std::vector<double> s22Coeffs(
int(
m_nIntervalS + 1.0 ) );
213 std::vector<double> s27Coeffs(
int(
m_nIntervalS + 1.0 ) );
214 std::vector<double> s28Coeffs(
int(
m_nIntervalS + 1.0 ) );
219 std::vector<double> sCoeffs( 1 );
233 s22Coeffs[i] = ( 16. / 27. ) * mys22Simp.evaluate( 1.0e-20, yp );
234 s27Coeffs[i] = ( -8. / 9. ) *
m_z * mys27Simp.evaluate( 1.0e-20, yp );
235 s28Coeffs[i] = -s27Coeffs[i] / 3.;
241 std::vector<double> FermiCoeffs( 6 );
242 std::vector<double> varCoeffs( 3 );
243 std::vector<double> DeltaCoeffs( 1 );
244 std::vector<double> s88Coeffs( 2 );
245 std::vector<double> sInitCoeffs( 3 );
257 sInitCoeffs[1] = yMin;
258 sInitCoeffs[2] = yMax;
260 FermiCoeffs[0] = fermiFunction;
261 FermiCoeffs[1] = 0.0;
262 FermiCoeffs[2] = 0.0;
263 FermiCoeffs[3] = 0.0;
264 FermiCoeffs[4] = 0.0;
265 FermiCoeffs[5] = 0.0;
268 std::vector<double> gammaCoeffs( 6 );
269 gammaCoeffs[0] = 76.18009172947146;
270 gammaCoeffs[1] = -86.50532032941677;
271 gammaCoeffs[2] = 24.01409824083091;
272 gammaCoeffs[3] = -1.231739572450155;
273 gammaCoeffs[4] = 0.1208650973866179e-2;
274 gammaCoeffs[5] = -0.5395239384953e-5;
278 if ( fermiFunction == 1 ) {
282 FermiCoeffs[4] = 1.0;
284 auto myNormFunc = std::make_unique<EvtItgPtrFunction>(
288 std::make_unique<EvtItgSimpsonIntegrator>( *myNormFunc, 1.0e-4, 40 );
289 FermiCoeffs[4] = myNormSimp->normalisation();
291 }
else if ( fermiFunction == 2 ) {
300 FermiCoeffs[4] = 1.0;
302 auto myNormFunc = std::make_unique<EvtItgPtrFunction>(
306 std::make_unique<EvtItgSimpsonIntegrator>( *myNormFunc, 1.0e-4, 40 );
307 FermiCoeffs[4] = myNormSimp->normalisation();
309 }
else if ( fermiFunction == 3 ) {
312 FermiCoeffs[1] =
m_mB;
313 FermiCoeffs[2] =
m_mb;
314 FermiCoeffs[3] = rho;
316 FermiCoeffs[5] = 1.0;
318 auto myNormFunc = std::make_unique<EvtItgPtrFunction>(
322 std::make_unique<EvtItgSimpsonIntegrator>( *myNormFunc, 1.0e-4, 40 );
323 FermiCoeffs[5] = myNormSimp->normalisation();
329 varCoeffs, DeltaCoeffs };
332 varCoeffs, s88Coeffs };
334 FermiCoeffs, varCoeffs };
336 FermiCoeffs, varCoeffs };
339 varCoeffs, sInitCoeffs,
343 varCoeffs, sInitCoeffs,
347 varCoeffs, sInitCoeffs,
361 double mHmin = sqrt(
m_mB *
m_mB - 2. *
m_mB * eGammaMax );
362 double mHmax = sqrt(
m_mB *
m_mB - 2. *
m_mB * eGammaMin );
369 double ymH = 1. - ( ( mH * mH ) / (
m_mB *
m_mB ) );
372 myDeltaFermiFunc.setCoeff( 2, 2, ymH );
373 mys77FermiFunc.setCoeff( 2, 2, ymH );
374 mys88FermiFunc.setCoeff( 2, 2, ymH );
375 mys78FermiFunc.setCoeff( 2, 2, ymH );
376 mys22FermiFunc.setCoeff( 2, 2, ymH );
377 mys27FermiFunc.setCoeff( 2, 2, ymH );
378 mys28FermiFunc.setCoeff( 2, 2, ymH );
382 double deltaResult = myDeltaFermiSimp.evaluate( (
m_mB * ymH -
m_mb ),
384 double s77Result = mys77FermiSimp.evaluate( (
m_mB * ymH -
m_mb ),
386 double s88Result = mys88FermiSimp.evaluate( (
m_mB * ymH -
m_mb ),
388 double s78Result = mys78FermiSimp.evaluate( (
m_mB * ymH -
m_mb ),
390 double s22Result = mys22FermiSimp.evaluate( (
m_mB * ymH -
m_mb ),
392 double s27Result = mys27FermiSimp.evaluate( (
m_mB * ymH -
m_mb ),
400 ( s77Result * pow(
m_c70mu, 2. ) +
405 mHVect[i] = 2. * ( mH / (
m_mB *
m_mB ) ) * 0.105 * Nsl * py;
470 ( 12. / 23. ) * ( ( 253. / 18. ) - ( 116. / 23. ) ) *
473 double xt = pow( mtatmw, 2. ) / pow(
m_mW, 2. );
477 .5 * pow(
m_etamu, ( 6. / 23. ) );
479 double c7mWsm = ( ( 3. * pow( xt, 3. ) - 2. * pow( xt, 2. ) ) /
480 ( 4. * pow( ( xt - 1. ), 4. ) ) ) *
482 ( ( -8. * pow( xt, 3. ) - 5. * pow( xt, 2. ) + 7. * xt ) /
483 ( 24. * pow( ( xt - 1. ), 3. ) ) );
485 double c8mWsm = ( ( -3. * pow( xt, 2. ) ) / ( 4. * pow( ( xt - 1. ), 4. ) ) ) *
487 ( ( -pow( xt, 3. ) + 5. * pow( xt, 2. ) + 2. * xt ) /
488 ( 8. * pow( ( xt - 1. ), 3. ) ) );
490 double c7constmu = ( 626126. / 272277. ) * pow(
m_etamu, ( 14. / 23. ) ) -
491 ( 56281. / 51730. ) * pow(
m_etamu, ( 16. / 23. ) ) -
492 ( 3. / 7. ) * pow(
m_etamu, ( 6. / 23. ) ) -
493 ( 1. / 14. ) * pow(
m_etamu, ( -12. / 23. ) ) -
494 .6494 * pow(
m_etamu, .4086 ) -
496 .0186 * pow(
m_etamu, -.8994 ) -
501 ( pow(
m_etamu, ( 14. / 23. ) ) -
502 pow(
m_etamu, ( 16. / 23. ) ) ) *
506 double c8constmu = ( 313063. / 363036. ) * pow(
m_etamu, ( 14. / 23. ) ) -
507 .9135 * pow(
m_etamu, .4086 ) +
508 .0873 * pow(
m_etamu, -.423 ) -
509 .0571 * pow(
m_etamu, -.8994 ) +
527 ( ( -16. * pow( xt, 4. ) - 122. * pow( xt, 3. ) + 80. * pow( xt, 2. ) -
529 ( 9. * pow( ( xt - 1. ), 4. ) ) * li2 +
530 ( 6. * pow( xt, 4. ) + 46. * pow( xt, 3. ) - 28. * pow( xt, 2. ) ) /
531 ( 3. * pow( ( xt - 1. ), 5. ) ) * pow( log( xt ), 2. ) +
532 ( -102. * pow( xt, 5. ) - 588. * pow( xt, 4. ) -
533 2262. * pow( xt, 3. ) + 3244. * pow( xt, 2. ) - 1364. * xt + 208. ) /
534 ( 81. * pow( ( xt - 1 ), 5. ) ) * log( xt ) +
535 ( 1646. * pow( xt, 4. ) + 12205. * pow( xt, 3. ) -
536 10740. * pow( xt, 2. ) + 2509. * xt - 436. ) /
537 ( 486. * pow( ( xt - 1 ), 4. ) ) );
540 ( ( -4. * pow( xt, 4. ) + 40. * pow( xt, 3. ) + 41. * pow( xt, 2. ) + xt ) /
541 ( 6. * pow( ( xt - 1. ), 4. ) ) * li2 +
542 ( -17. * pow( xt, 3. ) - 31. * pow( xt, 2. ) ) /
543 ( 2. * pow( ( xt - 1. ), 5. ) ) * pow( log( xt ), 2. ) +
544 ( -210. * pow( xt, 5. ) + 1086. * pow( xt, 4. ) +
545 4893. * pow( xt, 3. ) + 2857. * pow( xt, 2. ) - 1994. * xt + 280. ) /
546 ( 216. * pow( ( xt - 1 ), 5. ) ) * log( xt ) +
547 ( 737. * pow( xt, 4. ) - 14102. * pow( xt, 3. ) -
548 28209. * pow( xt, 2. ) + 610. * xt - 508. ) /
549 ( 1296. * pow( ( xt - 1 ), 4. ) ) );
551 double E1 = ( xt * ( 18. - 11. * xt - pow( xt, 2. ) ) /
552 ( 12. * pow( ( 1. - xt ), 3. ) ) +
553 pow( xt, 2. ) * ( 15. - 16. * xt + 4. * pow( xt, 2. ) ) /
554 ( 6. * pow( ( 1. - xt ), 4. ) ) * log( xt ) -
555 2. / 3. * log( xt ) );
557 double e1 = 4661194. / 816831.;
558 double e2 = -8516. / 2217.;
566 double f1 = -17.3023;
586 pow(
m_etamu, ( 14. / 23. ) ) +
588 pow(
m_etamu, ( 16. / 23. ) ) +
591 pow(
m_etamu, ( -12. / 23. ) ) +
597 double c71pmu = ( ( ( 297664. / 14283. * pow(
m_etamu, ( 16. / 23. ) ) -
598 7164416. / 357075. * pow(
m_etamu, ( 14. / 23. ) ) +
599 256868. / 14283. * pow(
m_etamu, ( 37. / 23. ) ) -
600 6698884. / 357075. * pow(
m_etamu, ( 39. / 23. ) ) ) *
603 ( pow(
m_etamu, ( 39. / 23. ) ) -
604 pow(
m_etamu, ( 16. / 23. ) ) ) *
609 ( pow(
m_etamu, ( 16. / 23. ) ) * c7mWsm1 +
611 ( pow(
m_etamu, ( 14. / 23. ) ) -
612 pow(
m_etamu, ( 16. / 23. ) ) ) *
617 40. / 69. * pow(
m_etamu, ( -7. / 23. ) ) +
618 88. / 575. * pow(
m_etamu, ( 16. / 23. ) ) ) *
620 ( -32. / 575. * pow(
m_etamu, ( -9. / 23. ) ) +
621 32. / 1449. * pow(
m_etamu, ( -7. / 23. ) ) +
622 640. / 1449. * pow(
m_etamu, ( 14. / 23. ) ) -
623 704. / 1725. * pow(
m_etamu, ( 16. / 23. ) ) ) *
625 190. / 8073. * pow(
m_etamu, ( -35. / 23. ) ) -
626 359. / 3105. * pow(
m_etamu, ( -17. / 23. ) ) +
627 4276. / 121095. * pow(
m_etamu, ( -12. / 23. ) ) +
628 350531. / 1009125. * pow(
m_etamu, ( -9. / 23. ) ) +
629 2. / 4347. * pow(
m_etamu, ( -7. / 23. ) ) -
630 5956. / 15525. * pow(
m_etamu, ( 6. / 23. ) ) +
631 38380. / 169533. * pow(
m_etamu, ( 14. / 23. ) ) -
632 748. / 8625. * pow(
m_etamu, ( 16. / 23. ) ) );