35 {
41
42 mode = 1;
43 ProbMax = 15.85;
44
45
46
47
48 double m_Kaon = 0.493677;
49 m2_Kaon = m_Kaon * m_Kaon;
50 double m_K0 = 0.497614;
51 m2_K0 = m_K0 * m_K0;
52 double m_eta = 0.547853;
54 double m_Pion = 0.13957;
55 m2_Pion = m_Pion * m_Pion;
56 double m_Pi0 = 0.1349766;
57 m2_Pi0 = m_Pi0 * m_Pi0;
58 m_D0 = 1.86486;
59 m2_D0 = m_D0 * m_D0;
60 m_D = 1.86962;
61 m2_D = m_D * m_D;
62
63 ciR = EvtComplex( 1.0, 0.0 );
64 ciM = EvtComplex( 0.0, 1.0 );
65
66
67 double mAD0 = 2.42;
68 m2AD0 = mAD0 * mAD0;
69 double mAD = 2.42;
70 m2AD = mAD * mAD;
71 double m_a0 = 0.990;
72 m2_a0 = m_a0 * m_a0;
73 flatte_g1 = 0.341;
74 flatte_g2 = 0.341 * 0.892;
75}
*********DOUBLE PRECISION m_pi INTEGER m_lenwt !max no of aux weights INTEGER m_phmax !maximum photon multiplicity ISR FSR *DOUBLE COMPLEX m_Pauli4 DOUBLE COMPLEX m_AmpBorn DOUBLE COMPLEX m_AmpBoxy DOUBLE COMPLEX m_AmpBorn1 DOUBLE COMPLEX m_AmpBorn2 DOUBLE COMPLEX m_AmpExpo2p DOUBLE COMPLEX m_Rmat DOUBLE COMPLEX m_BoxGZut !DOUBLE COMPLEX m_F1finPair2 !DOUBLE PRECISION m_Vcut DOUBLE PRECISION m_Alfinv DOUBLE PRECISION m_Lorin1 DOUBLE PRECISION m_Lorin2 DOUBLE PRECISION m_eta
void checkSpinDaughter(int d1, EvtSpinType::spintype sp)
void checkSpinParent(EvtSpinType::spintype sp)
void checkNDaug(int d1, int d2=-1)
void checkNArg(int a1, int a2=-1, int a3=-1, int a4=-1)