← Back to branch summary

~madteam/mg5amcnlo/series2.0

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/IOExportFKSTest/test_pptt_fksreal/%SubProcesses%P0_uux_ttx%matrix_1.f

  • Committer: olivier-mattelaer
  • Date: 2021-03-25 09:26:00 UTC
  • mfrom: (296.1.29 2.9.3)
  • Revision ID: olivier-mattelaer-20210325092600-d8xc2szfrnswae4k
pass to 2.9.3

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/input_files/IOTestsComparison/IOExportFKSTest/test_pptt_fksreal/%SubProcesses%P0_uux_ttx%matrix_1.f
199
199
      CALL FFV1_1(W(1,2),W(1,5),GC_11,ZERO,ZERO,W(1,8))
200
200
C     Amplitude(s) for diagram number 5
201
201
      CALL FFV1_0(W(1,1),W(1,8),W(1,7),GC_11,AMP(5))
202
 
      JAMP(1) = (1D0/6D0)*AMP(2)+(1D0/6D0)*AMP(3)
203
 
      JAMP(2) = (0.5*IMAG1)*AMP(1)+(-1D0/2D0)*AMP(2)+(-1D0/2D0)*AMP(4)
204
 
      JAMP(3) = (-0.5*IMAG1)*AMP(1)+(-1D0/2D0)*AMP(3)+(-1D0/2D0)*AMP(5)
205
 
      JAMP(4) = (1D0/6D0)*AMP(4)+(1D0/6D0)*AMP(5)
 
202
      JAMP(1) = (1.666666666666667D-01)*AMP(2)+(1.666666666666667D-01)
 
203
     $ *AMP(3)
 
204
      JAMP(2) = ((0.000000000000000D+00,5.000000000000000D-01))*AMP(1)
 
205
     $ +(-5.000000000000000D-01)*AMP(2)+(-5.000000000000000D-01)*AMP(4)
 
206
      JAMP(3) = ((0.000000000000000D+00,-5.000000000000000D-01))*AMP(1)
 
207
     $ +(-5.000000000000000D-01)*AMP(3)+(-5.000000000000000D-01)*AMP(5)
 
208
      JAMP(4) = (1.666666666666667D-01)*AMP(4)+(1.666666666666667D-01)
 
209
     $ *AMP(5)
206
210
      MATRIX_1 = 0.D0
207
211
      DO I = 1, NCOLOR
208
212
        ZTEMP = (0.D0,0.D0)