12
12
INCLUDE 'mp_input.inc'
13
13
INCLUDE 'mp_coupl.inc'
15
MP__UV_TMASS_1EPS = MP__MDL_TMASS_UV_1EPS_
16
MP__UVWFCT_B_0_1EPS = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
17
$ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
18
$ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*3.000000E+00_16
19
$ *MP__MDL_CF,KIND=16))
20
MP__UVWFCT_G_1_1EPS = MP_COND(CMPLX(MP__MDL_MB,KIND=16)
21
$ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
22
$ /(2.000000E+00_16*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
23
$ *MP__MDL_TF,KIND=16))
15
MP__UVWFCT_T_0 = MP_COND(CMPLX(MP__MDL_MT,KIND=16)
16
$ ,CMPLX(0.000000E+00_16,KIND=16),CMPLX(-((MP__MDL_G__EXP__2)
17
$ /(2.000000E+00_16*1.600000E+01_16*MP__PI**2))*MP__MDL_CF
18
$ *(4.000000E+00_16-3.000000E+00_16
19
$ *MP_REGLOG(CMPLX((MP__MDL_MT__EXP__2/MP__MDL_MU_R__EXP__2)
20
$ ,KIND=16))),KIND=16))
21
MP__UVWFCT_G_1 = 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*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
24
$ *MP__MDL_TF*MP_REGLOG(CMPLX((MP__MDL_MB__EXP__2
25
$ /MP__MDL_MU_R__EXP__2),KIND=16)),KIND=16))
26
MP__UVWFCT_G_2 = 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*4.800000E+01_16*MP__PI**2))*4.000000E+00_16
29
$ *MP__MDL_TF*MP_REGLOG(CMPLX((MP__MDL_MT__EXP__2
30
$ /MP__MDL_MU_R__EXP__2),KIND=16)),KIND=16))