~maddevelopers/mg5amcnlo/new_clustering

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/short_ML_SMQCD_default/gg_ttx/%..%..%Source%MODEL%couplings3.f

• browse files at revision 356
• compare with another revision
• download diff
• download tarball
• view history from revision 356

Show diffs side-by-side

added

removed

tests/input_files/IOTestsComparison/short_ML_SMQCD_default/gg_ttx/%..%..%Source%MODEL%couplings3.f

12

12

      PARAMETER  (ZERO=0D0)

13

13

      INCLUDE 'input.inc'

14

14

      INCLUDE 'coupl.inc'

15

 

      UV_TMASS_1EPS = MDL_TMASS_UV_1EPS_

16

 

      UVWFCT_B_0_1EPS = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)

17

 

     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))

18

 

     $ *3.000000D+00*MDL_CF))

19

 

      UVWFCT_G_2_1EPS = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)

20

 

     $ ,DCMPLX(-((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))

21

 

     $ *4.000000D+00*MDL_TF))

 

15

      UVWFCT_T_0 = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00),DCMPLX(

 

16

     $ -((MDL_G__EXP__2)/(2.000000D+00*1.600000D+01*PI**2))*MDL_CF

 

17

     $ *(4.000000D+00-3.000000D+00*REGLOG(DCMPLX(MDL_MT__EXP__2

 

18

     $ /MDL_MU_R__EXP__2)))))

 

19

      UVWFCT_G_1 = COND(DCMPLX(MDL_MB),DCMPLX(0.000000D+00)

 

20

     $ ,DCMPLX(((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))

 

21

     $ *4.000000D+00*MDL_TF*REGLOG(DCMPLX(MDL_MB__EXP__2

 

22

     $ /MDL_MU_R__EXP__2))))

 

23

      UVWFCT_G_2 = COND(DCMPLX(MDL_MT),DCMPLX(0.000000D+00)

 

24

     $ ,DCMPLX(((MDL_G__EXP__2)/(2.000000D+00*4.800000D+01*PI**2))

 

25

     $ *4.000000D+00*MDL_TF*REGLOG(DCMPLX(MDL_MT__EXP__2

 

26

     $ /MDL_MU_R__EXP__2))))

22

27

      END

• Older »

Loggerhead is a web-based interface for Breezy
Version: 2.0.1