159 double Pip1[4], Pip2[4], Pim[4],
Pi0[4];
160 double cof[2],amp_tmp[2],amp_PDF[2], PDF[2];
162 Pip1[0] = PPip1.
get(0); Pip1[1] = PPip1.
get(1); Pip1[2] = PPip1.
get(2); Pip1[3] = PPip1.
get(3);
163 Pip2[0] = PPip2.
get(0); Pip2[1] = PPip2.
get(1); Pip2[2] = PPip2.
get(2); Pip2[3] = PPip2.
get(3);
164 Pim[0] = PPim.
get(0); Pim[1] = PPim.
get(1); Pim[2] = PPim.
get(2); Pim[3] = PPim.
get(3);
167 Pip1[0] = PPip1.
get(0); Pip1[1] = -(PPip1.
get(1)); Pip1[2] = -(PPip1.
get(2)); Pip1[3] = -(PPip1.
get(3));
168 Pip2[0] = PPip2.
get(0); Pip2[1] = -(PPip2.
get(1)); Pip2[2] = -(PPip2.
get(2)); Pip2[3] = -(PPip2.
get(3));
169 Pim[0] = PPim.
get(0); Pim[1] = -(PPim.
get(1)); Pim[2] = -(PPim.
get(2)); Pim[3] = -(PPim.
get(3));
173 double p12[4],p13[4],p14[4],p23[4],p24[4],p34[4];
174 double p123[4],p124[4],p134[4],p234[4],pD[4];
175 double Sf1,Sf2,Sf3,Sf4,Sf5,Sf6,Sf7,Sf8;
176 Sf1 = spinf1( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
177 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
178 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
180 Sf2 = spinf2( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
181 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
182 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
184 Sf3 = spinf3( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
185 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
186 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
188 Sf4 = spinf4( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
189 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
190 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
192 Sf5 = spinf5( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
193 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
194 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
196 Sf6 = spinf6( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
197 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
198 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
200 Sf7 = spinf7( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
201 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
202 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
204 Sf8 = spinf8( Pip1[0],Pip1[1],Pip1[2],Pip1[3],
205 Pip2[0],Pip2[1],Pip2[2],Pip2[3],
206 Pim[0] ,Pim[1] ,Pim[2] ,Pim[3] ,
210 for(
int i=0;i!=4;i++){
211 p12[i]=Pip1[i]+Pip2[i];
212 p13[i]=Pip1[i]+Pim[i];
213 p14[i]=Pip1[i]+
Pi0[i];
214 p23[i]=Pip2[i]+Pim[i];
215 p24[i]=Pip2[i]+
Pi0[i];
216 p34[i]=Pim[i]+
Pi0[i];
217 p123[i]=Pip1[i]+Pip2[i]+Pim[i];
218 p124[i]=Pip1[i]+Pip2[i]+
Pi0[i];
219 p134[i]=Pip1[i]+Pim[i]+
Pi0[i];
220 p234[i]=Pip2[i]+Pim[i]+
Pi0[i];
221 pD[i]=Pip1[i]+Pip2[i]+Pim[i]+
Pi0[i];
223 double sPip1,sPip2,sPim,sPi0,
s12,s13,s14,
s23,s24,s34,s123,s124,s134,s234,sD;
225 sPip1 = SCADot(Pip1,Pip1);
226 sPip2 = SCADot(Pip2,Pip2);
227 sPim = SCADot(Pim,Pim);
229 s12 = SCADot(p12,p12);
230 s13 = SCADot(p13,p13);
231 s14 = SCADot(p14,p14);
232 s23 = SCADot(p23,p23);
233 s24 = SCADot(p24,p24);
234 s34 = SCADot(p34,p34);
236 s123 = SCADot(p123,p123);
237 s124 = SCADot(p124,p124);
238 s134 = SCADot(p134,p134);
239 s234 = SCADot(p234,p234);
243 double spion12[2]={mass_Kaon*mass_Kaon,sPip1};
244 double spion22[2]={mass_Kaon*mass_Kaon,sPip2};
245 double spim2[2]={mass_Kaon*mass_Kaon,sPim};
247 double t1_24[4],t1_14[4],t1_13[4],t1_23[4],t1_12[4],t1_34[4];
248 double t1_14_23[4],t1_13_24[4],t1_12_34[4];
249 double t1_134_2[4],t1_234_1[4],t1_123_4[4];
250 double t1_13_4[4],t1_23_4[4],t1_14_3[4],t1_24_3[4],t1_34_1[4],t1_34_2[4];
252 double t2_13[4][4],t2_23[4][4];
253 double t2_13_24[4][4],t2_14_23[4][4];
254 double t2_123_4[4][4];
255 double t2_13_2[4][4],t2_23_1[4][4];
257 calt1(
Pi0,Pip2,t1_24);
258 calt1(
Pi0,Pip1,t1_14);
260 calt1(Pip1,Pim,t1_13);
261 calt1(Pip2,Pim,t1_23);
263 calt1(Pip1,Pip2,t1_12);
264 calt1(Pim,
Pi0,t1_34);
266 calt1(p14,p23,t1_14_23);
267 calt1(p24,p13,t1_13_24);
268 calt1(p12,p34,t1_12_34);
270 calt1(p134,Pip2,t1_134_2);
271 calt1(p234,Pip1,t1_234_1);
272 calt1(p123,
Pi0,t1_123_4);
274 calt1(p13,
Pi0,t1_13_4);
275 calt1(p23,
Pi0,t1_23_4);
276 calt1(p14,Pim,t1_14_3);
277 calt1(p24,Pim,t1_24_3);
278 calt1(p34,Pip1,t1_34_1);
279 calt1(p34,Pip2,t1_34_2);
281 calt2(Pip1,Pim,t2_13);
282 calt2(Pip2,Pim,t2_23);
284 calt2(p13,p24,t2_13_24);
285 calt2(p14,p23,t2_14_23);
287 calt2(p123,
Pi0,t2_123_4);
289 calt2(p13,Pip2,t2_13_2);
290 calt2(p23,Pip1,t2_23_1);
298 double temp_PDF, tmp1, tmp2, tmp3,tmp4,temp_PDF1,amp_tmp1[2],amp_tmp2[2];
299 double pro[2], pro0[2], pro1[2],pro2[2],pro3[2],pro4[2];
300 double t1D[4],B[3], Bc[3];
301 double mass1sq, mass2sq;
303 for(
int i=0; i<11; i++){
306 tmp1 = 0;tmp2 = 0;temp_PDF = 0;;
307 cof[0] = amp[i]*
cos(phase[i]);
308 cof[1] = amp[i]*
sin(phase[i]);
309 mass1sq = mass1[i]*mass1[i];
310 mass2sq = mass2[i]*mass2[i];
326 propagator980(mass1[i],
s23,spion12,spion22,pro0);
327 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro1);
328 Com_Multi(pro0,pro1,pro);
330 for(
int a=0; a<4; a++){
331 temp_PDF += G[a][a]*t1_14_23[a]*t1_14[a];
334 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
335 B[2] = barrier(1,sD,
s23,s14,rD2,1.9683);
336 tmp1 = B[1]*B[2]*temp_PDF;
337 amp_tmp1[0] = tmp1*pro[0];
338 amp_tmp1[1] = tmp1*pro[1];
341 propagator980(mass1[i],s13,spion12,spion22,pro0);
342 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro1);
343 Com_Multi(pro0,pro1,pro);
345 for(
int a=0; a<4; a++){
346 temp_PDF += G[a][a]*t1_13_24[a]*t1_24[a];
349 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
350 B[2] = barrier(1,sD,s13,s24,rD2,1.9683);
351 tmp2 = B[1]*B[2]*temp_PDF;
352 amp_tmp2[0] = tmp2*pro[0];
353 amp_tmp2[1] = tmp2*pro[1];
358 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro0);
359 propagatorGS(mass2sq,mass2[i],width2[i],
s23,sPip2,sPim,rRes2,pro1);
361 for(
int a=0; a<4; a++){
362 temp_PDF += G[a][a]*t1_14[a]*t1_23[a];
365 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
366 B[2] = barrier(1,
s23,sPip2,sPim,rRes2,mass2[i]);
367 tmp1 = B[1]*B[2]*temp_PDF;
368 amp_tmp1[0] = tmp1*pro0[0]*pro1[0];
369 amp_tmp1[1] = tmp1*pro0[1]*pro1[1];
372 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro0);
373 propagatorGS(mass2sq,mass2[i],width2[i],s13,sPip1,sPim,rRes2,pro1);
375 for(
int a=0; a<4; a++){
376 temp_PDF += G[a][a]*t1_24[a]*t1_13[a];
379 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
380 B[2] = barrier(1,s13,sPip1,sPim,rRes2,mass2[i]);
381 tmp2 = B[1]*B[2]*temp_PDF;
382 amp_tmp2[0] = tmp2*pro0[0]*pro1[0];
383 amp_tmp2[1] = tmp2*pro0[1]*pro1[1];
393 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s14,sPim,rRes1,1,pro1);
394 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro0);
398 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
399 B[1] = barrier(1,s134,s14,sPim,rRes1,mass1[i]);
400 B[2] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
401 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
402 amp_tmp1[0] += tmp1*pro0[0]*pro1[0];
403 amp_tmp1[1] += tmp1*pro0[1]*pro1[1];
406 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s24,sPim,rRes1,1,pro1);
407 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro0);
411 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
412 B[1] = barrier(1,s234,s24,sPim,rRes1,mass1[i]);
413 B[2] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
414 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
415 amp_tmp2[0] += tmp2*pro0[0]*pro1[0];
416 amp_tmp2[1] += tmp2*pro0[1]*pro1[1];
419 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s14,sPim,rRes1,1,pro1);
420 propagatorGS(mass2sq,mass2[i],width2[i],s13,sPip1,sPim,rRes2,pro0);
424 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
425 B[1] = barrier(1,s134,s13,sPi0,rRes1,mass1[i]);
426 B[2] = barrier(1,s13,sPip1,sPim,rRes2,mass2[i]);
427 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
428 amp_tmp1[0] -= tmp1*pro0[0]*pro1[0];
429 amp_tmp1[1] -= tmp1*pro0[1]*pro1[1];
432 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s24,sPim,rRes1,1,pro1);
433 propagatorGS(mass2sq,mass2[i],width2[i],
s23,sPip2,sPim,rRes2,pro0);
437 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
438 B[1] = barrier(1,s234,
s23,sPi0,rRes1,mass1[i]);
439 B[2] = barrier(1,
s23,sPip2,sPim,rRes2,mass2[i]);
440 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
441 amp_tmp2[0] -= tmp2*pro0[0]*pro1[0];
442 amp_tmp2[1] -= tmp2*pro0[1]*pro1[1];
445 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s34,sPip1,rRes1,1,pro1);
446 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
450 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
451 B[1] = barrier(1,s134,s34,sPip1,rRes1,mass1[i]);
452 B[2] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
453 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
454 amp_tmp1[0] -= tmp1*pro0[0]*pro1[0];
455 amp_tmp1[1] -= tmp1*pro0[1]*pro1[1];
458 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s34,sPip2,rRes1,1,pro1);
459 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
463 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
464 B[1] = barrier(1,s234,s34,sPip2,rRes1,mass1[i]);
465 B[2] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
466 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
467 amp_tmp2[0] -= tmp2*pro0[0]*pro1[0];
468 amp_tmp2[1] -= tmp2*pro0[1]*pro1[1];
478 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s14,sPim,rRes1,1,pro1);
479 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro0);
483 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
484 B[1] = barrier(1,s134,s14,sPim,rRes1,mass1[i]);
485 B[2] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
486 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
487 amp_tmp1[0] += tmp1*pro0[0]*pro1[0];
488 amp_tmp1[1] += tmp1*pro0[1]*pro1[1];
491 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s24,sPim,rRes1,1,pro1);
492 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro0);
496 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
497 B[1] = barrier(1,s234,s24,sPim,rRes1,mass1[i]);
498 B[2] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
499 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
500 amp_tmp2[0] += tmp2*pro0[0]*pro1[0];
501 amp_tmp2[1] += tmp2*pro0[1]*pro1[1];
504 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s14,sPim,rRes1,1,pro1);
505 propagatorGS(mass2sq,mass2[i],width2[i],s13,sPip1,sPim,rRes2,pro0);
509 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
510 B[1] = barrier(1,s134,s13,sPi0,rRes1,mass1[i]);
511 B[2] = barrier(1,s13,sPip1,sPim,rRes2,mass2[i]);
512 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
513 amp_tmp1[0] -= tmp1*pro0[0]*pro1[0];
514 amp_tmp1[1] -= tmp1*pro0[1]*pro1[1];
517 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s24,sPim,rRes1,1,pro1);
518 propagatorGS(mass2sq,mass2[i],width2[i],
s23,sPip2,sPim,rRes2,pro0);
522 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
523 B[1] = barrier(1,s234,
s23,sPi0,rRes1,mass1[i]);
524 B[2] = barrier(1,
s23,sPip2,sPim,rRes2,mass2[i]);
525 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
526 amp_tmp2[0] -= tmp2*pro0[0]*pro1[0];
527 amp_tmp2[1] -= tmp2*pro0[1]*pro1[1];
530 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s34,sPip1,rRes1,1,pro1);
531 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
535 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
536 B[1] = barrier(1,s134,s34,sPip1,rRes1,mass1[i]);
537 B[2] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
538 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
539 amp_tmp1[0] -= tmp1*pro0[0]*pro1[0];
540 amp_tmp1[1] -= tmp1*pro0[1]*pro1[1];
543 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s34,sPip2,rRes1,1,pro1);
544 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
548 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
549 B[1] = barrier(1,s234,s34,sPip2,rRes1,mass1[i]);
550 B[2] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
551 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
552 amp_tmp2[0] -= tmp2*pro0[0]*pro1[0];
553 amp_tmp2[1] -= tmp2*pro0[1]*pro1[1];
559 propagatorMW(1.230,s123,1,pro1);
560 propagatorGS(mass2sq,mass2[i],width2[i],s13,sPip1,sPim,rRes2,pro0);
562 for(
int a=0; a<4; a++)
564 temp_PDF += G[a][a]*G[
b][
b]*t1_123_4[a]*(-G[a][
b]+p123[a]*p123[
b]/s123)*t1_13[
b];
566 B[0] = barrier(1,sD,s123,sPi0,rD2,1.9683);
567 B[1] = barrier(1,s13,sPip1,sPim,rRes2,mass2[i]);
568 tmp1 = B[0]*B[1]*temp_PDF;
569 amp_tmp1[0] = tmp1*pro0[0]*pro1[0];
570 amp_tmp1[1] = tmp1*pro0[1]*pro1[1];
574 propagatorMW(1.230,s123,1,pro1);
575 propagatorGS(mass2sq,mass2[i],width2[i],
s23,sPip2,sPim,rRes2,pro0);
577 for(
int a=0; a<4; a++)
579 temp_PDF += G[a][a]*G[
b][
b]*t1_123_4[a]*(-G[a][
b]+p123[a]*p123[
b]/s123)*t1_23[
b];
581 B[0] = barrier(1,sD,s123,sPi0,rD2,1.9683);
582 B[1] = barrier(1,
s23,sPip2,sPim,rRes2,mass2[i]);
583 tmp2 = B[0]*B[1]*temp_PDF;
584 amp_tmp2[0] = tmp2*pro0[0]*pro1[0];
585 amp_tmp2[1] = tmp2*pro0[1]*pro1[1];
596 propagatorMW(1.230,s134,0,pro1);
597 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro0);
599 for(
int a=0; a<4; a++)
601 temp_PDF += G[a][a]*G[
b][
b]*t1_134_2[a]*(-G[a][
b]+p134[a]*p134[
b]/s134)*t1_14[
b];
603 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
604 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
605 tmp1 = B[0]*B[1]*temp_PDF;
606 amp_tmp1[0] += tmp1*pro0[0]*pro1[0]*1.;
607 amp_tmp1[1] += tmp1*pro0[1]*pro1[1]*1.;
611 propagatorMW(1.230,s234,0,pro1);
612 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro0);
614 for(
int a=0; a<4; a++)
616 temp_PDF += G[a][a]*G[
b][
b]*t1_234_1[a]*(-G[a][
b]+p234[a]*p234[
b]/s234)*t1_24[
b];
618 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
619 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
620 tmp2 = B[0]*B[1]*temp_PDF;
621 amp_tmp2[0] += tmp2*pro0[0]*pro1[0]*1.;
622 amp_tmp2[1] += tmp2*pro0[1]*pro1[1]*1.;
655 propagatorMW(1.230,s134,0,pro1);
656 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
658 for(
int a=0; a<4; a++)
660 temp_PDF += G[a][a]*G[
b][
b]*t1_134_2[a]*(-G[a][
b]+p134[a]*p134[
b]/s134)*t1_34[
b];
662 B[0] = barrier(1,sD,s134,sPip2,rD2,1.9683);
663 B[1] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
664 tmp1 = B[0]*B[1]*temp_PDF;
665 amp_tmp1[0] += tmp1*pro0[0]*pro1[0]*-1.;
666 amp_tmp1[1] += tmp1*pro0[1]*pro1[1]*-1.;
670 propagatorMW(1.230,s234,0,pro1);
671 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
673 for(
int a=0; a<4; a++)
675 temp_PDF += G[a][a]*G[
b][
b]*t1_234_1[a]*(-G[a][
b]+p234[a]*p234[
b]/s234)*t1_34[
b];
677 B[0] = barrier(1,sD,s234,sPip1,rD2,1.9683);
678 B[1] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
679 tmp2 = B[0]*B[1]*temp_PDF;
680 amp_tmp2[0] += tmp2*pro0[0]*pro1[0]*-1.;
681 amp_tmp2[1] += tmp2*pro0[1]*pro1[1]*-1.;
686 propagatorRBW(mass1sq,mass1[i],width1[i],
s23,sPip2,sPim,rRes1,0,pro0);
687 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro1);
688 Com_Multi(pro0,pro1,pro);
690 for(
int a=0; a<4; a++){
691 temp_PDF += G[a][a]*t1_14_23[a]*t1_14[a];
694 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
695 B[2] = barrier(1,sD,
s23,s14,rD2,1.9683);
696 tmp1 = B[1]*B[2]*temp_PDF;
697 amp_tmp1[0] = tmp1*pro[0];
698 amp_tmp1[1] = tmp1*pro[1];
701 propagatorRBW(mass1sq,mass1[i],width1[i],s13,sPip1,sPim,rRes1,0,pro0);
702 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro1);
703 Com_Multi(pro0,pro1,pro);
705 for(
int a=0; a<4; a++){
706 temp_PDF += G[a][a]*t1_13_24[a]*t1_24[a];
709 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
710 B[2] = barrier(1,sD,s13,s24,rD2,1.9683);
711 tmp2 = B[1]*B[2]*temp_PDF;
712 amp_tmp2[0] = tmp2*pro[0];
713 amp_tmp2[1] = tmp2*pro[1];
718 propagatorRBW(mass1sq,mass1[i],width1[i],
s23,sPip2,sPim,rRes1,2,pro0);
719 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro1);
720 Com_Multi(pro0,pro1,pro);
722 for(
int a=0; a<4; a++){
723 for(
int b=0;
b<4;
b++){
724 temp_PDF += G[a][a]*G[
b][
b]*t1_14_23[a]*t1_14[
b]*t2_23[a][
b];
728 B[0] = barrier(2,
s23,sPip2,sPim,rRes1,mass1[i]);
729 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
730 B[2] = barrier(1,sD,
s23,s14,rD2,1.9683);
731 tmp1 = B[0]*B[1]*B[2]*temp_PDF;
732 amp_tmp1[0] = tmp1*pro[0];
733 amp_tmp1[1] = tmp1*pro[1];
736 propagatorRBW(mass1sq,mass1[i],width1[i],s13,sPip1,sPim,rRes1,2,pro0);
737 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro1);
738 Com_Multi(pro0,pro1,pro);
740 for(
int a=0; a<4; a++){
741 for(
int b=0;
b<4;
b++){
742 temp_PDF += G[a][a]*G[
b][
b]*t1_13_24[a]*t1_24[
b]*t2_13[a][
b];
746 B[0] = barrier(2,s13,sPip1,sPim,rRes1,mass1[i]);
747 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
748 B[2] = barrier(1,sD,s13,s24,rD2,1.9683);
749 tmp2 = B[0]*B[1]*B[2]*temp_PDF;
750 amp_tmp2[0] = tmp2*pro[0];
751 amp_tmp2[1] = tmp2*pro[1];
756 propagatorRBW(mass1sq,mass1[i],width1[i],s14,sPip1,sPi0,rRes1,1,pro0);
757 propagatorGS(mass2sq,mass2[i],width2[i],
s23,sPip2,sPim,rRes2,pro1);
759 for(
int a=0; a<4; a++){
760 temp_PDF += G[a][a]*t1_14[a]*t1_23[a];
763 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
764 B[2] = barrier(1,
s23,sPip2,sPim,rRes2,mass2[i]);
765 tmp1 = B[1]*B[2]*temp_PDF;
766 amp_tmp1[0] = tmp1*pro0[0]*pro1[0];
767 amp_tmp1[1] = tmp1*pro0[1]*pro1[1];
770 propagatorRBW(mass1sq,mass1[i],width1[i],s24,sPip2,sPi0,rRes1,1,pro0);
771 propagatorGS(mass2sq,mass2[i],width2[i],s13,sPip1,sPim,rRes2,pro1);
773 for(
int a=0; a<4; a++){
774 temp_PDF += G[a][a]*t1_24[a]*t1_13[a];
777 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
778 B[2] = barrier(1,s13,sPip1,sPim,rRes2,mass2[i]);
779 tmp2 = B[1]*B[2]*temp_PDF;
780 amp_tmp2[0] = tmp2*pro0[0]*pro1[0];
781 amp_tmp2[1] = tmp2*pro0[1]*pro1[1];
786 propagatorGS(mass1sq,mass1[i],width1[i],s14,sPip1,sPi0,rRes1,pro0);
787 propagatorRBW(mass2sq,mass2[i],width2[i],
s23,sPip2,sPim,rRes2,1,pro1);
791 B[0] = barrier(1,sD,s14,
s23,rD2,1.9683);
792 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
793 B[2] = barrier(1,
s23,sPip2,sPim,rRes2,mass2[i]);
794 tmp1 = B[1]*B[2]*B[0]*temp_PDF;
795 amp_tmp1[0] = tmp1*pro0[0]*pro1[0];
796 amp_tmp1[1] = tmp1*pro0[1]*pro1[1];
799 propagatorGS(mass1sq,mass1[i],width1[i],s24,sPip2,sPi0,rRes1,pro0);
800 propagatorRBW(mass2sq,mass2[i],width2[i],s13,sPip1,sPim,rRes2,1,pro1);
804 B[0] = barrier(1,sD,s24,s13,rD2,1.9683);
805 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
806 B[2] = barrier(1,s13,sPip1,sPim,rRes2,mass2[i]);
807 tmp2 = B[1]*B[2]*B[0]*temp_PDF;
808 amp_tmp2[0] = tmp2*pro0[0]*pro1[0];
809 amp_tmp2[1] = tmp2*pro0[1]*pro1[1];
819 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s14,sPim,rRes1,1,pro1);
820 propagatorGS(mass2sq,mass2[i],width2[i],s14,sPip1,sPi0,rRes2,pro0);
822 for(
int a=0; a<4; a++)
823 temp_PDF += G[a][a]*t1_134_2[a]*t1_14[a];
826 B[0] = barrier(1,s134,s14,sPim,rRes1,mass1[i]);
827 B[1] = barrier(1,s14,sPip1,sPi0,rRes2,mass2[i]);
828 tmp1 = B[0]*B[1]*temp_PDF;
829 amp_tmp1[0] += tmp1*pro0[0]*pro1[0]*1.;
830 amp_tmp1[1] += tmp1*pro0[1]*pro1[1]*1.;
833 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s24,sPim,rRes1,1,pro1);
834 propagatorGS(mass2sq,mass2[i],width2[i],s24,sPip2,sPi0,rRes2,pro0);
836 for(
int a=0; a<4; a++)
837 temp_PDF += G[a][a]*t1_234_1[a]*t1_24[a];
840 B[0] = barrier(1,s234,s24,sPim,rRes1,mass1[i]);
841 B[1] = barrier(1,s24,sPip2,sPi0,rRes2,mass2[i]);
842 tmp2 = B[0]*B[1]*temp_PDF;
843 amp_tmp2[0] += tmp2*pro0[0]*pro1[0]*1.;
844 amp_tmp2[1] += tmp2*pro0[1]*pro1[1]*1.;
876 propagatorRBW(mass1sq,mass1[i],width1[i],s134,s34,sPip1,rRes1,1,pro1);
877 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
879 for(
int a=0; a<4; a++)
880 temp_PDF += G[a][a]*t1_134_2[a]*t1_34[a];
883 B[0] = barrier(1,s134,s34,sPip1,rRes1,mass1[i]);
884 B[1] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
885 tmp1 = B[0]*B[1]*temp_PDF;
886 amp_tmp1[0] += tmp1*pro0[0]*pro1[0]*-1.;
887 amp_tmp1[1] += tmp1*pro0[1]*pro1[1]*-1.;
890 propagatorRBW(mass1sq,mass1[i],width1[i],s234,s34,sPip2,rRes1,1,pro1);
891 propagatorGS(mass2sq,mass2[i],width2[i],s34,sPim,sPi0,rRes2,pro0);
893 for(
int a=0; a<4; a++)
894 temp_PDF += G[a][a]*t1_234_1[a]*t1_34[a];
897 B[0] = barrier(1,s234,s34,sPip2,rRes1,mass1[i]);
898 B[1] = barrier(1,s34,sPim,sPi0,rRes2,mass2[i]);
899 tmp2 = B[0]*B[1]*temp_PDF;
900 amp_tmp2[0] += tmp2*pro0[0]*pro1[0]*-1.;
901 amp_tmp2[1] += tmp2*pro0[1]*pro1[1]*-1.;
904 amp_tmp[0] = amp_tmp1[0]+amp_tmp2[0];
905 amp_tmp[1] = amp_tmp1[1]+amp_tmp2[1];
908 Com_Multi(amp_tmp,cof,amp_PDF);
909 PDF[0] += amp_PDF[0];
910 PDF[1] += amp_PDF[1];
914 double value = PDF[0]*PDF[0] + PDF[1]*PDF[1];
917 if(value <=0) value = 1e-20;