35 double ,
double* f1,
double* f2,
36 double* f3,
double* g1,
double* g2,
57 double F1, F2, F3, G1, G2, G3;
59 if ( ( parent == LAMB && daught == PRO ) ||
60 ( parent == LAMBB && daught == PROB ) ||
61 ( parent == LAMB && daught == LAMCP ) ||
62 ( parent == LAMBB && daught == LAMCM ) ) {
73 if ( ( parent == LAMB && daught == LAMCP ) ||
74 ( parent == LAMBB && daught == LAMCM ) ) {
80 double aLp2 = aLp * aLp;
81 double aLLp2 = 0.5 * ( aL2 + aLp2 );
85 double rho2 = 3. * md * md / ( 2. * k2 * aLLp2 );
88 double w = 0.5 * ( MLamB * MLamB + MLamq * MLamq - q2 ) / MLamB / MLamq;
90 double I = pow( aL * aLp / aLLp2, 1.5 ) *
exp( -rho2 * ( w * w - 1. ) );
93 F1 =
I * ( 1.0 + ( md / aLLp2 ) * ( ( aLp2 / mq ) + ( aL2 / mQ ) ) );
94 F2 = -
I * ( ( md / mq ) * ( aLp2 / aLLp2 ) -
95 aL2 * aLp2 / ( 4. * aLLp2 * mq * mQ ) );
96 F3 = -
I * md * aL2 / ( mQ * aLLp2 );
98 G1 =
I * ( 1.0 - ( aL2 * aLp2 ) / ( 12. * aLLp2 * mq * mQ ) );
99 G2 = -
I * ( md * aLp2 / ( mq * aLLp2 ) +
100 ( aL2 * aLp2 ) / ( 12. * aLLp2 * mq * mQ ) *
101 ( 1. + 12. * md * md / aLLp2 ) );
102 G3 =
I * ( md * aL2 / ( mQ * aLLp2 ) +
103 md * md * aL2 * aLp2 / ( mq * mQ * aLLp2 * aLLp2 ) );
112 }
else if ( ( parent == LAMB && daught == N1440 ) ||
113 ( parent == LAMBB && daught == N1440B ) ||
114 ( parent == LAMB && daught == N1710 ) ||
115 ( parent == LAMBB && daught == N1710B ) ) {
126 double aL2 = aL * aL;
127 double aLp2 = aLp * aLp;
128 double aLLp2 = 0.5 * ( aL2 + aLp2 );
132 double rho2 = 3. * md * md / ( 2. * k2 * aLLp2 );
135 double w = 0.5 * ( MLamB * MLamB + MLamq * MLamq - q2 ) / MLamB / MLamq;
137 double I = sqrt( 1.5 ) * pow( aL * aLp / aLLp2, 1.5 ) *
138 exp( -rho2 * ( w * w - 1. ) );
141 F1 = (
I / ( 2. * aLLp2 ) ) *
142 ( ( aL2 - aLp2 ) - ( md / ( 3. * aLLp2 ) ) *
143 ( ( aLp2 / mq ) * ( 7. * aL2 - 3. * aLp2 ) +
144 ( aL2 / mQ ) * ( 7. * aLp2 - 3. * aL2 ) ) );
146 F2 = -
I * ( aLp2 / ( 6. * mq * aLLp2 * aLLp2 ) ) *
147 ( 7. * aL2 - 3. * aLp2 ) * ( md - ( aL2 / ( 4. * mQ ) ) );
149 F3 =
I * ( aL2 * md / ( 6. * mQ * aLLp2 * aLLp2 ) ) *
150 ( 7. * aLp2 - 3. * aL2 );
152 G1 =
I * ( ( aL2 - aLp2 ) / ( 2 * aLLp2 ) -
153 ( aL2 * aLp2 * ( 7. * aL2 - 3. * aLp2 ) ) /
154 ( 72. * aLLp2 * aLLp2 * mq * mQ ) );
156 G2 = -
I * ( aLp2 / ( 6. * mq * aLLp2 * aLLp2 ) ) *
157 ( ( 7. * aL2 - 3. * aLp2 ) * ( md + ( aL2 / ( 6. * mQ ) ) ) +
158 ( 7. * md * md * aL2 * ( aL2 - aLp2 ) / ( mQ * aLLp2 ) ) );
160 G3 = -
I * ( aL2 * md / ( 6. * mQ * aLLp2 * aLLp2 ) ) *
161 ( ( 7. * aLp2 - 3. * aL2 ) -
162 ( 7 * md * aLp2 * ( aL2 - aLp2 ) / ( mq * aLLp2 ) ) );
172 }
else if ( ( parent == LAMB && daught == N1535 ) ||
173 ( parent == LAMBB && daught == N1535B ) ||
174 ( parent == LAMB && daught == N1650 ) ||
175 ( parent == LAMBB && daught == N1650B ) ||
176 ( parent == LAMB && daught == LAMC1P ) ||
177 ( parent == LAMBB && daught == LAMC1M ) ) {
187 if ( ( parent == LAMB && daught == LAMC1P ) ||
188 ( parent == LAMBB && daught == LAMC1M ) ) {
193 double aL2 = aL * aL;
194 double aLp2 = aLp * aLp;
195 double aLLp2 = 0.5 * ( aL2 + aLp2 );
199 double rho2 = 3. * md * md / ( 2. * k2 * aLLp2 );
202 double w = 0.5 * ( MLamB * MLamB + MLamq * MLamq - q2 ) / MLamB / MLamq;
204 double I = pow( aL * aLp / aLLp2, 2.5 ) *
exp( -rho2 * ( w * w - 1. ) );
207 F1 =
I * aL / 6.0 * ( 3.0 / mq - 1.0 / mQ );
208 F2 = -
I * ( 2.0 * md / aL - aL / ( 2.0 * mq ) +
209 2. * md * md * aL / ( mQ * aLLp2 ) -
210 ( md * aL / ( 6. * mq * mQ * aLLp2 ) ) *
211 ( 3. * aL2 - 2. * aLp2 ) );
212 F3 =
I * 2. * md * md * aL / ( mQ * aLLp2 );
214 G1 =
I * ( 2.0 * md / aL - aL / ( 6. * mQ ) +
215 ( md * aL / ( 6. * mq * mQ * aLLp2 ) ) *
216 ( 3. * aL2 - 2. * aLp2 ) );
217 G2 =
I * ( -2. * md / aL + aL / ( 2. * mq ) + aL / ( 3. * mQ ) );
218 G3 =
I * aL / ( 3. * mQ ) *
219 ( 1.0 - ( md / ( 2. * mq * aLLp2 ) ) * ( 3. * aL2 - 2. * aLp2 ) );
230 <<
"Only Lb -> N*+ transitions allowed in EvtLb2BaryonlnuFF.\n";
238 double,
double* f1,
double* f2,
double* f3,
239 double* f4,
double* g1,
double* g2,
240 double* g3,
double* g4 )
257 double F1, F2, F3, F4, G1, G2, G3, G4;
260 if ( ( parent == LAMB && daught == N1520 ) ||
261 ( parent == LAMBB && daught == N1520B ) ||
262 ( parent == LAMB && daught == N1700 ) ||
263 ( parent == LAMBB && daught == N1700B ) ||
264 ( parent == LAMB && daught == N1875 ) ||
265 ( parent == LAMBB && daught == N1875B ) ||
266 ( parent == LAMB && daught == LAMC2P ) ||
267 ( parent == LAMBB && daught == LAMC2M ) ) {
277 if ( ( parent == LAMB && daught == LAMC2P ) ||
278 ( parent == LAMBB && daught == LAMC2M ) ) {
283 double aL2 = aL * aL;
284 double aLp2 = aLp * aLp;
285 double aLLp2 = 0.5 * ( aL2 + aLp2 );
289 double rho2 = 3. * md * md / ( 2. * k2 * aLLp2 );
292 double w = 0.5 * ( MLamB * MLamB + MLamq * MLamq - q2 ) / MLamB / MLamq;
294 double I = -( 1. / sqrt( 3. ) ) * pow( aL * aLp / aLLp2, 2.5 ) *
295 exp( -rho2 * ( w * w - 1. ) );
298 F1 =
I * 3.0 * md / aL *
299 ( 1.0 + ( md / aLLp2 ) * ( ( aLp2 / mq ) + ( aL2 / mQ ) ) );
300 F2 = -
I * ( ( 3. * md * md / mq ) * ( aLp2 / ( aLLp2 * aL2 ) ) -
301 5. * aL * aLp2 * md / ( 4. * aLLp2 * mq * mQ ) );
302 F3 = -
I * ( 3. * md * md * aL / ( mQ * aLLp2 ) + aL / ( 2. * mQ ) );
305 G1 =
I * ( 3.0 * md / aL -
306 ( aL / ( 2. * mQ ) ) *
307 ( 1. + 3. * md * aLp2 / ( 2. * aLLp2 * mq ) ) );
308 G2 = -
I * ( ( 3. * md * md / mq ) * ( aLp2 / ( aLLp2 * aL ) ) +
309 aL * aLp2 * md / ( 4. * aLLp2 * aLLp2 * mq * mQ ) *
310 ( aLLp2 + 12. * md * md ) );
311 G3 =
I * aL / ( mQ * aLLp2 ) *
312 ( aLLp2 / 2. + 3. * md * md +
313 aLp2 * md / ( mq * aLLp2 ) * ( aLLp2 + 6. * md * md ) );
314 G4 = -
I * ( aL / mQ + md / ( mq * mQ ) * aLp2 * aL / aLLp2 );
327 else if ( ( parent == LAMB && daught == N1720 ) ||
328 ( parent == LAMBB && daught == N1720B ) ||
329 ( parent == LAMB && daught == N1900 ) ||
330 ( parent == LAMBB && daught == N1900B )
342 double aL2 = aL * aL;
343 double aLp2 = aLp * aLp;
344 double aLLp2 = 0.5 * ( aL2 + aLp2 );
348 double rho2 = 3. * md * md / ( 2. * k2 * aLLp2 );
351 double w = 0.5 * ( MLamB * MLamB + MLamq * MLamq - q2 ) / MLamB / MLamq;
353 double I = ( 1. / sqrt( 5. ) ) * pow( aL * aLp / aLLp2, 3.5 ) *
354 exp( -rho2 * ( w * w - 1. ) );
357 F1 = -
I * ( md / 2. ) * ( ( 5. / mq ) - ( 3. / mQ ) );
359 F2 =
I * ( md / aL ) *
360 ( ( 6. * md / aL ) - ( 5 * aL / ( 2. * mq ) ) +
361 ( 6. * md * md * aL ) / ( aLLp2 * mQ ) -
362 ( md * aL * ( aL2 - 2. * aLp2 ) ) / ( 2 * aLLp2 * mq * mQ ) );
364 F3 = -
I * ( md / mQ ) * ( 1 + ( 6. * md * md ) / aLLp2 );
366 F4 =
I * ( 2. * md / mQ );
369 ( ( 6. * md * md / aL2 ) - md / ( 2. * mQ ) +
370 md * md * ( 11. * aL2 - 6. * aLp2 ) / ( 6. * aLLp2 * mq * mQ ) );
372 G2 =
I * ( 6 * md * md / aL2 - 5 * md / ( 2.0 * mq ) - ( 2 * md ) / mQ +
373 5 * aL2 / ( 12.0 * mq * mQ ) -
374 ( 2 * md * md * aL2 ) / ( 3.0 * aLLp2 * mq * mQ ) );
377 ( ( md / ( 2. * mQ ) ) - 5 * aL2 / ( 24.0 * mq * mQ ) -
378 md * md * ( 5 * aL2 - 2 * aLp2 ) / ( 4.0 * mq * mQ * aLLp2 ) );
380 G4 = -
I * 5. * aL2 / ( 6. * mq * mQ );
395 <<
"Only Lb -> N*+ transitions allowed in EvtLb2BaryonlnuFF.\n";