← Back to branch summary

~madteam/mg5amcnlo/series2.0

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/long_ML_SMQCD_default/gg_wmtbx/%..%..%Source%MODEL%couplings2.f

mwrge with 2.7.3

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/input_files/IOTestsComparison/long_ML_SMQCD_default/gg_wmtbx/%..%..%Source%MODEL%couplings2.f
12
12
      PARAMETER  (ZERO=0D0)
13
13
      INCLUDE 'input.inc'
14
14
      INCLUDE 'coupl.inc'
15
 
      UV_3GB = -MDL_G_UVB_FIN_*G
16
 
      UV_3GT = -MDL_G_UVT_FIN_*G
17
 
      UV_GQQB = MDL_COMPLEXI*MDL_G_UVB_FIN_*G
18
 
      UV_GQQT = MDL_COMPLEXI*MDL_G_UVT_FIN_*G
19
 
      UV_BMASS = MDL_BMASS_UV_FIN_
20
 
      UV_TMASS = MDL_TMASS_UV_FIN_
21
 
      UVWFCT_B_0 = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00),DCMPLX(
22
 
     $ -((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))*MDL_CF
23
 
     $ *(4.000000D+00-3.000000D+00*REGLOG(DCMPLX(MDL_MB__EXP__2
24
 
     $ /MDL_MU_R__EXP__2)))))
25
 
      UVWFCT_T_0 = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00),DCMPLX(
26
 
     $ -((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))*MDL_CF
27
 
     $ *(4.000000D+00-3.000000D+00*REGLOG(DCMPLX(MDL_MT__EXP__2
28
 
     $ /MDL_MU_R__EXP__2)))))
29
 
      UVWFCT_G_2 = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)
30
 
     $ ,DCMPLX(((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
31
 
     $ *4.000000D+00*MDL_TF*REGLOG(DCMPLX(MDL_MT__EXP__2
32
 
     $ /MDL_MU_R__EXP__2))))
33
 
      UVWFCT_G_1 = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
34
 
     $ ,DCMPLX(((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
35
 
     $ *4.000000D+00*MDL_TF*REGLOG(DCMPLX(MDL_MB__EXP__2
36
 
     $ /MDL_MU_R__EXP__2))))
37
 
      R2_BXTW = ((MDL_CKM33*MDL_EE*MDL_COMPLEXI)/(MDL_SW*MDL_SQRT__2))
38
 
     $ *MDL_R2MIXEDFACTOR_FIN_
39
15
      GC_4 = -G
40
16
      GC_5 = MDL_COMPLEXI*G
41
17
      GC_6 = MDL_COMPLEXI*MDL_G__EXP__2
63
39
      R2_QQT = MDL_LHV*MDL_COMPLEXI*MDL_G__EXP__2*(MDL_NCOL__EXP__2
64
40
     $ -1.000000D+00)*(2.000000D+00*MDL_MT)/(3.200000D+01*PI**2
65
41
     $ *MDL_NCOL)
 
42
      UV_3GG_1EPS = -MDL_G_UVG_1EPS_*G
 
43
      UV_3GB_1EPS = -MDL_G_UVB_1EPS_*G
 
44
      UV_GQQG_1EPS = MDL_COMPLEXI*MDL_G_UVG_1EPS_*G
 
45
      UV_GQQB_1EPS = MDL_COMPLEXI*MDL_G_UVB_1EPS_*G
 
46
      UV_BMASS_1EPS = MDL_BMASS_UV_1EPS_
 
47
      UV_TMASS_1EPS = MDL_TMASS_UV_1EPS_
 
48
      UVWFCT_B_0_1EPS = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
 
49
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))
 
50
     $ *3.000000D+00*MDL_CF))
 
51
      UVWFCT_G_1_1EPS = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
 
52
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
 
53
     $ *4.000000D+00*MDL_TF))
 
54
      R2_BXTW = ((MDL_CKM33*MDL_EE*MDL_COMPLEXI)/(MDL_SW*MDL_SQRT__2))
 
55
     $ *MDL_R2MIXEDFACTOR_FIN_
 
56
      UV_3GB = -MDL_G_UVB_FIN_*G
 
57
      UV_3GT = -MDL_G_UVT_FIN_*G
66
58
      END