101
101
CALL OXXXXX(P(0,4),MDL_MT,NHEL(4),+1*IC(4),W(1,4))
102
102
CALL IXXXXX(P(0,5),MDL_MB,NHEL(5),-1*IC(5),W(1,5))
103
103
CALL VVV1P0_1(W(1,1),W(1,2),GC_4,ZERO,ZERO,W(1,6))
104
CALL FFV2_1(W(1,4),W(1,3),GC_47,MDL_MB,ZERO,W(1,7))
104
CALL FFV2_1(W(1,4),W(1,3),GC_11,MDL_MB,ZERO,W(1,7))
105
105
C Amplitude(s) for born diagram with ID 1
106
106
CALL FFV1_0(W(1,5),W(1,7),W(1,6),GC_5,AMP(1))
107
CALL FFV2_2(W(1,5),W(1,3),GC_47,MDL_MT,MDL_WT,W(1,8))
107
CALL FFV2_2(W(1,5),W(1,3),GC_11,MDL_MT,MDL_WT,W(1,8))
108
108
C Amplitude(s) for born diagram with ID 2
109
109
CALL FFV1_0(W(1,8),W(1,4),W(1,6),GC_5,AMP(2))
110
110
CALL FFV1_1(W(1,4),W(1,1),GC_5,MDL_MT,MDL_WT,W(1,9))
111
111
CALL FFV1_2(W(1,5),W(1,2),GC_5,MDL_MB,ZERO,W(1,10))
112
112
C Amplitude(s) for born diagram with ID 3
113
CALL FFV2_0(W(1,10),W(1,9),W(1,3),GC_47,AMP(3))
113
CALL FFV2_0(W(1,10),W(1,9),W(1,3),GC_11,AMP(3))
114
114
C Amplitude(s) for born diagram with ID 4
115
115
CALL FFV1_0(W(1,8),W(1,9),W(1,2),GC_5,AMP(4))
116
116
CALL FFV1_2(W(1,5),W(1,1),GC_5,MDL_MB,ZERO,W(1,11))
117
117
CALL FFV1_1(W(1,4),W(1,2),GC_5,MDL_MT,MDL_WT,W(1,12))
118
118
C Amplitude(s) for born diagram with ID 5
119
CALL FFV2_0(W(1,11),W(1,12),W(1,3),GC_47,AMP(5))
119
CALL FFV2_0(W(1,11),W(1,12),W(1,3),GC_11,AMP(5))
120
120
C Amplitude(s) for born diagram with ID 6
121
121
CALL FFV1_0(W(1,11),W(1,7),W(1,2),GC_5,AMP(6))
122
122
C Amplitude(s) for born diagram with ID 7
171
171
C Counter-term amplitude(s) for loop diagram number 16
172
172
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,13),R2_GGQ,R2_GGB,AMPL(1,38))
173
173
C Counter-term amplitude(s) for loop diagram number 17
174
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQQ_1EPS,AMPL(2,39))
175
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQQ_1EPS,AMPL(2,40))
176
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQQ_1EPS,AMPL(2,41))
177
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQQ_1EPS,AMPL(2,42))
174
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB_1EPS,AMPL(2,39))
175
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB_1EPS,AMPL(2,40))
176
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB_1EPS,AMPL(2,41))
177
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB_1EPS,AMPL(2,42))
178
178
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB,AMPL(1,43))
179
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQQ_1EPS,AMPL(2,44))
179
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB_1EPS,AMPL(2,44))
180
180
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQT,AMPL(1,45))
181
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQQ_1EPS,AMPL(2,46))
181
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQB_1EPS,AMPL(2,46))
182
182
CALL FFV1_0(W(1,5),W(1,7),W(1,6),UV_GQQG_1EPS,AMPL(2,47))
183
183
CALL FFV1_0(W(1,5),W(1,7),W(1,6),R2_GQQ,AMPL(1,48))
184
184
C Counter-term amplitude(s) for loop diagram number 19
185
185
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_GGQ,R2_GGB,AMPL(1,49))
186
186
C Counter-term amplitude(s) for loop diagram number 20
187
CALL FFV2_0(W(1,15),W(1,4),W(1,3),R2_SXCW,AMPL(1,50))
187
CALL FFV2_0(W(1,15),W(1,4),W(1,3),R2_BXTW,AMPL(1,50))
188
188
CALL FFV1_1(W(1,4),W(1,6),GC_5,MDL_MT,MDL_WT,W(1,16))
189
189
C Counter-term amplitude(s) for loop diagram number 23
190
CALL FFV2_0(W(1,5),W(1,16),W(1,3),R2_SXCW,AMPL(1,51))
191
CALL FFV2_1(W(1,9),W(1,3),GC_47,MDL_MB,ZERO,W(1,17))
190
CALL FFV2_0(W(1,5),W(1,16),W(1,3),R2_BXTW,AMPL(1,51))
191
CALL FFV2_1(W(1,9),W(1,3),GC_11,MDL_MB,ZERO,W(1,17))
192
192
C Counter-term amplitude(s) for loop diagram number 25
193
193
CALL R2_QQ_1_R2_QQ_2_0(W(1,10),W(1,17),R2_QQQ,R2_QQB,AMPL(1,52))
194
194
CALL R2_QQ_2_0(W(1,10),W(1,17),UV_BMASS,AMPL(1,53))
195
195
CALL R2_QQ_2_0(W(1,10),W(1,17),UV_BMASS_1EPS,AMPL(2,54))
196
196
C Counter-term amplitude(s) for loop diagram number 26
197
CALL FFV2_0(W(1,10),W(1,9),W(1,3),R2_SXCW,AMPL(1,55))
197
CALL FFV2_0(W(1,10),W(1,9),W(1,3),R2_BXTW,AMPL(1,55))
198
198
C Counter-term amplitude(s) for loop diagram number 27
199
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQQ_1EPS,AMPL(2,56))
200
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQQ_1EPS,AMPL(2,57))
201
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQQ_1EPS,AMPL(2,58))
202
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQQ_1EPS,AMPL(2,59))
199
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB_1EPS,AMPL(2,56))
200
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB_1EPS,AMPL(2,57))
201
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB_1EPS,AMPL(2,58))
202
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB_1EPS,AMPL(2,59))
203
203
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB,AMPL(1,60))
204
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQQ_1EPS,AMPL(2,61))
204
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB_1EPS,AMPL(2,61))
205
205
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQT,AMPL(1,62))
206
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQQ_1EPS,AMPL(2,63))
206
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQB_1EPS,AMPL(2,63))
207
207
CALL FFV1_0(W(1,5),W(1,17),W(1,2),UV_GQQG_1EPS,AMPL(2,64))
208
208
CALL FFV1_0(W(1,5),W(1,17),W(1,2),R2_GQQ,AMPL(1,65))
209
209
CALL FFV1_1(W(1,9),W(1,2),GC_5,MDL_MT,MDL_WT,W(1,18))
210
210
C Counter-term amplitude(s) for loop diagram number 29
211
CALL FFV2_0(W(1,5),W(1,18),W(1,3),R2_SXCW,AMPL(1,66))
212
CALL FFV2_1(W(1,12),W(1,3),GC_47,MDL_MB,ZERO,W(1,19))
211
CALL FFV2_0(W(1,5),W(1,18),W(1,3),R2_BXTW,AMPL(1,66))
212
CALL FFV2_1(W(1,12),W(1,3),GC_11,MDL_MB,ZERO,W(1,19))
213
213
C Counter-term amplitude(s) for loop diagram number 33
214
214
CALL R2_QQ_1_R2_QQ_2_0(W(1,11),W(1,19),R2_QQQ,R2_QQB,AMPL(1,67))
215
215
CALL R2_QQ_2_0(W(1,11),W(1,19),UV_BMASS,AMPL(1,68))
216
216
CALL R2_QQ_2_0(W(1,11),W(1,19),UV_BMASS_1EPS,AMPL(2,69))
217
217
C Counter-term amplitude(s) for loop diagram number 34
218
CALL FFV2_0(W(1,11),W(1,12),W(1,3),R2_SXCW,AMPL(1,70))
218
CALL FFV2_0(W(1,11),W(1,12),W(1,3),R2_BXTW,AMPL(1,70))
219
219
C Counter-term amplitude(s) for loop diagram number 35
220
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQQ_1EPS,AMPL(2,71))
221
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQQ_1EPS,AMPL(2,72))
222
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQQ_1EPS,AMPL(2,73))
223
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQQ_1EPS,AMPL(2,74))
220
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB_1EPS,AMPL(2,71))
221
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB_1EPS,AMPL(2,72))
222
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB_1EPS,AMPL(2,73))
223
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB_1EPS,AMPL(2,74))
224
224
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB,AMPL(1,75))
225
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQQ_1EPS,AMPL(2,76))
225
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB_1EPS,AMPL(2,76))
226
226
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQT,AMPL(1,77))
227
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQQ_1EPS,AMPL(2,78))
227
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQB_1EPS,AMPL(2,78))
228
228
CALL FFV1_0(W(1,11),W(1,7),W(1,2),UV_GQQG_1EPS,AMPL(2,79))
229
229
CALL FFV1_0(W(1,11),W(1,7),W(1,2),R2_GQQ,AMPL(1,80))
230
230
CALL FFV1_2(W(1,11),W(1,2),GC_5,MDL_MB,ZERO,W(1,20))
238
238
CALL R2_QQ_2_0(W(1,11),W(1,21),UV_BMASS,AMPL(1,85))
239
239
CALL R2_QQ_2_0(W(1,11),W(1,21),UV_BMASS_1EPS,AMPL(2,86))
240
240
C Counter-term amplitude(s) for loop diagram number 40
241
CALL FFV2_0(W(1,20),W(1,4),W(1,3),R2_SXCW,AMPL(1,87))
241
CALL FFV2_0(W(1,20),W(1,4),W(1,3),R2_BXTW,AMPL(1,87))
242
242
C Counter-term amplitude(s) for loop diagram number 43
243
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQQ_1EPS,AMPL(2,88))
244
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQQ_1EPS,AMPL(2,89))
245
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQQ_1EPS,AMPL(2,90))
246
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQQ_1EPS,AMPL(2,91))
243
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB_1EPS,AMPL(2,88))
244
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB_1EPS,AMPL(2,89))
245
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB_1EPS,AMPL(2,90))
246
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB_1EPS,AMPL(2,91))
247
247
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB,AMPL(1,92))
248
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQQ_1EPS,AMPL(2,93))
248
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB_1EPS,AMPL(2,93))
249
249
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQT,AMPL(1,94))
250
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQQ_1EPS,AMPL(2,95))
250
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQB_1EPS,AMPL(2,95))
251
251
CALL FFV1_0(W(1,5),W(1,19),W(1,1),UV_GQQG_1EPS,AMPL(2,96))
252
252
CALL FFV1_0(W(1,5),W(1,19),W(1,1),R2_GQQ,AMPL(1,97))
253
253
C Counter-term amplitude(s) for loop diagram number 45
254
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQQ_1EPS,AMPL(2,98))
255
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQQ_1EPS,AMPL(2,99))
256
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQQ_1EPS,AMPL(2,100))
257
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQQ_1EPS,AMPL(2,101))
254
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB_1EPS,AMPL(2,98))
255
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB_1EPS,AMPL(2,99))
256
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB_1EPS,AMPL(2,100))
257
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB_1EPS,AMPL(2,101))
258
258
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB,AMPL(1,102))
259
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQQ_1EPS,AMPL(2,103))
259
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB_1EPS,AMPL(2,103))
260
260
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQT,AMPL(1,104))
261
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQQ_1EPS,AMPL(2,105))
261
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQB_1EPS,AMPL(2,105))
262
262
CALL FFV1_0(W(1,10),W(1,7),W(1,1),UV_GQQG_1EPS,AMPL(2,106))
263
263
CALL FFV1_0(W(1,10),W(1,7),W(1,1),R2_GQQ,AMPL(1,107))
264
264
C Counter-term amplitude(s) for loop diagram number 48
266
266
C Counter-term amplitude(s) for loop diagram number 50
267
267
CALL VVV1_0(W(1,1),W(1,2),W(1,14),R2_3GQ,AMPL(1,109))
268
268
C Counter-term amplitude(s) for loop diagram number 53
269
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQQ_1EPS,AMPL(2,110))
270
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQQ_1EPS,AMPL(2,111))
271
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQQ_1EPS,AMPL(2,112))
272
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQQ_1EPS,AMPL(2,113))
269
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB_1EPS,AMPL(2,110))
270
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB_1EPS,AMPL(2,111))
271
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB_1EPS,AMPL(2,112))
272
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB_1EPS,AMPL(2,113))
273
273
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB,AMPL(1,114))
274
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQQ_1EPS,AMPL(2,115))
274
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB_1EPS,AMPL(2,115))
275
275
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQT,AMPL(1,116))
276
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQQ_1EPS,AMPL(2,117))
276
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQB_1EPS,AMPL(2,117))
277
277
CALL FFV1_0(W(1,5),W(1,21),W(1,1),UV_GQQG_1EPS,AMPL(2,118))
278
278
CALL FFV1_0(W(1,5),W(1,21),W(1,1),R2_GQQ,AMPL(1,119))
279
279
CALL FFV1_1(W(1,12),W(1,1),GC_5,MDL_MT,MDL_WT,W(1,22))
280
280
C Counter-term amplitude(s) for loop diagram number 59
281
CALL FFV2_0(W(1,5),W(1,22),W(1,3),R2_SXCW,AMPL(1,120))
281
CALL FFV2_0(W(1,5),W(1,22),W(1,3),R2_BXTW,AMPL(1,120))
282
282
CALL FFV1_2(W(1,10),W(1,1),GC_5,MDL_MB,ZERO,W(1,23))
283
283
C Counter-term amplitude(s) for loop diagram number 63
284
284
CALL R2_QQ_1_R2_QQ_2_0(W(1,23),W(1,7),R2_QQQ,R2_QQB,AMPL(1,121))
290
290
CALL R2_QQ_2_0(W(1,10),W(1,24),UV_BMASS,AMPL(1,125))
291
291
CALL R2_QQ_2_0(W(1,10),W(1,24),UV_BMASS_1EPS,AMPL(2,126))
292
292
C Counter-term amplitude(s) for loop diagram number 66
293
CALL FFV2_0(W(1,23),W(1,4),W(1,3),R2_SXCW,AMPL(1,127))
293
CALL FFV2_0(W(1,23),W(1,4),W(1,3),R2_BXTW,AMPL(1,127))
294
294
C Counter-term amplitude(s) for loop diagram number 69
295
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQQ_1EPS,AMPL(2,128))
296
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQQ_1EPS,AMPL(2,129))
297
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQQ_1EPS,AMPL(2,130))
298
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQQ_1EPS,AMPL(2,131))
295
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB_1EPS,AMPL(2,128))
296
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB_1EPS,AMPL(2,129))
297
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB_1EPS,AMPL(2,130))
298
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB_1EPS,AMPL(2,131))
299
299
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB,AMPL(1,132))
300
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQQ_1EPS,AMPL(2,133))
300
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB_1EPS,AMPL(2,133))
301
301
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQT,AMPL(1,134))
302
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQQ_1EPS,AMPL(2,135))
302
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQB_1EPS,AMPL(2,135))
303
303
CALL FFV1_0(W(1,5),W(1,24),W(1,2),UV_GQQG_1EPS,AMPL(2,136))
304
304
CALL FFV1_0(W(1,5),W(1,24),W(1,2),R2_GQQ,AMPL(1,137))
305
305
C Counter-term amplitude(s) for loop diagram number 85
311
311
C Counter-term amplitude(s) for loop diagram number 87
312
312
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_GGQ,R2_GGT,AMPL(1,142))
313
313
C Counter-term amplitude(s) for loop diagram number 88
314
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQQ_1EPS,AMPL(2,143))
315
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQQ_1EPS,AMPL(2,144))
316
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQQ_1EPS,AMPL(2,145))
317
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQQ_1EPS,AMPL(2,146))
314
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB_1EPS,AMPL(2,143))
315
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB_1EPS,AMPL(2,144))
316
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB_1EPS,AMPL(2,145))
317
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB_1EPS,AMPL(2,146))
318
318
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB,AMPL(1,147))
319
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQQ_1EPS,AMPL(2,148))
319
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB_1EPS,AMPL(2,148))
320
320
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQT,AMPL(1,149))
321
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQQ_1EPS,AMPL(2,150))
321
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQB_1EPS,AMPL(2,150))
322
322
CALL FFV1_0(W(1,8),W(1,4),W(1,6),UV_GQQG_1EPS,AMPL(2,151))
323
323
CALL FFV1_0(W(1,8),W(1,4),W(1,6),R2_GQQ,AMPL(1,152))
324
CALL FFV2_2(W(1,10),W(1,3),GC_47,MDL_MT,MDL_WT,W(1,25))
324
CALL FFV2_2(W(1,10),W(1,3),GC_11,MDL_MT,MDL_WT,W(1,25))
325
325
C Counter-term amplitude(s) for loop diagram number 90
326
326
CALL R2_QQ_1_R2_QQ_2_0(W(1,25),W(1,9),R2_QQQ,R2_QQT,AMPL(1,153))
327
327
CALL R2_QQ_2_0(W(1,25),W(1,9),UV_TMASS,AMPL(1,154))
328
328
CALL R2_QQ_2_0(W(1,25),W(1,9),UV_TMASS_1EPS,AMPL(2,155))
329
329
C Counter-term amplitude(s) for loop diagram number 91
330
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQQ_1EPS,AMPL(2,156))
331
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQQ_1EPS,AMPL(2,157))
332
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQQ_1EPS,AMPL(2,158))
333
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQQ_1EPS,AMPL(2,159))
330
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB_1EPS,AMPL(2,156))
331
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB_1EPS,AMPL(2,157))
332
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB_1EPS,AMPL(2,158))
333
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB_1EPS,AMPL(2,159))
334
334
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB,AMPL(1,160))
335
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQQ_1EPS,AMPL(2,161))
335
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB_1EPS,AMPL(2,161))
336
336
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQT,AMPL(1,162))
337
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQQ_1EPS,AMPL(2,163))
337
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQB_1EPS,AMPL(2,163))
338
338
CALL FFV1_0(W(1,8),W(1,9),W(1,2),UV_GQQG_1EPS,AMPL(2,164))
339
339
CALL FFV1_0(W(1,8),W(1,9),W(1,2),R2_GQQ,AMPL(1,165))
340
340
C Counter-term amplitude(s) for loop diagram number 92
346
346
CALL R2_QQ_1_R2_QQ_2_0(W(1,26),W(1,9),R2_QQQ,R2_QQT,AMPL(1,169))
347
347
CALL R2_QQ_2_0(W(1,26),W(1,9),UV_TMASS,AMPL(1,170))
348
348
CALL R2_QQ_2_0(W(1,26),W(1,9),UV_TMASS_1EPS,AMPL(2,171))
349
CALL FFV2_2(W(1,11),W(1,3),GC_47,MDL_MT,MDL_WT,W(1,27))
349
CALL FFV2_2(W(1,11),W(1,3),GC_11,MDL_MT,MDL_WT,W(1,27))
350
350
C Counter-term amplitude(s) for loop diagram number 95
351
351
CALL R2_QQ_1_R2_QQ_2_0(W(1,27),W(1,12),R2_QQQ,R2_QQT,AMPL(1,172))
352
352
CALL R2_QQ_2_0(W(1,27),W(1,12),UV_TMASS,AMPL(1,173))
353
353
CALL R2_QQ_2_0(W(1,27),W(1,12),UV_TMASS_1EPS,AMPL(2,174))
354
354
C Counter-term amplitude(s) for loop diagram number 96
355
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,175))
356
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,176))
357
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,177))
358
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,178))
355
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,175))
356
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,176))
357
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,177))
358
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,178))
359
359
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB,AMPL(1,179))
360
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,180))
360
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,180))
361
361
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQT,AMPL(1,181))
362
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,182))
362
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,182))
363
363
CALL FFV1_0(W(1,27),W(1,4),W(1,2),UV_GQQG_1EPS,AMPL(2,183))
364
364
CALL FFV1_0(W(1,27),W(1,4),W(1,2),R2_GQQ,AMPL(1,184))
365
365
C Counter-term amplitude(s) for loop diagram number 98
366
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQQ_1EPS,AMPL(2,185))
367
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQQ_1EPS,AMPL(2,186))
368
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQQ_1EPS,AMPL(2,187))
369
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQQ_1EPS,AMPL(2,188))
366
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB_1EPS,AMPL(2,185))
367
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB_1EPS,AMPL(2,186))
368
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB_1EPS,AMPL(2,187))
369
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB_1EPS,AMPL(2,188))
370
370
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB,AMPL(1,189))
371
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQQ_1EPS,AMPL(2,190))
371
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB_1EPS,AMPL(2,190))
372
372
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQT,AMPL(1,191))
373
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQQ_1EPS,AMPL(2,192))
373
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQB_1EPS,AMPL(2,192))
374
374
CALL FFV1_0(W(1,8),W(1,12),W(1,1),UV_GQQG_1EPS,AMPL(2,193))
375
375
CALL FFV1_0(W(1,8),W(1,12),W(1,1),R2_GQQ,AMPL(1,194))
376
376
C Counter-term amplitude(s) for loop diagram number 99
377
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,195))
378
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,196))
379
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,197))
380
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,198))
377
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,195))
378
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,196))
379
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,197))
380
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,198))
381
381
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB,AMPL(1,199))
382
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,200))
382
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,200))
383
383
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQT,AMPL(1,201))
384
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,202))
384
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,202))
385
385
CALL FFV1_0(W(1,25),W(1,4),W(1,1),UV_GQQG_1EPS,AMPL(2,203))
386
386
CALL FFV1_0(W(1,25),W(1,4),W(1,1),R2_GQQ,AMPL(1,204))
387
387
C Counter-term amplitude(s) for loop diagram number 100
389
389
C Counter-term amplitude(s) for loop diagram number 101
390
390
CALL VVV1_0(W(1,1),W(1,2),W(1,14),R2_3GQ,AMPL(1,206))
391
391
C Counter-term amplitude(s) for loop diagram number 107
392
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,207))
393
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,208))
394
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,209))
395
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,210))
392
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,207))
393
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,208))
394
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,209))
395
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,210))
396
396
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB,AMPL(1,211))
397
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,212))
397
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,212))
398
398
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQT,AMPL(1,213))
399
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQQ_1EPS,AMPL(2,214))
399
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQB_1EPS,AMPL(2,214))
400
400
CALL FFV1_0(W(1,26),W(1,4),W(1,1),UV_GQQG_1EPS,AMPL(2,215))
401
401
CALL FFV1_0(W(1,26),W(1,4),W(1,1),R2_GQQ,AMPL(1,216))
402
402
C Counter-term amplitude(s) for loop diagram number 108
409
409
CALL R2_QQ_2_0(W(1,28),W(1,12),UV_TMASS,AMPL(1,221))
410
410
CALL R2_QQ_2_0(W(1,28),W(1,12),UV_TMASS_1EPS,AMPL(2,222))
411
411
C Counter-term amplitude(s) for loop diagram number 112
412
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,223))
413
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,224))
414
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,225))
415
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,226))
412
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,223))
413
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,224))
414
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,225))
415
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,226))
416
416
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB,AMPL(1,227))
417
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,228))
417
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,228))
418
418
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQT,AMPL(1,229))
419
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQQ_1EPS,AMPL(2,230))
419
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQB_1EPS,AMPL(2,230))
420
420
CALL FFV1_0(W(1,28),W(1,4),W(1,2),UV_GQQG_1EPS,AMPL(2,231))
421
421
CALL FFV1_0(W(1,28),W(1,4),W(1,2),R2_GQQ,AMPL(1,232))
422
422
C Counter-term amplitude(s) for loop diagram number 119