18 complex<double> Amp(vector<double> Pip1, vector<double> Pim1, vector<double> Pip2, vector<double> Pim2);
25 vector<double> epsilon_uvmn;
26 vector< complex<double> > fitpara;
27 double g_mag[30], g_pha[30];
30 vector<double> sum_tensor(vector<double> pa, vector<double> pb);
31 double contract_11_0(vector<double> pa, vector<double> pb);
32 double contract_22_0(vector<double> pa, vector<double> pb);
33 vector<double> contract_21_1(vector<double> pa, vector<double> pb);
34 vector<double> contract_22_2(vector<double> pa, vector<double> pb);
35 vector<double> contract_31_2(vector<double> pa, vector<double> pb);
36 vector<double> contract_41_3(vector<double> pa, vector<double> pb);
37 vector<double> contract_42_2(vector<double> pa, vector<double> pb);
39 vector<double> OrbitalTensors(vector<double> pa, vector<double> pb, vector<double> pc,
double r,
int rank);
40 vector<double> ProjectionTensors(vector<double> pa,
int rank);
42 double fundecaymomentum(
double mr2,
double m1_2,
double m2_2);
43 double fundecaymomentum2(
double mr2,
double m1_2,
double m2_2);
45 double h(
double m,
double q);
46 double dh(
double m0,
double q0);
47 double f(
double m0,
double sx,
double q0,
double q);
48 double d(
double m0,
double q0);
49 double wid(
double mass,
double sa,
double sb,
double sc,
double r,
int l);
50 double widT1260(
int i,
double g1,
double g2);
51 double widT1300(
int i);
52 double widT1640(
int i);
53 double anywid1260(
double sc,
double g1,
double g2);
54 double anywid1300(
double sc);
55 double anywid1640(
double sc);
57 complex<double> GS(
double mx2,
double mr,
double wr,
double m1_2,
double m2_2,
double r,
int l);
58 complex<double> RBW(
double mx2,
double mr,
double wr,
double m1_2,
double m2_2,
double r,
int l);
62 double rho22(
double sc);
66 complex<double> FMTX(
double Kijx,
double Kijy,
double rhojjx,
double rhojjy,
int i,
int j);
67 double FINVMTX(
double s,
double *FINVx,
double *FINVy);
71 vector<double> m_Pip1;
72 vector<double> m_Pim1;
73 vector<double> m_Pip2;
74 vector<double> m_Pim2;
****INTEGER imax DOUBLE PRECISION m_pi *DOUBLE PRECISION m_amfin DOUBLE PRECISION m_Chfin DOUBLE PRECISION m_Xenph DOUBLE PRECISION m_sinw2 DOUBLE PRECISION m_GFermi DOUBLE PRECISION m_MfinMin DOUBLE PRECISION m_ta2 INTEGER m_out INTEGER m_KeyFSR INTEGER m_KeyQCD *COMMON c_Semalib $ !copy of input $ !CMS energy $ !beam mass $ !final mass $ !beam charge $ !final charge $ !smallest final mass $ !Z mass $ !Z width $ !EW mixing angle $ !Gmu Fermi $ alphaQED at q
complex< double > Amp(vector< double > Pip1, vector< double > Pim1, vector< double > Pip2, vector< double > Pim2)