← 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%mp_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%mp_couplings2.f
12
12
      INCLUDE 'mp_input.inc'
13
13
      INCLUDE 'mp_coupl.inc'
14
14
 
15
 
      MP__UV_3GB = -MP__MDL_G_UVB_FIN_*MP__G
16
 
      MP__UV_3GT = -MP__MDL_G_UVT_FIN_*MP__G
17
 
      MP__UV_GQQB = MP__MDL_COMPLEXI*MP__MDL_G_UVB_FIN_*MP__G
18
 
      MP__UV_GQQT = MP__MDL_COMPLEXI*MP__MDL_G_UVT_FIN_*MP__G
19
 
      MP__UV_BMASS = MP__MDL_BMASS_UV_FIN_
20
 
      MP__UV_TMASS = MP__MDL_TMASS_UV_FIN_
21
 
      MP__UVWFCT_B_0 = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
22
 
     $ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
23
 
     $ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*MP__MDL_CF
24
 
     $ *(4.000000E+00_16-3.000000E+00_16*MP_REGLOG(CMPLX((MP__MDL_MB__E
25
 
     $XP__2/MP__MDL_MU_R__EXP__2),KIND=16))),KIND=16))
26
 
      MP__UVWFCT_T_0 = MP_COND(CMPLX(MP__MDL_MT,KIND=16)
27
 
     $ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
28
 
     $ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*MP__MDL_CF
29
 
     $ *(4.000000E+00_16-3.000000E+00_16*MP_REGLOG(CMPLX((MP__MDL_MT__E
30
 
     $XP__2/MP__MDL_MU_R__EXP__2),KIND=16))),KIND=16))
31
 
      MP__UVWFCT_G_2 = MP_COND(CMPLX(MP__MDL_MT,KIND=16)
32
 
     $ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(((MP__MDL_G__EXP__2)
33
 
     $ /(2.000000E+00_16*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
34
 
     $ *MP__MDL_TF*MP_REGLOG(CMPLX((MP__MDL_MT__EXP__2
35
 
     $ /MP__MDL_MU_R__EXP__2),KIND=16)),KIND=16))
36
 
      MP__UVWFCT_G_1 = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
37
 
     $ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(((MP__MDL_G__EXP__2)
38
 
     $ /(2.000000E+00_16*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
39
 
     $ *MP__MDL_TF*MP_REGLOG(CMPLX((MP__MDL_MB__EXP__2
40
 
     $ /MP__MDL_MU_R__EXP__2),KIND=16)),KIND=16))
41
 
      MP__R2_BXTW = ((MP__MDL_CKM33*MP__MDL_EE*MP__MDL_COMPLEXI)
42
 
     $ /(MP__MDL_SW*MP__MDL_SQRT__2))*MP__MDL_R2MIXEDFACTOR_FIN_
43
15
      MP__GC_4 = -MP__G
44
16
      MP__GC_5 = MP__MDL_COMPLEXI*MP__G
45
17
      MP__GC_6 = MP__MDL_COMPLEXI*MP__MDL_G__EXP__2
73
45
      MP__R2_QQT = MP__MDL_LHV*MP__MDL_COMPLEXI*MP__MDL_G__EXP__2
74
46
     $ *(MP__MDL_NCOL__EXP__2-1.000000E+00_16)*(2.000000E+00_16
75
47
     $ *MP__MDL_MT)/(3.200000E+01_16*MP__PI**2*MP__MDL_NCOL)
 
48
      MP__UV_3GG_1EPS = -MP__MDL_G_UVG_1EPS_*MP__G
 
49
      MP__UV_3GB_1EPS = -MP__MDL_G_UVB_1EPS_*MP__G
 
50
      MP__UV_GQQG_1EPS = MP__MDL_COMPLEXI*MP__MDL_G_UVG_1EPS_*MP__G
 
51
      MP__UV_GQQB_1EPS = MP__MDL_COMPLEXI*MP__MDL_G_UVB_1EPS_*MP__G
 
52
      MP__UV_BMASS_1EPS = MP__MDL_BMASS_UV_1EPS_
 
53
      MP__UV_TMASS_1EPS = MP__MDL_TMASS_UV_1EPS_
 
54
      MP__UVWFCT_B_0_1EPS = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
 
55
     $ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
 
56
     $ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*3.000000E+00_16
 
57
     $ *MP__MDL_CF,KIND=16))
 
58
      MP__UVWFCT_G_1_1EPS = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
 
59
     $ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
 
60
     $ /(2.000000E+00_16*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
 
61
     $ *MP__MDL_TF,KIND=16))
 
62
      MP__R2_BXTW = ((MP__MDL_CKM33*MP__MDL_EE*MP__MDL_COMPLEXI)
 
63
     $ /(MP__MDL_SW*MP__MDL_SQRT__2))*MP__MDL_R2MIXEDFACTOR_FIN_
 
64
      MP__UV_3GB = -MP__MDL_G_UVB_FIN_*MP__G
 
65
      MP__UV_3GT = -MP__MDL_G_UVT_FIN_*MP__G
76
66
      END