~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%couplings2.f

  • 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:
12
12
      PARAMETER  (ZERO=0D0)
13
13
      INCLUDE 'input.inc'
14
14
      INCLUDE 'coupl.inc'
 
15
      GC_5 = MDL_COMPLEXI*G
15
16
      R2_GGHB = 4.000000D+00*(-((MDL_COMPLEXI*MDL_YB)/MDL_SQRT__2))
16
17
     $ *(1.000000D+00/2.000000D+00)*(MDL_G__EXP__2/(8.000000D+00*PI**2)
17
18
     $ )*MDL_MB
24
25
      R2_GGHHT = 4.000000D+00*(-MDL_YT__EXP__2/2.000000D+00)
25
26
     $ *(1.000000D+00/2.000000D+00)*((MDL_COMPLEXI*MDL_G__EXP__2)
26
27
     $ /(8.000000D+00*PI**2))
27
 
      GC_5 = MDL_COMPLEXI*G
28
28
      END