← Back to branch summary

~maddevelopers/mg5amcnlo/simple_unlops

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/long_ML_SMQCD_optimized/dux_mumvmxg/helas_calls_uvct_1.f

  • Committer: olivier-mattelaer
  • Date: 2021-11-12 09:29:31 UTC
  • mfrom: (967.1.15 3.3.0)
  • Revision ID: olivier-mattelaer-20211112092931-4ec9qfzgxkeovqog
version 3.3.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/input_files/IOTestsComparison/long_ML_SMQCD_optimized/dux_mumvmxg/helas_calls_uvct_1.f
100
100
      AMPL(2,25)=AMPL(2,25)*(2.0D0*UVWFCT_G_1_1EPS)
101
101
C     Amplitude(s) for UVCT diagram with ID 15
102
102
      CALL FFV2_0(W(1,6),W(1,2),W(1,7),GC_11,AMPL(1,26))
103
 
      AMPL(1,26)=AMPL(1,26)*(1.0D0*UVWFCT_G_2+1.0D0*UVWFCT_G_1)
 
103
      AMPL(1,26)=AMPL(1,26)*(1.0D0*UVWFCT_G_1+1.0D0*UVWFCT_G_2)
104
104
C     Amplitude(s) for UVCT diagram with ID 16
105
105
      CALL FFV2_0(W(1,1),W(1,8),W(1,7),GC_11,AMPL(2,27))
106
106
      AMPL(2,27)=AMPL(2,27)*(2.0D0*UVWFCT_G_1_1EPS)
107
107
C     Amplitude(s) for UVCT diagram with ID 17
108
108
      CALL FFV2_0(W(1,1),W(1,8),W(1,7),GC_11,AMPL(1,28))
109
 
      AMPL(1,28)=AMPL(1,28)*(1.0D0*UVWFCT_G_2+1.0D0*UVWFCT_G_1)
 
109
      AMPL(1,28)=AMPL(1,28)*(1.0D0*UVWFCT_G_1+1.0D0*UVWFCT_G_2)
110
110
 
111
111
      GOTO 1001
112
112
 3000 CONTINUE