~maddevelopers/mg5amcnlo/new_clustering

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/short_ML_SMQCD_LoopInduced/gg_hh/%..%..%Source%MODEL%intparam_definition.inc

  • Committer: Rikkert Frederix
  • Date: 2021-09-09 15:51:40 UTC
  • mfrom: (78.75.502 3.2.1)
  • Revision ID: frederix@physik.uzh.ch-20210909155140-rg6umfq68h6h47cf
merge with 3.2.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
10
10
 
11
11
        MDL_CONJG__CKM3X3 = 1.000000D+00
12
12
 
 
13
        MDL_CONJG__CKM22 = 1.000000D+00
 
14
 
 
15
        MDL_LHV = 1.000000D+00
 
16
 
 
17
        MDL_CKM33 = 1.000000D+00
 
18
 
13
19
        MDL_CKM22 = 1.000000D+00
14
20
 
15
 
        MDL_LHV = 1.000000D+00
16
 
 
17
21
        MDL_CKM3X3 = 1.000000D+00
18
22
 
19
 
        MDL_CONJG__CKM22 = 1.000000D+00
20
 
 
21
 
        MDL_CONJG__CKM33 = 1.000000D+00
22
 
 
23
23
        MDL_NCOL = 3.000000D+00
24
24
 
25
25
        MDL_CA = 3.000000D+00
154
154
 
155
155
      MDL_G__EXP__2 = G**2
156
156
 
157
 
      MDL_GWCFT_UV_B_1EPS_ = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
158
 
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
159
 
     $ *4.000000D+00*MDL_TF))
160
 
 
161
 
      MDL_GWCFT_UV_T_1EPS_ = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)
162
 
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
163
 
     $ *4.000000D+00*MDL_TF))
164
 
 
165
 
      MDL_BWCFT_UV_1EPS_ = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
166
 
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))
167
 
     $ *3.000000D+00*MDL_CF))
168
 
 
169
 
      MDL_TWCFT_UV_1EPS_ = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)
170
 
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))
171
 
     $ *3.000000D+00*MDL_CF))
172
 
 
173
157
      MDL_G__EXP__3 = G**3
174
158
 
175
159
      MDL_MU_R__EXP__2 = MU_R**2
176
160
 
177
 
      MDL_GWCFT_UV_B_FIN_ = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
178
 
     $ ,DCMPLX(((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
179
 
     $ *4.000000D+00*MDL_TF*REGLOG(DCMPLX(MDL_MB__EXP__2
180
 
     $ /MDL_MU_R__EXP__2))))
181
 
 
182
 
      MDL_GWCFT_UV_T_FIN_ = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)
183
 
     $ ,DCMPLX(((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))
184
 
     $ *4.000000D+00*MDL_TF*REGLOG(DCMPLX(MDL_MT__EXP__2
185
 
     $ /MDL_MU_R__EXP__2))))
186
 
 
187
 
      MDL_BWCFT_UV_FIN_ = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)
188
 
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))
189
 
     $ *MDL_CF*(4.000000D+00-3.000000D+00*REGLOG(DCMPLX(MDL_MB__EXP__2
190
 
     $ /MDL_MU_R__EXP__2)))))
191
 
 
192
 
      MDL_TWCFT_UV_FIN_ = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)
193
 
     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))
194
 
     $ *MDL_CF*(4.000000D+00-3.000000D+00*REGLOG(DCMPLX(MDL_MT__EXP__2
195
 
     $ /MDL_MU_R__EXP__2)))))
196
 
 
 
161
C     
 
162
C     Parameters that should be updated for the loops.
 
163
C     
197
164
C     
198
165
C     Definition of the EW coupling used in the write out of aqed
199
166
C     
200
 
      GAL(1) = 3.5449077018110318D0 / DSQRT(AEWM1)
 
167
      GAL(1) = 3.5449077018110318D0 / DSQRT(ABS(AEWM1))
201
168
      GAL(2) = 1D0
202
169