36 {
42
43 mode = 0;
44 ProbMax = 15.55;
45
46
47
48
49 double m_Kaon = 0.493677;
50 m2_Kaon = m_Kaon * m_Kaon;
51 double m_K0 = 0.497614;
52 m2_K0 = m_K0 * m_K0;
53 double m_eta = 0.547853;
55 double m_Pion = 0.13957;
56 m2_Pion = m_Pion * m_Pion;
57 double m_Pi0 = 0.1349766;
58 m2_Pi0 = m_Pi0 * m_Pi0;
59 m_D0 = 1.86486;
60 m2_D0 = m_D0 * m_D0;
61 m_D = 1.86962;
62 m2_D = m_D * m_D;
63
64 ciR = EvtComplex( 1.0, 0.0 );
65 ciM = EvtComplex( 0.0, 1.0 );
66
67
68 double mAD0 = 2.42;
69 m2AD0 = mAD0 * mAD0;
70 double mAD = 2.42;
71 m2AD = mAD * mAD;
72 double m_a0 = 0.990;
73 m2_a0 = m_a0 * m_a0;
74 flatte_g1 = 0.341;
75 flatte_g2 = 0.341 * 0.892;
76}
*********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)