12
12
INCLUDE 'mp_input.inc'
13
13
INCLUDE 'mp_coupl.inc'
15
MP__UV_3GG_1EPS = -MP__MDL_G_UVG_1EPS_*MP__G
16
MP__UV_3GB_1EPS = -MP__MDL_G_UVB_1EPS_*MP__G
17
MP__UV_GQQG_1EPS = MP__MDL_COMPLEXI*MP__MDL_G_UVG_1EPS_*MP__G
18
MP__UV_GQQQ_1EPS = MP__MDL_COMPLEXI*MP__MDL_G_UVQ_1EPS_*MP__G
19
MP__UV_BMASS_1EPS = MP__MDL_BMASS_UV_1EPS_
20
MP__UV_TMASS_1EPS = MP__MDL_TMASS_UV_1EPS_
21
MP__UVWFCT_B_0_1EPS = 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))*3.000000E+00_16
24
$ *MP__MDL_CF,KIND=16))
25
MP__UVWFCT_G_2_1EPS = MP_COND(CMPLX(MP__MDL_MT,KIND=16)
26
$ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
27
$ /(2.000000E+00_16*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
28
$ *MP__MDL_TF,KIND=16))
15
MP__UV_GQQB = MP__MDL_COMPLEXI*MP__MDL_G_UVB_FIN_*MP__G
16
MP__UV_GQQT = MP__MDL_COMPLEXI*MP__MDL_G_UVT_FIN_*MP__G
17
MP__UV_BMASS = MP__MDL_BMASS_UV_FIN_
18
MP__UV_TMASS = MP__MDL_TMASS_UV_FIN_
19
MP__UVWFCT_B_0 = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
20
$ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
21
$ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*MP__MDL_CF
22
$ *(4.000000E+00_16-3.000000E+00_16
23
$ *MP_REGLOG(CMPLX((MP__MDL_MB__EXP__2/MP__MDL_MU_R__EXP__2)
24
$ ,KIND=16))),KIND=16))
25
MP__UVWFCT_T_0 = MP_COND(CMPLX(MP__MDL_MT,KIND=16)
26
$ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
27
$ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*MP__MDL_CF
28
$ *(4.000000E+00_16-3.000000E+00_16
29
$ *MP_REGLOG(CMPLX((MP__MDL_MT__EXP__2/MP__MDL_MU_R__EXP__2)
30
$ ,KIND=16))),KIND=16))
31
MP__UVWFCT_G_1 = MP_COND(CMPLX(MP__MDL_MB,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_MB__EXP__2
35
$ /MP__MDL_MU_R__EXP__2),KIND=16)),KIND=16))
36
MP__UVWFCT_G_2 = MP_COND(CMPLX(MP__MDL_MT,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_MT__EXP__2
40
$ /MP__MDL_MU_R__EXP__2),KIND=16)),KIND=16))