← Back to branch summary

~maddevelopers/mg5amcnlo/new_clustering

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/TestCmdMatchBox/MatchBoxOutput/%TEST%SubProcesses%P1_uux_uux%loop_CT_calls_1.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:
tests/input_files/IOTestsComparison/TestCmdMatchBox/MatchBoxOutput/%TEST%SubProcesses%P1_uux_uux%loop_CT_calls_1.f
95
95
        GOTO 1001
96
96
      ENDIF
97
97
 
98
 
C     CutTools call for loop numbers 1,19,21
 
98
C     CutTools call for loop numbers 1,15,17
99
99
      CALL MG5_1_LOOP_2(5,7,DCMPLX(ZERO),DCMPLX(ZERO),2,I_SO,1)
100
 
C     CutTools call for loop numbers 2,20,22
101
 
      CALL MG5_1_LOOP_2(6,8,DCMPLX(ZERO),DCMPLX(ZERO),2,I_SO,2)
102
 
C     CutTools call for loop numbers 3,4
 
100
C     CutTools call for loop numbers 2,3
103
101
      CALL MG5_1_LOOP_3(3,4,5,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO),2
104
 
     $ ,I_SO,3)
 
102
     $ ,I_SO,2)
 
103
C     CutTools call for loop numbers 4,16,18
 
104
      CALL MG5_1_LOOP_2(6,8,DCMPLX(ZERO),DCMPLX(ZERO),2,I_SO,3)
105
105
C     CutTools call for loop numbers 5,6
106
106
      CALL MG5_1_LOOP_3(2,4,6,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO),2
107
107
     $ ,I_SO,4)
108
108
C     CutTools call for loop numbers 7,8
109
109
      CALL MG5_1_LOOP_3(1,3,8,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO),2
110
110
     $ ,I_SO,5)
111
 
C     CutTools call for loop numbers 9,13
 
111
C     CutTools call for loop numbers 9,12
112
112
      CALL MG5_1_LOOP_4(1,2,4,3,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO)
113
113
     $ ,DCMPLX(ZERO),2,I_SO,6)
114
 
C     CutTools call for loop numbers 10
 
114
C     CutTools call for loop numbers 10,11
 
115
      CALL MG5_1_LOOP_3(1,2,7,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO),2
 
116
     $ ,I_SO,7)
 
117
C     CutTools call for loop numbers 13
115
118
      CALL MG5_1_LOOP_4(1,2,3,4,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO)
116
 
     $ ,DCMPLX(ZERO),2,I_SO,7)
117
 
C     CutTools call for loop numbers 11,12
118
 
      CALL MG5_1_LOOP_3(1,2,7,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO),2
119
 
     $ ,I_SO,8)
 
119
     $ ,DCMPLX(ZERO),2,I_SO,8)
120
120
C     CutTools call for loop numbers 14
121
121
      CALL MG5_1_LOOP_4(1,3,2,4,DCMPLX(ZERO),DCMPLX(ZERO),DCMPLX(ZERO)
122
122
     $ ,DCMPLX(ZERO),2,I_SO,9)
123
 
C     CutTools call for loop numbers 15
 
123
C     CutTools call for loop numbers 19
124
124
      CALL MG5_1_LOOP_2(5,7,DCMPLX(MDL_MB),DCMPLX(MDL_MB),2,I_SO,10)
125
 
C     CutTools call for loop numbers 16
 
125
C     CutTools call for loop numbers 20
126
126
      CALL MG5_1_LOOP_2(6,8,DCMPLX(MDL_MB),DCMPLX(MDL_MB),2,I_SO,11)
127
 
C     CutTools call for loop numbers 17
 
127
C     CutTools call for loop numbers 21
128
128
      CALL MG5_1_LOOP_2(5,7,DCMPLX(MDL_MT),DCMPLX(MDL_MT),2,I_SO,12)
129
 
C     CutTools call for loop numbers 18
 
129
C     CutTools call for loop numbers 22
130
130
      CALL MG5_1_LOOP_2(6,8,DCMPLX(MDL_MT),DCMPLX(MDL_MT),2,I_SO,13)
131
131
C     At this point, all reductions needed for (QCD=6), i.e. of split
132
132
C      order ID=1, are computed.