3
3
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
5
5
REAL*16 MP__MDL_SQRT__AS,MP__MDL_G__EXP__4,MP__MDL_G__EXP__2
6
$ ,MP__MDL_R2MIXEDFACTOR_FIN_,MP__MDL_G_UVG_1EPS_,MP__MDL_G_UVQ_1E
7
$ PS_,MP__MDL_G_UVB_1EPS_,MP__MDL_GWCFT_UV_B_1EPS_,MP__MDL_GWCFT_U
8
$ V_T_1EPS_,MP__MDL_BWCFT_UV_1EPS_,MP__MDL_TWCFT_UV_1EPS_
6
$ ,MP__MDL_R2MIXEDFACTOR_FIN_,MP__MDL_G_UVG_1EPS_
7
$ ,MP__MDL_G_UVQ_1EPS_,MP__MDL_G_UVB_1EPS_,MP__MDL_GWCFT_UV_B_1EPS
8
$_,MP__MDL_GWCFT_UV_T_1EPS_,MP__MDL_BWCFT_UV_1EPS_
9
$ ,MP__MDL_TWCFT_UV_1EPS_,MP__MDL_G__EXP__3,MP__MDL_MU_R__EXP__2
10
$ ,MP__MDL_G_UVB_FIN_,MP__MDL_G_UVT_FIN_,MP__MDL_GWCFT_UV_B_FIN_
11
$ ,MP__MDL_GWCFT_UV_T_FIN_,MP__MDL_BWCFT_UV_FIN_
12
$ ,MP__MDL_TWCFT_UV_FIN_,MP__MDL_CONJG__CKM3X3,MP__MDL_CKM22
13
$ ,MP__MDL_LHV,MP__MDL_CKM3X3,MP__MDL_CONJG__CKM22
14
$ ,MP__MDL_CONJG__CKM33,MP__MDL_NCOL,MP__MDL_CA,MP__MDL_TF
15
$ ,MP__MDL_CF,MP__MDL_MZ__EXP__2,MP__MDL_MZ__EXP__4
16
$ ,MP__MDL_SQRT__2,MP__MDL_MH__EXP__2,MP__MDL_NCOL__EXP__2
17
$ ,MP__MDL_MB__EXP__2,MP__MDL_MT__EXP__2,MP__MDL_AEW
18
$ ,MP__MDL_SQRT__AEW,MP__MDL_EE,MP__MDL_MW__EXP__2,MP__MDL_SW2
19
$ ,MP__MDL_CW,MP__MDL_SQRT__SW2,MP__MDL_SW,MP__MDL_G1,MP__MDL_GW
20
$ ,MP__MDL_V,MP__MDL_V__EXP__2,MP__MDL_LAM,MP__MDL_YB,MP__MDL_YT
21
$ ,MP__MDL_YTAU,MP__MDL_MUH,MP__MDL_AXIALZUP,MP__MDL_AXIALZDOWN
22
$ ,MP__MDL_VECTORZUP,MP__MDL_VECTORZDOWN,MP__MDL_VECTORAUP
23
$ ,MP__MDL_VECTORADOWN,MP__MDL_VECTORWMDXU,MP__MDL_AXIALWMDXU
24
$ ,MP__MDL_VECTORWPUXD,MP__MDL_AXIALWPUXD,MP__MDL_GW__EXP__2
25
$ ,MP__MDL_CW__EXP__2,MP__MDL_EE__EXP__2,MP__MDL_SW__EXP__2
26
$ ,MP__MDL_YB__EXP__2,MP__MDL_YT__EXP__2,MP__AEWM1,MP__MDL_GF
27
$ ,MP__AS,MP__MDL_YMB,MP__MDL_YMT,MP__MDL_YMTAU
29
COMMON/MP_PARAMS_R/ MP__MDL_SQRT__AS,MP__MDL_G__EXP__4
30
$ ,MP__MDL_G__EXP__2,MP__MDL_R2MIXEDFACTOR_FIN_
31
$ ,MP__MDL_G_UVG_1EPS_,MP__MDL_G_UVQ_1EPS_,MP__MDL_G_UVB_1EPS_
32
$ ,MP__MDL_GWCFT_UV_B_1EPS_,MP__MDL_GWCFT_UV_T_1EPS_
33
$ ,MP__MDL_BWCFT_UV_1EPS_,MP__MDL_TWCFT_UV_1EPS_
9
34
$ ,MP__MDL_G__EXP__3,MP__MDL_MU_R__EXP__2,MP__MDL_G_UVB_FIN_
10
35
$ ,MP__MDL_G_UVT_FIN_,MP__MDL_GWCFT_UV_B_FIN_,MP__MDL_GWCFT_UV_T_F
11
$ IN_,MP__MDL_BWCFT_UV_FIN_,MP__MDL_TWCFT_UV_FIN_,MP__MDL_CONJG__C
12
$ KM3X3,MP__MDL_CKM22,MP__MDL_LHV,MP__MDL_CKM3X3,MP__MDL_CONJG__CK
13
$ M22,MP__MDL_CONJG__CKM33,MP__MDL_NCOL,MP__MDL_CA,MP__MDL_TF
14
$ ,MP__MDL_CF,MP__MDL_MZ__EXP__2,MP__MDL_MZ__EXP__4,MP__MDL_SQRT__
15
$ 2,MP__MDL_MH__EXP__2,MP__MDL_NCOL__EXP__2,MP__MDL_MB__EXP__2
16
$ ,MP__MDL_MT__EXP__2,MP__MDL_AEW,MP__MDL_SQRT__AEW,MP__MDL_EE
17
$ ,MP__MDL_MW__EXP__2,MP__MDL_SW2,MP__MDL_CW,MP__MDL_SQRT__SW2
18
$ ,MP__MDL_SW,MP__MDL_G1,MP__MDL_GW,MP__MDL_V,MP__MDL_V__EXP__2
19
$ ,MP__MDL_LAM,MP__MDL_YB,MP__MDL_YT,MP__MDL_YTAU,MP__MDL_MUH
20
$ ,MP__MDL_AXIALZUP,MP__MDL_AXIALZDOWN,MP__MDL_VECTORZUP
21
$ ,MP__MDL_VECTORZDOWN,MP__MDL_VECTORAUP,MP__MDL_VECTORADOWN
22
$ ,MP__MDL_VECTORWMDXU,MP__MDL_AXIALWMDXU,MP__MDL_VECTORWPUXD
23
$ ,MP__MDL_AXIALWPUXD,MP__MDL_GW__EXP__2,MP__MDL_CW__EXP__2
24
$ ,MP__MDL_EE__EXP__2,MP__MDL_SW__EXP__2,MP__MDL_YB__EXP__2
25
$ ,MP__MDL_YT__EXP__2,MP__AEWM1,MP__MDL_GF,MP__AS,MP__MDL_YMB
26
$ ,MP__MDL_YMT,MP__MDL_YMTAU
28
COMMON/MP_PARAMS_R/ MP__MDL_SQRT__AS,MP__MDL_G__EXP__4,MP__MDL_G_
29
$ _EXP__2,MP__MDL_R2MIXEDFACTOR_FIN_,MP__MDL_G_UVG_1EPS_
30
$ ,MP__MDL_G_UVQ_1EPS_,MP__MDL_G_UVB_1EPS_,MP__MDL_GWCFT_UV_B_1EPS
31
$ _,MP__MDL_GWCFT_UV_T_1EPS_,MP__MDL_BWCFT_UV_1EPS_,MP__MDL_TWCFT_
32
$ UV_1EPS_,MP__MDL_G__EXP__3,MP__MDL_MU_R__EXP__2,MP__MDL_G_UVB_FI
33
$ N_,MP__MDL_G_UVT_FIN_,MP__MDL_GWCFT_UV_B_FIN_,MP__MDL_GWCFT_UV_T
34
$ _FIN_,MP__MDL_BWCFT_UV_FIN_,MP__MDL_TWCFT_UV_FIN_,MP__MDL_CONJG_
35
$ _CKM3X3,MP__MDL_CKM22,MP__MDL_LHV,MP__MDL_CKM3X3,MP__MDL_CONJG__
36
$ CKM22,MP__MDL_CONJG__CKM33,MP__MDL_NCOL,MP__MDL_CA,MP__MDL_TF
37
$ ,MP__MDL_CF,MP__MDL_MZ__EXP__2,MP__MDL_MZ__EXP__4,MP__MDL_SQRT__
38
$ 2,MP__MDL_MH__EXP__2,MP__MDL_NCOL__EXP__2,MP__MDL_MB__EXP__2
39
$ ,MP__MDL_MT__EXP__2,MP__MDL_AEW,MP__MDL_SQRT__AEW,MP__MDL_EE
40
$ ,MP__MDL_MW__EXP__2,MP__MDL_SW2,MP__MDL_CW,MP__MDL_SQRT__SW2
41
$ ,MP__MDL_SW,MP__MDL_G1,MP__MDL_GW,MP__MDL_V,MP__MDL_V__EXP__2
42
$ ,MP__MDL_LAM,MP__MDL_YB,MP__MDL_YT,MP__MDL_YTAU,MP__MDL_MUH
43
$ ,MP__MDL_AXIALZUP,MP__MDL_AXIALZDOWN,MP__MDL_VECTORZUP
44
$ ,MP__MDL_VECTORZDOWN,MP__MDL_VECTORAUP,MP__MDL_VECTORADOWN
45
$ ,MP__MDL_VECTORWMDXU,MP__MDL_AXIALWMDXU,MP__MDL_VECTORWPUXD
46
$ ,MP__MDL_AXIALWPUXD,MP__MDL_GW__EXP__2,MP__MDL_CW__EXP__2
47
$ ,MP__MDL_EE__EXP__2,MP__MDL_SW__EXP__2,MP__MDL_YB__EXP__2
48
$ ,MP__MDL_YT__EXP__2,MP__AEWM1,MP__MDL_GF,MP__AS,MP__MDL_YMB
49
$ ,MP__MDL_YMT,MP__MDL_YMTAU
36
$IN_,MP__MDL_BWCFT_UV_FIN_,MP__MDL_TWCFT_UV_FIN_
37
$ ,MP__MDL_CONJG__CKM3X3,MP__MDL_CKM22,MP__MDL_LHV,MP__MDL_CKM3X3
38
$ ,MP__MDL_CONJG__CKM22,MP__MDL_CONJG__CKM33,MP__MDL_NCOL
39
$ ,MP__MDL_CA,MP__MDL_TF,MP__MDL_CF,MP__MDL_MZ__EXP__2
40
$ ,MP__MDL_MZ__EXP__4,MP__MDL_SQRT__2,MP__MDL_MH__EXP__2
41
$ ,MP__MDL_NCOL__EXP__2,MP__MDL_MB__EXP__2,MP__MDL_MT__EXP__2
42
$ ,MP__MDL_AEW,MP__MDL_SQRT__AEW,MP__MDL_EE,MP__MDL_MW__EXP__2
43
$ ,MP__MDL_SW2,MP__MDL_CW,MP__MDL_SQRT__SW2,MP__MDL_SW,MP__MDL_G1
44
$ ,MP__MDL_GW,MP__MDL_V,MP__MDL_V__EXP__2,MP__MDL_LAM,MP__MDL_YB
45
$ ,MP__MDL_YT,MP__MDL_YTAU,MP__MDL_MUH,MP__MDL_AXIALZUP
46
$ ,MP__MDL_AXIALZDOWN,MP__MDL_VECTORZUP,MP__MDL_VECTORZDOWN
47
$ ,MP__MDL_VECTORAUP,MP__MDL_VECTORADOWN,MP__MDL_VECTORWMDXU
48
$ ,MP__MDL_AXIALWMDXU,MP__MDL_VECTORWPUXD,MP__MDL_AXIALWPUXD
49
$ ,MP__MDL_GW__EXP__2,MP__MDL_CW__EXP__2,MP__MDL_EE__EXP__2
50
$ ,MP__MDL_SW__EXP__2,MP__MDL_YB__EXP__2,MP__MDL_YT__EXP__2
51
$ ,MP__AEWM1,MP__MDL_GF,MP__AS,MP__MDL_YMB,MP__MDL_YMT
52
55
COMPLEX*32 MP__MDL_BMASS_UV_1EPS_,MP__MDL_TMASS_UV_1EPS_