]>
Commit | Line | Data |
---|---|---|
da0e9ce3 | 1 | c Basic matrix elements |
2 | Complex *16 | |
3 | > Mat_S1,Mat_S2,Mat_S3,Mat_S4,Mat_S5 | |
4 | > ,Nat_S1,Nat_S2,Nat_S3,Nat_S4,Nat_S5 | |
5 | > ,MatKstarp,MatKstar0,MatKrho | |
6 | > ,NatKstarp,NatKstar0,NatKrho | |
7 | Real*8 alphaCP,betaCP,pi,MB2,MC2,Mass_rho,Gam_rho,one,eno | |
8 | Real*8 M_B,M_pip,M_pim,M_pi0 | |
9 | Real*8 M_Kp,Mass_Kstarp,Mass_Kstar0,Gam_Kstarp,Gam_Kstar0 | |
10 | Real*8 DeltaM,Gam_B,xd | |
11 | Real*8 M_Upsi, BetaBabar,ptcut,coscut | |
12 | Common/Theory/ | |
13 | > Mat_S1,Mat_S2,Mat_S3,Mat_S4,Mat_S5 | |
14 | > ,Nat_S1,Nat_S2,Nat_S3,Nat_S4,Nat_S5 | |
15 | > ,MatKstarp,MatKstar0,MatKrho | |
16 | > ,NatKstarp,NatKstar0,NatKrho | |
17 | > ,alphaCP, betaCP, pi | |
18 | > ,MB2,MC2,one,eno | |
19 | > ,Mass_rho,Gam_rho | |
20 | > ,M_B, M_pip,M_pim,M_pi0 | |
21 | > ,DeltaM,Gam_B,xd | |
22 | > ,M_Upsi,BetaBabar | |
23 | > ,ptcut,coscut | |
24 | > ,M_Kp,Mass_Kstarp,Mass_Kstar0,Gam_Kstarp,Gam_Kstar0 |