~madteam/mg5amcnlo/series2.0
» Revision
251.1.45
: tests/input_files/IOTestsComparison/LoopSquaredOrder_IOTest/Loop_sqso_uux_ddx/loop_matrix_QCDQEDpert_QCDsq_gt_0_QEDAmpAndQEDsq_gt_2.f
« back to all changes in this revision
Viewing changes to tests/input_files/IOTestsComparison/LoopSquaredOrder_IOTest/Loop_sqso_uux_ddx/loop_matrix_QCDQEDpert_QCDsq_gt_0_QEDAmpAndQEDsq_gt_2.f
- browse files at revision 251.1.45
- compare with another revision
- download diff
- download tarball
- view history from revision 251.1.45
- Committer: olivier Mattelaer
- Date: 2015-03-05 00:14:16 UTC
- mfrom: (258.1.9 2.3)
- mto: (258.8.1 2.3)
- mto: This revision was merged to the branch mainline in revision 259.
- Revision ID: olivier.mattelaer@uclouvain.be-20150305001416-y9mzeykfzwnl9t0j
partial merge
- files added:
- Template/LO/SubProcesses/refine.sh
- madgraph/madevent
- tests/input_files/IOTestsComparison/IOExportPythia8Test
- tests/input_files/IOTestsComparison/IOExportPythia8Test/write_cpp_go_process_cc_file
- tests/input_files/IOTestsComparison/IOExportPythia8Test/write_dec_multiprocess_files
- tests/input_files/IOTestsComparison/IOExportV4IOTest
- tests/input_files/IOTestsComparison/IOExportV4IOTest/export_matrix_element_v4_madevent_group
- tests/input_files/IOTestsComparison/IOExportV4IOTest/export_matrix_element_v4_madevent_nogroup
- tests/input_files/IOTestsComparison/IOTest_Histogram
- tests/input_files/IOTestsComparison/IOTest_Histogram/gnuplot_histo_output
- tests/input_files/IOTestsComparison/MECmdShell
- tests/input_files/IOTestsComparison/MECmdShell/check_html_long_process_strings
- vendor/DiscreteSampler
- files removed:
- Template/NLO/SubProcesses/driver_reweight.f
- files renamed:
- Template/loop_material/StandAlone/SubProcesses/makefile.inc => Template/loop_material/StandAlone/SubProcesses/makefile
- madgraph/various/gen_crossxhtml.py => madgraph/madevent/gen_crossxhtml.py
- madgraph/various/sum_html.py => madgraph/madevent/sum_html.py
- files modified:
- MadSpin/decay.py
- tests/input_files/IOTestsComparison/IOExportFKSTest/test_pptt_fksreal/%SubProcesses%P0_gg_ttx%born.f
added
removed
tests/input_files/IOTestsComparison/LoopSquaredOrder_IOTest/Loop_sqso_uux_ddx/loop_matrix_QCDQEDpert_QCDsq_gt_0_QEDAmpAndQEDsq_gt_2.f
16
16
C
17
17
IMPLICIT NONE
18
18
C
19
C USER CUSTOMIZABLE OPTIONS
20
C
21
C This parameter is designed for the check timing command of MG5.
22
C It skips the loop reduction.
23
LOGICAL SKIPLOOPEVAL
24
PARAMETER (SKIPLOOPEVAL=.FALSE.)
25
C For timing checks. Stops the code after having only initialized
26
C its arrays from the external data files
27
LOGICAL BOOTANDSTOP
28
PARAMETER (BOOTANDSTOP=.FALSE.)
29
INTEGER TIR_CACHE_SIZE
30
C To change memory foot-print of MadLoop, you can change this
31
C parameter to be 0,1 or 2 *and recompile*.
32
C Notice that this will impact MadLoop speed performances in the
33
C context of stability checks.
34
INCLUDE 'tir_cache_size.inc'
35
C
19
36
C CONSTANTS
20
37
C
21
38
CHARACTER*512 PARAMFNAME,HELCONFIGFNAME,LOOPFILTERFNAME
32
49
INTEGER NBORNAMPS
33
50
PARAMETER (NBORNAMPS=7)
34
51
INTEGER NLOOPS, NLOOPGROUPS, NCTAMPS
35
PARAMETER (NLOOPS=776, NLOOPGROUPS=118, NCTAMPS=519)
52
PARAMETER (NLOOPS=773, NLOOPGROUPS=118, NCTAMPS=519)
53
INTEGER NLOOPAMPS
54
PARAMETER (NLOOPAMPS=1292)
36
55
INTEGER NCOLORROWS
37
PARAMETER (NCOLORROWS=1295)
56
PARAMETER (NCOLORROWS=NLOOPAMPS)
38
57
INTEGER NEXTERNAL
39
58
PARAMETER (NEXTERNAL=4)
40
59
INTEGER NWAVEFUNCS,NLOOPWAVEFUNCS
41
PARAMETER (NWAVEFUNCS=18,NLOOPWAVEFUNCS=1193)
60
PARAMETER (NWAVEFUNCS=18,NLOOPWAVEFUNCS=1188)
42
61
INTEGER MAXLWFSIZE
43
62
PARAMETER (MAXLWFSIZE=4)
44
63
INTEGER LOOPMAXCOEFS, VERTEXMAXCOEFS
68
87
C Only CutTools provides QP
69
88
INTEGER QP_NLOOPLIB
70
89
PARAMETER (QP_NLOOPLIB=1)
71
C This parameter is designed for the check timing command of MG5
72
LOGICAL SKIPLOOPEVAL
73
PARAMETER (SKIPLOOPEVAL=.FALSE.)
74
LOGICAL BOOTANDSTOP
75
PARAMETER (BOOTANDSTOP=.FALSE.)
76
90
INTEGER MAXSTABILITYLENGTH
77
91
DATA MAXSTABILITYLENGTH/20/
78
92
COMMON/ML5_0_STABILITY_TESTS/MAXSTABILITYLENGTH
93
79
94
C
80
95
C ARGUMENTS
81
96
C
103
118
C
104
119
C LOCAL VARIABLES
105
120
C
106
INTEGER I,J,K,H,DUMMY,I_QP_LIB
121
INTEGER I,J,K,H,HEL_MULT,I_QP_LIB,DUMMY
107
122
108
123
CHARACTER*512 PARAMFN,HELCONFIGFN,LOOPFILTERFN,COLORNUMFN
109
124
$ ,COLORDENOMFN,HELFILTERFN
134
149
LOGICAL EVAL_DONE(MAXSTABILITYLENGTH)
135
150
LOGICAL DOING_QP_EVALS
136
151
INTEGER STAB_INDEX,BASIC_CT_MODE
137
INTEGER N_DP_EVAL, N_QP_EVAL
138
DATA N_DP_EVAL/1/
139
DATA N_QP_EVAL/1/
152
153
140
154
REAL*8 ACC(0:NSQUAREDSO)
141
155
REAL*8 DP_RES(3,0:NSQUAREDSO,MAXSTABILITYLENGTH)
142
156
C QP_RES STORES THE QUADRUPLE PRECISION RESULT OBTAINED FROM
149
163
REAL*8 HELSAVED(3,NCOMB)
150
164
INTEGER ITEMP
151
165
LOGICAL LTEMP
152
REAL*8 BORNBUFF(0:NSQSO_BORN)
166
REAL*8 BORNBUFF(0:NSQSO_BORN),TMPR
153
167
REAL*8 BUFFR(3,0:NSQUAREDSO),BUFFR_BIS(3,0:NSQUAREDSO),TEMP(0:3
154
$ ,0:NSQUAREDSO),TEMP1(0:NSQUAREDSO),TEMP2
168
$ ,0:NSQUAREDSO),TEMP1(0:NSQUAREDSO)
169
REAL*8 TEMP2
155
170
COMPLEX*16 COEFS(MAXLWFSIZE,0:VERTEXMAXCOEFS-1,MAXLWFSIZE)
156
171
COMPLEX*16 CFTOT
157
172
LOGICAL FOUNDHELFILTER,FOUNDLOOPFILTER
161
176
DATA ((LOOPFILTERBUFF(J,I),J=1,NSQUAREDSO),I=1,NLOOPGROUPS)
162
177
$ /NSQSOXNLG*.FALSE./
163
178
179
LOGICAL AUTOMATIC_TIR_CACHE_CLEARING
180
DATA AUTOMATIC_TIR_CACHE_CLEARING/.TRUE./
181
COMMON/ML5_0_RUNTIME_OPTIONS/AUTOMATIC_TIR_CACHE_CLEARING
182
164
183
INTEGER IDEN
165
184
DATA IDEN/36/
166
185
INTEGER HELAVGFACTOR
179
198
C
180
199
C FUNCTIONS
181
200
C
201
INTEGER ML5_0_TIRCACHE_INDEX
182
202
INTEGER ML5_0_ML5SOINDEX_FOR_BORN_AMP
183
203
INTEGER ML5_0_ML5SOINDEX_FOR_LOOP_AMP
184
204
INTEGER ML5_0_ML5SQSOINDEX
192
212
INCLUDE 'mp_coupl.inc'
193
213
INCLUDE 'MadLoopParams.inc'
194
214
215
195
216
LOGICAL CHOSEN_SO_CONFIGS(NSQUAREDSO)
196
217
DATA CHOSEN_SO_CONFIGS/.FALSE.,.TRUE.,.FALSE./
197
218
COMMON/ML5_0_CHOSEN_LOOP_SQSO/CHOSEN_SO_CONFIGS
198
219
220
INTEGER N_DP_EVAL, N_QP_EVAL
221
DATA N_DP_EVAL/1/
222
DATA N_QP_EVAL/1/
223
COMMON/ML5_0_N_EVALS/N_DP_EVAL,N_QP_EVAL
224
199
225
LOGICAL CHECKPHASE
200
226
DATA CHECKPHASE/.TRUE./
201
227
LOGICAL HELDOUBLECHECKED
212
238
C A FLAG TO DENOTE WHETHER THE CORRESPONDING LOOPLIBS ARE
213
239
C AVAILABLE OR NOT
214
240
LOGICAL LOOPLIBS_AVAILABLE(4)
215
DATA LOOPLIBS_AVAILABLE /.TRUE.,.TRUE.,.TRUE.,.TRUE./
241
DATA LOOPLIBS_AVAILABLE/.TRUE.,.TRUE.,.TRUE.,.TRUE./
216
242
COMMON/ML5_0_LOOPLIBS_AV/ LOOPLIBS_AVAILABLE
217
243
C A FLAG TO DENOTE WHETHER THE CORRESPONDING DIRECTION TESTS
218
244
C AVAILABLE OR NOT IN THE LOOPLIBS
219
245
C PJFry++ and Golem95 do not support direction test
220
246
LOGICAL LOOPLIBS_DIRECTEST(4)
221
DATA LOOPLIBS_DIRECTEST /.TRUE.,.FALSE.,.TRUE.,.FALSE./
247
DATA LOOPLIBS_DIRECTEST /.TRUE.,.TRUE.,.TRUE.,.TRUE./
222
248
223
249
C PS CAN POSSIBILY BE PASSED THROUGH IMPROVE_PS BUT IS NOT
224
250
C MODIFIED FOR THE PURPOSE OF THE STABILITY TEST
315
341
COMPLEX*16 LOOPCOEFS(0:LOOPMAXCOEFS-1,NSQUAREDSO,NLOOPGROUPS)
316
342
COMMON/ML5_0_LCOEFS/LOOPCOEFS
317
343
344
345
LOGICAL TIR_DONE(NLOOPGROUPS)
346
COMMON/ML5_0_TIRCACHING/TIR_DONE
347
318
348
COMPLEX*16 AMPL(3,NCTAMPS)
319
349
COMMON/ML5_0_AMPL/AMPL
320
350
358
388
C ----------
359
389
360
390
IF(ML_INIT) THEN
391
ML_INIT = .FALSE.
361
392
CALL PRINT_MADLOOP_BANNER()
362
393
TMP = 'auto'
363
394
CALL SETMADLOOPPATH(TMP)
364
395
CALL JOINPATH(MLPATH,PARAMFNAME,PARAMFN)
365
396
CALL MADLOOPPARAMREADER(PARAMFN,.TRUE.)
366
ML_INIT = .FALSE.
397
398
C Make sure that NROTATIONS_QP and NROTATIONS_DP are set to zero
399
C if AUTOMATIC_TIR_CACHE_CLEARING is disabled.
400
IF(.NOT.AUTOMATIC_TIR_CACHE_CLEARING) THEN
401
IF(NROTATIONS_DP.NE.0.OR.NROTATIONS_QP.NE.0) THEN
402
WRITE(*,*) 'INFO: AUTOMATIC_TIR_CACHE_CLEARING is disable'
403
$ //'d, so MadLoop automatically resets NROTATIONS_DP an'
404
$ //'d NROTATIONS_QP to 0.'
405
NROTATIONS_QP=0
406
NROTATIONS_DP=0
407
ENDIF
408
ENDIF
409
ENDIF
410
411
QP_TOOLS_AVAILABLE=.FALSE.
412
INDEX_QP_TOOLS(1:QP_NLOOPLIB+1)=0
413
C SKIP THE ONES THAT NOT AVAILABLE
414
J=1
415
DO I=1,NLOOPLIB
416
IF(MLREDUCTIONLIB(J).EQ.0)EXIT
417
IF(.NOT.LOOPLIBS_AVAILABLE(MLREDUCTIONLIB(J)))THEN
418
MLREDUCTIONLIB(J:NLOOPLIB-1)=MLREDUCTIONLIB(J+1:NLOOPLIB)
419
MLREDUCTIONLIB(NLOOPLIB)=0
420
ELSE
421
J=J+1
422
ENDIF
423
ENDDO
424
IF(MLREDUCTIONLIB(1).EQ.0)THEN
425
STOP 'No available loop reduction lib is provided. Make sur'
426
$ //'e MLReductionLib is correct.'
427
ENDIF
428
J=0
429
DO I=1,NLOOPLIB
430
IF(MLREDUCTIONLIB(I).EQ.1)THEN
431
J=J+1
432
IF(.NOT.QP_TOOLS_AVAILABLE)QP_TOOLS_AVAILABLE=.TRUE.
433
INDEX_QP_TOOLS(J)=I
434
ENDIF
435
ENDDO
436
437
C Setup the file paths
438
CALL JOINPATH(MLPATH,PARAMFNAME,PARAMFN)
439
CALL JOINPATH(MLPATH,PROC_PREFIX,TMP)
440
CALL JOINPATH(TMP,HELCONFIGFNAME,HELCONFIGFN)
441
CALL JOINPATH(TMP,LOOPFILTERFNAME,LOOPFILTERFN)
442
CALL JOINPATH(TMP,COLORNUMFNAME,COLORNUMFN)
443
CALL JOINPATH(TMP,COLORDENOMFNAME,COLORDENOMFN)
444
CALL JOINPATH(TMP,HELFILTERFNAME,HELFILTERFN)
445
446
CALL ML5_0_SET_N_EVALS(N_DP_EVAL,N_QP_EVAL)
447
448
OPEN(1, FILE=COLORNUMFN, ERR=104, STATUS='OLD',
449
$ ACTION='READ')
450
DO I=1,NCOLORROWS
451
READ(1,*,END=105) (CF_N(I,J),J=1,NBORNAMPS)
452
ENDDO
453
GOTO 105
454
104 CONTINUE
455
STOP 'Color factors could not be initialized from file ML5_0_Col'
456
$ //'orNumFactors.dat. File not found'
457
105 CONTINUE
458
CLOSE(1)
459
OPEN(1, FILE=COLORDENOMFN, ERR=106, STATUS='OLD',
460
$ ACTION='READ')
461
DO I=1,NCOLORROWS
462
READ(1,*,END=107) (CF_D(I,J),J=1,NBORNAMPS)
463
ENDDO
464
GOTO 107
465
106 CONTINUE
466
STOP 'Color factors could not be initialized from file ML5_0_Col'
467
$ //'orDenomFactors.dat. File not found'
468
107 CONTINUE
469
CLOSE(1)
470
OPEN(1, FILE=HELCONFIGFN, ERR=108, STATUS='OLD',
471
$ ACTION='READ')
472
DO H=1,NCOMB
473
READ(1,*,END=109) (HELC(I,H),I=1,NEXTERNAL)
474
ENDDO
475
GOTO 109
476
108 CONTINUE
477
STOP 'Color helictiy configurations could not be initialize'
478
$ //'d from file ML5_0_HelConfigs.dat. File not found'
479
109 CONTINUE
480
CLOSE(1)
481
482
C SETUP OF THE COMMON STARTING EXTERNAL LOOP WAVEFUNCTION
483
C IT IS ALSO PS POINT INDEPENDENT, SO IT CAN BE DONE HERE.
484
DO I=0,3
485
PL(I,0)=(0.0D0,0.0D0)
486
ENDDO
487
DO I=1,MAXLWFSIZE
488
DO J=0,LOOPMAXCOEFS-1
489
DO K=1,MAXLWFSIZE
490
IF(I.EQ.K.AND.J.EQ.0) THEN
491
WL(I,J,K,0)=(1.0D0,0.0D0)
492
ELSE
493
WL(I,J,K,0)=(0.0D0,0.0D0)
494
ENDIF
495
ENDDO
496
ENDDO
497
ENDDO
498
IF(BOOTANDSTOP) THEN
499
WRITE(*,*) 'Stopped by user request.'
500
STOP
367
501
ENDIF
368
502
369
503
IF(NTRY.EQ.0) THEN
370
C CALL MADLOOPPARAMREADER(paramFileName,.TRUE.)
371
QP_TOOLS_AVAILABLE=.FALSE.
372
INDEX_QP_TOOLS(1:QP_NLOOPLIB+1)=0
373
C SKIP THE ONES THAT NOT AVAILABLE
374
J=1
375
DO I=1,NLOOPLIB
376
IF(MLREDUCTIONLIB(J).EQ.0)EXIT
377
IF(.NOT.LOOPLIBS_AVAILABLE(MLREDUCTIONLIB(J)))THEN
378
MLREDUCTIONLIB(J:NLOOPLIB-1)=MLREDUCTIONLIB(J+1:NLOOPLIB)
379
MLREDUCTIONLIB(NLOOPLIB)=0
380
ELSE
381
J=J+1
382
ENDIF
383
ENDDO
384
IF(MLREDUCTIONLIB(1).EQ.0)THEN
385
STOP 'No available loop reduction lib is provided. Make sur'
386
$ //'e MLReductionLib is correct.'
387
ENDIF
388
J=0
389
DO I=1,NLOOPLIB
390
IF(MLREDUCTIONLIB(I).EQ.1)THEN
391
J=J+1
392
IF(.NOT.QP_TOOLS_AVAILABLE)QP_TOOLS_AVAILABLE=.TRUE.
393
INDEX_QP_TOOLS(J)=I
394
ENDIF
395
ENDDO
396
397
C Setup the file paths
398
CALL JOINPATH(MLPATH,PARAMFNAME,PARAMFN)
399
CALL JOINPATH(MLPATH,PROC_PREFIX,TMP)
400
CALL JOINPATH(TMP,HELCONFIGFNAME,HELCONFIGFN)
401
CALL JOINPATH(TMP,LOOPFILTERFNAME,LOOPFILTERFN)
402
CALL JOINPATH(TMP,COLORNUMFNAME,COLORNUMFN)
403
CALL JOINPATH(TMP,COLORDENOMFNAME,COLORDENOMFN)
404
CALL JOINPATH(TMP,HELFILTERFNAME,HELFILTERFN)
405
406
CALL ML5_0_SET_N_EVALS(N_DP_EVAL,N_QP_EVAL)
407
408
HELDOUBLECHECKED=.NOT.DOUBLECHECKHELICITYFILTER
504
HELDOUBLECHECKED=(.NOT.DOUBLECHECKHELICITYFILTER).OR.(HELICITYF
505
$ ILTERLEVEL.EQ.0)
409
506
OPEN(1, FILE=LOOPFILTERFN, ERR=100, STATUS='OLD',
410
507
$ ACTION='READ')
411
508
DO J=1,NLOOPGROUPS
422
519
101 CONTINUE
423
520
CLOSE(1)
424
521
522
IF (HELICITYFILTERLEVEL.EQ.0) THEN
523
FOUNDHELFILTER=.TRUE.
524
DO J=1,NCOMB
525
GOODHEL(J)=1
526
ENDDO
527
GOTO 122
528
ENDIF
425
529
OPEN(1, FILE=HELFILTERFN, ERR=102, STATUS='OLD',
426
530
$ ACTION='READ')
427
531
DO I=1,NCOMB
435
539
ENDDO
436
540
103 CONTINUE
437
541
CLOSE(1)
438
439
OPEN(1, FILE=COLORNUMFN, ERR=104, STATUS='OLD',
440
$ ACTION='READ')
441
DO I=1,NCOLORROWS
442
READ(1,*,END=105) (CF_N(I,J),J=1,NBORNAMPS)
443
ENDDO
444
GOTO 105
445
104 CONTINUE
446
STOP 'Color factors could not be initialized from fil'
447
$ //'e ML5_0_ColorNumFactors.dat. File not found'
448
105 CONTINUE
449
CLOSE(1)
450
OPEN(1, FILE=COLORDENOMFN, ERR=106, STATUS='OLD',
451
$ ACTION='READ')
452
DO I=1,NCOLORROWS
453
READ(1,*,END=107) (CF_D(I,J),J=1,NBORNAMPS)
454
ENDDO
455
GOTO 107
456
106 CONTINUE
457
STOP 'Color factors could not be initialized from fil'
458
$ //'e ML5_0_ColorDenomFactors.dat. File not found'
459
107 CONTINUE
460
CLOSE(1)
461
OPEN(1, FILE=HELCONFIGFN, ERR=108, STATUS='OLD',
462
$ ACTION='READ')
463
DO H=1,NCOMB
464
READ(1,*,END=109) (HELC(I,H),I=1,NEXTERNAL)
465
ENDDO
466
GOTO 109
467
108 CONTINUE
468
STOP 'Color helictiy configurations could not be initialize'
469
$ //'d from file ML5_0_HelConfigs.dat. File not found'
470
109 CONTINUE
471
CLOSE(1)
472
473
C SETUP OF THE COMMON STARTING EXTERNAL LOOP WAVEFUNCTION
474
C IT IS ALSO PS POINT INDEPENDENT, SO IT CAN BE DONE HERE.
475
DO I=0,3
476
PL(I,0)=(0.0D0,0.0D0)
477
ENDDO
478
DO I=1,MAXLWFSIZE
479
DO J=0,LOOPMAXCOEFS-1
480
DO K=1,MAXLWFSIZE
481
IF(I.EQ.K.AND.J.EQ.0) THEN
482
WL(I,J,K,0)=(1.0D0,0.0D0)
483
ELSE
484
WL(I,J,K,0)=(0.0D0,0.0D0)
485
ENDIF
486
ENDDO
542
IF (HELICITYFILTERLEVEL.EQ.1) THEN
543
C We must make sure to remove the matching-helicity optimisatio
544
C n, as requested by the user.
545
DO J=1,NCOMB
546
IF ((GOODHEL(J).GT.1).OR.(GOODHEL(J).LT.HELOFFSET)) THEN
547
GOODHEL(J)=1
548
ENDIF
487
549
ENDDO
488
ENDDO
489
IF(BOOTANDSTOP) THEN
490
WRITE(*,*) 'Stopped by user request.'
491
STOP
492
550
ENDIF
551
122 CONTINUE
493
552
ENDIF
494
553
495
496
554
C First compute the borns, it will store them in ANS(0,I)
497
555
C It is left untouched for the rest of MadLoop evaluation.
498
556
C Notice that the squared split order index I does NOT
512
570
ANS(0,I)=BORNBUFF(I)
513
571
ENDDO
514
572
515
516
573
C We set here the reference to the born summed over all split
517
574
C orders
518
575
REF=0.0D0
557
614
$ ).AND.USELOOPFILTER).OR.(.NOT.FOUNDHELFILTER))
558
615
559
616
IF (WRITEOUTFILTERS) THEN
560
IF ((.NOT. CHECKPHASE).AND.(.NOT.FOUNDHELFILTER)) THEN
561
617
IF ((HELICITYFILTERLEVEL.NE.0).AND.(.NOT. CHECKPHASE).AND.(.NOT
618
$ .FOUNDHELFILTER)) THEN
562
619
OPEN(1, FILE=HELFILTERFN, ERR=110, STATUS='NEW',ACTION='WRIT'
563
620
$ //'E')
564
621
DO I=1,NCOMB
627
684
ENDDO
628
685
ENDDO
629
686
687
IF (AUTOMATIC_TIR_CACHE_CLEARING) THEN
688
CALL ML5_0_CLEAR_TIR_CACHE()
689
ENDIF
690
630
691
IF (IMPROVEPSPOINT.GE.0) THEN
631
692
C Make the input PS more precise (exact onshell and energy-moment
632
693
C um conservation)
647
708
AMPL(K,I)=(0.0D0,0.0D0)
648
709
ENDDO
649
710
ENDDO
650
C USE THE FIRST LOOP REDUCTION LIBRARY AND THE FIRST QP LOOP
651
C REDUCTION LIBRARY
711
712
C Start by using the first available loop reduction library and qp
713
C library.
652
714
I_LIB=1
653
715
I_QP_LIB=1
716
717
GOTO 208
718
C MadLoop jumps to this label during stability checks when it
719
C recomputes a rotated PS point
654
720
200 CONTINUE
721
C For the computation of a rotated version of this PS point we
722
C must reset the TIR cache since this changes the definition of
723
C the loop denominators.
724
CALL ML5_0_CLEAR_TIR_CACHE()
725
208 CONTINUE
726
727
C MadLoop jumps to this label during initialization when it goes
728
C to the computation of the next helicity.
729
205 CONTINUE
655
730
656
731
IF (.NOT.MP_PS_SET.AND.(CTMODE.EQ.0.OR.CTMODE.GE.4)) THEN
657
732
CALL ML5_0_SET_MP_PS(P_USER)
676
751
DO I=1,NLOOPGROUPS
677
752
DO J=1,3
678
753
DO K=1,NSQUAREDSO
679
LOOPRES(J,K,I)=0.0D0
754
LOOPRES(J,K,I)=(0.0D0,0.0D0)
680
755
ENDDO
681
756
ENDDO
682
757
ENDDO
713
788
CT_REQ_SO_DONE=.FALSE.
714
789
LOOP_REQ_SO_DONE=.FALSE.
715
790
791
IF (.NOT.CHECKPHASE.AND.HELDOUBLECHECKED.AND.HELPICKED.EQ.
792
$ -1) THEN
793
HEL_MULT=GOODHEL(H)
794
ELSE
795
HEL_MULT=1
796
ENDIF
797
798
716
799
C Helas calls for the born amplitudes and counterterms
717
800
C associated to given loops
718
801
CALL IXXXXX(P(0,1),MDL_MU,NHEL(1),+1*IC(1),W(1,1))
880
963
CALL FFV2_6_0(W(1,1),W(1,2),W(1,18),R2_GUU2CPB_2EPS
881
964
$ ,R2_GUU2CMB_2EPS,AMPL(3,66))
882
965
C At this point, all CT amps needed for (QCD=4 QED=2), i.e. of
883
C split order ID=0, are computed.
966
C split order ID=1, are computed.
884
967
IF(FILTER_SO.AND.SQSO_TARGET.EQ.1) GOTO 2000
885
968
C Counter-term amplitude(s) for loop diagram number 64
886
969
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAU,R2_AAU3,AMPL(1
1630
1713
$ 1EPS,C_UVAG0MASS2EW_1EPS,AMPL(2,407))
1631
1714
CALL L_GPWMMASS4_L_GPWMMASS5_0(W(1,8),W(1,14),C_UVAG0MASS1EW_
1632
1715
$ 2EPS,C_UVAG0MASS2EW_2EPS,AMPL(3,408))
1633
C Counter-term amplitude(s) for loop diagram number 683
1716
C Counter-term amplitude(s) for loop diagram number 682
1634
1717
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV,AMPL(1,409))
1635
1718
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_1EPS,AMPL(2,410))
1636
1719
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_2EPS,AMPL(3,411))
1637
C Counter-term amplitude(s) for loop diagram number 684
1720
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV,AMPL(1,412))
1721
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_1EPS,AMPL(2,413))
1722
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_2EPS,AMPL(3,414))
1723
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV,AMPL(1,415))
1724
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_1EPS,AMPL(2,416))
1725
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_2EPS,AMPL(3,417))
1726
C Counter-term amplitude(s) for loop diagram number 683
1638
1727
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL,R2_WWE3,AMPL(1
1639
$ ,412))
1728
$ ,418))
1640
1729
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL_1EPS,R2_WWE3_1E
1641
$ PS,AMPL(2,413))
1730
$ PS,AMPL(2,419))
1642
1731
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL_2EPS,R2_WWE3_2E
1643
$ PS,AMPL(3,414))
1644
C Counter-term amplitude(s) for loop diagram number 687
1732
$ PS,AMPL(3,420))
1733
C Counter-term amplitude(s) for loop diagram number 686
1645
1734
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPE,R2_HHE2
1646
$ ,AMPL(1,415))
1735
$ ,AMPL(1,421))
1647
1736
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPE_1EPS
1648
$ ,R2_HHE2_1EPS,AMPL(2,416))
1737
$ ,R2_HHE2_1EPS,AMPL(2,422))
1649
1738
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPE_2EPS
1650
$ ,R2_HHE2_2EPS,AMPL(3,417))
1651
C Counter-term amplitude(s) for loop diagram number 688
1652
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV,AMPL(1,418))
1653
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_1EPS,AMPL(2,419))
1654
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_2EPS,AMPL(3,420))
1655
C Counter-term amplitude(s) for loop diagram number 689
1739
$ ,R2_HHE2_2EPS,AMPL(3,423))
1740
C Counter-term amplitude(s) for loop diagram number 687
1656
1741
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL,R2_WWM3,AMPL(1
1657
$ ,421))
1742
$ ,424))
1658
1743
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL_1EPS,R2_WWM3_1E
1659
$ PS,AMPL(2,422))
1744
$ PS,AMPL(2,425))
1660
1745
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL_2EPS,R2_WWM3_2E
1661
$ PS,AMPL(3,423))
1662
C Counter-term amplitude(s) for loop diagram number 692
1746
$ PS,AMPL(3,426))
1747
C Counter-term amplitude(s) for loop diagram number 690
1663
1748
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPM,R2_HHM2
1664
$ ,AMPL(1,424))
1749
$ ,AMPL(1,427))
1665
1750
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPM_1EPS
1666
$ ,R2_HHM2_1EPS,AMPL(2,425))
1751
$ ,R2_HHM2_1EPS,AMPL(2,428))
1667
1752
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPM_2EPS
1668
$ ,R2_HHM2_2EPS,AMPL(3,426))
1669
C Counter-term amplitude(s) for loop diagram number 693
1670
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV,AMPL(1,427))
1671
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_1EPS,AMPL(2,428))
1672
CALL R2_GG_1_0(W(1,7),W(1,15),R2_ZZV_2EPS,AMPL(3,429))
1673
C Counter-term amplitude(s) for loop diagram number 694
1753
$ ,R2_HHM2_2EPS,AMPL(3,429))
1754
C Counter-term amplitude(s) for loop diagram number 691
1674
1755
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL,R2_WWTAU3
1675
1756
$ ,AMPL(1,430))
1676
1757
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL_1EPS,R2_WWTAU3_
1677
1758
$ 1EPS,AMPL(2,431))
1678
1759
CALL R2_GG_1_R2_GG_3_0(W(1,10),W(1,12),R2_WWL_2EPS,R2_WWTAU3_
1679
1760
$ 2EPS,AMPL(3,432))
1680
C Counter-term amplitude(s) for loop diagram number 697
1761
C Counter-term amplitude(s) for loop diagram number 694
1681
1762
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPTAU,R2_HHTAU2
1682
1763
$ ,AMPL(1,433))
1683
1764
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPTAU_1EPS
1684
1765
$ ,R2_HHTAU2_1EPS,AMPL(2,434))
1685
1766
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPTAU_2EPS
1686
1767
$ ,R2_HHTAU2_2EPS,AMPL(3,435))
1687
C Counter-term amplitude(s) for loop diagram number 698
1768
C Counter-term amplitude(s) for loop diagram number 695
1688
1769
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL,R2_AAE3,AMPL(1
1689
1770
$ ,436))
1690
1771
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL_1EPS,R2_AAE3_1EP
1697
1778
$ PS,C_UVAMASS2EW_1EPS,AMPL(2,440))
1698
1779
CALL L_WMWPMASS1_L_WMWPMASS3_0(W(1,6),W(1,14),C_UVAMASS1EW_2E
1699
1780
$ PS,C_UVAMASS2EW_2EPS,AMPL(3,441))
1700
C Counter-term amplitude(s) for loop diagram number 699
1781
C Counter-term amplitude(s) for loop diagram number 696
1701
1782
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL,R2_AZE3,AMPL(1
1702
1783
$ ,442))
1703
1784
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL_1EPS,R2_AZE3_1EP
1704
1785
$ S,AMPL(2,443))
1705
1786
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL_2EPS,R2_AZE3_2EP
1706
1787
$ S,AMPL(3,444))
1707
C Counter-term amplitude(s) for loop diagram number 702
1788
C Counter-term amplitude(s) for loop diagram number 699
1708
1789
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL,R2_AZE3,AMPL(1
1709
1790
$ ,445))
1710
1791
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL_1EPS,R2_AZE3_1EP
1711
1792
$ S,AMPL(2,446))
1712
1793
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL_2EPS,R2_AZE3_2EP
1713
1794
$ S,AMPL(3,447))
1714
C Counter-term amplitude(s) for loop diagram number 703
1795
C Counter-term amplitude(s) for loop diagram number 700
1715
1796
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL,R2_ZZE3,AMPL(1
1716
1797
$ ,448))
1717
1798
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL_1EPS,R2_ZZE3_1EP
1718
1799
$ S,AMPL(2,449))
1719
1800
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL_2EPS,R2_ZZE3_2EP
1720
1801
$ S,AMPL(3,450))
1721
C Counter-term amplitude(s) for loop diagram number 708
1802
C Counter-term amplitude(s) for loop diagram number 705
1722
1803
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHE1,R2_HHE2,AMPL(1
1723
1804
$ ,451))
1724
1805
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHE1_1EPS,R2_HHE2_1E
1725
1806
$ PS,AMPL(2,452))
1726
1807
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHE1_2EPS,R2_HHE2_2E
1727
1808
$ PS,AMPL(3,453))
1728
C Counter-term amplitude(s) for loop diagram number 713
1809
C Counter-term amplitude(s) for loop diagram number 710
1729
1810
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHE1,R2_HHE2,AMPL(1
1730
1811
$ ,454))
1731
1812
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHE1_1EPS,R2_HHE2_1E
1732
1813
$ PS,AMPL(2,455))
1733
1814
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHE1_2EPS,R2_HHE2_2E
1734
1815
$ PS,AMPL(3,456))
1735
C Counter-term amplitude(s) for loop diagram number 714
1816
C Counter-term amplitude(s) for loop diagram number 711
1736
1817
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL,R2_AAM3,AMPL(1
1737
1818
$ ,457))
1738
1819
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL_1EPS,R2_AAM3_1EP
1739
1820
$ S,AMPL(2,458))
1740
1821
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL_2EPS,R2_AAM3_2EP
1741
1822
$ S,AMPL(3,459))
1742
C Counter-term amplitude(s) for loop diagram number 715
1823
C Counter-term amplitude(s) for loop diagram number 712
1743
1824
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL,R2_AZM3,AMPL(1
1744
1825
$ ,460))
1745
1826
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL_1EPS,R2_AZM3_1EP
1746
1827
$ S,AMPL(2,461))
1747
1828
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL_2EPS,R2_AZM3_2EP
1748
1829
$ S,AMPL(3,462))
1749
C Counter-term amplitude(s) for loop diagram number 718
1830
C Counter-term amplitude(s) for loop diagram number 715
1750
1831
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL,R2_AZM3,AMPL(1
1751
1832
$ ,463))
1752
1833
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL_1EPS,R2_AZM3_1EP
1753
1834
$ S,AMPL(2,464))
1754
1835
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL_2EPS,R2_AZM3_2EP
1755
1836
$ S,AMPL(3,465))
1756
C Counter-term amplitude(s) for loop diagram number 719
1837
C Counter-term amplitude(s) for loop diagram number 716
1757
1838
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL,R2_ZZM3,AMPL(1
1758
1839
$ ,466))
1759
1840
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL_1EPS,R2_ZZM3_1EP
1760
1841
$ S,AMPL(2,467))
1761
1842
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL_2EPS,R2_ZZM3_2EP
1762
1843
$ S,AMPL(3,468))
1763
C Counter-term amplitude(s) for loop diagram number 724
1844
C Counter-term amplitude(s) for loop diagram number 721
1764
1845
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHM1,R2_HHM2,AMPL(1
1765
1846
$ ,469))
1766
1847
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHM1_1EPS,R2_HHM2_1E
1767
1848
$ PS,AMPL(2,470))
1768
1849
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHM1_2EPS,R2_HHM2_2E
1769
1850
$ PS,AMPL(3,471))
1770
C Counter-term amplitude(s) for loop diagram number 729
1851
C Counter-term amplitude(s) for loop diagram number 726
1771
1852
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHM1,R2_HHM2,AMPL(1
1772
1853
$ ,472))
1773
1854
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHM1_1EPS,R2_HHM2_1E
1774
1855
$ PS,AMPL(2,473))
1775
1856
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHM1_2EPS,R2_HHM2_2E
1776
1857
$ PS,AMPL(3,474))
1777
C Counter-term amplitude(s) for loop diagram number 730
1858
C Counter-term amplitude(s) for loop diagram number 727
1778
1859
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL,R2_AATAU3
1779
1860
$ ,AMPL(1,475))
1780
1861
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL_1EPS,R2_AATAU3_1
1781
1862
$ EPS,AMPL(2,476))
1782
1863
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,14),R2_AAL_2EPS,R2_AATAU3_2
1783
1864
$ EPS,AMPL(3,477))
1784
C Counter-term amplitude(s) for loop diagram number 731
1865
C Counter-term amplitude(s) for loop diagram number 728
1785
1866
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL,R2_AZTAU3
1786
1867
$ ,AMPL(1,478))
1787
1868
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL_1EPS,R2_AZTAU3_1
1788
1869
$ EPS,AMPL(2,479))
1789
1870
CALL R2_GG_1_R2_GG_3_0(W(1,6),W(1,15),R2_AZL_2EPS,R2_AZTAU3_2
1790
1871
$ EPS,AMPL(3,480))
1791
C Counter-term amplitude(s) for loop diagram number 734
1872
C Counter-term amplitude(s) for loop diagram number 731
1792
1873
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL,R2_AZTAU3
1793
1874
$ ,AMPL(1,481))
1794
1875
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL_1EPS,R2_AZTAU3_1
1795
1876
$ EPS,AMPL(2,482))
1796
1877
CALL R2_GG_1_R2_GG_3_0(W(1,14),W(1,7),R2_AZL_2EPS,R2_AZTAU3_2
1797
1878
$ EPS,AMPL(3,483))
1798
C Counter-term amplitude(s) for loop diagram number 735
1879
C Counter-term amplitude(s) for loop diagram number 732
1799
1880
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL,R2_ZZTAU3
1800
1881
$ ,AMPL(1,484))
1801
1882
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL_1EPS,R2_ZZTAU3_1
1802
1883
$ EPS,AMPL(2,485))
1803
1884
CALL R2_GG_1_R2_GG_3_0(W(1,7),W(1,15),R2_ZZL_2EPS,R2_ZZTAU3_2
1804
1885
$ EPS,AMPL(3,486))
1805
C Counter-term amplitude(s) for loop diagram number 740
1886
C Counter-term amplitude(s) for loop diagram number 737
1806
1887
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHTAU1,R2_HHTAU2
1807
1888
$ ,AMPL(1,487))
1808
1889
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHTAU1_1EPS
1809
1890
$ ,R2_HHTAU2_1EPS,AMPL(2,488))
1810
1891
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_HHTAU1_2EPS
1811
1892
$ ,R2_HHTAU2_2EPS,AMPL(3,489))
1812
C Counter-term amplitude(s) for loop diagram number 745
1893
C Counter-term amplitude(s) for loop diagram number 742
1813
1894
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHTAU1,R2_HHTAU2
1814
1895
$ ,AMPL(1,490))
1815
1896
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHTAU1_1EPS
1816
1897
$ ,R2_HHTAU2_1EPS,AMPL(2,491))
1817
1898
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHTAU1_2EPS
1818
1899
$ ,R2_HHTAU2_2EPS,AMPL(3,492))
1819
C Counter-term amplitude(s) for loop diagram number 746
1900
C Counter-term amplitude(s) for loop diagram number 743
1820
1901
CALL R2_GG_1_R2_GG_2_R2_GG_3_0(W(1,7),W(1,15),R2_ZZBOSON1
1821
1902
$ ,R2_ZZBOSON2,R2_ZZBOSON3,AMPL(1,493))
1822
1903
CALL R2_GG_1_R2_GG_2_R2_GG_3_0(W(1,7),W(1,15),R2_ZZBOSON1_1EP
1831
1912
CALL L_WMWPMASS1_L_WMWPMASS2_L_WMWPMASS3_0(W(1,7),W(1,15)
1832
1913
$ ,C_UVZMASS1EW_2EPS,C_UVZMASS2EW_2EPS,C_UVZMASS3EW_2EPS
1833
1914
$ ,AMPL(3,498))
1834
C Counter-term amplitude(s) for loop diagram number 750
1915
C Counter-term amplitude(s) for loop diagram number 747
1835
1916
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_G0G0BOSON1
1836
1917
$ ,R2_G0G0BOSON2,AMPL(1,499))
1837
1918
CALL R2_SS_1_R2_SS_2_0(W(1,8),W(1,16),R2_G0G0BOSON1_1EPS
1844
1925
$ ,C_UVG0MASS2EW_1EPS,AMPL(2,503))
1845
1926
CALL L_HMASS6_L_HMASS7_0(W(1,8),W(1,16),C_UVG0MASS1EW_2EPS
1846
1927
$ ,C_UVG0MASS2EW_2EPS,AMPL(3,504))
1847
C Counter-term amplitude(s) for loop diagram number 752
1928
C Counter-term amplitude(s) for loop diagram number 749
1848
1929
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHBOSON1,R2_HHBOSON2
1849
1930
$ ,AMPL(1,505))
1850
1931
CALL R2_SS_1_R2_SS_2_0(W(1,9),W(1,17),R2_HHBOSON1_1EPS
1857
1938
$ ,C_UVHMASS2EW_1EPS,AMPL(2,509))
1858
1939
CALL L_HMASS6_L_HMASS7_0(W(1,9),W(1,17),C_UVHMASS1EW_2EPS
1859
1940
$ ,C_UVHMASS2EW_2EPS,AMPL(3,510))
1860
C Counter-term amplitude(s) for loop diagram number 754
1941
C Counter-term amplitude(s) for loop diagram number 751
1861
1942
CALL R2_GG_1_R2_GG_2_R2_GG_3_0(W(1,10),W(1,12),R2_WWBOSON1
1862
1943
$ ,R2_WWBOSON2,R2_WWBOSON3,AMPL(1,511))
1863
1944
CALL R2_GG_1_R2_GG_2_R2_GG_3_0(W(1,10),W(1,12),R2_WWBOSON1_1E
1864
1945
$ PS,R2_WWBOSON2_1EPS,R2_WWBOSON3_1EPS,AMPL(2,512))
1865
1946
CALL R2_GG_1_R2_GG_2_R2_GG_3_0(W(1,10),W(1,12),R2_WWBOSON1_2E
1866
1947
$ PS,R2_WWBOSON2_2EPS,R2_WWBOSON3_2EPS,AMPL(3,513))
1867
C Counter-term amplitude(s) for loop diagram number 758
1948
C Counter-term amplitude(s) for loop diagram number 755
1868
1949
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPBOSON1
1869
1950
$ ,R2_GMGPBOSON2,AMPL(1,514))
1870
1951
CALL R2_SS_1_R2_SS_2_0(W(1,11),W(1,13),R2_GMGPBOSON1_1EPS
1878
1959
CALL L_HMASS6_L_HMASS7_0(W(1,11),W(1,13),C_UVGMGPMASS1EW_2EPS
1879
1960
$ ,C_UVG0MASS2EW_2EPS,AMPL(3,519))
1880
1961
C At this point, all CT amps needed for (QCD=2 QED=4), i.e. of
1881
C split order ID=1, are computed.
1962
C split order ID=2, are computed.
1882
1963
IF(FILTER_SO.AND.SQSO_TARGET.EQ.2) GOTO 2000
1883
1964
C At this point, all CT amps needed for (QCD=0 QED=6), i.e. of
1884
C split order ID=2, are computed.
1965
C split order ID=3, are computed.
1885
1966
IF(FILTER_SO.AND.SQSO_TARGET.EQ.3) GOTO 2000
1886
1967
2000 CONTINUE
1887
1968
CT_REQ_SO_DONE=.TRUE.
1896
1977
3000 CONTINUE
1897
1978
UVCT_REQ_SO_DONE=.TRUE.
1898
1979
1899
IF (.NOT.CHECKPHASE.AND.HELDOUBLECHECKED.AND.HELPICKED.EQ.
1900
$ -1) THEN
1901
DUMMY=GOODHEL(H)
1902
ELSE
1903
DUMMY=1
1904
ENDIF
1905
1980
DO I=1,NCTAMPS
1906
1981
DO J=1,NBORNAMPS
1907
1982
CFTOT=DCMPLX(CF_N(I,J)/DBLE(ABS(CF_D(I,J))),0.0D0)
1910
1985
$ I),ML5_0_ML5SOINDEX_FOR_BORN_AMP(J))
1911
1986
IF (.NOT.FILTER_SO.OR.SQSO_TARGET.EQ.ITEMP) THEN
1912
1987
DO K=1,3
1913
TEMP2 = 2.0D0*DUMMY*DBLE(CFTOT*AMPL(K,I)*DCONJG(AMP(J
1914
$ )))
1988
TEMP2 = 2.0D0*HEL_MULT*DBLE(CFTOT*AMPL(K,I)
1989
$ *DCONJG(AMP(J)))
1915
1990
ANS(K,ITEMP)=ANS(K,ITEMP)+TEMP2
1916
1991
ANS(K,0)=ANS(K,0)+TEMP2
1917
1992
ENDDO
1926
2001
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1),4,COEFS,4,4,WL(1,0,1,2))
1927
2002
CALL FFV1L1_2(PL(0,2),W(1,6),GC_1,MDL_MD,ZERO,PL(0,3),COEFS)
1928
2003
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,2),4,COEFS,4,4,WL(1,0,1,3))
1929
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,3),2,4,1,1,520,H)
2004
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,3),2,4,1,1,1,520,H)
1930
2005
C Coefficient construction for loop diagram with ID 9
1931
2006
CALL FFV2_3L1_2(PL(0,2),W(1,7),GC_68,GC_76,MDL_MD,ZERO,PL(0
1932
2007
$ ,4),COEFS)
1933
2008
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,2),4,COEFS,4,4,WL(1,0,1,4))
1934
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,4),2,4,1,1,521,H)
2009
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,4),2,4,1,1,1,521,H)
1935
2010
C Coefficient construction for loop diagram with ID 10
1936
2011
CALL FFS2L1_2(PL(0,2),W(1,8),GC_104,MDL_MD,ZERO,PL(0,5)
1937
2012
$ ,COEFS)
1938
2013
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,2),4,COEFS,4,4,WL(1,0,1,5))
1939
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,5),2,4,1,1,522,H)
2014
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,5),2,4,1,1,1,522,H)
1940
2015
C Coefficient construction for loop diagram with ID 11
1941
2016
CALL FFS4L1_2(PL(0,2),W(1,9),GC_105,MDL_MD,ZERO,PL(0,6)
1942
2017
$ ,COEFS)
1943
2018
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,2),4,COEFS,4,4,WL(1,0,1,6))
1944
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,6),2,4,1,1,523,H)
2019
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,6),2,4,1,1,1,523,H)
1945
2020
C Coefficient construction for loop diagram with ID 12
1946
2021
CALL FFV1L1P0_3(PL(0,0),W(1,2),GC_11,ZERO,ZERO,PL(0,7),COEFS)
1947
2022
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1,7))
1950
2025
CALL FFV2L1_2(PL(0,8),W(1,10),GC_59,MDL_MU,ZERO,PL(0,9)
1951
2026
$ ,COEFS)
1952
2027
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,8),4,COEFS,4,4,WL(1,0,1,9))
1953
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,9),2,4,2,1,524,H)
2028
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,9),2,4,2,1,1,524,H)
1954
2029
C Coefficient construction for loop diagram with ID 13
1955
2030
CALL FFS1_3L1_2(PL(0,8),W(1,11),GC_31,GC_40,MDL_MU,ZERO,PL(0
1956
2031
$ ,10),COEFS)
1957
2032
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,8),4,COEFS,4,4,WL(1,0,1
1958
2033
$ ,10))
1959
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,10),2,4,2,1,525,H)
2034
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,10),2,4,2,1,1,525,H)
1960
2035
C Coefficient construction for loop diagram with ID 14
1961
2036
CALL FFV1L2P0_3(PL(0,0),W(1,1),GC_11,ZERO,ZERO,PL(0,11)
1962
2037
$ ,COEFS)
1970
2045
$ ,COEFS)
1971
2046
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,12),4,COEFS,4,4,WL(1,0,1
1972
2047
$ ,13))
1973
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,13),2,4,3,1,526,H)
2048
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,13),2,4,3,1,1,526,H)
1974
2049
C Coefficient construction for loop diagram with ID 15
1975
2050
CALL FFS1_3L2_1(PL(0,12),W(1,13),GC_13,GC_22,MDL_MU,ZERO
1976
2051
$ ,PL(0,14),COEFS)
1977
2052
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,12),4,COEFS,4,4,WL(1,0,1
1978
2053
$ ,14))
1979
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,14),2,4,3,1,527,H)
2054
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,14),2,4,3,1,1,527,H)
1980
2055
C Coefficient construction for loop diagram with ID 16
1981
2056
CALL FFV1L3_1(PL(0,11),W(1,2),GC_11,MDL_MU,ZERO,PL(0,15)
1982
2057
$ ,COEFS)
1990
2065
$ ,COEFS)
1991
2066
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,16),4,COEFS,4,4,WL(1,0,1
1992
2067
$ ,17))
1993
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,17),4,4,4,1,528,H)
2068
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,17),4,4,4,1,1,528,H)
1994
2069
C Coefficient construction for loop diagram with ID 17
1995
2070
CALL FFS1_3L2_3(PL(0,15),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
1996
2071
$ ,PL(0,18),COEFS)
2000
2075
$ ,19),COEFS)
2001
2076
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,18),4,COEFS,1,4,WL(1,0,1
2002
2077
$ ,19))
2003
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,19),2,4,4,1,529,H)
2078
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,19),2,4,4,1,1,529,H)
2004
2079
C Coefficient construction for loop diagram with ID 18
2005
2080
CALL FFV1L2_1(PL(0,15),W(1,14),GC_2,MDL_MU,ZERO,PL(0,20)
2006
2081
$ ,COEFS)
2007
2082
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,15),4,COEFS,4,4,WL(1,0,1
2008
2083
$ ,20))
2009
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,20),2,4,5,1,530,H)
2084
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,20),2,4,5,1,1,530,H)
2010
2085
C Coefficient construction for loop diagram with ID 19
2011
2086
CALL FFV2_5L2_1(PL(0,15),W(1,15),GC_69,GC_76,MDL_MU,ZERO
2012
2087
$ ,PL(0,21),COEFS)
2013
2088
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,15),4,COEFS,4,4,WL(1,0,1
2014
2089
$ ,21))
2015
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,21),2,4,5,1,531,H)
2090
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,21),2,4,5,1,1,531,H)
2016
2091
C Coefficient construction for loop diagram with ID 20
2017
2092
CALL FFS2L2_1(PL(0,15),W(1,16),GC_123,MDL_MU,ZERO,PL(0,22)
2018
2093
$ ,COEFS)
2019
2094
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,15),4,COEFS,4,4,WL(1,0,1
2020
2095
$ ,22))
2021
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,22),2,4,5,1,532,H)
2096
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,22),2,4,5,1,1,532,H)
2022
2097
C Coefficient construction for loop diagram with ID 21
2023
2098
CALL FFS4L2_1(PL(0,15),W(1,17),GC_122,MDL_MU,ZERO,PL(0,23)
2024
2099
$ ,COEFS)
2025
2100
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,15),4,COEFS,4,4,WL(1,0,1
2026
2101
$ ,23))
2027
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,23),2,4,5,1,533,H)
2102
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,23),2,4,5,1,1,533,H)
2028
2103
C Coefficient construction for loop diagram with ID 22
2029
2104
CALL FFV1L3_2(PL(0,0),W(1,1),GC_11,MDL_MU,ZERO,PL(0,24)
2030
2105
$ ,COEFS)
2042
2117
$ ,COEFS)
2043
2118
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,26),4,COEFS,4,4,WL(1,0,1
2044
2119
$ ,27))
2045
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,27),2,4,6,1,534,H)
2120
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,27),2,4,6,1,1,534,H)
2046
2121
C Coefficient construction for loop diagram with ID 23
2047
2122
CALL FFV2_5L1_3(PL(0,24),W(1,2),GC_69,GC_76,MDL_MZ,MDL_WZ
2048
2123
$ ,PL(0,28),COEFS)
2056
2131
$ ,COEFS)
2057
2132
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,29),4,COEFS,4,4,WL(1,0,1
2058
2133
$ ,30))
2059
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,30),4,4,7,1,535,H)
2134
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,30),4,4,7,1,1,535,H)
2060
2135
C Coefficient construction for loop diagram with ID 24
2061
2136
CALL FFS2L1_3(PL(0,24),W(1,2),GC_123,MDL_MZ,MDL_WZ,PL(0,31)
2062
2137
$ ,COEFS)
2070
2145
$ ,COEFS)
2071
2146
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,32),4,COEFS,4,4,WL(1,0,1
2072
2147
$ ,33))
2073
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,33),2,4,7,1,536,H)
2148
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,33),2,4,7,1,1,536,H)
2074
2149
C Coefficient construction for loop diagram with ID 25
2075
2150
CALL FFS4L1_3(PL(0,24),W(1,2),GC_122,MDL_MH,MDL_WH,PL(0,34)
2076
2151
$ ,COEFS)
2084
2159
$ ,COEFS)
2085
2160
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,35),4,COEFS,4,4,WL(1,0,1
2086
2161
$ ,36))
2087
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,36),2,4,8,1,537,H)
2162
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,36),2,4,8,1,1,537,H)
2088
2163
C Coefficient construction for loop diagram with ID 26
2089
2164
CALL FFV1L3_1(PL(0,25),W(1,3),GC_1,MDL_MD,ZERO,PL(0,37)
2090
2165
$ ,COEFS)
2094
2169
$ ,COEFS)
2095
2170
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,37),4,COEFS,4,4,WL(1,0,1
2096
2171
$ ,38))
2097
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,38),2,4,9,1,538,H)
2172
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,38),2,4,9,1,1,538,H)
2098
2173
C Coefficient construction for loop diagram with ID 27
2099
2174
CALL FFV2_3L3_1(PL(0,28),W(1,3),GC_68,GC_76,MDL_MD,ZERO,PL(0
2100
2175
$ ,39),COEFS)
2104
2179
$ ,COEFS)
2105
2180
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,39),4,COEFS,4,4,WL(1,0,1
2106
2181
$ ,40))
2107
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,40),4,4,10,1,539,H)
2182
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,40),4,4,10,1,1,539,H)
2108
2183
C Coefficient construction for loop diagram with ID 28
2109
2184
CALL FFS2L3_1(PL(0,31),W(1,3),GC_104,MDL_MD,ZERO,PL(0,41)
2110
2185
$ ,COEFS)
2114
2189
$ ,COEFS)
2115
2190
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,41),4,COEFS,4,4,WL(1,0,1
2116
2191
$ ,42))
2117
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,42),2,4,10,1,540,H)
2192
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,42),2,4,10,1,1,540,H)
2118
2193
C Coefficient construction for loop diagram with ID 29
2119
2194
CALL FFS4L3_1(PL(0,34),W(1,3),GC_105,MDL_MD,ZERO,PL(0,43)
2120
2195
$ ,COEFS)
2124
2199
$ ,COEFS)
2125
2200
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,43),4,COEFS,4,4,WL(1,0,1
2126
2201
$ ,44))
2127
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,44),2,4,11,1,541,H)
2202
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,44),2,4,11,1,1,541,H)
2128
2203
C Coefficient construction for loop diagram with ID 30
2129
2204
CALL FFV2L1_3(PL(0,24),W(1,3),GC_124,MDL_MW,MDL_WW,PL(0,45)
2130
2205
$ ,COEFS)
2138
2213
$ ,COEFS)
2139
2214
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,46),4,COEFS,4,4,WL(1,0,1
2140
2215
$ ,47))
2141
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,47),4,4,12,1,542,H)
2216
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,47),4,4,12,1,1,542,H)
2142
2217
C Coefficient construction for loop diagram with ID 31
2143
2218
CALL FFS1_3L1_3(PL(0,24),W(1,3),GC_13,GC_22,MDL_MW,MDL_WW
2144
2219
$ ,PL(0,48),COEFS)
2152
2227
$ ,COEFS)
2153
2228
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,49),4,COEFS,4,4,WL(1,0,1
2154
2229
$ ,50))
2155
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,50),2,4,12,1,543,H)
2230
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,50),2,4,12,1,1,543,H)
2156
2231
C Coefficient construction for loop diagram with ID 32
2157
2232
CALL FFV1L3_2(PL(0,0),W(1,1),GC_2,MDL_MU,ZERO,PL(0,51),COEFS)
2158
2233
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
2169
2244
$ ,COEFS)
2170
2245
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,53),4,COEFS,4,4,WL(1,0,1
2171
2246
$ ,54))
2172
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,54),2,4,9,1,544,H)
2247
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,54),2,4,9,1,1,544,H)
2173
2248
C Coefficient construction for loop diagram with ID 33
2174
2249
CALL FFV2_5L3_2(PL(0,0),W(1,1),GC_69,GC_76,MDL_MU,ZERO,PL(0
2175
2250
$ ,55),COEFS)
2187
2262
$ ,PL(0,58),COEFS)
2188
2263
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,57),4,COEFS,4,4,WL(1,0,1
2189
2264
$ ,58))
2190
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,58),4,4,13,1,545,H)
2265
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,58),4,4,13,1,1,545,H)
2191
2266
C Coefficient construction for loop diagram with ID 34
2192
2267
CALL FFS2L3_2(PL(0,0),W(1,1),GC_123,MDL_MU,ZERO,PL(0,59)
2193
2268
$ ,COEFS)
2205
2280
$ ,COEFS)
2206
2281
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,61),1,COEFS,4,1,WL(1,0,1
2207
2282
$ ,62))
2208
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,62),2,1,13,1,546,H)
2283
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,62),2,1,13,1,1,546,H)
2209
2284
C Coefficient construction for loop diagram with ID 35
2210
2285
CALL FFS4L3_2(PL(0,0),W(1,1),GC_122,MDL_MU,ZERO,PL(0,63)
2211
2286
$ ,COEFS)
2223
2298
$ ,COEFS)
2224
2299
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,65),1,COEFS,4,1,WL(1,0,1
2225
2300
$ ,66))
2226
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,66),2,1,14,1,547,H)
2301
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,66),2,1,14,1,1,547,H)
2227
2302
C Coefficient construction for loop diagram with ID 36
2228
2303
CALL FFV2L3_2(PL(0,0),W(1,1),GC_124,MDL_MD,ZERO,PL(0,67)
2229
2304
$ ,COEFS)
2241
2316
$ ,COEFS)
2242
2317
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,69),4,COEFS,4,4,WL(1,0,1
2243
2318
$ ,70))
2244
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,70),4,4,15,1,548,H)
2319
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,70),4,4,15,1,1,548,H)
2245
2320
C Coefficient construction for loop diagram with ID 37
2246
2321
CALL FFS1_3L3_2(PL(0,0),W(1,1),GC_13,GC_22,MDL_MD,ZERO,PL(0
2247
2322
$ ,71),COEFS)
2259
2334
$ ,PL(0,74),COEFS)
2260
2335
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,73),1,COEFS,4,1,WL(1,0,1
2261
2336
$ ,74))
2262
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,74),2,1,15,1,549,H)
2337
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,74),2,1,15,1,1,549,H)
2263
2338
C Coefficient construction for loop diagram with ID 38
2264
2339
CALL FFV1L3_2(PL(0,52),W(1,4),GC_11,MDL_MD,ZERO,PL(0,75)
2265
2340
$ ,COEFS)
2269
2344
$ ,COEFS)
2270
2345
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,75),4,COEFS,4,4,WL(1,0,1
2271
2346
$ ,76))
2272
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,76),2,4,6,1,550,H)
2347
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,76),2,4,6,1,1,550,H)
2273
2348
C Coefficient construction for loop diagram with ID 39
2274
2349
CALL FFV1L3_2(PL(0,56),W(1,4),GC_11,MDL_MD,ZERO,PL(0,77)
2275
2350
$ ,COEFS)
2279
2354
$ ,PL(0,78),COEFS)
2280
2355
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,77),4,COEFS,4,4,WL(1,0,1
2281
2356
$ ,78))
2282
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,78),4,4,16,1,551,H)
2357
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,78),4,4,16,1,1,551,H)
2283
2358
C Coefficient construction for loop diagram with ID 40
2284
2359
CALL FFV1L3_2(PL(0,60),W(1,4),GC_11,MDL_MD,ZERO,PL(0,79)
2285
2360
$ ,COEFS)
2289
2364
$ ,COEFS)
2290
2365
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,79),1,COEFS,4,1,WL(1,0,1
2291
2366
$ ,80))
2292
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,80),2,1,16,1,552,H)
2367
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,80),2,1,16,1,1,552,H)
2293
2368
C Coefficient construction for loop diagram with ID 41
2294
2369
CALL FFV1L3_2(PL(0,64),W(1,4),GC_11,MDL_MD,ZERO,PL(0,81)
2295
2370
$ ,COEFS)
2299
2374
$ ,COEFS)
2300
2375
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,81),1,COEFS,4,1,WL(1,0,1
2301
2376
$ ,82))
2302
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,82),2,1,17,1,553,H)
2377
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,82),2,1,17,1,1,553,H)
2303
2378
C Coefficient construction for loop diagram with ID 42
2304
2379
CALL FFV2L2_3(PL(0,0),W(1,1),GC_124,MDL_MW,MDL_WW,PL(0,83)
2305
2380
$ ,COEFS)
2317
2392
$ ,COEFS)
2318
2393
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,85),4,COEFS,4,4,WL(1,0,1
2319
2394
$ ,86))
2320
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,86),4,4,18,1,554,H)
2395
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,86),4,4,18,1,1,554,H)
2321
2396
C Coefficient construction for loop diagram with ID 43
2322
2397
CALL FFS1_3L2_3(PL(0,0),W(1,1),GC_13,GC_22,MDL_MW,MDL_WW
2323
2398
$ ,PL(0,87),COEFS)
2335
2410
$ ,COEFS)
2336
2411
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,89),4,COEFS,4,4,WL(1,0,1
2337
2412
$ ,90))
2338
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,90),2,4,18,1,555,H)
2413
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,90),2,4,18,1,1,555,H)
2339
2414
C Coefficient construction for loop diagram with ID 44
2340
2415
CALL FFV2L1_3(PL(0,0),W(1,3),GC_124,MDL_MW,MDL_WW,PL(0,91)
2341
2416
$ ,COEFS)
2349
2424
$ ,COEFS)
2350
2425
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,92),4,COEFS,4,4,WL(1,0,1
2351
2426
$ ,93))
2352
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,93),4,4,19,1,556,H)
2427
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,93),4,4,19,1,1,556,H)
2353
2428
C Coefficient construction for loop diagram with ID 45
2354
2429
CALL FFS1_3L1_3(PL(0,0),W(1,3),GC_13,GC_22,MDL_MW,MDL_WW
2355
2430
$ ,PL(0,94),COEFS)
2363
2438
$ ,COEFS)
2364
2439
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,95),4,COEFS,4,4,WL(1,0,1
2365
2440
$ ,96))
2366
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,96),2,4,19,1,557,H)
2441
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,96),2,4,19,1,1,557,H)
2367
2442
C Coefficient construction for loop diagram with ID 46
2368
2443
CALL FFV1L2P0_3(PL(0,0),W(1,1),GC_2,ZERO,ZERO,PL(0,97),COEFS)
2369
2444
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
2376
2451
$ ,COEFS)
2377
2452
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,98),4,COEFS,4,4,WL(1,0,1
2378
2453
$ ,99))
2379
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,99),2,4,5,1,558,H)
2454
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,99),2,4,5,1,1,558,H)
2380
2455
C Coefficient construction for loop diagram with ID 47
2381
2456
CALL FFV2_5L2_3(PL(0,0),W(1,1),GC_69,GC_76,MDL_MZ,MDL_WZ
2382
2457
$ ,PL(0,100),COEFS)
2390
2465
$ ,COEFS)
2391
2466
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,101),4,COEFS,4,4,WL(1,0,1
2392
2467
$ ,102))
2393
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,102),4,4,20,1,559,H)
2468
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,102),4,4,20,1,1,559,H)
2394
2469
C Coefficient construction for loop diagram with ID 48
2395
2470
CALL FFS2L2_3(PL(0,0),W(1,1),GC_123,MDL_MZ,MDL_WZ,PL(0,103)
2396
2471
$ ,COEFS)
2404
2479
$ ,COEFS)
2405
2480
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,104),4,COEFS,4,4,WL(1,0,1
2406
2481
$ ,105))
2407
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,105),2,4,20,1,560,H)
2482
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,105),2,4,20,1,1,560,H)
2408
2483
C Coefficient construction for loop diagram with ID 49
2409
2484
CALL FFS4L2_3(PL(0,0),W(1,1),GC_122,MDL_MH,MDL_WH,PL(0,106)
2410
2485
$ ,COEFS)
2418
2493
$ ,COEFS)
2419
2494
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,107),4,COEFS,4,4,WL(1,0,1
2420
2495
$ ,108))
2421
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,108),2,4,21,1,561,H)
2496
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,108),2,4,21,1,1,561,H)
2422
2497
C Coefficient construction for loop diagram with ID 50
2423
2498
CALL FFV2L1_3(PL(0,0),W(1,3),GC_127,MDL_MW,MDL_WW,PL(0,109)
2424
2499
$ ,COEFS)
2432
2507
$ ,COEFS)
2433
2508
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,110),4,COEFS,4,4,WL(1,0,1
2434
2509
$ ,111))
2435
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,111),4,4,22,1,562,H)
2510
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,111),4,4,22,1,1,562,H)
2436
2511
C Coefficient construction for loop diagram with ID 51
2437
2512
CALL FFS1_3L1_3(PL(0,0),W(1,3),GC_14,GC_23,MDL_MW,MDL_WW
2438
2513
$ ,PL(0,112),COEFS)
2446
2521
$ ,COEFS)
2447
2522
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,113),4,COEFS,4,4,WL(1,0,1
2448
2523
$ ,114))
2449
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,114),2,4,22,1,563,H)
2524
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,114),2,4,22,1,1,563,H)
2450
2525
C Coefficient construction for loop diagram with ID 52
2451
2526
CALL FFV2L1_3(PL(0,0),W(1,3),GC_130,MDL_MW,MDL_WW,PL(0,115)
2452
2527
$ ,COEFS)
2460
2535
$ ,COEFS)
2461
2536
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,116),4,COEFS,4,4,WL(1,0,1
2462
2537
$ ,117))
2463
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,117),4,4,23,1,564,H)
2538
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,117),4,4,23,1,1,564,H)
2464
2539
C Coefficient construction for loop diagram with ID 53
2465
2540
CALL FFS1_3L1_3(PL(0,0),W(1,3),GC_15,GC_24,MDL_MW,MDL_WW
2466
2541
$ ,PL(0,118),COEFS)
2474
2549
$ ,COEFS)
2475
2550
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,119),4,COEFS,4,4,WL(1,0,1
2476
2551
$ ,120))
2477
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,120),2,4,23,1,565,H)
2552
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,120),2,4,23,1,1,565,H)
2478
2553
C Coefficient construction for loop diagram with ID 54
2479
2554
CALL FFV1L1P0_3(PL(0,0),W(1,3),GC_1,ZERO,ZERO,PL(0,121)
2480
2555
$ ,COEFS)
2488
2563
$ ,COEFS)
2489
2564
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,122),4,COEFS,4,4,WL(1,0,1
2490
2565
$ ,123))
2491
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,123),2,4,1,1,566,H)
2566
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,123),2,4,1,1,1,566,H)
2492
2567
C Coefficient construction for loop diagram with ID 55
2493
2568
CALL FFV2_3L1_3(PL(0,0),W(1,3),GC_68,GC_76,MDL_MZ,MDL_WZ
2494
2569
$ ,PL(0,124),COEFS)
2502
2577
$ ,COEFS)
2503
2578
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,125),4,COEFS,4,4,WL(1,0,1
2504
2579
$ ,126))
2505
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,126),4,4,24,1,567,H)
2580
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,126),4,4,24,1,1,567,H)
2506
2581
C Coefficient construction for loop diagram with ID 56
2507
2582
CALL FFS2L1_3(PL(0,0),W(1,3),GC_104,MDL_MZ,MDL_WZ,PL(0,127)
2508
2583
$ ,COEFS)
2516
2591
$ ,COEFS)
2517
2592
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,128),4,COEFS,4,4,WL(1,0,1
2518
2593
$ ,129))
2519
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,129),2,4,24,1,568,H)
2594
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,129),2,4,24,1,1,568,H)
2520
2595
C Coefficient construction for loop diagram with ID 57
2521
2596
CALL FFS4L1_3(PL(0,0),W(1,3),GC_105,MDL_MH,MDL_WH,PL(0,130)
2522
2597
$ ,COEFS)
2530
2605
$ ,COEFS)
2531
2606
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,131),4,COEFS,4,4,WL(1,0,1
2532
2607
$ ,132))
2533
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,132),2,4,25,1,569,H)
2608
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,132),2,4,25,1,1,569,H)
2534
2609
C Coefficient construction for loop diagram with ID 58
2535
2610
CALL FFV1L2_1(PL(0,84),W(1,18),GC_11,MDL_MD,ZERO,PL(0,133)
2536
2611
$ ,COEFS)
2537
2612
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,84),4,COEFS,4,4,WL(1,0,1
2538
2613
$ ,133))
2539
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,133),4,4,26,1,570,H)
2614
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,133),4,4,26,1,1,570,H)
2540
2615
C Coefficient construction for loop diagram with ID 59
2541
2616
CALL FFV1L2_1(PL(0,88),W(1,18),GC_11,MDL_MD,ZERO,PL(0,134)
2542
2617
$ ,COEFS)
2543
2618
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,88),4,COEFS,4,4,WL(1,0,1
2544
2619
$ ,134))
2545
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,134),2,4,26,1,571,H)
2620
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,134),2,4,26,1,1,571,H)
2546
2621
C Coefficient construction for loop diagram with ID 60
2547
2622
CALL FFV2L2_3(PL(0,0),W(1,1),GC_125,MDL_MW,MDL_WW,PL(0,135)
2548
2623
$ ,COEFS)
2556
2631
$ ,COEFS)
2557
2632
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,136),4,COEFS,4,4,WL(1,0,1
2558
2633
$ ,137))
2559
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,137),4,4,27,1,572,H)
2634
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,137),4,4,27,1,1,572,H)
2560
2635
C Coefficient construction for loop diagram with ID 61
2561
2636
CALL FFS1_3L2_3(PL(0,0),W(1,1),GC_16,GC_25,MDL_MW,MDL_WW
2562
2637
$ ,PL(0,138),COEFS)
2570
2645
$ ,COEFS)
2571
2646
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,139),4,COEFS,4,4,WL(1,0,1
2572
2647
$ ,140))
2573
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,140),2,4,27,1,573,H)
2648
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,140),2,4,27,1,1,573,H)
2574
2649
C Coefficient construction for loop diagram with ID 62
2575
2650
CALL FFV2L2_3(PL(0,0),W(1,1),GC_126,MDL_MW,MDL_WW,PL(0,141)
2576
2651
$ ,COEFS)
2584
2659
$ ,COEFS)
2585
2660
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,142),4,COEFS,4,4,WL(1,0,1
2586
2661
$ ,143))
2587
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,143),4,4,28,1,574,H)
2662
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,143),4,4,28,1,1,574,H)
2588
2663
C Coefficient construction for loop diagram with ID 63
2589
2664
CALL FFS1_3L2_3(PL(0,0),W(1,1),GC_19,GC_28,MDL_MW,MDL_WW
2590
2665
$ ,PL(0,144),COEFS)
2598
2673
$ ,COEFS)
2599
2674
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,145),4,COEFS,4,4,WL(1,0,1
2600
2675
$ ,146))
2601
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,146),2,4,28,1,575,H)
2676
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,146),2,4,28,1,1,575,H)
2602
2677
C At this point, all loop coefficients needed for (QCD=4
2603
C QED=2), i.e. of split order ID=0, are computed.
2678
C QED=2), i.e. of split order ID=1, are computed.
2604
2679
IF(FILTER_SO.AND.SQSO_TARGET.EQ.1) GOTO 4000
2605
2680
C Coefficient construction for loop diagram with ID 64
2606
2681
CALL FFV1L2_1(PL(0,0),W(1,6),GC_2,MDL_MU,ZERO,PL(0,147)
2611
2686
$ ,COEFS)
2612
2687
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,147),4,COEFS,4,4,WL(1,0,1
2613
2688
$ ,148))
2614
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,148),2,4,29,1,576,H)
2689
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,148),2,4,29,1,1,576,H)
2615
2690
C Coefficient construction for loop diagram with ID 65
2616
2691
CALL FFV2_5L2_1(PL(0,147),W(1,15),GC_69,GC_76,MDL_MU,ZERO
2617
2692
$ ,PL(0,149),COEFS)
2618
2693
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,147),4,COEFS,4,4,WL(1,0,1
2619
2694
$ ,149))
2620
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,149),2,4,29,1,577,H)
2695
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,149),2,4,29,1,1,577,H)
2621
2696
C Coefficient construction for loop diagram with ID 66
2622
2697
CALL FFS2L2_1(PL(0,147),W(1,16),GC_123,MDL_MU,ZERO,PL(0,150)
2623
2698
$ ,COEFS)
2624
2699
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,147),4,COEFS,4,4,WL(1,0,1
2625
2700
$ ,150))
2626
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,150),2,4,29,1,578,H)
2701
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,150),2,4,29,1,1,578,H)
2627
2702
C Coefficient construction for loop diagram with ID 67
2628
2703
CALL FFS4L2_1(PL(0,147),W(1,17),GC_122,MDL_MU,ZERO,PL(0,151)
2629
2704
$ ,COEFS)
2630
2705
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,147),4,COEFS,4,4,WL(1,0,1
2631
2706
$ ,151))
2632
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,151),2,4,29,1,579,H)
2707
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,151),2,4,29,1,1,579,H)
2633
2708
C Coefficient construction for loop diagram with ID 68
2634
2709
CALL FFV2_5L2_1(PL(0,0),W(1,7),GC_69,GC_76,MDL_MU,ZERO,PL(0
2635
2710
$ ,152),COEFS)
2639
2714
$ ,COEFS)
2640
2715
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,152),4,COEFS,4,4,WL(1,0,1
2641
2716
$ ,153))
2642
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,153),2,4,29,1,580,H)
2717
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,153),2,4,29,1,1,580,H)
2643
2718
C Coefficient construction for loop diagram with ID 69
2644
2719
CALL FFV2_5L2_1(PL(0,152),W(1,15),GC_69,GC_76,MDL_MU,ZERO
2645
2720
$ ,PL(0,154),COEFS)
2646
2721
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,152),4,COEFS,4,4,WL(1,0,1
2647
2722
$ ,154))
2648
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,154),2,4,29,1,581,H)
2723
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,154),2,4,29,1,1,581,H)
2649
2724
C Coefficient construction for loop diagram with ID 70
2650
2725
CALL FFS2L2_1(PL(0,152),W(1,16),GC_123,MDL_MU,ZERO,PL(0,155)
2651
2726
$ ,COEFS)
2652
2727
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,152),4,COEFS,4,4,WL(1,0,1
2653
2728
$ ,155))
2654
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,155),2,4,29,1,582,H)
2729
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,155),2,4,29,1,1,582,H)
2655
2730
C Coefficient construction for loop diagram with ID 71
2656
2731
CALL FFS4L2_1(PL(0,152),W(1,17),GC_122,MDL_MU,ZERO,PL(0,156)
2657
2732
$ ,COEFS)
2658
2733
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,152),4,COEFS,4,4,WL(1,0,1
2659
2734
$ ,156))
2660
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,156),2,4,29,1,583,H)
2735
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,156),2,4,29,1,1,583,H)
2661
2736
C Coefficient construction for loop diagram with ID 72
2662
2737
CALL FFS2L2_1(PL(0,0),W(1,8),GC_123,MDL_MU,ZERO,PL(0,157)
2663
2738
$ ,COEFS)
2667
2742
$ ,COEFS)
2668
2743
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,157),4,COEFS,4,4,WL(1,0,1
2669
2744
$ ,158))
2670
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,158),2,4,29,1,584,H)
2745
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,158),2,4,29,1,1,584,H)
2671
2746
C Coefficient construction for loop diagram with ID 73
2672
2747
CALL FFV2_5L2_1(PL(0,157),W(1,15),GC_69,GC_76,MDL_MU,ZERO
2673
2748
$ ,PL(0,159),COEFS)
2674
2749
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,157),4,COEFS,4,4,WL(1,0,1
2675
2750
$ ,159))
2676
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,159),2,4,29,1,585,H)
2751
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,159),2,4,29,1,1,585,H)
2677
2752
C Coefficient construction for loop diagram with ID 74
2678
2753
CALL FFS2L2_1(PL(0,157),W(1,16),GC_123,MDL_MU,ZERO,PL(0,160)
2679
2754
$ ,COEFS)
2680
2755
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,157),4,COEFS,4,4,WL(1,0,1
2681
2756
$ ,160))
2682
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,160),2,4,29,1,586,H)
2757
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,160),2,4,29,1,1,586,H)
2683
2758
C Coefficient construction for loop diagram with ID 75
2684
2759
CALL FFS4L2_1(PL(0,157),W(1,17),GC_122,MDL_MU,ZERO,PL(0,161)
2685
2760
$ ,COEFS)
2686
2761
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,157),4,COEFS,4,4,WL(1,0,1
2687
2762
$ ,161))
2688
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,161),2,4,29,1,587,H)
2763
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,161),2,4,29,1,1,587,H)
2689
2764
C Coefficient construction for loop diagram with ID 76
2690
2765
CALL FFS4L2_1(PL(0,0),W(1,9),GC_122,MDL_MU,ZERO,PL(0,162)
2691
2766
$ ,COEFS)
2695
2770
$ ,COEFS)
2696
2771
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,162),4,COEFS,4,4,WL(1,0,1
2697
2772
$ ,163))
2698
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,163),2,4,29,1,588,H)
2773
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,163),2,4,29,1,1,588,H)
2699
2774
C Coefficient construction for loop diagram with ID 77
2700
2775
CALL FFV2_5L2_1(PL(0,162),W(1,15),GC_69,GC_76,MDL_MU,ZERO
2701
2776
$ ,PL(0,164),COEFS)
2702
2777
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,162),4,COEFS,4,4,WL(1,0,1
2703
2778
$ ,164))
2704
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,164),2,4,29,1,589,H)
2779
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,164),2,4,29,1,1,589,H)
2705
2780
C Coefficient construction for loop diagram with ID 78
2706
2781
CALL FFS2L2_1(PL(0,162),W(1,16),GC_123,MDL_MU,ZERO,PL(0,165)
2707
2782
$ ,COEFS)
2708
2783
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,162),4,COEFS,4,4,WL(1,0,1
2709
2784
$ ,165))
2710
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,165),2,4,29,1,590,H)
2785
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,165),2,4,29,1,1,590,H)
2711
2786
C Coefficient construction for loop diagram with ID 79
2712
2787
CALL FFS4L2_1(PL(0,162),W(1,17),GC_122,MDL_MU,ZERO,PL(0,166)
2713
2788
$ ,COEFS)
2714
2789
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,162),4,COEFS,4,4,WL(1,0,1
2715
2790
$ ,166))
2716
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,166),2,4,29,1,591,H)
2791
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,166),2,4,29,1,1,591,H)
2717
2792
C Coefficient construction for loop diagram with ID 80
2718
2793
CALL FFV1L1_2(PL(0,92),W(1,6),GC_2,MDL_MU,ZERO,PL(0,167)
2719
2794
$ ,COEFS)
2720
2795
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,92),4,COEFS,4,4,WL(1,0,1
2721
2796
$ ,167))
2722
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,167),4,4,19,1,592,H)
2797
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,167),4,4,19,1,1,592,H)
2723
2798
C Coefficient construction for loop diagram with ID 81
2724
2799
CALL FFV1L1_2(PL(0,95),W(1,6),GC_2,MDL_MU,ZERO,PL(0,168)
2725
2800
$ ,COEFS)
2726
2801
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,95),4,COEFS,4,4,WL(1,0,1
2727
2802
$ ,168))
2728
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,168),2,4,19,1,593,H)
2803
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,168),2,4,19,1,1,593,H)
2729
2804
C Coefficient construction for loop diagram with ID 82
2730
2805
CALL FFV2_5L1_2(PL(0,92),W(1,7),GC_69,GC_76,MDL_MU,ZERO,PL(0
2731
2806
$ ,169),COEFS)
2732
2807
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,92),4,COEFS,4,4,WL(1,0,1
2733
2808
$ ,169))
2734
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,169),4,4,19,1,594,H)
2809
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,169),4,4,19,1,1,594,H)
2735
2810
C Coefficient construction for loop diagram with ID 83
2736
2811
CALL FFV2_5L1_2(PL(0,95),W(1,7),GC_69,GC_76,MDL_MU,ZERO,PL(0
2737
2812
$ ,170),COEFS)
2738
2813
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,95),4,COEFS,4,4,WL(1,0,1
2739
2814
$ ,170))
2740
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,170),2,4,19,1,595,H)
2815
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,170),2,4,19,1,1,595,H)
2741
2816
C Coefficient construction for loop diagram with ID 84
2742
2817
CALL FFS2L1_2(PL(0,92),W(1,8),GC_123,MDL_MU,ZERO,PL(0,171)
2743
2818
$ ,COEFS)
2744
2819
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,92),4,COEFS,4,4,WL(1,0,1
2745
2820
$ ,171))
2746
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,171),4,4,19,1,596,H)
2821
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,171),4,4,19,1,1,596,H)
2747
2822
C Coefficient construction for loop diagram with ID 85
2748
2823
CALL FFS2L1_2(PL(0,95),W(1,8),GC_123,MDL_MU,ZERO,PL(0,172)
2749
2824
$ ,COEFS)
2750
2825
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,95),4,COEFS,4,4,WL(1,0,1
2751
2826
$ ,172))
2752
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,172),2,4,19,1,597,H)
2827
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,172),2,4,19,1,1,597,H)
2753
2828
C Coefficient construction for loop diagram with ID 86
2754
2829
CALL FFS4L1_2(PL(0,92),W(1,9),GC_122,MDL_MU,ZERO,PL(0,173)
2755
2830
$ ,COEFS)
2756
2831
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,92),4,COEFS,4,4,WL(1,0,1
2757
2832
$ ,173))
2758
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,173),4,4,19,1,598,H)
2833
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,173),4,4,19,1,1,598,H)
2759
2834
C Coefficient construction for loop diagram with ID 87
2760
2835
CALL FFS4L1_2(PL(0,95),W(1,9),GC_122,MDL_MU,ZERO,PL(0,174)
2761
2836
$ ,COEFS)
2762
2837
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,95),4,COEFS,4,4,WL(1,0,1
2763
2838
$ ,174))
2764
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,174),2,4,19,1,599,H)
2839
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,174),2,4,19,1,1,599,H)
2765
2840
C Coefficient construction for loop diagram with ID 88
2766
2841
CALL FFV2L3_1(PL(0,0),W(1,3),GC_124,MDL_MU,ZERO,PL(0,175)
2767
2842
$ ,COEFS)
2775
2850
$ ,COEFS)
2776
2851
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,176),4,COEFS,4,4,WL(1,0,1
2777
2852
$ ,177))
2778
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,177),5,4,30,1,600,H)
2853
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,177),5,4,30,1,1,600,H)
2779
2854
C Coefficient construction for loop diagram with ID 89
2780
2855
CALL FFS1_3L2_3(PL(0,175),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
2781
2856
$ ,PL(0,178),COEFS)
2785
2860
$ ,COEFS)
2786
2861
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,178),4,COEFS,1,4,WL(1,0,1
2787
2862
$ ,179))
2788
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,179),2,4,30,1,601,H)
2863
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,179),2,4,30,1,1,601,H)
2789
2864
C Coefficient construction for loop diagram with ID 90
2790
2865
CALL FFS1_3L3_1(PL(0,0),W(1,3),GC_13,GC_22,MDL_MU,ZERO,PL(0
2791
2866
$ ,180),COEFS)
2799
2874
$ ,COEFS)
2800
2875
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,181),1,COEFS,4,1,WL(1,0,1
2801
2876
$ ,182))
2802
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,182),3,1,30,1,602,H)
2877
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,182),3,1,30,1,1,602,H)
2803
2878
C Coefficient construction for loop diagram with ID 91
2804
2879
CALL FFS1_3L2_3(PL(0,180),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
2805
2880
$ ,PL(0,183),COEFS)
2809
2884
$ ,COEFS)
2810
2885
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,183),1,COEFS,1,1,WL(1,0,1
2811
2886
$ ,184))
2812
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,184),2,1,30,1,603,H)
2887
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,184),2,1,30,1,1,603,H)
2813
2888
C Coefficient construction for loop diagram with ID 92
2814
2889
CALL VVV1L2_1(PL(0,176),W(1,7),GC_71,MDL_MW,MDL_WW,PL(0,185)
2815
2890
$ ,COEFS)
2816
2891
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,176),4,COEFS,4,4,WL(1,0,1
2817
2892
$ ,185))
2818
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,185),5,4,30,1,604,H)
2893
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,185),5,4,30,1,1,604,H)
2819
2894
C Coefficient construction for loop diagram with ID 93
2820
2895
CALL VVS1L3_1(PL(0,178),W(1,7),GC_85,MDL_MW,MDL_WW,PL(0,186)
2821
2896
$ ,COEFS)
2822
2897
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,178),4,COEFS,1,4,WL(1,0,1
2823
2898
$ ,186))
2824
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,186),2,4,30,1,605,H)
2899
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,186),2,4,30,1,1,605,H)
2825
2900
C Coefficient construction for loop diagram with ID 94
2826
2901
CALL VVS1L1_3(PL(0,181),W(1,7),GC_84,MDL_MW,MDL_WW,PL(0,187)
2827
2902
$ ,COEFS)
2828
2903
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,181),1,COEFS,4,1,WL(1,0,1
2829
2904
$ ,187))
2830
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,187),3,1,30,1,606,H)
2905
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,187),3,1,30,1,1,606,H)
2831
2906
C Coefficient construction for loop diagram with ID 95
2832
2907
CALL VSS1L3_2(PL(0,183),W(1,7),GC_79,MDL_MW,MDL_WW,PL(0,188)
2833
2908
$ ,COEFS)
2834
2909
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,183),1,COEFS,1,1,WL(1,0,1
2835
2910
$ ,188))
2836
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,188),2,1,30,1,607,H)
2911
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,188),2,1,30,1,1,607,H)
2837
2912
C Coefficient construction for loop diagram with ID 96
2838
2913
CALL VSS1L3_1(PL(0,178),W(1,8),GC_57,MDL_MW,MDL_WW,PL(0,189)
2839
2914
$ ,COEFS)
2840
2915
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,178),4,COEFS,1,4,WL(1,0,1
2841
2916
$ ,189))
2842
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,189),4,4,30,1,608,H)
2917
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,189),4,4,30,1,1,608,H)
2843
2918
C Coefficient construction for loop diagram with ID 97
2844
2919
CALL VSS1L1_3(PL(0,181),W(1,8),GC_56,MDL_MW,MDL_WW,PL(0,190)
2845
2920
$ ,COEFS)
2846
2921
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,181),1,COEFS,4,1,WL(1,0,1
2847
2922
$ ,190))
2848
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,190),4,1,30,1,609,H)
2923
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,190),4,1,30,1,1,609,H)
2849
2924
C Coefficient construction for loop diagram with ID 98
2850
2925
CALL VVS1L2_1(PL(0,176),W(1,9),GC_90,MDL_MW,MDL_WW,PL(0,191)
2851
2926
$ ,COEFS)
2852
2927
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,176),4,COEFS,4,4,WL(1,0,1
2853
2928
$ ,191))
2854
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,191),5,4,30,1,610,H)
2929
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,191),5,4,30,1,1,610,H)
2855
2930
C Coefficient construction for loop diagram with ID 99
2856
2931
CALL VSS1L2_1(PL(0,178),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,192)
2857
2932
$ ,COEFS)
2858
2933
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,178),4,COEFS,1,4,WL(1,0,1
2859
2934
$ ,192))
2860
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,192),4,4,30,1,611,H)
2935
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,192),4,4,30,1,1,611,H)
2861
2936
C Coefficient construction for loop diagram with ID 100
2862
2937
CALL VSS1L1_2(PL(0,181),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,193)
2863
2938
$ ,COEFS)
2864
2939
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,181),1,COEFS,4,1,WL(1,0,1
2865
2940
$ ,193))
2866
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,193),4,1,30,1,612,H)
2941
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,193),4,1,30,1,1,612,H)
2867
2942
C Coefficient construction for loop diagram with ID 101
2868
2943
CALL SSS1L2_1(PL(0,183),W(1,9),GC_86,MDL_MW,MDL_WW,PL(0,194)
2869
2944
$ ,COEFS)
2870
2945
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,183),1,COEFS,1,1,WL(1,0,1
2871
2946
$ ,194))
2872
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,194),1,1,30,1,613,H)
2947
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,194),1,1,30,1,1,613,H)
2873
2948
C Coefficient construction for loop diagram with ID 102
2874
2949
CALL FFV2L1_2(PL(0,0),W(1,10),GC_59,MDL_MU,ZERO,PL(0,195)
2875
2950
$ ,COEFS)
2879
2954
$ ,COEFS)
2880
2955
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,195),4,COEFS,4,4,WL(1,0,1
2881
2956
$ ,196))
2882
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,196),2,4,31,1,614,H)
2957
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,196),2,4,31,1,1,614,H)
2883
2958
C Coefficient construction for loop diagram with ID 103
2884
2959
CALL FFV2L2_1(PL(0,0),W(1,10),GC_60,MDL_MS,ZERO,PL(0,197)
2885
2960
$ ,COEFS)
2889
2964
$ ,COEFS)
2890
2965
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,197),4,COEFS,4,4,WL(1,0,1
2891
2966
$ ,198))
2892
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,198),2,4,32,1,615,H)
2967
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,198),2,4,32,1,1,615,H)
2893
2968
C Coefficient construction for loop diagram with ID 104
2894
2969
CALL FFV2L2_1(PL(0,0),W(1,10),GC_61,MDL_MB,ZERO,PL(0,199)
2895
2970
$ ,COEFS)
2899
2974
$ ,COEFS)
2900
2975
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,199),4,COEFS,4,4,WL(1,0,1
2901
2976
$ ,200))
2902
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,200),2,4,33,1,616,H)
2977
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,200),2,4,33,1,1,616,H)
2903
2978
C Coefficient construction for loop diagram with ID 105
2904
2979
CALL FFS1_3L1_2(PL(0,195),W(1,13),GC_13,GC_22,MDL_MD,ZERO
2905
2980
$ ,PL(0,201),COEFS)
2906
2981
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,195),4,COEFS,4,4,WL(1,0,1
2907
2982
$ ,201))
2908
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,201),2,4,31,1,617,H)
2983
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,201),2,4,31,1,1,617,H)
2909
2984
C Coefficient construction for loop diagram with ID 106
2910
2985
CALL FFS1_3L2_1(PL(0,197),W(1,13),GC_16,GC_25,MDL_MU,ZERO
2911
2986
$ ,PL(0,202),COEFS)
2912
2987
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,197),4,COEFS,4,4,WL(1,0,1
2913
2988
$ ,202))
2914
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,202),2,4,32,1,618,H)
2989
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,202),2,4,32,1,1,618,H)
2915
2990
C Coefficient construction for loop diagram with ID 107
2916
2991
CALL FFS1_3L2_1(PL(0,199),W(1,13),GC_19,GC_28,MDL_MU,ZERO
2917
2992
$ ,PL(0,203),COEFS)
2918
2993
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,199),4,COEFS,4,4,WL(1,0,1
2919
2994
$ ,203))
2920
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,203),2,4,33,1,619,H)
2995
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,203),2,4,33,1,1,619,H)
2921
2996
C Coefficient construction for loop diagram with ID 108
2922
2997
CALL FFS1_3L1_2(PL(0,0),W(1,11),GC_31,GC_40,MDL_MU,ZERO,PL(0
2923
2998
$ ,204),COEFS)
2927
3002
$ ,COEFS)
2928
3003
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,204),4,COEFS,4,4,WL(1,0,1
2929
3004
$ ,205))
2930
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,205),2,4,31,1,620,H)
3005
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,205),2,4,31,1,1,620,H)
2931
3006
C Coefficient construction for loop diagram with ID 109
2932
3007
CALL FFS1_3L2_1(PL(0,0),W(1,11),GC_32,GC_41,MDL_MS,ZERO,PL(0
2933
3008
$ ,206),COEFS)
2937
3012
$ ,COEFS)
2938
3013
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,206),4,COEFS,4,4,WL(1,0,1
2939
3014
$ ,207))
2940
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,207),2,4,32,1,621,H)
3015
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,207),2,4,32,1,1,621,H)
2941
3016
C Coefficient construction for loop diagram with ID 110
2942
3017
CALL FFS1_3L2_1(PL(0,0),W(1,11),GC_33,GC_42,MDL_MB,ZERO,PL(0
2943
3018
$ ,208),COEFS)
2947
3022
$ ,COEFS)
2948
3023
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,208),4,COEFS,4,4,WL(1,0,1
2949
3024
$ ,209))
2950
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,209),2,4,33,1,622,H)
3025
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,209),2,4,33,1,1,622,H)
2951
3026
C Coefficient construction for loop diagram with ID 111
2952
3027
CALL FFS1_3L1_2(PL(0,204),W(1,13),GC_13,GC_22,MDL_MD,ZERO
2953
3028
$ ,PL(0,210),COEFS)
2954
3029
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,204),4,COEFS,4,4,WL(1,0,1
2955
3030
$ ,210))
2956
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,210),2,4,31,1,623,H)
3031
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,210),2,4,31,1,1,623,H)
2957
3032
C Coefficient construction for loop diagram with ID 112
2958
3033
CALL FFS1_3L2_1(PL(0,206),W(1,13),GC_16,GC_25,MDL_MU,ZERO
2959
3034
$ ,PL(0,211),COEFS)
2960
3035
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,206),4,COEFS,4,4,WL(1,0,1
2961
3036
$ ,211))
2962
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,211),2,4,32,1,624,H)
3037
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,211),2,4,32,1,1,624,H)
2963
3038
C Coefficient construction for loop diagram with ID 113
2964
3039
CALL FFS1_3L2_1(PL(0,208),W(1,13),GC_19,GC_28,MDL_MU,ZERO
2965
3040
$ ,PL(0,212),COEFS)
2966
3041
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,208),4,COEFS,4,4,WL(1,0,1
2967
3042
$ ,212))
2968
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,212),2,4,33,1,625,H)
3043
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,212),2,4,33,1,1,625,H)
2969
3044
C Coefficient construction for loop diagram with ID 114
2970
3045
CALL FFV1L1P0_3(PL(0,0),W(1,2),GC_2,ZERO,ZERO,PL(0,213)
2971
3046
$ ,COEFS)
2979
3054
$ ,COEFS)
2980
3055
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,214),4,COEFS,4,4,WL(1,0,1
2981
3056
$ ,215))
2982
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,215),2,4,2,1,626,H)
3057
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,215),2,4,2,1,1,626,H)
2983
3058
C Coefficient construction for loop diagram with ID 115
2984
3059
CALL FFV2_5L1_3(PL(0,0),W(1,2),GC_69,GC_76,MDL_MZ,MDL_WZ
2985
3060
$ ,PL(0,216),COEFS)
2993
3068
$ ,COEFS)
2994
3069
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,217),4,COEFS,4,4,WL(1,0,1
2995
3070
$ ,218))
2996
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,218),4,4,34,1,627,H)
3071
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,218),4,4,34,1,1,627,H)
2997
3072
C Coefficient construction for loop diagram with ID 116
2998
3073
CALL FFS2L1_3(PL(0,0),W(1,2),GC_123,MDL_MZ,MDL_WZ,PL(0,219)
2999
3074
$ ,COEFS)
3007
3082
$ ,COEFS)
3008
3083
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,220),4,COEFS,4,4,WL(1,0,1
3009
3084
$ ,221))
3010
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,221),2,4,34,1,628,H)
3085
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,221),2,4,34,1,1,628,H)
3011
3086
C Coefficient construction for loop diagram with ID 117
3012
3087
CALL FFS4L1_3(PL(0,0),W(1,2),GC_122,MDL_MH,MDL_WH,PL(0,222)
3013
3088
$ ,COEFS)
3021
3096
$ ,COEFS)
3022
3097
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,223),4,COEFS,4,4,WL(1,0,1
3023
3098
$ ,224))
3024
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,224),2,4,35,1,629,H)
3099
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,224),2,4,35,1,1,629,H)
3025
3100
C Coefficient construction for loop diagram with ID 118
3026
3101
CALL FFS1_3L1_2(PL(0,214),W(1,11),GC_31,GC_40,MDL_MU,ZERO
3027
3102
$ ,PL(0,225),COEFS)
3028
3103
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,214),4,COEFS,4,4,WL(1,0,1
3029
3104
$ ,225))
3030
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,225),2,4,2,1,630,H)
3105
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,225),2,4,2,1,1,630,H)
3031
3106
C Coefficient construction for loop diagram with ID 119
3032
3107
CALL FFS1_3L1_2(PL(0,217),W(1,11),GC_31,GC_40,MDL_MU,ZERO
3033
3108
$ ,PL(0,226),COEFS)
3034
3109
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,217),4,COEFS,4,4,WL(1,0,1
3035
3110
$ ,226))
3036
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,226),4,4,34,1,631,H)
3111
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,226),4,4,34,1,1,631,H)
3037
3112
C Coefficient construction for loop diagram with ID 120
3038
3113
CALL FFS1_3L1_2(PL(0,220),W(1,11),GC_31,GC_40,MDL_MU,ZERO
3039
3114
$ ,PL(0,227),COEFS)
3040
3115
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,220),4,COEFS,4,4,WL(1,0,1
3041
3116
$ ,227))
3042
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,227),2,4,34,1,632,H)
3117
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,227),2,4,34,1,1,632,H)
3043
3118
C Coefficient construction for loop diagram with ID 121
3044
3119
CALL FFS1_3L1_2(PL(0,223),W(1,11),GC_31,GC_40,MDL_MU,ZERO
3045
3120
$ ,PL(0,228),COEFS)
3046
3121
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,223),4,COEFS,4,4,WL(1,0,1
3047
3122
$ ,228))
3048
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,228),2,4,35,1,633,H)
3123
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,228),2,4,35,1,1,633,H)
3049
3124
C Coefficient construction for loop diagram with ID 122
3050
3125
CALL FFV1L3_1(PL(0,0),W(1,2),GC_2,MDL_MU,ZERO,PL(0,229)
3051
3126
$ ,COEFS)
3059
3134
$ ,COEFS)
3060
3135
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,230),4,COEFS,4,4,WL(1,0,1
3061
3136
$ ,231))
3062
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,231),4,4,36,1,634,H)
3137
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,231),4,4,36,1,1,634,H)
3063
3138
C Coefficient construction for loop diagram with ID 123
3064
3139
CALL FFS1_3L2_3(PL(0,229),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
3065
3140
$ ,PL(0,232),COEFS)
3069
3144
$ ,COEFS)
3070
3145
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,232),4,COEFS,1,4,WL(1,0,1
3071
3146
$ ,233))
3072
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,233),1,4,36,1,635,H)
3147
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,233),1,4,36,1,1,635,H)
3073
3148
C Coefficient construction for loop diagram with ID 124
3074
3149
CALL FFV2_5L3_1(PL(0,0),W(1,2),GC_69,GC_76,MDL_MU,ZERO,PL(0
3075
3150
$ ,234),COEFS)
3083
3158
$ ,236),COEFS)
3084
3159
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,235),4,COEFS,4,4,WL(1,0,1
3085
3160
$ ,236))
3086
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,236),5,4,37,1,636,H)
3161
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,236),5,4,37,1,1,636,H)
3087
3162
C Coefficient construction for loop diagram with ID 125
3088
3163
CALL FFS1_3L2_3(PL(0,234),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
3089
3164
$ ,PL(0,237),COEFS)
3093
3168
$ ,238),COEFS)
3094
3169
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,237),4,COEFS,1,4,WL(1,0,1
3095
3170
$ ,238))
3096
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,238),2,4,37,1,637,H)
3171
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,238),2,4,37,1,1,637,H)
3097
3172
C Coefficient construction for loop diagram with ID 126
3098
3173
CALL FFS2L3_1(PL(0,0),W(1,2),GC_123,MDL_MU,ZERO,PL(0,239)
3099
3174
$ ,COEFS)
3107
3182
$ ,241),COEFS)
3108
3183
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,240),1,COEFS,1,1,WL(1,0,1
3109
3184
$ ,241))
3110
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,241),2,1,37,1,638,H)
3185
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,241),2,1,37,1,1,638,H)
3111
3186
C Coefficient construction for loop diagram with ID 127
3112
3187
CALL FFS4L3_1(PL(0,0),W(1,2),GC_122,MDL_MU,ZERO,PL(0,242)
3113
3188
$ ,COEFS)
3121
3196
$ ,244),COEFS)
3122
3197
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,243),1,COEFS,4,1,WL(1,0,1
3123
3198
$ ,244))
3124
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,244),3,1,38,1,639,H)
3199
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,244),3,1,38,1,1,639,H)
3125
3200
C Coefficient construction for loop diagram with ID 128
3126
3201
CALL FFS1_3L2_3(PL(0,242),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
3127
3202
$ ,PL(0,245),COEFS)
3131
3206
$ ,246),COEFS)
3132
3207
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,245),1,COEFS,1,1,WL(1,0,1
3133
3208
$ ,246))
3134
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,246),2,1,38,1,640,H)
3209
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,246),2,1,38,1,1,640,H)
3135
3210
C Coefficient construction for loop diagram with ID 129
3136
3211
CALL VVS1L2P0_1(PL(0,230),W(1,11),GC_93,ZERO,ZERO,PL(0,247)
3137
3212
$ ,COEFS)
3138
3213
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,230),4,COEFS,4,4,WL(1,0,1
3139
3214
$ ,247))
3140
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,247),3,4,36,1,641,H)
3215
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,247),3,4,36,1,1,641,H)
3141
3216
C Coefficient construction for loop diagram with ID 130
3142
3217
CALL VSS1L3P0_1(PL(0,232),W(1,11),GC_3,ZERO,ZERO,PL(0,248)
3143
3218
$ ,COEFS)
3144
3219
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,232),4,COEFS,1,4,WL(1,0,1
3145
3220
$ ,248))
3146
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,248),2,4,36,1,642,H)
3221
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,248),2,4,36,1,1,642,H)
3147
3222
C Coefficient construction for loop diagram with ID 131
3148
3223
CALL VVS1L1_2(PL(0,235),W(1,11),GC_84,MDL_MZ,MDL_WZ,PL(0
3149
3224
$ ,249),COEFS)
3150
3225
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,235),4,COEFS,4,4,WL(1,0,1
3151
3226
$ ,249))
3152
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,249),5,4,37,1,643,H)
3227
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,249),5,4,37,1,1,643,H)
3153
3228
C Coefficient construction for loop diagram with ID 132
3154
3229
CALL VSS1L3_1(PL(0,237),W(1,11),GC_79,MDL_MZ,MDL_WZ,PL(0
3155
3230
$ ,250),COEFS)
3156
3231
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,237),4,COEFS,1,4,WL(1,0,1
3157
3232
$ ,250))
3158
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,250),4,4,37,1,644,H)
3233
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,250),4,4,37,1,1,644,H)
3159
3234
C Coefficient construction for loop diagram with ID 133
3160
3235
CALL FFV2L2_3(PL(0,239),W(1,4),GC_59,MDL_MW,MDL_WW,PL(0,251)
3161
3236
$ ,COEFS)
3165
3240
$ ,252),COEFS)
3166
3241
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,251),1,COEFS,4,1,WL(1,0,1
3167
3242
$ ,252))
3168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,252),4,1,37,1,645,H)
3243
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,252),4,1,37,1,1,645,H)
3169
3244
C Coefficient construction for loop diagram with ID 134
3170
3245
CALL VSS1L1_3(PL(0,243),W(1,11),GC_55,MDL_MH,MDL_WH,PL(0
3171
3246
$ ,253),COEFS)
3172
3247
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,243),1,COEFS,4,1,WL(1,0,1
3173
3248
$ ,253))
3174
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,253),4,1,38,1,646,H)
3249
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,253),4,1,38,1,1,646,H)
3175
3250
C Coefficient construction for loop diagram with ID 135
3176
3251
CALL SSS1L2_3(PL(0,245),W(1,11),GC_86,MDL_MH,MDL_WH,PL(0
3177
3252
$ ,254),COEFS)
3178
3253
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,245),1,COEFS,1,1,WL(1,0,1
3179
3254
$ ,254))
3180
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,254),1,1,38,1,647,H)
3255
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,254),1,1,38,1,1,647,H)
3181
3256
C Coefficient construction for loop diagram with ID 136
3182
3257
CALL FFV1L3_1(PL(0,97),W(1,3),GC_1,MDL_MD,ZERO,PL(0,255)
3183
3258
$ ,COEFS)
3187
3262
$ ,COEFS)
3188
3263
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,255),4,COEFS,4,4,WL(1,0,1
3189
3264
$ ,256))
3190
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,256),2,4,3,1,648,H)
3265
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,256),2,4,3,1,1,648,H)
3191
3266
C Coefficient construction for loop diagram with ID 137
3192
3267
CALL FFS1_3L2_1(PL(0,255),W(1,13),GC_13,GC_22,MDL_MU,ZERO
3193
3268
$ ,PL(0,257),COEFS)
3194
3269
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,255),4,COEFS,4,4,WL(1,0,1
3195
3270
$ ,257))
3196
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,257),2,4,3,1,649,H)
3271
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,257),2,4,3,1,1,649,H)
3197
3272
C Coefficient construction for loop diagram with ID 138
3198
3273
CALL FFV2_3L3_1(PL(0,100),W(1,3),GC_68,GC_76,MDL_MD,ZERO
3199
3274
$ ,PL(0,258),COEFS)
3203
3278
$ ,COEFS)
3204
3279
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,258),4,COEFS,4,4,WL(1,0,1
3205
3280
$ ,259))
3206
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,259),4,4,39,1,650,H)
3281
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,259),4,4,39,1,1,650,H)
3207
3282
C Coefficient construction for loop diagram with ID 139
3208
3283
CALL FFS1_3L2_1(PL(0,258),W(1,13),GC_13,GC_22,MDL_MU,ZERO
3209
3284
$ ,PL(0,260),COEFS)
3210
3285
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,258),4,COEFS,4,4,WL(1,0,1
3211
3286
$ ,260))
3212
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,260),4,4,39,1,651,H)
3287
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,260),4,4,39,1,1,651,H)
3213
3288
C Coefficient construction for loop diagram with ID 140
3214
3289
CALL FFS2L3_1(PL(0,103),W(1,3),GC_104,MDL_MD,ZERO,PL(0,261)
3215
3290
$ ,COEFS)
3219
3294
$ ,COEFS)
3220
3295
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,261),4,COEFS,4,4,WL(1,0,1
3221
3296
$ ,262))
3222
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,262),2,4,39,1,652,H)
3297
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,262),2,4,39,1,1,652,H)
3223
3298
C Coefficient construction for loop diagram with ID 141
3224
3299
CALL FFS1_3L2_1(PL(0,261),W(1,13),GC_13,GC_22,MDL_MU,ZERO
3225
3300
$ ,PL(0,263),COEFS)
3226
3301
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,261),4,COEFS,4,4,WL(1,0,1
3227
3302
$ ,263))
3228
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,263),2,4,39,1,653,H)
3303
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,263),2,4,39,1,1,653,H)
3229
3304
C Coefficient construction for loop diagram with ID 142
3230
3305
CALL FFS4L3_1(PL(0,106),W(1,3),GC_105,MDL_MD,ZERO,PL(0,264)
3231
3306
$ ,COEFS)
3235
3310
$ ,COEFS)
3236
3311
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,264),4,COEFS,4,4,WL(1,0,1
3237
3312
$ ,265))
3238
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,265),2,4,40,1,654,H)
3313
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,265),2,4,40,1,1,654,H)
3239
3314
C Coefficient construction for loop diagram with ID 143
3240
3315
CALL FFS1_3L2_1(PL(0,264),W(1,13),GC_13,GC_22,MDL_MU,ZERO
3241
3316
$ ,PL(0,266),COEFS)
3242
3317
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,264),4,COEFS,4,4,WL(1,0,1
3243
3318
$ ,266))
3244
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,266),2,4,40,1,655,H)
3319
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,266),2,4,40,1,1,655,H)
3245
3320
C Coefficient construction for loop diagram with ID 144
3246
3321
CALL FFV2L1_3(PL(0,51),W(1,3),GC_124,MDL_MW,MDL_WW,PL(0,267)
3247
3322
$ ,COEFS)
3251
3326
$ ,COEFS)
3252
3327
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,267),4,COEFS,4,4,WL(1,0,1
3253
3328
$ ,268))
3254
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,268),4,4,41,1,656,H)
3329
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,268),4,4,41,1,1,656,H)
3255
3330
C Coefficient construction for loop diagram with ID 145
3256
3331
CALL FFS1_3L1_3(PL(0,51),W(1,3),GC_13,GC_22,MDL_MW,MDL_WW
3257
3332
$ ,PL(0,269),COEFS)
3261
3336
$ ,COEFS)
3262
3337
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,269),4,COEFS,1,4,WL(1,0,1
3263
3338
$ ,270))
3264
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,270),1,4,41,1,657,H)
3339
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,270),1,4,41,1,1,657,H)
3265
3340
C Coefficient construction for loop diagram with ID 146
3266
3341
CALL VVS1L2P0_1(PL(0,267),W(1,13),GC_92,ZERO,ZERO,PL(0,271)
3267
3342
$ ,COEFS)
3268
3343
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,267),4,COEFS,4,4,WL(1,0,1
3269
3344
$ ,271))
3270
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,271),3,4,41,1,658,H)
3345
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,271),3,4,41,1,1,658,H)
3271
3346
C Coefficient construction for loop diagram with ID 147
3272
3347
CALL VSS1L2P0_1(PL(0,269),W(1,13),GC_3,ZERO,ZERO,PL(0,272)
3273
3348
$ ,COEFS)
3274
3349
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,269),4,COEFS,1,4,WL(1,0,1
3275
3350
$ ,272))
3276
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,272),2,4,41,1,659,H)
3351
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,272),2,4,41,1,1,659,H)
3277
3352
C Coefficient construction for loop diagram with ID 148
3278
3353
CALL FFV2L1_3(PL(0,55),W(1,3),GC_124,MDL_MW,MDL_WW,PL(0,273)
3279
3354
$ ,COEFS)
3283
3358
$ ,274),COEFS)
3284
3359
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,273),4,COEFS,4,4,WL(1,0,1
3285
3360
$ ,274))
3286
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,274),5,4,42,1,660,H)
3361
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,274),5,4,42,1,1,660,H)
3287
3362
C Coefficient construction for loop diagram with ID 149
3288
3363
CALL FFS1_3L1_3(PL(0,55),W(1,3),GC_13,GC_22,MDL_MW,MDL_WW
3289
3364
$ ,PL(0,275),COEFS)
3293
3368
$ ,276),COEFS)
3294
3369
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,275),4,COEFS,1,4,WL(1,0,1
3295
3370
$ ,276))
3296
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,276),2,4,42,1,661,H)
3371
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,276),2,4,42,1,1,661,H)
3297
3372
C Coefficient construction for loop diagram with ID 150
3298
3373
CALL VVS1L1_2(PL(0,273),W(1,13),GC_85,MDL_MZ,MDL_WZ,PL(0
3299
3374
$ ,277),COEFS)
3300
3375
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,273),4,COEFS,4,4,WL(1,0,1
3301
3376
$ ,277))
3302
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,277),5,4,42,1,662,H)
3377
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,277),5,4,42,1,1,662,H)
3303
3378
C Coefficient construction for loop diagram with ID 151
3304
3379
CALL VSS1L2_1(PL(0,275),W(1,13),GC_79,MDL_MZ,MDL_WZ,PL(0
3305
3380
$ ,278),COEFS)
3306
3381
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,275),4,COEFS,1,4,WL(1,0,1
3307
3382
$ ,278))
3308
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,278),4,4,42,1,663,H)
3383
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,278),4,4,42,1,1,663,H)
3309
3384
C Coefficient construction for loop diagram with ID 152
3310
3385
CALL FFS1_3L1_3(PL(0,59),W(1,3),GC_13,GC_22,MDL_MW,MDL_WW
3311
3386
$ ,PL(0,279),COEFS)
3315
3390
$ ,280),COEFS)
3316
3391
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,279),1,COEFS,1,1,WL(1,0,1
3317
3392
$ ,280))
3318
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,280),2,1,42,1,664,H)
3393
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,280),2,1,42,1,1,664,H)
3319
3394
C Coefficient construction for loop diagram with ID 153
3320
3395
CALL FFV2L1_3(PL(0,59),W(1,3),GC_124,MDL_MW,MDL_WW,PL(0,281)
3321
3396
$ ,COEFS)
3325
3400
$ ,282),COEFS)
3326
3401
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,281),1,COEFS,4,1,WL(1,0,1
3327
3402
$ ,282))
3328
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,282),4,1,42,1,665,H)
3403
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,282),4,1,42,1,1,665,H)
3329
3404
C Coefficient construction for loop diagram with ID 154
3330
3405
CALL FFV2L1_3(PL(0,63),W(1,3),GC_124,MDL_MW,MDL_WW,PL(0,283)
3331
3406
$ ,COEFS)
3335
3410
$ ,284),COEFS)
3336
3411
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,283),1,COEFS,4,1,WL(1,0,1
3337
3412
$ ,284))
3338
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,284),3,1,43,1,666,H)
3413
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,284),3,1,43,1,1,666,H)
3339
3414
C Coefficient construction for loop diagram with ID 155
3340
3415
CALL FFS1_3L1_3(PL(0,63),W(1,3),GC_13,GC_22,MDL_MW,MDL_WW
3341
3416
$ ,PL(0,285),COEFS)
3345
3420
$ ,286),COEFS)
3346
3421
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,285),1,COEFS,1,1,WL(1,0,1
3347
3422
$ ,286))
3348
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,286),2,1,43,1,667,H)
3423
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,286),2,1,43,1,1,667,H)
3349
3424
C Coefficient construction for loop diagram with ID 156
3350
3425
CALL VSS1L1_3(PL(0,283),W(1,13),GC_55,MDL_MH,MDL_WH,PL(0
3351
3426
$ ,287),COEFS)
3352
3427
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,283),1,COEFS,4,1,WL(1,0,1
3353
3428
$ ,287))
3354
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,287),4,1,43,1,668,H)
3429
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,287),4,1,43,1,1,668,H)
3355
3430
C Coefficient construction for loop diagram with ID 157
3356
3431
CALL SSS1L1_3(PL(0,285),W(1,13),GC_86,MDL_MH,MDL_WH,PL(0
3357
3432
$ ,288),COEFS)
3358
3433
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,285),1,COEFS,1,1,WL(1,0,1
3359
3434
$ ,288))
3360
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,288),1,1,43,1,669,H)
3435
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,288),1,1,43,1,1,669,H)
3361
3436
C Coefficient construction for loop diagram with ID 158
3362
3437
CALL FFV1L1P0_3(PL(0,51),W(1,2),GC_2,ZERO,ZERO,PL(0,289)
3363
3438
$ ,COEFS)
3371
3446
$ ,COEFS)
3372
3447
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,290),4,COEFS,4,4,WL(1,0,1
3373
3448
$ ,291))
3374
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,291),2,4,6,1,670,H)
3449
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,291),2,4,6,1,1,670,H)
3375
3450
C Coefficient construction for loop diagram with ID 159
3376
3451
CALL FFV1L3_1(PL(0,289),W(1,3),GC_1,MDL_MD,ZERO,PL(0,292)
3377
3452
$ ,COEFS)
3381
3456
$ ,COEFS)
3382
3457
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,292),4,COEFS,4,4,WL(1,0,1
3383
3458
$ ,293))
3384
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,293),2,4,9,1,671,H)
3459
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,293),2,4,9,1,1,671,H)
3385
3460
C Coefficient construction for loop diagram with ID 160
3386
3461
CALL FFV2_5L1_3(PL(0,51),W(1,2),GC_69,GC_76,MDL_MZ,MDL_WZ
3387
3462
$ ,PL(0,294),COEFS)
3395
3470
$ ,COEFS)
3396
3471
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,295),4,COEFS,4,4,WL(1,0,1
3397
3472
$ ,296))
3398
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,296),4,4,7,1,672,H)
3473
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,296),4,4,7,1,1,672,H)
3399
3474
C Coefficient construction for loop diagram with ID 161
3400
3475
CALL FFV2_3L3_1(PL(0,294),W(1,3),GC_68,GC_76,MDL_MD,ZERO
3401
3476
$ ,PL(0,297),COEFS)
3405
3480
$ ,COEFS)
3406
3481
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,297),4,COEFS,4,4,WL(1,0,1
3407
3482
$ ,298))
3408
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,298),4,4,10,1,673,H)
3483
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,298),4,4,10,1,1,673,H)
3409
3484
C Coefficient construction for loop diagram with ID 162
3410
3485
CALL FFS2L1_3(PL(0,51),W(1,2),GC_123,MDL_MZ,MDL_WZ,PL(0,299)
3411
3486
$ ,COEFS)
3419
3494
$ ,COEFS)
3420
3495
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,300),4,COEFS,4,4,WL(1,0,1
3421
3496
$ ,301))
3422
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,301),2,4,7,1,674,H)
3497
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,301),2,4,7,1,1,674,H)
3423
3498
C Coefficient construction for loop diagram with ID 163
3424
3499
CALL FFS2L3_1(PL(0,299),W(1,3),GC_104,MDL_MD,ZERO,PL(0,302)
3425
3500
$ ,COEFS)
3429
3504
$ ,COEFS)
3430
3505
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,302),4,COEFS,4,4,WL(1,0,1
3431
3506
$ ,303))
3432
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,303),2,4,10,1,675,H)
3507
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,303),2,4,10,1,1,675,H)
3433
3508
C Coefficient construction for loop diagram with ID 164
3434
3509
CALL FFS4L1_3(PL(0,51),W(1,2),GC_122,MDL_MH,MDL_WH,PL(0,304)
3435
3510
$ ,COEFS)
3443
3518
$ ,COEFS)
3444
3519
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,305),4,COEFS,4,4,WL(1,0,1
3445
3520
$ ,306))
3446
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,306),2,4,8,1,676,H)
3521
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,306),2,4,8,1,1,676,H)
3447
3522
C Coefficient construction for loop diagram with ID 165
3448
3523
CALL FFS4L3_1(PL(0,304),W(1,3),GC_105,MDL_MD,ZERO,PL(0,307)
3449
3524
$ ,COEFS)
3453
3528
$ ,COEFS)
3454
3529
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,307),4,COEFS,4,4,WL(1,0,1
3455
3530
$ ,308))
3456
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,308),2,4,11,1,677,H)
3531
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,308),2,4,11,1,1,677,H)
3457
3532
C Coefficient construction for loop diagram with ID 166
3458
3533
CALL FFV1L1P0_3(PL(0,55),W(1,2),GC_2,ZERO,ZERO,PL(0,309)
3459
3534
$ ,COEFS)
3467
3542
$ ,PL(0,311),COEFS)
3468
3543
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,310),4,COEFS,4,4,WL(1,0,1
3469
3544
$ ,311))
3470
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,311),4,4,16,1,678,H)
3545
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,311),4,4,16,1,1,678,H)
3471
3546
C Coefficient construction for loop diagram with ID 167
3472
3547
CALL FFV1L3_1(PL(0,309),W(1,3),GC_1,MDL_MD,ZERO,PL(0,312)
3473
3548
$ ,COEFS)
3477
3552
$ ,PL(0,313),COEFS)
3478
3553
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,312),4,COEFS,4,4,WL(1,0,1
3479
3554
$ ,313))
3480
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,313),4,4,13,1,679,H)
3555
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,313),4,4,13,1,1,679,H)
3481
3556
C Coefficient construction for loop diagram with ID 168
3482
3557
CALL FFV2_5L1_3(PL(0,55),W(1,2),GC_69,GC_76,MDL_MZ,MDL_WZ
3483
3558
$ ,PL(0,314),COEFS)
3491
3566
$ ,PL(0,316),COEFS)
3492
3567
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,315),4,COEFS,4,4,WL(1,0,1
3493
3568
$ ,316))
3494
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,316),6,4,44,1,680,H)
3569
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,316),6,4,44,1,1,680,H)
3495
3570
C Coefficient construction for loop diagram with ID 169
3496
3571
CALL FFV2_3L3_1(PL(0,314),W(1,3),GC_68,GC_76,MDL_MD,ZERO
3497
3572
$ ,PL(0,317),COEFS)
3501
3576
$ ,PL(0,318),COEFS)
3502
3577
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,317),4,COEFS,4,4,WL(1,0,1
3503
3578
$ ,318))
3504
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,318),6,4,45,1,681,H)
3579
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,318),6,4,45,1,1,681,H)
3505
3580
C Coefficient construction for loop diagram with ID 170
3506
3581
CALL FFS2L1_3(PL(0,55),W(1,2),GC_123,MDL_MZ,MDL_WZ,PL(0,319)
3507
3582
$ ,COEFS)
3515
3590
$ ,PL(0,321),COEFS)
3516
3591
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,320),4,COEFS,4,4,WL(1,0,1
3517
3592
$ ,321))
3518
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,321),4,4,44,1,682,H)
3593
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,321),4,4,44,1,1,682,H)
3519
3594
C Coefficient construction for loop diagram with ID 171
3520
3595
CALL FFS2L3_1(PL(0,319),W(1,3),GC_104,MDL_MD,ZERO,PL(0,322)
3521
3596
$ ,COEFS)
3525
3600
$ ,PL(0,323),COEFS)
3526
3601
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,322),4,COEFS,4,4,WL(1,0,1
3527
3602
$ ,323))
3528
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,323),4,4,45,1,683,H)
3603
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,323),4,4,45,1,1,683,H)
3529
3604
C Coefficient construction for loop diagram with ID 172
3530
3605
CALL FFS4L1_3(PL(0,55),W(1,2),GC_122,MDL_MH,MDL_WH,PL(0,324)
3531
3606
$ ,COEFS)
3539
3614
$ ,PL(0,326),COEFS)
3540
3615
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,325),4,COEFS,4,4,WL(1,0,1
3541
3616
$ ,326))
3542
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,326),4,4,46,1,684,H)
3617
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,326),4,4,46,1,1,684,H)
3543
3618
C Coefficient construction for loop diagram with ID 173
3544
3619
CALL FFS4L3_1(PL(0,324),W(1,3),GC_105,MDL_MD,ZERO,PL(0,327)
3545
3620
$ ,COEFS)
3549
3624
$ ,PL(0,328),COEFS)
3550
3625
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,327),4,COEFS,4,4,WL(1,0,1
3551
3626
$ ,328))
3552
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,328),4,4,47,1,685,H)
3627
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,328),4,4,47,1,1,685,H)
3553
3628
C Coefficient construction for loop diagram with ID 174
3554
3629
CALL FFV1L1P0_3(PL(0,59),W(1,2),GC_2,ZERO,ZERO,PL(0,329)
3555
3630
$ ,COEFS)
3563
3638
$ ,331),COEFS)
3564
3639
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,330),1,COEFS,4,1,WL(1,0,1
3565
3640
$ ,331))
3566
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,331),2,1,16,1,686,H)
3641
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,331),2,1,16,1,1,686,H)
3567
3642
C Coefficient construction for loop diagram with ID 175
3568
3643
CALL FFV1L3_1(PL(0,329),W(1,3),GC_1,MDL_MD,ZERO,PL(0,332)
3569
3644
$ ,COEFS)
3573
3648
$ ,333),COEFS)
3574
3649
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,332),1,COEFS,4,1,WL(1,0,1
3575
3650
$ ,333))
3576
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,333),2,1,13,1,687,H)
3651
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,333),2,1,13,1,1,687,H)
3577
3652
C Coefficient construction for loop diagram with ID 176
3578
3653
CALL FFV2_5L1_3(PL(0,59),W(1,2),GC_69,GC_76,MDL_MZ,MDL_WZ
3579
3654
$ ,PL(0,334),COEFS)
3587
3662
$ ,336),COEFS)
3588
3663
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,335),1,COEFS,4,1,WL(1,0,1
3589
3664
$ ,336))
3590
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,336),4,1,44,1,688,H)
3665
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,336),4,1,44,1,1,688,H)
3591
3666
C Coefficient construction for loop diagram with ID 177
3592
3667
CALL FFV2_3L3_1(PL(0,334),W(1,3),GC_68,GC_76,MDL_MD,ZERO
3593
3668
$ ,PL(0,337),COEFS)
3597
3672
$ ,338),COEFS)
3598
3673
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,337),1,COEFS,4,1,WL(1,0,1
3599
3674
$ ,338))
3600
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,338),4,1,45,1,689,H)
3675
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,338),4,1,45,1,1,689,H)
3601
3676
C Coefficient construction for loop diagram with ID 178
3602
3677
CALL FFS2L1_3(PL(0,59),W(1,2),GC_123,MDL_MZ,MDL_WZ,PL(0,339)
3603
3678
$ ,COEFS)
3611
3686
$ ,341),COEFS)
3612
3687
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,340),1,COEFS,4,1,WL(1,0,1
3613
3688
$ ,341))
3614
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,341),2,1,44,1,690,H)
3689
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,341),2,1,44,1,1,690,H)
3615
3690
C Coefficient construction for loop diagram with ID 179
3616
3691
CALL FFS2L3_1(PL(0,339),W(1,3),GC_104,MDL_MD,ZERO,PL(0,342)
3617
3692
$ ,COEFS)
3621
3696
$ ,343),COEFS)
3622
3697
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,342),1,COEFS,4,1,WL(1,0,1
3623
3698
$ ,343))
3624
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,343),2,1,45,1,691,H)
3699
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,343),2,1,45,1,1,691,H)
3625
3700
C Coefficient construction for loop diagram with ID 180
3626
3701
CALL FFS4L1_3(PL(0,59),W(1,2),GC_122,MDL_MH,MDL_WH,PL(0,344)
3627
3702
$ ,COEFS)
3635
3710
$ ,346),COEFS)
3636
3711
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,345),1,COEFS,4,1,WL(1,0,1
3637
3712
$ ,346))
3638
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,346),2,1,46,1,692,H)
3713
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,346),2,1,46,1,1,692,H)
3639
3714
C Coefficient construction for loop diagram with ID 181
3640
3715
CALL FFS4L3_1(PL(0,344),W(1,3),GC_105,MDL_MD,ZERO,PL(0,347)
3641
3716
$ ,COEFS)
3645
3720
$ ,348),COEFS)
3646
3721
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,347),1,COEFS,4,1,WL(1,0,1
3647
3722
$ ,348))
3648
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,348),2,1,47,1,693,H)
3723
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,348),2,1,47,1,1,693,H)
3649
3724
C Coefficient construction for loop diagram with ID 182
3650
3725
CALL FFV1L1P0_3(PL(0,63),W(1,2),GC_2,ZERO,ZERO,PL(0,349)
3651
3726
$ ,COEFS)
3659
3734
$ ,351),COEFS)
3660
3735
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,350),1,COEFS,4,1,WL(1,0,1
3661
3736
$ ,351))
3662
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,351),2,1,17,1,694,H)
3737
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,351),2,1,17,1,1,694,H)
3663
3738
C Coefficient construction for loop diagram with ID 183
3664
3739
CALL FFV1L3_1(PL(0,349),W(1,3),GC_1,MDL_MD,ZERO,PL(0,352)
3665
3740
$ ,COEFS)
3669
3744
$ ,353),COEFS)
3670
3745
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,352),1,COEFS,4,1,WL(1,0,1
3671
3746
$ ,353))
3672
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,353),2,1,14,1,695,H)
3747
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,353),2,1,14,1,1,695,H)
3673
3748
C Coefficient construction for loop diagram with ID 184
3674
3749
CALL FFV2_5L1_3(PL(0,63),W(1,2),GC_69,GC_76,MDL_MZ,MDL_WZ
3675
3750
$ ,PL(0,354),COEFS)
3683
3758
$ ,356),COEFS)
3684
3759
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,355),1,COEFS,4,1,WL(1,0,1
3685
3760
$ ,356))
3686
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,356),4,1,48,1,696,H)
3761
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,356),4,1,48,1,1,696,H)
3687
3762
C Coefficient construction for loop diagram with ID 185
3688
3763
CALL FFV2_3L3_1(PL(0,354),W(1,3),GC_68,GC_76,MDL_MD,ZERO
3689
3764
$ ,PL(0,357),COEFS)
3693
3768
$ ,358),COEFS)
3694
3769
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,357),1,COEFS,4,1,WL(1,0,1
3695
3770
$ ,358))
3696
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,358),4,1,49,1,697,H)
3771
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,358),4,1,49,1,1,697,H)
3697
3772
C Coefficient construction for loop diagram with ID 186
3698
3773
CALL FFS2L1_3(PL(0,63),W(1,2),GC_123,MDL_MZ,MDL_WZ,PL(0,359)
3699
3774
$ ,COEFS)
3707
3782
$ ,361),COEFS)
3708
3783
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,360),1,COEFS,4,1,WL(1,0,1
3709
3784
$ ,361))
3710
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,361),2,1,48,1,698,H)
3785
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,361),2,1,48,1,1,698,H)
3711
3786
C Coefficient construction for loop diagram with ID 187
3712
3787
CALL FFS2L3_1(PL(0,359),W(1,3),GC_104,MDL_MD,ZERO,PL(0,362)
3713
3788
$ ,COEFS)
3717
3792
$ ,363),COEFS)
3718
3793
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,362),1,COEFS,4,1,WL(1,0,1
3719
3794
$ ,363))
3720
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,363),2,1,49,1,699,H)
3795
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,363),2,1,49,1,1,699,H)
3721
3796
C Coefficient construction for loop diagram with ID 188
3722
3797
CALL FFS4L1_3(PL(0,63),W(1,2),GC_122,MDL_MH,MDL_WH,PL(0,364)
3723
3798
$ ,COEFS)
3731
3806
$ ,366),COEFS)
3732
3807
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,365),1,COEFS,4,1,WL(1,0,1
3733
3808
$ ,366))
3734
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,366),2,1,50,1,700,H)
3809
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,366),2,1,50,1,1,700,H)
3735
3810
C Coefficient construction for loop diagram with ID 189
3736
3811
CALL FFS4L3_1(PL(0,364),W(1,3),GC_105,MDL_MD,ZERO,PL(0,367)
3737
3812
$ ,COEFS)
3741
3816
$ ,368),COEFS)
3742
3817
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,367),1,COEFS,4,1,WL(1,0,1
3743
3818
$ ,368))
3744
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,368),2,1,51,1,701,H)
3819
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,368),2,1,51,1,1,701,H)
3745
3820
C Coefficient construction for loop diagram with ID 190
3746
3821
CALL VVS1L2_1(PL(0,314),W(1,17),GC_99,MDL_MZ,MDL_WZ,PL(0
3747
3822
$ ,369),COEFS)
3748
3823
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,314),4,COEFS,4,4,WL(1,0,1
3749
3824
$ ,369))
3750
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,369),5,4,52,1,702,H)
3825
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,369),5,4,52,1,1,702,H)
3751
3826
C Coefficient construction for loop diagram with ID 191
3752
3827
CALL VSS1L2_1(PL(0,319),W(1,17),GC_78,MDL_MZ,MDL_WZ,PL(0
3753
3828
$ ,370),COEFS)
3754
3829
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,319),4,COEFS,1,4,WL(1,0,1
3755
3830
$ ,370))
3756
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,370),4,4,52,1,703,H)
3831
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,370),4,4,52,1,1,703,H)
3757
3832
C Coefficient construction for loop diagram with ID 192
3758
3833
CALL VVS1L3_1(PL(0,324),W(1,15),GC_99,MDL_MZ,MDL_WZ,PL(0
3759
3834
$ ,371),COEFS)
3760
3835
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,324),4,COEFS,1,4,WL(1,0,1
3761
3836
$ ,371))
3762
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,371),2,4,53,1,704,H)
3837
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,371),2,4,53,1,1,704,H)
3763
3838
C Coefficient construction for loop diagram with ID 193
3764
3839
CALL VSS1L3_1(PL(0,324),W(1,16),GC_78,MDL_MZ,MDL_WZ,PL(0
3765
3840
$ ,372),COEFS)
3766
3841
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,324),4,COEFS,1,4,WL(1,0,1
3767
3842
$ ,372))
3768
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,372),4,4,53,1,705,H)
3843
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,372),4,4,53,1,1,705,H)
3769
3844
C Coefficient construction for loop diagram with ID 194
3770
3845
CALL VSS1L1_2(PL(0,334),W(1,17),GC_78,MDL_MZ,MDL_WZ,PL(0
3771
3846
$ ,373),COEFS)
3772
3847
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,334),1,COEFS,4,1,WL(1,0,1
3773
3848
$ ,373))
3774
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,373),4,1,52,1,706,H)
3849
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,373),4,1,52,1,1,706,H)
3775
3850
C Coefficient construction for loop diagram with ID 195
3776
3851
CALL SSS1L2_1(PL(0,339),W(1,17),GC_86,MDL_MZ,MDL_WZ,PL(0
3777
3852
$ ,374),COEFS)
3778
3853
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,339),1,COEFS,1,1,WL(1,0,1
3779
3854
$ ,374))
3780
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,374),1,1,52,1,707,H)
3855
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,374),1,1,52,1,1,707,H)
3781
3856
C Coefficient construction for loop diagram with ID 196
3782
3857
CALL VSS1L3_2(PL(0,344),W(1,15),GC_78,MDL_MZ,MDL_WZ,PL(0
3783
3858
$ ,375),COEFS)
3784
3859
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,344),1,COEFS,1,1,WL(1,0,1
3785
3860
$ ,375))
3786
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,375),2,1,53,1,708,H)
3861
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,375),2,1,53,1,1,708,H)
3787
3862
C Coefficient construction for loop diagram with ID 197
3788
3863
CALL SSS1L3_1(PL(0,344),W(1,16),GC_86,MDL_MZ,MDL_WZ,PL(0
3789
3864
$ ,376),COEFS)
3790
3865
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,344),1,COEFS,1,1,WL(1,0,1
3791
3866
$ ,376))
3792
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,376),1,1,53,1,709,H)
3867
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,376),1,1,53,1,1,709,H)
3793
3868
C Coefficient construction for loop diagram with ID 198
3794
3869
CALL VVS1L1_3(PL(0,354),W(1,15),GC_99,MDL_MH,MDL_WH,PL(0
3795
3870
$ ,377),COEFS)
3796
3871
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,354),1,COEFS,4,1,WL(1,0,1
3797
3872
$ ,377))
3798
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,377),3,1,54,1,710,H)
3873
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,377),3,1,54,1,1,710,H)
3799
3874
C Coefficient construction for loop diagram with ID 199
3800
3875
CALL VSS1L1_3(PL(0,354),W(1,16),GC_78,MDL_MH,MDL_WH,PL(0
3801
3876
$ ,378),COEFS)
3802
3877
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,354),1,COEFS,4,1,WL(1,0,1
3803
3878
$ ,378))
3804
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,378),4,1,54,1,711,H)
3879
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,378),4,1,54,1,1,711,H)
3805
3880
C Coefficient construction for loop diagram with ID 200
3806
3881
CALL VSS1L2_3(PL(0,359),W(1,15),GC_78,MDL_MH,MDL_WH,PL(0
3807
3882
$ ,379),COEFS)
3808
3883
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,359),1,COEFS,1,1,WL(1,0,1
3809
3884
$ ,379))
3810
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,379),2,1,54,1,712,H)
3885
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,379),2,1,54,1,1,712,H)
3811
3886
C Coefficient construction for loop diagram with ID 201
3812
3887
CALL SSS1L1_3(PL(0,359),W(1,16),GC_86,MDL_MH,MDL_WH,PL(0
3813
3888
$ ,380),COEFS)
3814
3889
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,359),1,COEFS,1,1,WL(1,0,1
3815
3890
$ ,380))
3816
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,380),1,1,54,1,713,H)
3891
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,380),1,1,54,1,1,713,H)
3817
3892
C Coefficient construction for loop diagram with ID 202
3818
3893
CALL SSS1L2_1(PL(0,364),W(1,17),GC_87,MDL_MH,MDL_WH,PL(0
3819
3894
$ ,381),COEFS)
3820
3895
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,364),1,COEFS,1,1,WL(1,0,1
3821
3896
$ ,381))
3822
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,381),1,1,55,1,714,H)
3897
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,381),1,1,55,1,1,714,H)
3823
3898
C Coefficient construction for loop diagram with ID 203
3824
3899
CALL FFV1L2_1(PL(0,98),W(1,14),GC_2,MDL_MU,ZERO,PL(0,382)
3825
3900
$ ,COEFS)
3826
3901
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,98),4,COEFS,4,4,WL(1,0,1
3827
3902
$ ,382))
3828
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,382),2,4,5,1,715,H)
3903
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,382),2,4,5,1,1,715,H)
3829
3904
C Coefficient construction for loop diagram with ID 204
3830
3905
CALL FFV2_5L2_1(PL(0,98),W(1,15),GC_69,GC_76,MDL_MU,ZERO
3831
3906
$ ,PL(0,383),COEFS)
3832
3907
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,98),4,COEFS,4,4,WL(1,0,1
3833
3908
$ ,383))
3834
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,383),2,4,5,1,716,H)
3909
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,383),2,4,5,1,1,716,H)
3835
3910
C Coefficient construction for loop diagram with ID 205
3836
3911
CALL FFS2L2_1(PL(0,98),W(1,16),GC_123,MDL_MU,ZERO,PL(0,384)
3837
3912
$ ,COEFS)
3838
3913
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,98),4,COEFS,4,4,WL(1,0,1
3839
3914
$ ,384))
3840
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,384),2,4,5,1,717,H)
3915
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,384),2,4,5,1,1,717,H)
3841
3916
C Coefficient construction for loop diagram with ID 206
3842
3917
CALL FFS4L2_1(PL(0,98),W(1,17),GC_122,MDL_MU,ZERO,PL(0,385)
3843
3918
$ ,COEFS)
3844
3919
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,98),4,COEFS,4,4,WL(1,0,1
3845
3920
$ ,385))
3846
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,385),2,4,5,1,718,H)
3921
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,385),2,4,5,1,1,718,H)
3847
3922
C Coefficient construction for loop diagram with ID 207
3848
3923
CALL FFV1L2_1(PL(0,101),W(1,14),GC_2,MDL_MU,ZERO,PL(0,386)
3849
3924
$ ,COEFS)
3850
3925
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,101),4,COEFS,4,4,WL(1,0,1
3851
3926
$ ,386))
3852
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,386),4,4,20,1,719,H)
3927
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,386),4,4,20,1,1,719,H)
3853
3928
C Coefficient construction for loop diagram with ID 208
3854
3929
CALL FFV2_5L2_1(PL(0,101),W(1,15),GC_69,GC_76,MDL_MU,ZERO
3855
3930
$ ,PL(0,387),COEFS)
3856
3931
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,101),4,COEFS,4,4,WL(1,0,1
3857
3932
$ ,387))
3858
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,387),4,4,20,1,720,H)
3933
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,387),4,4,20,1,1,720,H)
3859
3934
C Coefficient construction for loop diagram with ID 209
3860
3935
CALL FFS2L2_1(PL(0,101),W(1,16),GC_123,MDL_MU,ZERO,PL(0,388)
3861
3936
$ ,COEFS)
3862
3937
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,101),4,COEFS,4,4,WL(1,0,1
3863
3938
$ ,388))
3864
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,388),4,4,20,1,721,H)
3939
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,388),4,4,20,1,1,721,H)
3865
3940
C Coefficient construction for loop diagram with ID 210
3866
3941
CALL FFS4L2_1(PL(0,101),W(1,17),GC_122,MDL_MU,ZERO,PL(0,389)
3867
3942
$ ,COEFS)
3868
3943
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,101),4,COEFS,4,4,WL(1,0,1
3869
3944
$ ,389))
3870
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,389),4,4,20,1,722,H)
3945
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,389),4,4,20,1,1,722,H)
3871
3946
C Coefficient construction for loop diagram with ID 211
3872
3947
CALL FFV1L2_1(PL(0,104),W(1,14),GC_2,MDL_MU,ZERO,PL(0,390)
3873
3948
$ ,COEFS)
3874
3949
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,104),4,COEFS,4,4,WL(1,0,1
3875
3950
$ ,390))
3876
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,390),2,4,20,1,723,H)
3951
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,390),2,4,20,1,1,723,H)
3877
3952
C Coefficient construction for loop diagram with ID 212
3878
3953
CALL FFV2_5L2_1(PL(0,104),W(1,15),GC_69,GC_76,MDL_MU,ZERO
3879
3954
$ ,PL(0,391),COEFS)
3880
3955
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,104),4,COEFS,4,4,WL(1,0,1
3881
3956
$ ,391))
3882
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,391),2,4,20,1,724,H)
3957
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,391),2,4,20,1,1,724,H)
3883
3958
C Coefficient construction for loop diagram with ID 213
3884
3959
CALL FFS2L2_1(PL(0,104),W(1,16),GC_123,MDL_MU,ZERO,PL(0,392)
3885
3960
$ ,COEFS)
3886
3961
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,104),4,COEFS,4,4,WL(1,0,1
3887
3962
$ ,392))
3888
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,392),2,4,20,1,725,H)
3963
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,392),2,4,20,1,1,725,H)
3889
3964
C Coefficient construction for loop diagram with ID 214
3890
3965
CALL FFS4L2_1(PL(0,104),W(1,17),GC_122,MDL_MU,ZERO,PL(0,393)
3891
3966
$ ,COEFS)
3892
3967
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,104),4,COEFS,4,4,WL(1,0,1
3893
3968
$ ,393))
3894
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,393),2,4,20,1,726,H)
3969
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,393),2,4,20,1,1,726,H)
3895
3970
C Coefficient construction for loop diagram with ID 215
3896
3971
CALL FFV1L2_1(PL(0,107),W(1,14),GC_2,MDL_MU,ZERO,PL(0,394)
3897
3972
$ ,COEFS)
3898
3973
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,107),4,COEFS,4,4,WL(1,0,1
3899
3974
$ ,394))
3900
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,394),2,4,21,1,727,H)
3975
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,394),2,4,21,1,1,727,H)
3901
3976
C Coefficient construction for loop diagram with ID 216
3902
3977
CALL FFV2_5L2_1(PL(0,107),W(1,15),GC_69,GC_76,MDL_MU,ZERO
3903
3978
$ ,PL(0,395),COEFS)
3904
3979
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,107),4,COEFS,4,4,WL(1,0,1
3905
3980
$ ,395))
3906
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,395),2,4,21,1,728,H)
3981
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,395),2,4,21,1,1,728,H)
3907
3982
C Coefficient construction for loop diagram with ID 217
3908
3983
CALL FFS2L2_1(PL(0,107),W(1,16),GC_123,MDL_MU,ZERO,PL(0,396)
3909
3984
$ ,COEFS)
3910
3985
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,107),4,COEFS,4,4,WL(1,0,1
3911
3986
$ ,396))
3912
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,396),2,4,21,1,729,H)
3987
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,396),2,4,21,1,1,729,H)
3913
3988
C Coefficient construction for loop diagram with ID 218
3914
3989
CALL FFS4L2_1(PL(0,107),W(1,17),GC_122,MDL_MU,ZERO,PL(0,397)
3915
3990
$ ,COEFS)
3916
3991
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,107),4,COEFS,4,4,WL(1,0,1
3917
3992
$ ,397))
3918
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,397),2,4,21,1,730,H)
3993
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,397),2,4,21,1,1,730,H)
3919
3994
C Coefficient construction for loop diagram with ID 219
3920
3995
CALL FFV2L2_3(PL(0,98),W(1,4),GC_59,MDL_MW,MDL_WW,PL(0,398)
3921
3996
$ ,COEFS)
3925
4000
$ ,COEFS)
3926
4001
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,398),4,COEFS,4,4,WL(1,0,1
3927
4002
$ ,399))
3928
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,399),4,4,4,1,731,H)
4003
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,399),4,4,4,1,1,731,H)
3929
4004
C Coefficient construction for loop diagram with ID 220
3930
4005
CALL FFV2L3_1(PL(0,267),W(1,2),GC_59,MDL_MD,ZERO,PL(0,400)
3931
4006
$ ,COEFS)
3935
4010
$ ,COEFS)
3936
4011
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,400),4,COEFS,4,4,WL(1,0,1
3937
4012
$ ,401))
3938
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,401),4,4,12,1,732,H)
4013
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,401),4,4,12,1,1,732,H)
3939
4014
C Coefficient construction for loop diagram with ID 221
3940
4015
CALL FFS1_3L2_3(PL(0,98),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
3941
4016
$ ,PL(0,402),COEFS)
3945
4020
$ ,PL(0,403),COEFS)
3946
4021
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,402),4,COEFS,1,4,WL(1,0,1
3947
4022
$ ,403))
3948
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,403),2,4,4,1,733,H)
4023
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,403),2,4,4,1,1,733,H)
3949
4024
C Coefficient construction for loop diagram with ID 222
3950
4025
CALL FFS1_3L3_1(PL(0,269),W(1,2),GC_31,GC_40,MDL_MD,ZERO
3951
4026
$ ,PL(0,404),COEFS)
3955
4030
$ ,COEFS)
3956
4031
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,404),4,COEFS,4,4,WL(1,0,1
3957
4032
$ ,405))
3958
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,405),2,4,12,1,734,H)
4033
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,405),2,4,12,1,1,734,H)
3959
4034
C Coefficient construction for loop diagram with ID 223
3960
4035
CALL FFV2L2_3(PL(0,101),W(1,4),GC_59,MDL_MW,MDL_WW,PL(0,406)
3961
4036
$ ,COEFS)
3965
4040
$ ,COEFS)
3966
4041
CALL ML5_0_UPDATE_WL_5_1(WL(1,0,1,406),4,COEFS,4,4,WL(1,0,1
3967
4042
$ ,407))
3968
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,407),6,4,56,1,735,H)
4043
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,407),6,4,56,1,1,735,H)
3969
4044
C Coefficient construction for loop diagram with ID 224
3970
4045
CALL FFV2L3_1(PL(0,273),W(1,2),GC_59,MDL_MD,ZERO,PL(0,408)
3971
4046
$ ,COEFS)
3975
4050
$ ,PL(0,409),COEFS)
3976
4051
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,408),4,COEFS,4,4,WL(1,0,1
3977
4052
$ ,409))
3978
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,409),6,4,57,1,736,H)
4053
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,409),6,4,57,1,1,736,H)
3979
4054
C Coefficient construction for loop diagram with ID 225
3980
4055
CALL FFS1_3L2_3(PL(0,101),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
3981
4056
$ ,PL(0,410),COEFS)
3985
4060
$ ,PL(0,411),COEFS)
3986
4061
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,410),4,COEFS,1,4,WL(1,0,1
3987
4062
$ ,411))
3988
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,411),4,4,56,1,737,H)
4063
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,411),4,4,56,1,1,737,H)
3989
4064
C Coefficient construction for loop diagram with ID 226
3990
4065
CALL FFS1_3L3_1(PL(0,275),W(1,2),GC_31,GC_40,MDL_MD,ZERO
3991
4066
$ ,PL(0,412),COEFS)
3995
4070
$ ,PL(0,413),COEFS)
3996
4071
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,412),4,COEFS,4,4,WL(1,0,1
3997
4072
$ ,413))
3998
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,413),4,4,57,1,738,H)
4073
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,413),4,4,57,1,1,738,H)
3999
4074
C Coefficient construction for loop diagram with ID 227
4000
4075
CALL FFV2L2_3(PL(0,104),W(1,4),GC_59,MDL_MW,MDL_WW,PL(0,414)
4001
4076
$ ,COEFS)
4005
4080
$ ,COEFS)
4006
4081
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,414),4,COEFS,4,4,WL(1,0,1
4007
4082
$ ,415))
4008
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,415),4,4,56,1,739,H)
4083
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,415),4,4,56,1,1,739,H)
4009
4084
C Coefficient construction for loop diagram with ID 228
4010
4085
CALL FFV2L3_1(PL(0,281),W(1,2),GC_59,MDL_MD,ZERO,PL(0,416)
4011
4086
$ ,COEFS)
4015
4090
$ ,417),COEFS)
4016
4091
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,416),1,COEFS,4,1,WL(1,0,1
4017
4092
$ ,417))
4018
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,417),4,1,57,1,740,H)
4093
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,417),4,1,57,1,1,740,H)
4019
4094
C Coefficient construction for loop diagram with ID 229
4020
4095
CALL FFS1_3L2_3(PL(0,104),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
4021
4096
$ ,PL(0,418),COEFS)
4025
4100
$ ,PL(0,419),COEFS)
4026
4101
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,418),4,COEFS,1,4,WL(1,0,1
4027
4102
$ ,419))
4028
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,419),2,4,56,1,741,H)
4103
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,419),2,4,56,1,1,741,H)
4029
4104
C Coefficient construction for loop diagram with ID 230
4030
4105
CALL FFS1_3L3_1(PL(0,279),W(1,2),GC_31,GC_40,MDL_MD,ZERO
4031
4106
$ ,PL(0,420),COEFS)
4035
4110
$ ,421),COEFS)
4036
4111
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,420),1,COEFS,4,1,WL(1,0,1
4037
4112
$ ,421))
4038
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,421),2,1,57,1,742,H)
4113
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,421),2,1,57,1,1,742,H)
4039
4114
C Coefficient construction for loop diagram with ID 231
4040
4115
CALL FFV2L2_3(PL(0,107),W(1,4),GC_59,MDL_MW,MDL_WW,PL(0,422)
4041
4116
$ ,COEFS)
4045
4120
$ ,COEFS)
4046
4121
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,422),4,COEFS,4,4,WL(1,0,1
4047
4122
$ ,423))
4048
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,423),4,4,58,1,743,H)
4123
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,423),4,4,58,1,1,743,H)
4049
4124
C Coefficient construction for loop diagram with ID 232
4050
4125
CALL FFV2L3_1(PL(0,283),W(1,2),GC_59,MDL_MD,ZERO,PL(0,424)
4051
4126
$ ,COEFS)
4055
4130
$ ,425),COEFS)
4056
4131
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,424),1,COEFS,4,1,WL(1,0,1
4057
4132
$ ,425))
4058
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,425),4,1,59,1,744,H)
4133
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,425),4,1,59,1,1,744,H)
4059
4134
C Coefficient construction for loop diagram with ID 233
4060
4135
CALL FFS1_3L2_3(PL(0,107),W(1,4),GC_31,GC_40,MDL_MW,MDL_WW
4061
4136
$ ,PL(0,426),COEFS)
4065
4140
$ ,PL(0,427),COEFS)
4066
4141
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,426),4,COEFS,1,4,WL(1,0,1
4067
4142
$ ,427))
4068
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,427),2,4,58,1,745,H)
4143
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,427),2,4,58,1,1,745,H)
4069
4144
C Coefficient construction for loop diagram with ID 234
4070
4145
CALL FFS1_3L3_1(PL(0,285),W(1,2),GC_31,GC_40,MDL_MD,ZERO
4071
4146
$ ,PL(0,428),COEFS)
4075
4150
$ ,429),COEFS)
4076
4151
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,428),1,COEFS,4,1,WL(1,0,1
4077
4152
$ ,429))
4078
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,429),2,1,59,1,746,H)
4153
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,429),2,1,59,1,1,746,H)
4079
4154
C Coefficient construction for loop diagram with ID 235
4080
4155
CALL FFV1L1P0_3(PL(0,67),W(1,3),GC_1,ZERO,ZERO,PL(0,430)
4081
4156
$ ,COEFS)
4089
4164
$ ,COEFS)
4090
4165
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,431),4,COEFS,4,4,WL(1,0,1
4091
4166
$ ,432))
4092
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,432),4,4,15,1,747,H)
4167
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,432),4,4,15,1,1,747,H)
4093
4168
C Coefficient construction for loop diagram with ID 236
4094
4169
CALL FFV1L1P0_3(PL(0,71),W(1,3),GC_1,ZERO,ZERO,PL(0,433)
4095
4170
$ ,COEFS)
4103
4178
$ ,PL(0,435),COEFS)
4104
4179
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,434),1,COEFS,4,1,WL(1,0,1
4105
4180
$ ,435))
4106
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,435),2,1,15,1,748,H)
4181
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,435),2,1,15,1,1,748,H)
4107
4182
C Coefficient construction for loop diagram with ID 237
4108
4183
CALL FFV2_3L1_3(PL(0,67),W(1,3),GC_68,GC_76,MDL_MZ,MDL_WZ
4109
4184
$ ,PL(0,436),COEFS)
4117
4192
$ ,COEFS)
4118
4193
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,437),4,COEFS,4,4,WL(1,0,1
4119
4194
$ ,438))
4120
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,438),6,4,60,1,749,H)
4195
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,438),6,4,60,1,1,749,H)
4121
4196
C Coefficient construction for loop diagram with ID 238
4122
4197
CALL FFV2_3L1_3(PL(0,71),W(1,3),GC_68,GC_76,MDL_MZ,MDL_WZ
4123
4198
$ ,PL(0,439),COEFS)
4131
4206
$ ,PL(0,441),COEFS)
4132
4207
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,440),1,COEFS,4,1,WL(1,0,1
4133
4208
$ ,441))
4134
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,441),4,1,60,1,750,H)
4209
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,441),4,1,60,1,1,750,H)
4135
4210
C Coefficient construction for loop diagram with ID 239
4136
4211
CALL FFS2L1_3(PL(0,67),W(1,3),GC_104,MDL_MZ,MDL_WZ,PL(0,442)
4137
4212
$ ,COEFS)
4145
4220
$ ,COEFS)
4146
4221
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,443),4,COEFS,4,4,WL(1,0,1
4147
4222
$ ,444))
4148
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,444),4,4,60,1,751,H)
4223
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,444),4,4,60,1,1,751,H)
4149
4224
C Coefficient construction for loop diagram with ID 240
4150
4225
CALL FFS2L1_3(PL(0,71),W(1,3),GC_104,MDL_MZ,MDL_WZ,PL(0,445)
4151
4226
$ ,COEFS)
4159
4234
$ ,PL(0,447),COEFS)
4160
4235
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,446),1,COEFS,4,1,WL(1,0,1
4161
4236
$ ,447))
4162
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,447),2,1,60,1,752,H)
4237
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,447),2,1,60,1,1,752,H)
4163
4238
C Coefficient construction for loop diagram with ID 241
4164
4239
CALL FFS4L1_3(PL(0,67),W(1,3),GC_105,MDL_MH,MDL_WH,PL(0,448)
4165
4240
$ ,COEFS)
4173
4248
$ ,COEFS)
4174
4249
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,449),4,COEFS,4,4,WL(1,0,1
4175
4250
$ ,450))
4176
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,450),4,4,61,1,753,H)
4251
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,450),4,4,61,1,1,753,H)
4177
4252
C Coefficient construction for loop diagram with ID 242
4178
4253
CALL FFS4L1_3(PL(0,71),W(1,3),GC_105,MDL_MH,MDL_WH,PL(0,451)
4179
4254
$ ,COEFS)
4187
4262
$ ,PL(0,453),COEFS)
4188
4263
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,452),1,COEFS,4,1,WL(1,0,1
4189
4264
$ ,453))
4190
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,453),2,1,61,1,754,H)
4265
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,453),2,1,61,1,1,754,H)
4191
4266
C Coefficient construction for loop diagram with ID 243
4192
4267
CALL FFV2L1_3(PL(0,67),W(1,2),GC_59,MDL_MW,MDL_WW,PL(0,454)
4193
4268
$ ,COEFS)
4201
4276
$ ,COEFS)
4202
4277
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,455),4,COEFS,4,4,WL(1,0,1
4203
4278
$ ,456))
4204
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,456),6,4,62,1,755,H)
4279
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,456),6,4,62,1,1,755,H)
4205
4280
C Coefficient construction for loop diagram with ID 244
4206
4281
CALL FFV2L3_2(PL(0,0),W(1,1),GC_125,MDL_MS,ZERO,PL(0,457)
4207
4282
$ ,COEFS)
4219
4294
$ ,COEFS)
4220
4295
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,459),4,COEFS,4,4,WL(1,0,1
4221
4296
$ ,460))
4222
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,460),6,4,63,1,756,H)
4297
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,460),6,4,63,1,1,756,H)
4223
4298
C Coefficient construction for loop diagram with ID 245
4224
4299
CALL FFV2L3_2(PL(0,0),W(1,1),GC_126,MDL_MB,ZERO,PL(0,461)
4225
4300
$ ,COEFS)
4237
4312
$ ,COEFS)
4238
4313
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,463),4,COEFS,4,4,WL(1,0,1
4239
4314
$ ,464))
4240
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,464),6,4,64,1,757,H)
4315
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,464),6,4,64,1,1,757,H)
4241
4316
C Coefficient construction for loop diagram with ID 246
4242
4317
CALL FFV2L1_3(PL(0,71),W(1,2),GC_59,MDL_MW,MDL_WW,PL(0,465)
4243
4318
$ ,COEFS)
4251
4326
$ ,PL(0,467),COEFS)
4252
4327
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,466),1,COEFS,4,1,WL(1,0,1
4253
4328
$ ,467))
4254
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,467),4,1,62,1,758,H)
4329
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,467),4,1,62,1,1,758,H)
4255
4330
C Coefficient construction for loop diagram with ID 247
4256
4331
CALL FFS1_3L3_2(PL(0,0),W(1,1),GC_16,GC_25,MDL_MS,ZERO,PL(0
4257
4332
$ ,468),COEFS)
4269
4344
$ ,PL(0,471),COEFS)
4270
4345
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,470),1,COEFS,4,1,WL(1,0,1
4271
4346
$ ,471))
4272
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,471),4,1,63,1,759,H)
4347
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,471),4,1,63,1,1,759,H)
4273
4348
C Coefficient construction for loop diagram with ID 248
4274
4349
CALL FFS1_3L3_2(PL(0,0),W(1,1),GC_19,GC_28,MDL_MB,ZERO,PL(0
4275
4350
$ ,472),COEFS)
4287
4362
$ ,PL(0,475),COEFS)
4288
4363
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,474),1,COEFS,4,1,WL(1,0,1
4289
4364
$ ,475))
4290
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,475),4,1,64,1,760,H)
4365
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,475),4,1,64,1,1,760,H)
4291
4366
C Coefficient construction for loop diagram with ID 249
4292
4367
CALL FFS1_3L1_3(PL(0,67),W(1,2),GC_31,GC_40,MDL_MW,MDL_WW
4293
4368
$ ,PL(0,476),COEFS)
4301
4376
$ ,COEFS)
4302
4377
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,477),4,COEFS,4,4,WL(1,0,1
4303
4378
$ ,478))
4304
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,478),4,4,62,1,761,H)
4379
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,478),4,4,62,1,1,761,H)
4305
4380
C Coefficient construction for loop diagram with ID 250
4306
4381
CALL FFS1_3L1_3(PL(0,457),W(1,2),GC_32,GC_41,MDL_MW,MDL_WW
4307
4382
$ ,PL(0,479),COEFS)
4315
4390
$ ,COEFS)
4316
4391
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,480),4,COEFS,4,4,WL(1,0,1
4317
4392
$ ,481))
4318
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,481),4,4,63,1,762,H)
4393
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,481),4,4,63,1,1,762,H)
4319
4394
C Coefficient construction for loop diagram with ID 251
4320
4395
CALL FFS1_3L1_3(PL(0,461),W(1,2),GC_33,GC_42,MDL_MW,MDL_WW
4321
4396
$ ,PL(0,482),COEFS)
4329
4404
$ ,COEFS)
4330
4405
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,483),4,COEFS,4,4,WL(1,0,1
4331
4406
$ ,484))
4332
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,484),4,4,64,1,763,H)
4407
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,484),4,4,64,1,1,763,H)
4333
4408
C Coefficient construction for loop diagram with ID 252
4334
4409
CALL FFS1_3L1_3(PL(0,71),W(1,2),GC_31,GC_40,MDL_MW,MDL_WW
4335
4410
$ ,PL(0,485),COEFS)
4343
4418
$ ,PL(0,487),COEFS)
4344
4419
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,486),1,COEFS,4,1,WL(1,0,1
4345
4420
$ ,487))
4346
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,487),2,1,62,1,764,H)
4421
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,487),2,1,62,1,1,764,H)
4347
4422
C Coefficient construction for loop diagram with ID 253
4348
4423
CALL FFS1_3L1_3(PL(0,468),W(1,2),GC_32,GC_41,MDL_MW,MDL_WW
4349
4424
$ ,PL(0,488),COEFS)
4357
4432
$ ,PL(0,490),COEFS)
4358
4433
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,489),1,COEFS,4,1,WL(1,0,1
4359
4434
$ ,490))
4360
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,490),2,1,63,1,765,H)
4435
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,490),2,1,63,1,1,765,H)
4361
4436
C Coefficient construction for loop diagram with ID 254
4362
4437
CALL FFS1_3L1_3(PL(0,472),W(1,2),GC_33,GC_42,MDL_MW,MDL_WW
4363
4438
$ ,PL(0,491),COEFS)
4371
4446
$ ,PL(0,493),COEFS)
4372
4447
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,492),1,COEFS,4,1,WL(1,0,1
4373
4448
$ ,493))
4374
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,493),2,1,64,1,766,H)
4449
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,493),2,1,64,1,1,766,H)
4375
4450
C Coefficient construction for loop diagram with ID 255
4376
4451
CALL FFV1L2_1(PL(0,0),W(1,6),GC_2,MDL_MC,ZERO,PL(0,494)
4377
4452
$ ,COEFS)
4381
4456
$ ,COEFS)
4382
4457
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,494),4,COEFS,4,4,WL(1,0,1
4383
4458
$ ,495))
4384
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,495),2,4,65,1,767,H)
4459
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,495),2,4,65,1,1,767,H)
4385
4460
C Coefficient construction for loop diagram with ID 256
4386
4461
CALL FFV2_5L2_1(PL(0,494),W(1,15),GC_69,GC_76,MDL_MC,ZERO
4387
4462
$ ,PL(0,496),COEFS)
4388
4463
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,494),4,COEFS,4,4,WL(1,0,1
4389
4464
$ ,496))
4390
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,496),2,4,65,1,768,H)
4465
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,496),2,4,65,1,1,768,H)
4391
4466
C Coefficient construction for loop diagram with ID 257
4392
4467
CALL FFS2L2_1(PL(0,494),W(1,16),GC_103,MDL_MC,ZERO,PL(0,497)
4393
4468
$ ,COEFS)
4394
4469
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,494),4,COEFS,4,4,WL(1,0,1
4395
4470
$ ,497))
4396
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,497),2,4,65,1,769,H)
4471
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,497),2,4,65,1,1,769,H)
4397
4472
C Coefficient construction for loop diagram with ID 258
4398
4473
CALL FFS4L2_1(PL(0,494),W(1,17),GC_102,MDL_MC,ZERO,PL(0,498)
4399
4474
$ ,COEFS)
4400
4475
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,494),4,COEFS,4,4,WL(1,0,1
4401
4476
$ ,498))
4402
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,498),2,4,65,1,770,H)
4477
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,498),2,4,65,1,1,770,H)
4403
4478
C Coefficient construction for loop diagram with ID 259
4404
4479
CALL FFV2_5L2_1(PL(0,0),W(1,7),GC_69,GC_76,MDL_MC,ZERO,PL(0
4405
4480
$ ,499),COEFS)
4409
4484
$ ,COEFS)
4410
4485
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,499),4,COEFS,4,4,WL(1,0,1
4411
4486
$ ,500))
4412
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,500),2,4,65,1,771,H)
4487
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,500),2,4,65,1,1,771,H)
4413
4488
C Coefficient construction for loop diagram with ID 260
4414
4489
CALL FFV2_5L2_1(PL(0,499),W(1,15),GC_69,GC_76,MDL_MC,ZERO
4415
4490
$ ,PL(0,501),COEFS)
4416
4491
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,499),4,COEFS,4,4,WL(1,0,1
4417
4492
$ ,501))
4418
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,501),2,4,65,1,772,H)
4493
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,501),2,4,65,1,1,772,H)
4419
4494
C Coefficient construction for loop diagram with ID 261
4420
4495
CALL FFS2L2_1(PL(0,499),W(1,16),GC_103,MDL_MC,ZERO,PL(0,502)
4421
4496
$ ,COEFS)
4422
4497
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,499),4,COEFS,4,4,WL(1,0,1
4423
4498
$ ,502))
4424
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,502),2,4,65,1,773,H)
4499
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,502),2,4,65,1,1,773,H)
4425
4500
C Coefficient construction for loop diagram with ID 262
4426
4501
CALL FFS4L2_1(PL(0,499),W(1,17),GC_102,MDL_MC,ZERO,PL(0,503)
4427
4502
$ ,COEFS)
4428
4503
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,499),4,COEFS,4,4,WL(1,0,1
4429
4504
$ ,503))
4430
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,503),2,4,65,1,774,H)
4505
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,503),2,4,65,1,1,774,H)
4431
4506
C Coefficient construction for loop diagram with ID 263
4432
4507
CALL FFS2L2_1(PL(0,0),W(1,8),GC_103,MDL_MC,ZERO,PL(0,504)
4433
4508
$ ,COEFS)
4437
4512
$ ,COEFS)
4438
4513
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,504),4,COEFS,4,4,WL(1,0,1
4439
4514
$ ,505))
4440
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,505),2,4,65,1,775,H)
4515
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,505),2,4,65,1,1,775,H)
4441
4516
C Coefficient construction for loop diagram with ID 264
4442
4517
CALL FFV2_5L2_1(PL(0,504),W(1,15),GC_69,GC_76,MDL_MC,ZERO
4443
4518
$ ,PL(0,506),COEFS)
4444
4519
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,504),4,COEFS,4,4,WL(1,0,1
4445
4520
$ ,506))
4446
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,506),2,4,65,1,776,H)
4521
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,506),2,4,65,1,1,776,H)
4447
4522
C Coefficient construction for loop diagram with ID 265
4448
4523
CALL FFS2L2_1(PL(0,504),W(1,16),GC_103,MDL_MC,ZERO,PL(0,507)
4449
4524
$ ,COEFS)
4450
4525
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,504),4,COEFS,4,4,WL(1,0,1
4451
4526
$ ,507))
4452
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,507),2,4,65,1,777,H)
4527
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,507),2,4,65,1,1,777,H)
4453
4528
C Coefficient construction for loop diagram with ID 266
4454
4529
CALL FFS4L2_1(PL(0,504),W(1,17),GC_102,MDL_MC,ZERO,PL(0,508)
4455
4530
$ ,COEFS)
4456
4531
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,504),4,COEFS,4,4,WL(1,0,1
4457
4532
$ ,508))
4458
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,508),2,4,65,1,778,H)
4533
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,508),2,4,65,1,1,778,H)
4459
4534
C Coefficient construction for loop diagram with ID 267
4460
4535
CALL FFS4L2_1(PL(0,0),W(1,9),GC_102,MDL_MC,ZERO,PL(0,509)
4461
4536
$ ,COEFS)
4465
4540
$ ,COEFS)
4466
4541
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,509),4,COEFS,4,4,WL(1,0,1
4467
4542
$ ,510))
4468
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,510),2,4,65,1,779,H)
4543
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,510),2,4,65,1,1,779,H)
4469
4544
C Coefficient construction for loop diagram with ID 268
4470
4545
CALL FFV2_5L2_1(PL(0,509),W(1,15),GC_69,GC_76,MDL_MC,ZERO
4471
4546
$ ,PL(0,511),COEFS)
4472
4547
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,509),4,COEFS,4,4,WL(1,0,1
4473
4548
$ ,511))
4474
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,511),2,4,65,1,780,H)
4549
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,511),2,4,65,1,1,780,H)
4475
4550
C Coefficient construction for loop diagram with ID 269
4476
4551
CALL FFS2L2_1(PL(0,509),W(1,16),GC_103,MDL_MC,ZERO,PL(0,512)
4477
4552
$ ,COEFS)
4478
4553
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,509),4,COEFS,4,4,WL(1,0,1
4479
4554
$ ,512))
4480
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,512),2,4,65,1,781,H)
4555
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,512),2,4,65,1,1,781,H)
4481
4556
C Coefficient construction for loop diagram with ID 270
4482
4557
CALL FFS4L2_1(PL(0,509),W(1,17),GC_102,MDL_MC,ZERO,PL(0,513)
4483
4558
$ ,COEFS)
4484
4559
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,509),4,COEFS,4,4,WL(1,0,1
4485
4560
$ ,513))
4486
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,513),2,4,65,1,782,H)
4561
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,513),2,4,65,1,1,782,H)
4487
4562
C Coefficient construction for loop diagram with ID 271
4488
4563
CALL FFV1L1_2(PL(0,110),W(1,6),GC_2,MDL_MC,ZERO,PL(0,514)
4489
4564
$ ,COEFS)
4490
4565
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,110),4,COEFS,4,4,WL(1,0,1
4491
4566
$ ,514))
4492
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,514),4,4,22,1,783,H)
4567
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,514),4,4,22,1,1,783,H)
4493
4568
C Coefficient construction for loop diagram with ID 272
4494
4569
CALL FFV1L1_2(PL(0,113),W(1,6),GC_2,MDL_MC,ZERO,PL(0,515)
4495
4570
$ ,COEFS)
4496
4571
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,113),4,COEFS,4,4,WL(1,0,1
4497
4572
$ ,515))
4498
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,515),2,4,22,1,784,H)
4573
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,515),2,4,22,1,1,784,H)
4499
4574
C Coefficient construction for loop diagram with ID 273
4500
4575
CALL FFV2_5L1_2(PL(0,110),W(1,7),GC_69,GC_76,MDL_MC,ZERO
4501
4576
$ ,PL(0,516),COEFS)
4502
4577
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,110),4,COEFS,4,4,WL(1,0,1
4503
4578
$ ,516))
4504
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,516),4,4,22,1,785,H)
4579
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,516),4,4,22,1,1,785,H)
4505
4580
C Coefficient construction for loop diagram with ID 274
4506
4581
CALL FFV2_5L1_2(PL(0,113),W(1,7),GC_69,GC_76,MDL_MC,ZERO
4507
4582
$ ,PL(0,517),COEFS)
4508
4583
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,113),4,COEFS,4,4,WL(1,0,1
4509
4584
$ ,517))
4510
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,517),2,4,22,1,786,H)
4585
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,517),2,4,22,1,1,786,H)
4511
4586
C Coefficient construction for loop diagram with ID 275
4512
4587
CALL FFS2L1_2(PL(0,110),W(1,8),GC_103,MDL_MC,ZERO,PL(0,518)
4513
4588
$ ,COEFS)
4514
4589
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,110),4,COEFS,4,4,WL(1,0,1
4515
4590
$ ,518))
4516
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,518),4,4,22,1,787,H)
4591
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,518),4,4,22,1,1,787,H)
4517
4592
C Coefficient construction for loop diagram with ID 276
4518
4593
CALL FFS2L1_2(PL(0,113),W(1,8),GC_103,MDL_MC,ZERO,PL(0,519)
4519
4594
$ ,COEFS)
4520
4595
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,113),4,COEFS,4,4,WL(1,0,1
4521
4596
$ ,519))
4522
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,519),2,4,22,1,788,H)
4597
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,519),2,4,22,1,1,788,H)
4523
4598
C Coefficient construction for loop diagram with ID 277
4524
4599
CALL FFS4L1_2(PL(0,110),W(1,9),GC_102,MDL_MC,ZERO,PL(0,520)
4525
4600
$ ,COEFS)
4526
4601
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,110),4,COEFS,4,4,WL(1,0,1
4527
4602
$ ,520))
4528
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,520),4,4,22,1,789,H)
4603
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,520),4,4,22,1,1,789,H)
4529
4604
C Coefficient construction for loop diagram with ID 278
4530
4605
CALL FFS4L1_2(PL(0,113),W(1,9),GC_102,MDL_MC,ZERO,PL(0,521)
4531
4606
$ ,COEFS)
4532
4607
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,113),4,COEFS,4,4,WL(1,0,1
4533
4608
$ ,521))
4534
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,521),2,4,22,1,790,H)
4609
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,521),2,4,22,1,1,790,H)
4535
4610
C Coefficient construction for loop diagram with ID 279
4536
4611
CALL FFV2L3_1(PL(0,0),W(1,3),GC_127,MDL_MC,ZERO,PL(0,522)
4537
4612
$ ,COEFS)
4545
4620
$ ,COEFS)
4546
4621
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,523),4,COEFS,4,4,WL(1,0,1
4547
4622
$ ,524))
4548
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,524),5,4,66,1,791,H)
4623
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,524),5,4,66,1,1,791,H)
4549
4624
C Coefficient construction for loop diagram with ID 280
4550
4625
CALL FFS1_3L2_3(PL(0,522),W(1,4),GC_34,GC_43,MDL_MW,MDL_WW
4551
4626
$ ,PL(0,525),COEFS)
4555
4630
$ ,COEFS)
4556
4631
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,525),4,COEFS,1,4,WL(1,0,1
4557
4632
$ ,526))
4558
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,526),2,4,66,1,792,H)
4633
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,526),2,4,66,1,1,792,H)
4559
4634
C Coefficient construction for loop diagram with ID 281
4560
4635
CALL FFS1_3L3_1(PL(0,0),W(1,3),GC_14,GC_23,MDL_MC,ZERO,PL(0
4561
4636
$ ,527),COEFS)
4569
4644
$ ,COEFS)
4570
4645
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,528),1,COEFS,4,1,WL(1,0,1
4571
4646
$ ,529))
4572
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,529),3,1,66,1,793,H)
4647
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,529),3,1,66,1,1,793,H)
4573
4648
C Coefficient construction for loop diagram with ID 282
4574
4649
CALL FFS1_3L2_3(PL(0,527),W(1,4),GC_34,GC_43,MDL_MW,MDL_WW
4575
4650
$ ,PL(0,530),COEFS)
4579
4654
$ ,COEFS)
4580
4655
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,530),1,COEFS,1,1,WL(1,0,1
4581
4656
$ ,531))
4582
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,531),2,1,66,1,794,H)
4657
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,531),2,1,66,1,1,794,H)
4583
4658
C Coefficient construction for loop diagram with ID 283
4584
4659
CALL VVV1L2_1(PL(0,523),W(1,7),GC_71,MDL_MW,MDL_WW,PL(0,532)
4585
4660
$ ,COEFS)
4586
4661
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,523),4,COEFS,4,4,WL(1,0,1
4587
4662
$ ,532))
4588
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,532),5,4,66,1,795,H)
4663
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,532),5,4,66,1,1,795,H)
4589
4664
C Coefficient construction for loop diagram with ID 284
4590
4665
CALL VVS1L3_1(PL(0,525),W(1,7),GC_85,MDL_MW,MDL_WW,PL(0,533)
4591
4666
$ ,COEFS)
4592
4667
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,525),4,COEFS,1,4,WL(1,0,1
4593
4668
$ ,533))
4594
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,533),2,4,66,1,796,H)
4669
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,533),2,4,66,1,1,796,H)
4595
4670
C Coefficient construction for loop diagram with ID 285
4596
4671
CALL VVS1L1_3(PL(0,528),W(1,7),GC_84,MDL_MW,MDL_WW,PL(0,534)
4597
4672
$ ,COEFS)
4598
4673
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,528),1,COEFS,4,1,WL(1,0,1
4599
4674
$ ,534))
4600
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,534),3,1,66,1,797,H)
4675
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,534),3,1,66,1,1,797,H)
4601
4676
C Coefficient construction for loop diagram with ID 286
4602
4677
CALL VSS1L3_2(PL(0,530),W(1,7),GC_79,MDL_MW,MDL_WW,PL(0,535)
4603
4678
$ ,COEFS)
4604
4679
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,530),1,COEFS,1,1,WL(1,0,1
4605
4680
$ ,535))
4606
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,535),2,1,66,1,798,H)
4681
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,535),2,1,66,1,1,798,H)
4607
4682
C Coefficient construction for loop diagram with ID 287
4608
4683
CALL VSS1L3_1(PL(0,525),W(1,8),GC_57,MDL_MW,MDL_WW,PL(0,536)
4609
4684
$ ,COEFS)
4610
4685
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,525),4,COEFS,1,4,WL(1,0,1
4611
4686
$ ,536))
4612
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,536),4,4,66,1,799,H)
4687
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,536),4,4,66,1,1,799,H)
4613
4688
C Coefficient construction for loop diagram with ID 288
4614
4689
CALL VSS1L1_3(PL(0,528),W(1,8),GC_56,MDL_MW,MDL_WW,PL(0,537)
4615
4690
$ ,COEFS)
4616
4691
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,528),1,COEFS,4,1,WL(1,0,1
4617
4692
$ ,537))
4618
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,537),4,1,66,1,800,H)
4693
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,537),4,1,66,1,1,800,H)
4619
4694
C Coefficient construction for loop diagram with ID 289
4620
4695
CALL VVS1L2_1(PL(0,523),W(1,9),GC_90,MDL_MW,MDL_WW,PL(0,538)
4621
4696
$ ,COEFS)
4622
4697
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,523),4,COEFS,4,4,WL(1,0,1
4623
4698
$ ,538))
4624
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,538),5,4,66,1,801,H)
4699
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,538),5,4,66,1,1,801,H)
4625
4700
C Coefficient construction for loop diagram with ID 290
4626
4701
CALL VSS1L2_1(PL(0,525),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,539)
4627
4702
$ ,COEFS)
4628
4703
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,525),4,COEFS,1,4,WL(1,0,1
4629
4704
$ ,539))
4630
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,539),4,4,66,1,802,H)
4705
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,539),4,4,66,1,1,802,H)
4631
4706
C Coefficient construction for loop diagram with ID 291
4632
4707
CALL VSS1L1_2(PL(0,528),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,540)
4633
4708
$ ,COEFS)
4634
4709
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,528),1,COEFS,4,1,WL(1,0,1
4635
4710
$ ,540))
4636
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,540),4,1,66,1,803,H)
4711
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,540),4,1,66,1,1,803,H)
4637
4712
C Coefficient construction for loop diagram with ID 292
4638
4713
CALL SSS1L2_1(PL(0,530),W(1,9),GC_86,MDL_MW,MDL_WW,PL(0,541)
4639
4714
$ ,COEFS)
4640
4715
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,530),1,COEFS,1,1,WL(1,0,1
4641
4716
$ ,541))
4642
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,541),1,1,66,1,804,H)
4717
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,541),1,1,66,1,1,804,H)
4643
4718
C Coefficient construction for loop diagram with ID 293
4644
4719
CALL FFV2L1_2(PL(0,0),W(1,10),GC_62,MDL_MC,ZERO,PL(0,542)
4645
4720
$ ,COEFS)
4649
4724
$ ,COEFS)
4650
4725
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,542),4,COEFS,4,4,WL(1,0,1
4651
4726
$ ,543))
4652
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,543),2,4,67,1,805,H)
4727
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,543),2,4,67,1,1,805,H)
4653
4728
C Coefficient construction for loop diagram with ID 294
4654
4729
CALL FFV2L1_2(PL(0,0),W(1,10),GC_63,MDL_MC,ZERO,PL(0,544)
4655
4730
$ ,COEFS)
4659
4734
$ ,COEFS)
4660
4735
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,544),4,COEFS,4,4,WL(1,0,1
4661
4736
$ ,545))
4662
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,545),2,4,68,1,806,H)
4737
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,545),2,4,68,1,1,806,H)
4663
4738
C Coefficient construction for loop diagram with ID 295
4664
4739
CALL FFV2L2_1(PL(0,0),W(1,10),GC_64,MDL_MB,ZERO,PL(0,546)
4665
4740
$ ,COEFS)
4669
4744
$ ,COEFS)
4670
4745
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,546),4,COEFS,4,4,WL(1,0,1
4671
4746
$ ,547))
4672
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,547),2,4,69,1,807,H)
4747
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,547),2,4,69,1,1,807,H)
4673
4748
C Coefficient construction for loop diagram with ID 296
4674
4749
CALL FFS1_3L1_2(PL(0,542),W(1,13),GC_14,GC_23,MDL_MD,ZERO
4675
4750
$ ,PL(0,548),COEFS)
4676
4751
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,542),4,COEFS,4,4,WL(1,0,1
4677
4752
$ ,548))
4678
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,548),2,4,67,1,808,H)
4753
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,548),2,4,67,1,1,808,H)
4679
4754
C Coefficient construction for loop diagram with ID 297
4680
4755
CALL FFS1_3L1_2(PL(0,544),W(1,13),GC_17,GC_26,MDL_MS,ZERO
4681
4756
$ ,PL(0,549),COEFS)
4682
4757
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,544),4,COEFS,4,4,WL(1,0,1
4683
4758
$ ,549))
4684
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,549),2,4,68,1,809,H)
4759
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,549),2,4,68,1,1,809,H)
4685
4760
C Coefficient construction for loop diagram with ID 298
4686
4761
CALL FFS1_3L2_1(PL(0,546),W(1,13),GC_20,GC_29,MDL_MC,ZERO
4687
4762
$ ,PL(0,550),COEFS)
4688
4763
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,546),4,COEFS,4,4,WL(1,0,1
4689
4764
$ ,550))
4690
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,550),2,4,69,1,810,H)
4765
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,550),2,4,69,1,1,810,H)
4691
4766
C Coefficient construction for loop diagram with ID 299
4692
4767
CALL FFS1_3L1_2(PL(0,0),W(1,11),GC_34,GC_43,MDL_MC,ZERO,PL(0
4693
4768
$ ,551),COEFS)
4697
4772
$ ,COEFS)
4698
4773
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,551),4,COEFS,4,4,WL(1,0,1
4699
4774
$ ,552))
4700
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,552),2,4,67,1,811,H)
4775
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,552),2,4,67,1,1,811,H)
4701
4776
C Coefficient construction for loop diagram with ID 300
4702
4777
CALL FFS1_3L1_2(PL(0,0),W(1,11),GC_35,GC_44,MDL_MC,ZERO,PL(0
4703
4778
$ ,553),COEFS)
4707
4782
$ ,COEFS)
4708
4783
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,553),4,COEFS,4,4,WL(1,0,1
4709
4784
$ ,554))
4710
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,554),2,4,68,1,812,H)
4785
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,554),2,4,68,1,1,812,H)
4711
4786
C Coefficient construction for loop diagram with ID 301
4712
4787
CALL FFS1_3L2_1(PL(0,0),W(1,11),GC_36,GC_45,MDL_MB,ZERO,PL(0
4713
4788
$ ,555),COEFS)
4717
4792
$ ,COEFS)
4718
4793
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,555),4,COEFS,4,4,WL(1,0,1
4719
4794
$ ,556))
4720
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,556),2,4,69,1,813,H)
4795
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,556),2,4,69,1,1,813,H)
4721
4796
C Coefficient construction for loop diagram with ID 302
4722
4797
CALL FFS1_3L1_2(PL(0,551),W(1,13),GC_14,GC_23,MDL_MD,ZERO
4723
4798
$ ,PL(0,557),COEFS)
4724
4799
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,551),4,COEFS,4,4,WL(1,0,1
4725
4800
$ ,557))
4726
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,557),2,4,67,1,814,H)
4801
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,557),2,4,67,1,1,814,H)
4727
4802
C Coefficient construction for loop diagram with ID 303
4728
4803
CALL FFS1_3L1_2(PL(0,553),W(1,13),GC_17,GC_26,MDL_MS,ZERO
4729
4804
$ ,PL(0,558),COEFS)
4730
4805
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,553),4,COEFS,4,4,WL(1,0,1
4731
4806
$ ,558))
4732
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,558),2,4,68,1,815,H)
4807
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,558),2,4,68,1,1,815,H)
4733
4808
C Coefficient construction for loop diagram with ID 304
4734
4809
CALL FFS1_3L2_1(PL(0,555),W(1,13),GC_20,GC_29,MDL_MC,ZERO
4735
4810
$ ,PL(0,559),COEFS)
4736
4811
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,555),4,COEFS,4,4,WL(1,0,1
4737
4812
$ ,559))
4738
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,559),2,4,69,1,816,H)
4813
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,559),2,4,69,1,1,816,H)
4739
4814
C Coefficient construction for loop diagram with ID 305
4740
4815
CALL FFV2L3_1(PL(0,454),W(1,3),GC_127,MDL_MC,ZERO,PL(0,560)
4741
4816
$ ,COEFS)
4745
4820
$ ,COEFS)
4746
4821
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,560),4,COEFS,4,4,WL(1,0,1
4747
4822
$ ,561))
4748
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,561),6,4,70,1,817,H)
4823
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,561),6,4,70,1,1,817,H)
4749
4824
C Coefficient construction for loop diagram with ID 306
4750
4825
CALL FFV2L3_1(PL(0,458),W(1,3),GC_127,MDL_MC,ZERO,PL(0,562)
4751
4826
$ ,COEFS)
4755
4830
$ ,COEFS)
4756
4831
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,562),4,COEFS,4,4,WL(1,0,1
4757
4832
$ ,563))
4758
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,563),6,4,71,1,818,H)
4833
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,563),6,4,71,1,1,818,H)
4759
4834
C Coefficient construction for loop diagram with ID 307
4760
4835
CALL FFV2L3_1(PL(0,462),W(1,3),GC_127,MDL_MC,ZERO,PL(0,564)
4761
4836
$ ,COEFS)
4765
4840
$ ,COEFS)
4766
4841
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,564),4,COEFS,4,4,WL(1,0,1
4767
4842
$ ,565))
4768
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,565),6,4,72,1,819,H)
4843
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,565),6,4,72,1,1,819,H)
4769
4844
C Coefficient construction for loop diagram with ID 308
4770
4845
CALL FFV2L3_1(PL(0,465),W(1,3),GC_127,MDL_MC,ZERO,PL(0,566)
4771
4846
$ ,COEFS)
4775
4850
$ ,PL(0,567),COEFS)
4776
4851
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,566),1,COEFS,4,1,WL(1,0,1
4777
4852
$ ,567))
4778
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,567),4,1,70,1,820,H)
4853
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,567),4,1,70,1,1,820,H)
4779
4854
C Coefficient construction for loop diagram with ID 309
4780
4855
CALL FFV2L3_1(PL(0,469),W(1,3),GC_127,MDL_MC,ZERO,PL(0,568)
4781
4856
$ ,COEFS)
4785
4860
$ ,PL(0,569),COEFS)
4786
4861
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,568),1,COEFS,4,1,WL(1,0,1
4787
4862
$ ,569))
4788
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,569),4,1,71,1,821,H)
4863
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,569),4,1,71,1,1,821,H)
4789
4864
C Coefficient construction for loop diagram with ID 310
4790
4865
CALL FFV2L3_1(PL(0,473),W(1,3),GC_127,MDL_MC,ZERO,PL(0,570)
4791
4866
$ ,COEFS)
4795
4870
$ ,PL(0,571),COEFS)
4796
4871
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,570),1,COEFS,4,1,WL(1,0,1
4797
4872
$ ,571))
4798
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,571),4,1,72,1,822,H)
4873
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,571),4,1,72,1,1,822,H)
4799
4874
C Coefficient construction for loop diagram with ID 311
4800
4875
CALL FFS1_3L3_1(PL(0,476),W(1,3),GC_14,GC_23,MDL_MC,ZERO
4801
4876
$ ,PL(0,572),COEFS)
4805
4880
$ ,COEFS)
4806
4881
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,572),4,COEFS,4,4,WL(1,0,1
4807
4882
$ ,573))
4808
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,573),4,4,70,1,823,H)
4883
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,573),4,4,70,1,1,823,H)
4809
4884
C Coefficient construction for loop diagram with ID 312
4810
4885
CALL FFS1_3L3_1(PL(0,479),W(1,3),GC_14,GC_23,MDL_MC,ZERO
4811
4886
$ ,PL(0,574),COEFS)
4815
4890
$ ,COEFS)
4816
4891
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,574),4,COEFS,4,4,WL(1,0,1
4817
4892
$ ,575))
4818
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,575),4,4,71,1,824,H)
4893
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,575),4,4,71,1,1,824,H)
4819
4894
C Coefficient construction for loop diagram with ID 313
4820
4895
CALL FFS1_3L3_1(PL(0,482),W(1,3),GC_14,GC_23,MDL_MC,ZERO
4821
4896
$ ,PL(0,576),COEFS)
4825
4900
$ ,COEFS)
4826
4901
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,576),4,COEFS,4,4,WL(1,0,1
4827
4902
$ ,577))
4828
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,577),4,4,72,1,825,H)
4903
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,577),4,4,72,1,1,825,H)
4829
4904
C Coefficient construction for loop diagram with ID 314
4830
4905
CALL FFS1_3L3_1(PL(0,485),W(1,3),GC_14,GC_23,MDL_MC,ZERO
4831
4906
$ ,PL(0,578),COEFS)
4835
4910
$ ,PL(0,579),COEFS)
4836
4911
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,578),1,COEFS,4,1,WL(1,0,1
4837
4912
$ ,579))
4838
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,579),2,1,70,1,826,H)
4913
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,579),2,1,70,1,1,826,H)
4839
4914
C Coefficient construction for loop diagram with ID 315
4840
4915
CALL FFS1_3L3_1(PL(0,488),W(1,3),GC_14,GC_23,MDL_MC,ZERO
4841
4916
$ ,PL(0,580),COEFS)
4845
4920
$ ,PL(0,581),COEFS)
4846
4921
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,580),1,COEFS,4,1,WL(1,0,1
4847
4922
$ ,581))
4848
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,581),2,1,71,1,827,H)
4923
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,581),2,1,71,1,1,827,H)
4849
4924
C Coefficient construction for loop diagram with ID 316
4850
4925
CALL FFS1_3L3_1(PL(0,491),W(1,3),GC_14,GC_23,MDL_MC,ZERO
4851
4926
$ ,PL(0,582),COEFS)
4855
4930
$ ,PL(0,583),COEFS)
4856
4931
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,582),1,COEFS,4,1,WL(1,0,1
4857
4932
$ ,583))
4858
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,583),2,1,72,1,828,H)
4933
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,583),2,1,72,1,1,828,H)
4859
4934
C Coefficient construction for loop diagram with ID 317
4860
4935
CALL FFV1L2_1(PL(0,0),W(1,6),GC_2,MDL_MT,MDL_WT,PL(0,584)
4861
4936
$ ,COEFS)
4865
4940
$ ,COEFS)
4866
4941
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,584),4,COEFS,4,4,WL(1,0,1
4867
4942
$ ,585))
4868
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,585),2,4,73,1,829,H)
4943
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,585),2,4,73,1,1,829,H)
4869
4944
C Coefficient construction for loop diagram with ID 318
4870
4945
CALL FFV2_5L2_1(PL(0,584),W(1,15),GC_69,GC_76,MDL_MT,MDL_WT
4871
4946
$ ,PL(0,586),COEFS)
4872
4947
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,584),4,COEFS,4,4,WL(1,0,1
4873
4948
$ ,586))
4874
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,586),2,4,73,1,830,H)
4949
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,586),2,4,73,1,1,830,H)
4875
4950
C Coefficient construction for loop diagram with ID 319
4876
4951
CALL FFS2L2_1(PL(0,584),W(1,16),GC_117,MDL_MT,MDL_WT,PL(0
4877
4952
$ ,587),COEFS)
4878
4953
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,584),4,COEFS,4,4,WL(1,0,1
4879
4954
$ ,587))
4880
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,587),2,4,73,1,831,H)
4955
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,587),2,4,73,1,1,831,H)
4881
4956
C Coefficient construction for loop diagram with ID 320
4882
4957
CALL FFS4L2_1(PL(0,584),W(1,17),GC_116,MDL_MT,MDL_WT,PL(0
4883
4958
$ ,588),COEFS)
4884
4959
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,584),4,COEFS,4,4,WL(1,0,1
4885
4960
$ ,588))
4886
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,588),2,4,73,1,832,H)
4961
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,588),2,4,73,1,1,832,H)
4887
4962
C Coefficient construction for loop diagram with ID 321
4888
4963
CALL FFV2_5L2_1(PL(0,0),W(1,7),GC_69,GC_76,MDL_MT,MDL_WT
4889
4964
$ ,PL(0,589),COEFS)
4893
4968
$ ,COEFS)
4894
4969
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,589),4,COEFS,4,4,WL(1,0,1
4895
4970
$ ,590))
4896
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,590),2,4,73,1,833,H)
4971
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,590),2,4,73,1,1,833,H)
4897
4972
C Coefficient construction for loop diagram with ID 322
4898
4973
CALL FFV2_5L2_1(PL(0,589),W(1,15),GC_69,GC_76,MDL_MT,MDL_WT
4899
4974
$ ,PL(0,591),COEFS)
4900
4975
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,589),4,COEFS,4,4,WL(1,0,1
4901
4976
$ ,591))
4902
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,591),2,4,73,1,834,H)
4977
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,591),2,4,73,1,1,834,H)
4903
4978
C Coefficient construction for loop diagram with ID 323
4904
4979
CALL FFS2L2_1(PL(0,589),W(1,16),GC_117,MDL_MT,MDL_WT,PL(0
4905
4980
$ ,592),COEFS)
4906
4981
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,589),4,COEFS,4,4,WL(1,0,1
4907
4982
$ ,592))
4908
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,592),2,4,73,1,835,H)
4983
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,592),2,4,73,1,1,835,H)
4909
4984
C Coefficient construction for loop diagram with ID 324
4910
4985
CALL FFS4L2_1(PL(0,589),W(1,17),GC_116,MDL_MT,MDL_WT,PL(0
4911
4986
$ ,593),COEFS)
4912
4987
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,589),4,COEFS,4,4,WL(1,0,1
4913
4988
$ ,593))
4914
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,593),2,4,73,1,836,H)
4989
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,593),2,4,73,1,1,836,H)
4915
4990
C Coefficient construction for loop diagram with ID 325
4916
4991
CALL FFS2L2_1(PL(0,0),W(1,8),GC_117,MDL_MT,MDL_WT,PL(0,594)
4917
4992
$ ,COEFS)
4921
4996
$ ,COEFS)
4922
4997
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,594),4,COEFS,4,4,WL(1,0,1
4923
4998
$ ,595))
4924
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,595),2,4,73,1,837,H)
4999
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,595),2,4,73,1,1,837,H)
4925
5000
C Coefficient construction for loop diagram with ID 326
4926
5001
CALL FFV2_5L2_1(PL(0,594),W(1,15),GC_69,GC_76,MDL_MT,MDL_WT
4927
5002
$ ,PL(0,596),COEFS)
4928
5003
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,594),4,COEFS,4,4,WL(1,0,1
4929
5004
$ ,596))
4930
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,596),2,4,73,1,838,H)
5005
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,596),2,4,73,1,1,838,H)
4931
5006
C Coefficient construction for loop diagram with ID 327
4932
5007
CALL FFS2L2_1(PL(0,594),W(1,16),GC_117,MDL_MT,MDL_WT,PL(0
4933
5008
$ ,597),COEFS)
4934
5009
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,594),4,COEFS,4,4,WL(1,0,1
4935
5010
$ ,597))
4936
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,597),2,4,73,1,839,H)
5011
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,597),2,4,73,1,1,839,H)
4937
5012
C Coefficient construction for loop diagram with ID 328
4938
5013
CALL FFS4L2_1(PL(0,594),W(1,17),GC_116,MDL_MT,MDL_WT,PL(0
4939
5014
$ ,598),COEFS)
4940
5015
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,594),4,COEFS,4,4,WL(1,0,1
4941
5016
$ ,598))
4942
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,598),2,4,73,1,840,H)
5017
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,598),2,4,73,1,1,840,H)
4943
5018
C Coefficient construction for loop diagram with ID 329
4944
5019
CALL FFS4L2_1(PL(0,0),W(1,9),GC_116,MDL_MT,MDL_WT,PL(0,599)
4945
5020
$ ,COEFS)
4949
5024
$ ,COEFS)
4950
5025
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,599),4,COEFS,4,4,WL(1,0,1
4951
5026
$ ,600))
4952
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,600),2,4,73,1,841,H)
5027
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,600),2,4,73,1,1,841,H)
4953
5028
C Coefficient construction for loop diagram with ID 330
4954
5029
CALL FFV2_5L2_1(PL(0,599),W(1,15),GC_69,GC_76,MDL_MT,MDL_WT
4955
5030
$ ,PL(0,601),COEFS)
4956
5031
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,599),4,COEFS,4,4,WL(1,0,1
4957
5032
$ ,601))
4958
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,601),2,4,73,1,842,H)
5033
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,601),2,4,73,1,1,842,H)
4959
5034
C Coefficient construction for loop diagram with ID 331
4960
5035
CALL FFS2L2_1(PL(0,599),W(1,16),GC_117,MDL_MT,MDL_WT,PL(0
4961
5036
$ ,602),COEFS)
4962
5037
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,599),4,COEFS,4,4,WL(1,0,1
4963
5038
$ ,602))
4964
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,602),2,4,73,1,843,H)
5039
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,602),2,4,73,1,1,843,H)
4965
5040
C Coefficient construction for loop diagram with ID 332
4966
5041
CALL FFS4L2_1(PL(0,599),W(1,17),GC_116,MDL_MT,MDL_WT,PL(0
4967
5042
$ ,603),COEFS)
4968
5043
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,599),4,COEFS,4,4,WL(1,0,1
4969
5044
$ ,603))
4970
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,603),2,4,73,1,844,H)
5045
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,603),2,4,73,1,1,844,H)
4971
5046
C Coefficient construction for loop diagram with ID 333
4972
5047
CALL FFV1L1_2(PL(0,116),W(1,6),GC_2,MDL_MT,MDL_WT,PL(0,604)
4973
5048
$ ,COEFS)
4974
5049
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,116),4,COEFS,4,4,WL(1,0,1
4975
5050
$ ,604))
4976
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,604),4,4,23,1,845,H)
5051
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,604),4,4,23,1,1,845,H)
4977
5052
C Coefficient construction for loop diagram with ID 334
4978
5053
CALL FFV1L1_2(PL(0,119),W(1,6),GC_2,MDL_MT,MDL_WT,PL(0,605)
4979
5054
$ ,COEFS)
4980
5055
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,119),4,COEFS,4,4,WL(1,0,1
4981
5056
$ ,605))
4982
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,605),2,4,23,1,846,H)
5057
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,605),2,4,23,1,1,846,H)
4983
5058
C Coefficient construction for loop diagram with ID 335
4984
5059
CALL FFV2_5L1_2(PL(0,116),W(1,7),GC_69,GC_76,MDL_MT,MDL_WT
4985
5060
$ ,PL(0,606),COEFS)
4986
5061
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,116),4,COEFS,4,4,WL(1,0,1
4987
5062
$ ,606))
4988
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,606),4,4,23,1,847,H)
5063
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,606),4,4,23,1,1,847,H)
4989
5064
C Coefficient construction for loop diagram with ID 336
4990
5065
CALL FFV2_5L1_2(PL(0,119),W(1,7),GC_69,GC_76,MDL_MT,MDL_WT
4991
5066
$ ,PL(0,607),COEFS)
4992
5067
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,119),4,COEFS,4,4,WL(1,0,1
4993
5068
$ ,607))
4994
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,607),2,4,23,1,848,H)
5069
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,607),2,4,23,1,1,848,H)
4995
5070
C Coefficient construction for loop diagram with ID 337
4996
5071
CALL FFS2L1_2(PL(0,116),W(1,8),GC_117,MDL_MT,MDL_WT,PL(0
4997
5072
$ ,608),COEFS)
4998
5073
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,116),4,COEFS,4,4,WL(1,0,1
4999
5074
$ ,608))
5000
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,608),4,4,23,1,849,H)
5075
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,608),4,4,23,1,1,849,H)
5001
5076
C Coefficient construction for loop diagram with ID 338
5002
5077
CALL FFS2L1_2(PL(0,119),W(1,8),GC_117,MDL_MT,MDL_WT,PL(0
5003
5078
$ ,609),COEFS)
5004
5079
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,119),4,COEFS,4,4,WL(1,0,1
5005
5080
$ ,609))
5006
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,609),2,4,23,1,850,H)
5081
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,609),2,4,23,1,1,850,H)
5007
5082
C Coefficient construction for loop diagram with ID 339
5008
5083
CALL FFS4L1_2(PL(0,116),W(1,9),GC_116,MDL_MT,MDL_WT,PL(0
5009
5084
$ ,610),COEFS)
5010
5085
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,116),4,COEFS,4,4,WL(1,0,1
5011
5086
$ ,610))
5012
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,610),4,4,23,1,851,H)
5087
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,610),4,4,23,1,1,851,H)
5013
5088
C Coefficient construction for loop diagram with ID 340
5014
5089
CALL FFS4L1_2(PL(0,119),W(1,9),GC_116,MDL_MT,MDL_WT,PL(0
5015
5090
$ ,611),COEFS)
5016
5091
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,119),4,COEFS,4,4,WL(1,0,1
5017
5092
$ ,611))
5018
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,611),2,4,23,1,852,H)
5093
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,611),2,4,23,1,1,852,H)
5019
5094
C Coefficient construction for loop diagram with ID 341
5020
5095
CALL FFV2L3_1(PL(0,0),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0,612)
5021
5096
$ ,COEFS)
5029
5104
$ ,COEFS)
5030
5105
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,613),4,COEFS,4,4,WL(1,0,1
5031
5106
$ ,614))
5032
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,614),5,4,74,1,853,H)
5107
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,614),5,4,74,1,1,853,H)
5033
5108
C Coefficient construction for loop diagram with ID 342
5034
5109
CALL FFS1_3L2_3(PL(0,612),W(1,4),GC_37,GC_46,MDL_MW,MDL_WW
5035
5110
$ ,PL(0,615),COEFS)
5039
5114
$ ,COEFS)
5040
5115
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,615),4,COEFS,1,4,WL(1,0,1
5041
5116
$ ,616))
5042
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,616),2,4,74,1,854,H)
5117
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,616),2,4,74,1,1,854,H)
5043
5118
C Coefficient construction for loop diagram with ID 343
5044
5119
CALL FFS1_3L3_1(PL(0,0),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5045
5120
$ ,PL(0,617),COEFS)
5053
5128
$ ,COEFS)
5054
5129
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,618),1,COEFS,4,1,WL(1,0,1
5055
5130
$ ,619))
5056
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,619),3,1,74,1,855,H)
5131
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,619),3,1,74,1,1,855,H)
5057
5132
C Coefficient construction for loop diagram with ID 344
5058
5133
CALL FFS1_3L2_3(PL(0,617),W(1,4),GC_37,GC_46,MDL_MW,MDL_WW
5059
5134
$ ,PL(0,620),COEFS)
5063
5138
$ ,COEFS)
5064
5139
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,620),1,COEFS,1,1,WL(1,0,1
5065
5140
$ ,621))
5066
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,621),2,1,74,1,856,H)
5141
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,621),2,1,74,1,1,856,H)
5067
5142
C Coefficient construction for loop diagram with ID 345
5068
5143
CALL VVV1L2_1(PL(0,613),W(1,7),GC_71,MDL_MW,MDL_WW,PL(0,622)
5069
5144
$ ,COEFS)
5070
5145
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,613),4,COEFS,4,4,WL(1,0,1
5071
5146
$ ,622))
5072
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,622),5,4,74,1,857,H)
5147
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,622),5,4,74,1,1,857,H)
5073
5148
C Coefficient construction for loop diagram with ID 346
5074
5149
CALL VVS1L3_1(PL(0,615),W(1,7),GC_85,MDL_MW,MDL_WW,PL(0,623)
5075
5150
$ ,COEFS)
5076
5151
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,615),4,COEFS,1,4,WL(1,0,1
5077
5152
$ ,623))
5078
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,623),2,4,74,1,858,H)
5153
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,623),2,4,74,1,1,858,H)
5079
5154
C Coefficient construction for loop diagram with ID 347
5080
5155
CALL VVS1L1_3(PL(0,618),W(1,7),GC_84,MDL_MW,MDL_WW,PL(0,624)
5081
5156
$ ,COEFS)
5082
5157
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,618),1,COEFS,4,1,WL(1,0,1
5083
5158
$ ,624))
5084
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,624),3,1,74,1,859,H)
5159
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,624),3,1,74,1,1,859,H)
5085
5160
C Coefficient construction for loop diagram with ID 348
5086
5161
CALL VSS1L3_2(PL(0,620),W(1,7),GC_79,MDL_MW,MDL_WW,PL(0,625)
5087
5162
$ ,COEFS)
5088
5163
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,620),1,COEFS,1,1,WL(1,0,1
5089
5164
$ ,625))
5090
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,625),2,1,74,1,860,H)
5165
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,625),2,1,74,1,1,860,H)
5091
5166
C Coefficient construction for loop diagram with ID 349
5092
5167
CALL VSS1L3_1(PL(0,615),W(1,8),GC_57,MDL_MW,MDL_WW,PL(0,626)
5093
5168
$ ,COEFS)
5094
5169
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,615),4,COEFS,1,4,WL(1,0,1
5095
5170
$ ,626))
5096
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,626),4,4,74,1,861,H)
5171
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,626),4,4,74,1,1,861,H)
5097
5172
C Coefficient construction for loop diagram with ID 350
5098
5173
CALL VSS1L1_3(PL(0,618),W(1,8),GC_56,MDL_MW,MDL_WW,PL(0,627)
5099
5174
$ ,COEFS)
5100
5175
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,618),1,COEFS,4,1,WL(1,0,1
5101
5176
$ ,627))
5102
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,627),4,1,74,1,862,H)
5177
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,627),4,1,74,1,1,862,H)
5103
5178
C Coefficient construction for loop diagram with ID 351
5104
5179
CALL VVS1L2_1(PL(0,613),W(1,9),GC_90,MDL_MW,MDL_WW,PL(0,628)
5105
5180
$ ,COEFS)
5106
5181
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,613),4,COEFS,4,4,WL(1,0,1
5107
5182
$ ,628))
5108
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,628),5,4,74,1,863,H)
5183
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,628),5,4,74,1,1,863,H)
5109
5184
C Coefficient construction for loop diagram with ID 352
5110
5185
CALL VSS1L2_1(PL(0,615),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,629)
5111
5186
$ ,COEFS)
5112
5187
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,615),4,COEFS,1,4,WL(1,0,1
5113
5188
$ ,629))
5114
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,629),4,4,74,1,864,H)
5189
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,629),4,4,74,1,1,864,H)
5115
5190
C Coefficient construction for loop diagram with ID 353
5116
5191
CALL VSS1L1_2(PL(0,618),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,630)
5117
5192
$ ,COEFS)
5118
5193
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,618),1,COEFS,4,1,WL(1,0,1
5119
5194
$ ,630))
5120
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,630),4,1,74,1,865,H)
5195
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,630),4,1,74,1,1,865,H)
5121
5196
C Coefficient construction for loop diagram with ID 354
5122
5197
CALL SSS1L2_1(PL(0,620),W(1,9),GC_86,MDL_MW,MDL_WW,PL(0,631)
5123
5198
$ ,COEFS)
5124
5199
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,620),1,COEFS,1,1,WL(1,0,1
5125
5200
$ ,631))
5126
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,631),1,1,74,1,866,H)
5201
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,631),1,1,74,1,1,866,H)
5127
5202
C Coefficient construction for loop diagram with ID 355
5128
5203
CALL FFV2L1_2(PL(0,0),W(1,10),GC_65,MDL_MT,MDL_WT,PL(0,632)
5129
5204
$ ,COEFS)
5133
5208
$ ,COEFS)
5134
5209
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,632),4,COEFS,4,4,WL(1,0,1
5135
5210
$ ,633))
5136
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,633),2,4,75,1,867,H)
5211
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,633),2,4,75,1,1,867,H)
5137
5212
C Coefficient construction for loop diagram with ID 356
5138
5213
CALL FFV2L1_2(PL(0,0),W(1,10),GC_66,MDL_MT,MDL_WT,PL(0,634)
5139
5214
$ ,COEFS)
5143
5218
$ ,COEFS)
5144
5219
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,634),4,COEFS,4,4,WL(1,0,1
5145
5220
$ ,635))
5146
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,635),2,4,76,1,868,H)
5221
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,635),2,4,76,1,1,868,H)
5147
5222
C Coefficient construction for loop diagram with ID 357
5148
5223
CALL FFV2L1_2(PL(0,0),W(1,10),GC_67,MDL_MT,MDL_WT,PL(0,636)
5149
5224
$ ,COEFS)
5153
5228
$ ,COEFS)
5154
5229
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,636),4,COEFS,4,4,WL(1,0,1
5155
5230
$ ,637))
5156
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,637),2,4,77,1,869,H)
5231
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,637),2,4,77,1,1,869,H)
5157
5232
C Coefficient construction for loop diagram with ID 358
5158
5233
CALL FFS1_3L1_2(PL(0,632),W(1,13),GC_15,GC_24,MDL_MD,ZERO
5159
5234
$ ,PL(0,638),COEFS)
5160
5235
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,632),4,COEFS,4,4,WL(1,0,1
5161
5236
$ ,638))
5162
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,638),2,4,75,1,870,H)
5237
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,638),2,4,75,1,1,870,H)
5163
5238
C Coefficient construction for loop diagram with ID 359
5164
5239
CALL FFS1_3L1_2(PL(0,634),W(1,13),GC_18,GC_27,MDL_MS,ZERO
5165
5240
$ ,PL(0,639),COEFS)
5166
5241
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,634),4,COEFS,4,4,WL(1,0,1
5167
5242
$ ,639))
5168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,639),2,4,76,1,871,H)
5243
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,639),2,4,76,1,1,871,H)
5169
5244
C Coefficient construction for loop diagram with ID 360
5170
5245
CALL FFS1_3L1_2(PL(0,636),W(1,13),GC_21,GC_30,MDL_MB,ZERO
5171
5246
$ ,PL(0,640),COEFS)
5172
5247
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,636),4,COEFS,4,4,WL(1,0,1
5173
5248
$ ,640))
5174
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,640),2,4,77,1,872,H)
5249
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,640),2,4,77,1,1,872,H)
5175
5250
C Coefficient construction for loop diagram with ID 361
5176
5251
CALL FFS1_3L1_2(PL(0,0),W(1,11),GC_37,GC_46,MDL_MT,MDL_WT
5177
5252
$ ,PL(0,641),COEFS)
5181
5256
$ ,COEFS)
5182
5257
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,641),4,COEFS,4,4,WL(1,0,1
5183
5258
$ ,642))
5184
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,642),2,4,75,1,873,H)
5259
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,642),2,4,75,1,1,873,H)
5185
5260
C Coefficient construction for loop diagram with ID 362
5186
5261
CALL FFS1_3L1_2(PL(0,0),W(1,11),GC_38,GC_47,MDL_MT,MDL_WT
5187
5262
$ ,PL(0,643),COEFS)
5191
5266
$ ,COEFS)
5192
5267
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,643),4,COEFS,4,4,WL(1,0,1
5193
5268
$ ,644))
5194
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,644),2,4,76,1,874,H)
5269
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,644),2,4,76,1,1,874,H)
5195
5270
C Coefficient construction for loop diagram with ID 363
5196
5271
CALL FFS1_3L1_2(PL(0,0),W(1,11),GC_39,GC_48,MDL_MT,MDL_WT
5197
5272
$ ,PL(0,645),COEFS)
5201
5276
$ ,COEFS)
5202
5277
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,645),4,COEFS,4,4,WL(1,0,1
5203
5278
$ ,646))
5204
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,646),2,4,77,1,875,H)
5279
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,646),2,4,77,1,1,875,H)
5205
5280
C Coefficient construction for loop diagram with ID 364
5206
5281
CALL FFS1_3L1_2(PL(0,641),W(1,13),GC_15,GC_24,MDL_MD,ZERO
5207
5282
$ ,PL(0,647),COEFS)
5208
5283
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,641),4,COEFS,4,4,WL(1,0,1
5209
5284
$ ,647))
5210
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,647),2,4,75,1,876,H)
5285
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,647),2,4,75,1,1,876,H)
5211
5286
C Coefficient construction for loop diagram with ID 365
5212
5287
CALL FFS1_3L1_2(PL(0,643),W(1,13),GC_18,GC_27,MDL_MS,ZERO
5213
5288
$ ,PL(0,648),COEFS)
5214
5289
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,643),4,COEFS,4,4,WL(1,0,1
5215
5290
$ ,648))
5216
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,648),2,4,76,1,877,H)
5291
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,648),2,4,76,1,1,877,H)
5217
5292
C Coefficient construction for loop diagram with ID 366
5218
5293
CALL FFS1_3L1_2(PL(0,645),W(1,13),GC_21,GC_30,MDL_MB,ZERO
5219
5294
$ ,PL(0,649),COEFS)
5220
5295
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,645),4,COEFS,4,4,WL(1,0,1
5221
5296
$ ,649))
5222
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,649),2,4,77,1,878,H)
5297
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,649),2,4,77,1,1,878,H)
5223
5298
C Coefficient construction for loop diagram with ID 367
5224
5299
CALL FFV2L3_1(PL(0,454),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0
5225
5300
$ ,650),COEFS)
5229
5304
$ ,COEFS)
5230
5305
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,650),4,COEFS,4,4,WL(1,0,1
5231
5306
$ ,651))
5232
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,651),6,4,78,1,879,H)
5307
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,651),6,4,78,1,1,879,H)
5233
5308
C Coefficient construction for loop diagram with ID 368
5234
5309
CALL FFV2L3_1(PL(0,458),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0
5235
5310
$ ,652),COEFS)
5239
5314
$ ,COEFS)
5240
5315
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,652),4,COEFS,4,4,WL(1,0,1
5241
5316
$ ,653))
5242
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,653),6,4,79,1,880,H)
5317
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,653),6,4,79,1,1,880,H)
5243
5318
C Coefficient construction for loop diagram with ID 369
5244
5319
CALL FFV2L3_1(PL(0,462),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0
5245
5320
$ ,654),COEFS)
5249
5324
$ ,COEFS)
5250
5325
CALL ML5_0_UPDATE_WL_4_2(WL(1,0,1,654),4,COEFS,4,4,WL(1,0,1
5251
5326
$ ,655))
5252
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,655),6,4,80,1,881,H)
5327
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,655),6,4,80,1,1,881,H)
5253
5328
C Coefficient construction for loop diagram with ID 370
5254
5329
CALL FFV2L3_1(PL(0,465),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0
5255
5330
$ ,656),COEFS)
5259
5334
$ ,PL(0,657),COEFS)
5260
5335
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,656),1,COEFS,4,1,WL(1,0,1
5261
5336
$ ,657))
5262
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,657),4,1,78,1,882,H)
5337
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,657),4,1,78,1,1,882,H)
5263
5338
C Coefficient construction for loop diagram with ID 371
5264
5339
CALL FFV2L3_1(PL(0,469),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0
5265
5340
$ ,658),COEFS)
5269
5344
$ ,PL(0,659),COEFS)
5270
5345
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,658),1,COEFS,4,1,WL(1,0,1
5271
5346
$ ,659))
5272
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,659),4,1,79,1,883,H)
5347
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,659),4,1,79,1,1,883,H)
5273
5348
C Coefficient construction for loop diagram with ID 372
5274
5349
CALL FFV2L3_1(PL(0,473),W(1,3),GC_130,MDL_MT,MDL_WT,PL(0
5275
5350
$ ,660),COEFS)
5279
5354
$ ,PL(0,661),COEFS)
5280
5355
CALL ML5_0_UPDATE_WL_4_0(WL(1,0,1,660),1,COEFS,4,1,WL(1,0,1
5281
5356
$ ,661))
5282
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,661),4,1,80,1,884,H)
5357
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,661),4,1,80,1,1,884,H)
5283
5358
C Coefficient construction for loop diagram with ID 373
5284
5359
CALL FFS1_3L3_1(PL(0,476),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5285
5360
$ ,PL(0,662),COEFS)
5289
5364
$ ,COEFS)
5290
5365
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,662),4,COEFS,4,4,WL(1,0,1
5291
5366
$ ,663))
5292
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,663),4,4,78,1,885,H)
5367
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,663),4,4,78,1,1,885,H)
5293
5368
C Coefficient construction for loop diagram with ID 374
5294
5369
CALL FFS1_3L3_1(PL(0,479),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5295
5370
$ ,PL(0,664),COEFS)
5299
5374
$ ,COEFS)
5300
5375
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,664),4,COEFS,4,4,WL(1,0,1
5301
5376
$ ,665))
5302
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,665),4,4,79,1,886,H)
5377
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,665),4,4,79,1,1,886,H)
5303
5378
C Coefficient construction for loop diagram with ID 375
5304
5379
CALL FFS1_3L3_1(PL(0,482),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5305
5380
$ ,PL(0,666),COEFS)
5309
5384
$ ,COEFS)
5310
5385
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,666),4,COEFS,4,4,WL(1,0,1
5311
5386
$ ,667))
5312
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,667),4,4,80,1,887,H)
5387
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,667),4,4,80,1,1,887,H)
5313
5388
C Coefficient construction for loop diagram with ID 376
5314
5389
CALL FFS1_3L3_1(PL(0,485),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5315
5390
$ ,PL(0,668),COEFS)
5319
5394
$ ,PL(0,669),COEFS)
5320
5395
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,668),1,COEFS,4,1,WL(1,0,1
5321
5396
$ ,669))
5322
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,669),2,1,78,1,888,H)
5397
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,669),2,1,78,1,1,888,H)
5323
5398
C Coefficient construction for loop diagram with ID 377
5324
5399
CALL FFS1_3L3_1(PL(0,488),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5325
5400
$ ,PL(0,670),COEFS)
5329
5404
$ ,PL(0,671),COEFS)
5330
5405
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,670),1,COEFS,4,1,WL(1,0,1
5331
5406
$ ,671))
5332
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,671),2,1,79,1,889,H)
5407
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,671),2,1,79,1,1,889,H)
5333
5408
C Coefficient construction for loop diagram with ID 378
5334
5409
CALL FFS1_3L3_1(PL(0,491),W(1,3),GC_15,GC_24,MDL_MT,MDL_WT
5335
5410
$ ,PL(0,672),COEFS)
5339
5414
$ ,PL(0,673),COEFS)
5340
5415
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,672),1,COEFS,4,1,WL(1,0,1
5341
5416
$ ,673))
5342
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,673),2,1,80,1,890,H)
5417
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,673),2,1,80,1,1,890,H)
5343
5418
C Coefficient construction for loop diagram with ID 379
5344
5419
CALL FFV1L2_1(PL(0,0),W(1,6),GC_1,MDL_MD,ZERO,PL(0,674)
5345
5420
$ ,COEFS)
5349
5424
$ ,COEFS)
5350
5425
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,674),4,COEFS,4,4,WL(1,0,1
5351
5426
$ ,675))
5352
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,675),2,4,81,1,891,H)
5427
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,675),2,4,81,1,1,891,H)
5353
5428
C Coefficient construction for loop diagram with ID 380
5354
5429
CALL FFV2_3L2_1(PL(0,674),W(1,15),GC_68,GC_76,MDL_MD,ZERO
5355
5430
$ ,PL(0,676),COEFS)
5356
5431
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,674),4,COEFS,4,4,WL(1,0,1
5357
5432
$ ,676))
5358
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,676),2,4,81,1,892,H)
5433
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,676),2,4,81,1,1,892,H)
5359
5434
C Coefficient construction for loop diagram with ID 381
5360
5435
CALL FFS2L2_1(PL(0,674),W(1,16),GC_104,MDL_MD,ZERO,PL(0,677)
5361
5436
$ ,COEFS)
5362
5437
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,674),4,COEFS,4,4,WL(1,0,1
5363
5438
$ ,677))
5364
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,677),2,4,81,1,893,H)
5439
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,677),2,4,81,1,1,893,H)
5365
5440
C Coefficient construction for loop diagram with ID 382
5366
5441
CALL FFS4L2_1(PL(0,674),W(1,17),GC_105,MDL_MD,ZERO,PL(0,678)
5367
5442
$ ,COEFS)
5368
5443
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,674),4,COEFS,4,4,WL(1,0,1
5369
5444
$ ,678))
5370
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,678),2,4,81,1,894,H)
5445
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,678),2,4,81,1,1,894,H)
5371
5446
C Coefficient construction for loop diagram with ID 383
5372
5447
CALL FFV2_3L2_1(PL(0,0),W(1,7),GC_68,GC_76,MDL_MD,ZERO,PL(0
5373
5448
$ ,679),COEFS)
5377
5452
$ ,COEFS)
5378
5453
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,679),4,COEFS,4,4,WL(1,0,1
5379
5454
$ ,680))
5380
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,680),2,4,81,1,895,H)
5455
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,680),2,4,81,1,1,895,H)
5381
5456
C Coefficient construction for loop diagram with ID 384
5382
5457
CALL FFV2_3L2_1(PL(0,679),W(1,15),GC_68,GC_76,MDL_MD,ZERO
5383
5458
$ ,PL(0,681),COEFS)
5384
5459
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,679),4,COEFS,4,4,WL(1,0,1
5385
5460
$ ,681))
5386
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,681),2,4,81,1,896,H)
5461
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,681),2,4,81,1,1,896,H)
5387
5462
C Coefficient construction for loop diagram with ID 385
5388
5463
CALL FFS2L2_1(PL(0,679),W(1,16),GC_104,MDL_MD,ZERO,PL(0,682)
5389
5464
$ ,COEFS)
5390
5465
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,679),4,COEFS,4,4,WL(1,0,1
5391
5466
$ ,682))
5392
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,682),2,4,81,1,897,H)
5467
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,682),2,4,81,1,1,897,H)
5393
5468
C Coefficient construction for loop diagram with ID 386
5394
5469
CALL FFS4L2_1(PL(0,679),W(1,17),GC_105,MDL_MD,ZERO,PL(0,683)
5395
5470
$ ,COEFS)
5396
5471
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,679),4,COEFS,4,4,WL(1,0,1
5397
5472
$ ,683))
5398
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,683),2,4,81,1,898,H)
5473
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,683),2,4,81,1,1,898,H)
5399
5474
C Coefficient construction for loop diagram with ID 387
5400
5475
CALL FFS2L2_1(PL(0,0),W(1,8),GC_104,MDL_MD,ZERO,PL(0,684)
5401
5476
$ ,COEFS)
5405
5480
$ ,COEFS)
5406
5481
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,684),4,COEFS,4,4,WL(1,0,1
5407
5482
$ ,685))
5408
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,685),2,4,81,1,899,H)
5483
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,685),2,4,81,1,1,899,H)
5409
5484
C Coefficient construction for loop diagram with ID 388
5410
5485
CALL FFV2_3L2_1(PL(0,684),W(1,15),GC_68,GC_76,MDL_MD,ZERO
5411
5486
$ ,PL(0,686),COEFS)
5412
5487
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,684),4,COEFS,4,4,WL(1,0,1
5413
5488
$ ,686))
5414
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,686),2,4,81,1,900,H)
5489
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,686),2,4,81,1,1,900,H)
5415
5490
C Coefficient construction for loop diagram with ID 389
5416
5491
CALL FFS2L2_1(PL(0,684),W(1,16),GC_104,MDL_MD,ZERO,PL(0,687)
5417
5492
$ ,COEFS)
5418
5493
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,684),4,COEFS,4,4,WL(1,0,1
5419
5494
$ ,687))
5420
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,687),2,4,81,1,901,H)
5495
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,687),2,4,81,1,1,901,H)
5421
5496
C Coefficient construction for loop diagram with ID 390
5422
5497
CALL FFS4L2_1(PL(0,684),W(1,17),GC_105,MDL_MD,ZERO,PL(0,688)
5423
5498
$ ,COEFS)
5424
5499
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,684),4,COEFS,4,4,WL(1,0,1
5425
5500
$ ,688))
5426
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,688),2,4,81,1,902,H)
5501
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,688),2,4,81,1,1,902,H)
5427
5502
C Coefficient construction for loop diagram with ID 391
5428
5503
CALL FFS4L2_1(PL(0,0),W(1,9),GC_105,MDL_MD,ZERO,PL(0,689)
5429
5504
$ ,COEFS)
5433
5508
$ ,COEFS)
5434
5509
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,689),4,COEFS,4,4,WL(1,0,1
5435
5510
$ ,690))
5436
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,690),2,4,81,1,903,H)
5511
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,690),2,4,81,1,1,903,H)
5437
5512
C Coefficient construction for loop diagram with ID 392
5438
5513
CALL FFV2_3L2_1(PL(0,689),W(1,15),GC_68,GC_76,MDL_MD,ZERO
5439
5514
$ ,PL(0,691),COEFS)
5440
5515
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,689),4,COEFS,4,4,WL(1,0,1
5441
5516
$ ,691))
5442
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,691),2,4,81,1,904,H)
5517
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,691),2,4,81,1,1,904,H)
5443
5518
C Coefficient construction for loop diagram with ID 393
5444
5519
CALL FFS2L2_1(PL(0,689),W(1,16),GC_104,MDL_MD,ZERO,PL(0,692)
5445
5520
$ ,COEFS)
5446
5521
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,689),4,COEFS,4,4,WL(1,0,1
5447
5522
$ ,692))
5448
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,692),2,4,81,1,905,H)
5523
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,692),2,4,81,1,1,905,H)
5449
5524
C Coefficient construction for loop diagram with ID 394
5450
5525
CALL FFS4L2_1(PL(0,689),W(1,17),GC_105,MDL_MD,ZERO,PL(0,693)
5451
5526
$ ,COEFS)
5452
5527
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,689),4,COEFS,4,4,WL(1,0,1
5453
5528
$ ,693))
5454
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,693),2,4,81,1,906,H)
5529
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,693),2,4,81,1,1,906,H)
5455
5530
C Coefficient construction for loop diagram with ID 395
5456
5531
CALL FFV1L1_2(PL(0,122),W(1,6),GC_1,MDL_MD,ZERO,PL(0,694)
5457
5532
$ ,COEFS)
5458
5533
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,122),4,COEFS,4,4,WL(1,0,1
5459
5534
$ ,694))
5460
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,694),2,4,1,1,907,H)
5535
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,694),2,4,1,1,1,907,H)
5461
5536
C Coefficient construction for loop diagram with ID 396
5462
5537
CALL FFV1L1_2(PL(0,125),W(1,6),GC_1,MDL_MD,ZERO,PL(0,695)
5463
5538
$ ,COEFS)
5464
5539
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,125),4,COEFS,4,4,WL(1,0,1
5465
5540
$ ,695))
5466
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,695),4,4,24,1,908,H)
5541
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,695),4,4,24,1,1,908,H)
5467
5542
C Coefficient construction for loop diagram with ID 397
5468
5543
CALL FFV1L1_2(PL(0,128),W(1,6),GC_1,MDL_MD,ZERO,PL(0,696)
5469
5544
$ ,COEFS)
5470
5545
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,128),4,COEFS,4,4,WL(1,0,1
5471
5546
$ ,696))
5472
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,696),2,4,24,1,909,H)
5547
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,696),2,4,24,1,1,909,H)
5473
5548
C Coefficient construction for loop diagram with ID 398
5474
5549
CALL FFV1L1_2(PL(0,131),W(1,6),GC_1,MDL_MD,ZERO,PL(0,697)
5475
5550
$ ,COEFS)
5476
5551
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,131),4,COEFS,4,4,WL(1,0,1
5477
5552
$ ,697))
5478
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,697),2,4,25,1,910,H)
5553
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,697),2,4,25,1,1,910,H)
5479
5554
C Coefficient construction for loop diagram with ID 399
5480
5555
CALL FFV2_3L1_2(PL(0,122),W(1,7),GC_68,GC_76,MDL_MD,ZERO
5481
5556
$ ,PL(0,698),COEFS)
5482
5557
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,122),4,COEFS,4,4,WL(1,0,1
5483
5558
$ ,698))
5484
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,698),2,4,1,1,911,H)
5559
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,698),2,4,1,1,1,911,H)
5485
5560
C Coefficient construction for loop diagram with ID 400
5486
5561
CALL FFV2_3L1_2(PL(0,125),W(1,7),GC_68,GC_76,MDL_MD,ZERO
5487
5562
$ ,PL(0,699),COEFS)
5488
5563
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,125),4,COEFS,4,4,WL(1,0,1
5489
5564
$ ,699))
5490
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,699),4,4,24,1,912,H)
5565
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,699),4,4,24,1,1,912,H)
5491
5566
C Coefficient construction for loop diagram with ID 401
5492
5567
CALL FFV2_3L1_2(PL(0,128),W(1,7),GC_68,GC_76,MDL_MD,ZERO
5493
5568
$ ,PL(0,700),COEFS)
5494
5569
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,128),4,COEFS,4,4,WL(1,0,1
5495
5570
$ ,700))
5496
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,700),2,4,24,1,913,H)
5571
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,700),2,4,24,1,1,913,H)
5497
5572
C Coefficient construction for loop diagram with ID 402
5498
5573
CALL FFV2_3L1_2(PL(0,131),W(1,7),GC_68,GC_76,MDL_MD,ZERO
5499
5574
$ ,PL(0,701),COEFS)
5500
5575
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,131),4,COEFS,4,4,WL(1,0,1
5501
5576
$ ,701))
5502
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,701),2,4,25,1,914,H)
5577
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,701),2,4,25,1,1,914,H)
5503
5578
C Coefficient construction for loop diagram with ID 403
5504
5579
CALL FFS2L1_2(PL(0,122),W(1,8),GC_104,MDL_MD,ZERO,PL(0,702)
5505
5580
$ ,COEFS)
5506
5581
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,122),4,COEFS,4,4,WL(1,0,1
5507
5582
$ ,702))
5508
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,702),2,4,1,1,915,H)
5583
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,702),2,4,1,1,1,915,H)
5509
5584
C Coefficient construction for loop diagram with ID 404
5510
5585
CALL FFS2L1_2(PL(0,125),W(1,8),GC_104,MDL_MD,ZERO,PL(0,703)
5511
5586
$ ,COEFS)
5512
5587
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,125),4,COEFS,4,4,WL(1,0,1
5513
5588
$ ,703))
5514
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,703),4,4,24,1,916,H)
5589
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,703),4,4,24,1,1,916,H)
5515
5590
C Coefficient construction for loop diagram with ID 405
5516
5591
CALL FFS2L1_2(PL(0,128),W(1,8),GC_104,MDL_MD,ZERO,PL(0,704)
5517
5592
$ ,COEFS)
5518
5593
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,128),4,COEFS,4,4,WL(1,0,1
5519
5594
$ ,704))
5520
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,704),2,4,24,1,917,H)
5595
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,704),2,4,24,1,1,917,H)
5521
5596
C Coefficient construction for loop diagram with ID 406
5522
5597
CALL FFS2L1_2(PL(0,131),W(1,8),GC_104,MDL_MD,ZERO,PL(0,705)
5523
5598
$ ,COEFS)
5524
5599
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,131),4,COEFS,4,4,WL(1,0,1
5525
5600
$ ,705))
5526
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,705),2,4,25,1,918,H)
5601
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,705),2,4,25,1,1,918,H)
5527
5602
C Coefficient construction for loop diagram with ID 407
5528
5603
CALL FFS4L1_2(PL(0,122),W(1,9),GC_105,MDL_MD,ZERO,PL(0,706)
5529
5604
$ ,COEFS)
5530
5605
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,122),4,COEFS,4,4,WL(1,0,1
5531
5606
$ ,706))
5532
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,706),2,4,1,1,919,H)
5607
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,706),2,4,1,1,1,919,H)
5533
5608
C Coefficient construction for loop diagram with ID 408
5534
5609
CALL FFS4L1_2(PL(0,125),W(1,9),GC_105,MDL_MD,ZERO,PL(0,707)
5535
5610
$ ,COEFS)
5536
5611
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,125),4,COEFS,4,4,WL(1,0,1
5537
5612
$ ,707))
5538
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,707),4,4,24,1,920,H)
5613
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,707),4,4,24,1,1,920,H)
5539
5614
C Coefficient construction for loop diagram with ID 409
5540
5615
CALL FFS4L1_2(PL(0,128),W(1,9),GC_105,MDL_MD,ZERO,PL(0,708)
5541
5616
$ ,COEFS)
5542
5617
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,128),4,COEFS,4,4,WL(1,0,1
5543
5618
$ ,708))
5544
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,708),2,4,24,1,921,H)
5619
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,708),2,4,24,1,1,921,H)
5545
5620
C Coefficient construction for loop diagram with ID 410
5546
5621
CALL FFS4L1_2(PL(0,131),W(1,9),GC_105,MDL_MD,ZERO,PL(0,709)
5547
5622
$ ,COEFS)
5548
5623
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,131),4,COEFS,4,4,WL(1,0,1
5549
5624
$ ,709))
5550
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,709),2,4,25,1,922,H)
5625
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,709),2,4,25,1,1,922,H)
5551
5626
C Coefficient construction for loop diagram with ID 411
5552
5627
CALL FFV2_3L3_1(PL(0,0),W(1,3),GC_68,GC_76,MDL_MD,ZERO,PL(0
5553
5628
$ ,710),COEFS)
5561
5636
$ ,COEFS)
5562
5637
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,711),4,COEFS,1,4,WL(1,0,1
5563
5638
$ ,712))
5564
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,712),2,4,82,1,923,H)
5639
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,712),2,4,82,1,1,923,H)
5565
5640
C Coefficient construction for loop diagram with ID 412
5566
5641
CALL FFS2L3_1(PL(0,0),W(1,3),GC_104,MDL_MD,ZERO,PL(0,713)
5567
5642
$ ,COEFS)
5575
5650
$ ,COEFS)
5576
5651
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,714),1,COEFS,1,1,WL(1,0,1
5577
5652
$ ,715))
5578
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,715),2,1,82,1,924,H)
5653
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,715),2,1,82,1,1,924,H)
5579
5654
C Coefficient construction for loop diagram with ID 413
5580
5655
CALL FFS4L3_1(PL(0,0),W(1,3),GC_105,MDL_MD,ZERO,PL(0,716)
5581
5656
$ ,COEFS)
5589
5664
$ ,COEFS)
5590
5665
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,717),1,COEFS,4,1,WL(1,0,1
5591
5666
$ ,718))
5592
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,718),3,1,83,1,925,H)
5667
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,718),3,1,83,1,1,925,H)
5593
5668
C Coefficient construction for loop diagram with ID 414
5594
5669
CALL FFS2L2_3(PL(0,716),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0
5595
5670
$ ,719),COEFS)
5599
5674
$ ,COEFS)
5600
5675
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,719),1,COEFS,1,1,WL(1,0,1
5601
5676
$ ,720))
5602
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,720),2,1,83,1,926,H)
5677
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,720),2,1,83,1,1,926,H)
5603
5678
C Coefficient construction for loop diagram with ID 415
5604
5679
CALL VSS1L3_1(PL(0,711),W(1,8),GC_78,MDL_MZ,MDL_WZ,PL(0,721)
5605
5680
$ ,COEFS)
5606
5681
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,711),4,COEFS,1,4,WL(1,0,1
5607
5682
$ ,721))
5608
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,721),4,4,82,1,927,H)
5683
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,721),4,4,82,1,1,927,H)
5609
5684
C Coefficient construction for loop diagram with ID 416
5610
5685
CALL SSS1L3_1(PL(0,714),W(1,8),GC_86,MDL_MZ,MDL_WZ,PL(0,722)
5611
5686
$ ,COEFS)
5612
5687
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,714),1,COEFS,1,1,WL(1,0,1
5613
5688
$ ,722))
5614
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,722),1,1,82,1,928,H)
5689
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,722),1,1,82,1,1,928,H)
5615
5690
C Coefficient construction for loop diagram with ID 417
5616
5691
CALL VSS1L1_3(PL(0,717),W(1,8),GC_78,MDL_MH,MDL_WH,PL(0,723)
5617
5692
$ ,COEFS)
5618
5693
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,717),1,COEFS,4,1,WL(1,0,1
5619
5694
$ ,723))
5620
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,723),4,1,83,1,929,H)
5695
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,723),4,1,83,1,1,929,H)
5621
5696
C Coefficient construction for loop diagram with ID 418
5622
5697
CALL SSS1L1_3(PL(0,719),W(1,8),GC_86,MDL_MH,MDL_WH,PL(0,724)
5623
5698
$ ,COEFS)
5624
5699
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,719),1,COEFS,1,1,WL(1,0,1
5625
5700
$ ,724))
5626
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,724),1,1,83,1,930,H)
5701
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,724),1,1,83,1,1,930,H)
5627
5702
C Coefficient construction for loop diagram with ID 419
5628
5703
CALL FFV2_3L2_3(PL(0,710),W(1,4),GC_68,GC_76,MDL_MZ,MDL_WZ
5629
5704
$ ,PL(0,725),COEFS)
5633
5708
$ ,COEFS)
5634
5709
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,725),4,COEFS,4,4,WL(1,0,1
5635
5710
$ ,726))
5636
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,726),5,4,84,1,931,H)
5711
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,726),5,4,84,1,1,931,H)
5637
5712
C Coefficient construction for loop diagram with ID 420
5638
5713
CALL FFS2L2_3(PL(0,710),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0
5639
5714
$ ,727),COEFS)
5643
5718
$ ,COEFS)
5644
5719
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,727),4,COEFS,1,4,WL(1,0,1
5645
5720
$ ,728))
5646
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,728),4,4,84,1,932,H)
5721
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,728),4,4,84,1,1,932,H)
5647
5722
C Coefficient construction for loop diagram with ID 421
5648
5723
CALL FFV2_3L2_3(PL(0,713),W(1,4),GC_68,GC_76,MDL_MZ,MDL_WZ
5649
5724
$ ,PL(0,729),COEFS)
5653
5728
$ ,COEFS)
5654
5729
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,729),1,COEFS,4,1,WL(1,0,1
5655
5730
$ ,730))
5656
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,730),4,1,84,1,933,H)
5731
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,730),4,1,84,1,1,933,H)
5657
5732
C Coefficient construction for loop diagram with ID 422
5658
5733
CALL FFS2L2_3(PL(0,713),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0
5659
5734
$ ,731),COEFS)
5663
5738
$ ,COEFS)
5664
5739
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,731),1,COEFS,1,1,WL(1,0,1
5665
5740
$ ,732))
5666
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,732),1,1,84,1,934,H)
5741
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,732),1,1,84,1,1,934,H)
5667
5742
C Coefficient construction for loop diagram with ID 423
5668
5743
CALL FFS4L2_3(PL(0,716),W(1,4),GC_105,MDL_MH,MDL_WH,PL(0
5669
5744
$ ,733),COEFS)
5673
5748
$ ,COEFS)
5674
5749
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,733),1,COEFS,1,1,WL(1,0,1
5675
5750
$ ,734))
5676
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,734),1,1,85,1,935,H)
5751
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,734),1,1,85,1,1,935,H)
5677
5752
C Coefficient construction for loop diagram with ID 424
5678
5753
CALL FFV2L3_1(PL(0,0),W(1,2),GC_59,MDL_MD,ZERO,PL(0,735)
5679
5754
$ ,COEFS)
5687
5762
$ ,COEFS)
5688
5763
CALL ML5_0_UPDATE_WL_1_2(WL(1,0,1,736),4,COEFS,4,4,WL(1,0,1
5689
5764
$ ,737))
5690
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,737),3,4,86,1,936,H)
5765
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,737),3,4,86,1,1,936,H)
5691
5766
C Coefficient construction for loop diagram with ID 425
5692
5767
CALL FFV2_3L2_3(PL(0,735),W(1,4),GC_68,GC_76,MDL_MZ,MDL_WZ
5693
5768
$ ,PL(0,738),COEFS)
5697
5772
$ ,739),COEFS)
5698
5773
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,738),4,COEFS,4,4,WL(1,0,1
5699
5774
$ ,739))
5700
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,739),5,4,87,1,937,H)
5775
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,739),5,4,87,1,1,937,H)
5701
5776
C Coefficient construction for loop diagram with ID 426
5702
5777
CALL FFS4L2_3(PL(0,735),W(1,4),GC_105,MDL_MH,MDL_WH,PL(0
5703
5778
$ ,740),COEFS)
5707
5782
$ ,741),COEFS)
5708
5783
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,740),4,COEFS,1,4,WL(1,0,1
5709
5784
$ ,741))
5710
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,741),2,4,88,1,938,H)
5785
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,741),2,4,88,1,1,938,H)
5711
5786
C Coefficient construction for loop diagram with ID 427
5712
5787
CALL FFS1_3L3_1(PL(0,0),W(1,2),GC_31,GC_40,MDL_MD,ZERO,PL(0
5713
5788
$ ,742),COEFS)
5721
5796
$ ,744),COEFS)
5722
5797
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,743),1,COEFS,4,1,WL(1,0,1
5723
5798
$ ,744))
5724
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,744),1,1,86,1,939,H)
5799
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,744),1,1,86,1,1,939,H)
5725
5800
C Coefficient construction for loop diagram with ID 428
5726
5801
CALL FFV2_3L2_3(PL(0,742),W(1,4),GC_68,GC_76,MDL_MZ,MDL_WZ
5727
5802
$ ,PL(0,745),COEFS)
5731
5806
$ ,746),COEFS)
5732
5807
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,745),1,COEFS,4,1,WL(1,0,1
5733
5808
$ ,746))
5734
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,746),3,1,87,1,940,H)
5809
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,746),3,1,87,1,1,940,H)
5735
5810
C Coefficient construction for loop diagram with ID 429
5736
5811
CALL FFS2L2_3(PL(0,742),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0
5737
5812
$ ,747),COEFS)
5741
5816
$ ,748),COEFS)
5742
5817
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,747),1,COEFS,1,1,WL(1,0,1
5743
5818
$ ,748))
5744
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,748),2,1,87,1,941,H)
5819
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,748),2,1,87,1,1,941,H)
5745
5820
C Coefficient construction for loop diagram with ID 430
5746
5821
CALL FFS4L2_3(PL(0,742),W(1,4),GC_105,MDL_MH,MDL_WH,PL(0
5747
5822
$ ,749),COEFS)
5751
5826
$ ,750),COEFS)
5752
5827
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,749),1,COEFS,1,1,WL(1,0,1
5753
5828
$ ,750))
5754
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,750),2,1,88,1,942,H)
5829
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,750),2,1,88,1,1,942,H)
5755
5830
C Coefficient construction for loop diagram with ID 431
5756
5831
CALL VVS1L1_2(PL(0,736),W(1,11),GC_93,MDL_MW,MDL_WW,PL(0
5757
5832
$ ,751),COEFS)
5758
5833
CALL ML5_0_UPDATE_WL_1_2(WL(1,0,1,736),4,COEFS,4,4,WL(1,0,1
5759
5834
$ ,751))
5760
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,751),3,4,86,1,943,H)
5835
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,751),3,4,86,1,1,943,H)
5761
5836
C Coefficient construction for loop diagram with ID 432
5762
5837
CALL VVS1L2_1(PL(0,738),W(1,11),GC_84,MDL_MW,MDL_WW,PL(0
5763
5838
$ ,752),COEFS)
5764
5839
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,738),4,COEFS,4,4,WL(1,0,1
5765
5840
$ ,752))
5766
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,752),5,4,87,1,944,H)
5841
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,752),5,4,87,1,1,944,H)
5767
5842
C Coefficient construction for loop diagram with ID 433
5768
5843
CALL FFS2L2_3(PL(0,735),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0
5769
5844
$ ,753),COEFS)
5773
5848
$ ,754),COEFS)
5774
5849
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,753),4,COEFS,1,4,WL(1,0,1
5775
5850
$ ,754))
5776
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,754),4,4,87,1,945,H)
5851
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,754),4,4,87,1,1,945,H)
5777
5852
C Coefficient construction for loop diagram with ID 434
5778
5853
CALL VSS1L3_1(PL(0,740),W(1,11),GC_55,MDL_MW,MDL_WW,PL(0
5779
5854
$ ,755),COEFS)
5780
5855
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,740),4,COEFS,1,4,WL(1,0,1
5781
5856
$ ,755))
5782
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,755),4,4,88,1,946,H)
5857
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,755),4,4,88,1,1,946,H)
5783
5858
C Coefficient construction for loop diagram with ID 435
5784
5859
CALL VSS1L1_3(PL(0,743),W(1,11),GC_3,MDL_MW,MDL_WW,PL(0,756)
5785
5860
$ ,COEFS)
5786
5861
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,743),1,COEFS,4,1,WL(1,0,1
5787
5862
$ ,756))
5788
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,756),2,1,86,1,947,H)
5863
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,756),2,1,86,1,1,947,H)
5789
5864
C Coefficient construction for loop diagram with ID 436
5790
5865
CALL VSS1L1_3(PL(0,745),W(1,11),GC_79,MDL_MW,MDL_WW,PL(0
5791
5866
$ ,757),COEFS)
5792
5867
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,745),1,COEFS,4,1,WL(1,0,1
5793
5868
$ ,757))
5794
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,757),4,1,87,1,948,H)
5869
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,757),4,1,87,1,1,948,H)
5795
5870
C Coefficient construction for loop diagram with ID 437
5796
5871
CALL SSS1L3_2(PL(0,749),W(1,11),GC_86,MDL_MW,MDL_WW,PL(0
5797
5872
$ ,758),COEFS)
5798
5873
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,749),1,COEFS,1,1,WL(1,0,1
5799
5874
$ ,758))
5800
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,758),1,1,88,1,949,H)
5875
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,758),1,1,88,1,1,949,H)
5801
5876
C Coefficient construction for loop diagram with ID 438
5802
5877
CALL VVV1L1_2(PL(0,430),W(1,12),GC_4,MDL_MW,MDL_WW,PL(0,759)
5803
5878
$ ,COEFS)
5804
5879
CALL ML5_0_UPDATE_WL_1_2(WL(1,0,1,430),4,COEFS,4,4,WL(1,0,1
5805
5880
$ ,759))
5806
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,759),3,4,89,1,950,H)
5881
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,759),3,4,89,1,1,950,H)
5807
5882
C Coefficient construction for loop diagram with ID 439
5808
5883
CALL VVV1L3_1(PL(0,436),W(1,12),GC_71,MDL_MW,MDL_WW,PL(0
5809
5884
$ ,760),COEFS)
5810
5885
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,436),4,COEFS,4,4,WL(1,0,1
5811
5886
$ ,760))
5812
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,760),5,4,90,1,951,H)
5887
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,760),5,4,90,1,1,951,H)
5813
5888
C Coefficient construction for loop diagram with ID 440
5814
5889
CALL VVS1L3_1(PL(0,448),W(1,12),GC_90,MDL_MW,MDL_WW,PL(0
5815
5890
$ ,761),COEFS)
5816
5891
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,448),4,COEFS,1,4,WL(1,0,1
5817
5892
$ ,761))
5818
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,761),2,4,91,1,952,H)
5893
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,761),2,4,91,1,1,952,H)
5819
5894
C Coefficient construction for loop diagram with ID 441
5820
5895
CALL VVS1L1_2(PL(0,430),W(1,13),GC_92,MDL_MW,MDL_WW,PL(0
5821
5896
$ ,762),COEFS)
5822
5897
CALL ML5_0_UPDATE_WL_1_2(WL(1,0,1,430),4,COEFS,4,4,WL(1,0,1
5823
5898
$ ,762))
5824
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,762),3,4,89,1,953,H)
5899
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,762),3,4,89,1,1,953,H)
5825
5900
C Coefficient construction for loop diagram with ID 442
5826
5901
CALL VVS1L2_1(PL(0,436),W(1,13),GC_85,MDL_MW,MDL_WW,PL(0
5827
5902
$ ,763),COEFS)
5828
5903
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,436),4,COEFS,4,4,WL(1,0,1
5829
5904
$ ,763))
5830
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,763),5,4,90,1,954,H)
5905
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,763),5,4,90,1,1,954,H)
5831
5906
C Coefficient construction for loop diagram with ID 443
5832
5907
CALL VSS1L2_1(PL(0,442),W(1,13),GC_57,MDL_MW,MDL_WW,PL(0
5833
5908
$ ,764),COEFS)
5834
5909
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,442),4,COEFS,1,4,WL(1,0,1
5835
5910
$ ,764))
5836
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,764),4,4,90,1,955,H)
5911
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,764),4,4,90,1,1,955,H)
5837
5912
C Coefficient construction for loop diagram with ID 444
5838
5913
CALL VSS1L3_1(PL(0,448),W(1,13),GC_55,MDL_MW,MDL_WW,PL(0
5839
5914
$ ,765),COEFS)
5840
5915
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,448),4,COEFS,1,4,WL(1,0,1
5841
5916
$ ,765))
5842
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,765),4,4,91,1,956,H)
5917
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,765),4,4,91,1,1,956,H)
5843
5918
C Coefficient construction for loop diagram with ID 445
5844
5919
CALL VVS1L1_3(PL(0,433),W(1,12),GC_93,MDL_MW,MDL_WW,PL(0
5845
5920
$ ,766),COEFS)
5846
5921
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,433),1,COEFS,4,1,WL(1,0,1
5847
5922
$ ,766))
5848
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,766),1,1,89,1,957,H)
5923
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,766),1,1,89,1,1,957,H)
5849
5924
C Coefficient construction for loop diagram with ID 446
5850
5925
CALL VVS1L2_3(PL(0,439),W(1,12),GC_84,MDL_MW,MDL_WW,PL(0
5851
5926
$ ,767),COEFS)
5852
5927
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,439),1,COEFS,4,1,WL(1,0,1
5853
5928
$ ,767))
5854
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,767),3,1,90,1,958,H)
5929
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,767),3,1,90,1,1,958,H)
5855
5930
C Coefficient construction for loop diagram with ID 447
5856
5931
CALL VSS1L2_3(PL(0,445),W(1,12),GC_56,MDL_MW,MDL_WW,PL(0
5857
5932
$ ,768),COEFS)
5858
5933
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,445),1,COEFS,1,1,WL(1,0,1
5859
5934
$ ,768))
5860
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,768),2,1,90,1,959,H)
5935
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,768),2,1,90,1,1,959,H)
5861
5936
C Coefficient construction for loop diagram with ID 448
5862
5937
CALL VSS1L3_2(PL(0,451),W(1,12),GC_55,MDL_MW,MDL_WW,PL(0
5863
5938
$ ,769),COEFS)
5864
5939
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,451),1,COEFS,1,1,WL(1,0,1
5865
5940
$ ,769))
5866
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,769),2,1,91,1,960,H)
5941
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,769),2,1,91,1,1,960,H)
5867
5942
C Coefficient construction for loop diagram with ID 449
5868
5943
CALL VSS1L1_2(PL(0,433),W(1,13),GC_3,MDL_MW,MDL_WW,PL(0,770)
5869
5944
$ ,COEFS)
5870
5945
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,433),1,COEFS,4,1,WL(1,0,1
5871
5946
$ ,770))
5872
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,770),2,1,89,1,961,H)
5947
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,770),2,1,89,1,1,961,H)
5873
5948
C Coefficient construction for loop diagram with ID 450
5874
5949
CALL VSS1L1_2(PL(0,439),W(1,13),GC_79,MDL_MW,MDL_WW,PL(0
5875
5950
$ ,771),COEFS)
5876
5951
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,439),1,COEFS,4,1,WL(1,0,1
5877
5952
$ ,771))
5878
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,771),4,1,90,1,962,H)
5953
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,771),4,1,90,1,1,962,H)
5879
5954
C Coefficient construction for loop diagram with ID 451
5880
5955
CALL SSS1L3_1(PL(0,451),W(1,13),GC_86,MDL_MW,MDL_WW,PL(0
5881
5956
$ ,772),COEFS)
5882
5957
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,451),1,COEFS,1,1,WL(1,0,1
5883
5958
$ ,772))
5884
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,772),1,1,91,1,963,H)
5959
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,772),1,1,91,1,1,963,H)
5885
5960
C Coefficient construction for loop diagram with ID 452
5886
5961
CALL VVV1L3_2(PL(0,454),W(1,14),GC_4,MDL_MW,MDL_WW,PL(0,773)
5887
5962
$ ,COEFS)
5888
5963
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,454),4,COEFS,4,4,WL(1,0,1
5889
5964
$ ,773))
5890
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,773),5,4,92,1,964,H)
5965
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,773),5,4,92,1,1,964,H)
5891
5966
C Coefficient construction for loop diagram with ID 453
5892
5967
CALL VVV1L2_1(PL(0,454),W(1,15),GC_71,MDL_MW,MDL_WW,PL(0
5893
5968
$ ,774),COEFS)
5894
5969
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,454),4,COEFS,4,4,WL(1,0,1
5895
5970
$ ,774))
5896
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,774),5,4,92,1,965,H)
5971
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,774),5,4,92,1,1,965,H)
5897
5972
C Coefficient construction for loop diagram with ID 454
5898
5973
CALL VVS1L2_1(PL(0,454),W(1,17),GC_90,MDL_MW,MDL_WW,PL(0
5899
5974
$ ,775),COEFS)
5900
5975
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,454),4,COEFS,4,4,WL(1,0,1
5901
5976
$ ,775))
5902
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,775),5,4,92,1,966,H)
5977
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,775),5,4,92,1,1,966,H)
5903
5978
C Coefficient construction for loop diagram with ID 455
5904
5979
CALL VVS1L3_2(PL(0,476),W(1,14),GC_92,MDL_MW,MDL_WW,PL(0
5905
5980
$ ,776),COEFS)
5906
5981
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,476),4,COEFS,1,4,WL(1,0,1
5907
5982
$ ,776))
5908
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,776),2,4,92,1,967,H)
5983
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,776),2,4,92,1,1,967,H)
5909
5984
C Coefficient construction for loop diagram with ID 456
5910
5985
CALL VVS1L3_1(PL(0,476),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
5911
5986
$ ,777),COEFS)
5912
5987
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,476),4,COEFS,1,4,WL(1,0,1
5913
5988
$ ,777))
5914
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,777),2,4,92,1,968,H)
5989
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,777),2,4,92,1,1,968,H)
5915
5990
C Coefficient construction for loop diagram with ID 457
5916
5991
CALL VSS1L3_1(PL(0,476),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
5917
5992
$ ,778),COEFS)
5918
5993
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,476),4,COEFS,1,4,WL(1,0,1
5919
5994
$ ,778))
5920
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,778),4,4,92,1,969,H)
5995
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,778),4,4,92,1,1,969,H)
5921
5996
C Coefficient construction for loop diagram with ID 458
5922
5997
CALL VSS1L2_1(PL(0,476),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
5923
5998
$ ,779),COEFS)
5924
5999
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,476),4,COEFS,1,4,WL(1,0,1
5925
6000
$ ,779))
5926
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,779),4,4,92,1,970,H)
6001
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,779),4,4,92,1,1,970,H)
5927
6002
C Coefficient construction for loop diagram with ID 459
5928
6003
CALL VVS1L2_3(PL(0,465),W(1,14),GC_93,MDL_MW,MDL_WW,PL(0
5929
6004
$ ,780),COEFS)
5930
6005
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,465),1,COEFS,4,1,WL(1,0,1
5931
6006
$ ,780))
5932
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,780),3,1,92,1,971,H)
6007
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,780),3,1,92,1,1,971,H)
5933
6008
C Coefficient construction for loop diagram with ID 460
5934
6009
CALL VVS1L1_3(PL(0,465),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
5935
6010
$ ,781),COEFS)
5936
6011
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,465),1,COEFS,4,1,WL(1,0,1
5937
6012
$ ,781))
5938
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,781),3,1,92,1,972,H)
6013
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,781),3,1,92,1,1,972,H)
5939
6014
C Coefficient construction for loop diagram with ID 461
5940
6015
CALL VSS1L1_3(PL(0,465),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
5941
6016
$ ,782),COEFS)
5942
6017
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,465),1,COEFS,4,1,WL(1,0,1
5943
6018
$ ,782))
5944
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,782),4,1,92,1,973,H)
6019
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,782),4,1,92,1,1,973,H)
5945
6020
C Coefficient construction for loop diagram with ID 462
5946
6021
CALL VSS1L1_2(PL(0,465),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
5947
6022
$ ,783),COEFS)
5948
6023
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,465),1,COEFS,4,1,WL(1,0,1
5949
6024
$ ,783))
5950
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,783),4,1,92,1,974,H)
6025
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,783),4,1,92,1,1,974,H)
5951
6026
C Coefficient construction for loop diagram with ID 463
5952
6027
CALL VSS1L3_2(PL(0,485),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0,784)
5953
6028
$ ,COEFS)
5954
6029
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,485),1,COEFS,1,1,WL(1,0,1
5955
6030
$ ,784))
5956
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,784),2,1,92,1,975,H)
6031
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,784),2,1,92,1,1,975,H)
5957
6032
C Coefficient construction for loop diagram with ID 464
5958
6033
CALL VSS1L3_2(PL(0,485),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
5959
6034
$ ,785),COEFS)
5960
6035
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,485),1,COEFS,1,1,WL(1,0,1
5961
6036
$ ,785))
5962
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,785),2,1,92,1,976,H)
6037
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,785),2,1,92,1,1,976,H)
5963
6038
C Coefficient construction for loop diagram with ID 465
5964
6039
CALL SSS1L2_1(PL(0,485),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
5965
6040
$ ,786),COEFS)
5966
6041
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,485),1,COEFS,1,1,WL(1,0,1
5967
6042
$ ,786))
5968
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,786),1,1,92,1,977,H)
6043
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,786),1,1,92,1,1,977,H)
5969
6044
C Coefficient construction for loop diagram with ID 466
5970
6045
CALL FFV1L2_1(PL(0,84),W(1,14),GC_1,MDL_MD,ZERO,PL(0,787)
5971
6046
$ ,COEFS)
5972
6047
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,84),4,COEFS,4,4,WL(1,0,1
5973
6048
$ ,787))
5974
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,787),4,4,26,1,978,H)
6049
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,787),4,4,26,1,1,978,H)
5975
6050
C Coefficient construction for loop diagram with ID 467
5976
6051
CALL FFV2_3L2_1(PL(0,84),W(1,15),GC_68,GC_76,MDL_MD,ZERO
5977
6052
$ ,PL(0,788),COEFS)
5978
6053
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,84),4,COEFS,4,4,WL(1,0,1
5979
6054
$ ,788))
5980
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,788),4,4,26,1,979,H)
6055
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,788),4,4,26,1,1,979,H)
5981
6056
C Coefficient construction for loop diagram with ID 468
5982
6057
CALL FFS2L2_1(PL(0,84),W(1,16),GC_104,MDL_MD,ZERO,PL(0,789)
5983
6058
$ ,COEFS)
5984
6059
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,84),4,COEFS,4,4,WL(1,0,1
5985
6060
$ ,789))
5986
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,789),4,4,26,1,980,H)
6061
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,789),4,4,26,1,1,980,H)
5987
6062
C Coefficient construction for loop diagram with ID 469
5988
6063
CALL FFS4L2_1(PL(0,84),W(1,17),GC_105,MDL_MD,ZERO,PL(0,790)
5989
6064
$ ,COEFS)
5990
6065
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,84),4,COEFS,4,4,WL(1,0,1
5991
6066
$ ,790))
5992
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,790),4,4,26,1,981,H)
6067
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,790),4,4,26,1,1,981,H)
5993
6068
C Coefficient construction for loop diagram with ID 470
5994
6069
CALL FFV1L2_1(PL(0,88),W(1,14),GC_1,MDL_MD,ZERO,PL(0,791)
5995
6070
$ ,COEFS)
5996
6071
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,88),4,COEFS,4,4,WL(1,0,1
5997
6072
$ ,791))
5998
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,791),2,4,26,1,982,H)
6073
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,791),2,4,26,1,1,982,H)
5999
6074
C Coefficient construction for loop diagram with ID 471
6000
6075
CALL FFV2_3L2_1(PL(0,88),W(1,15),GC_68,GC_76,MDL_MD,ZERO
6001
6076
$ ,PL(0,792),COEFS)
6002
6077
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,88),4,COEFS,4,4,WL(1,0,1
6003
6078
$ ,792))
6004
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,792),2,4,26,1,983,H)
6079
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,792),2,4,26,1,1,983,H)
6005
6080
C Coefficient construction for loop diagram with ID 472
6006
6081
CALL FFS2L2_1(PL(0,88),W(1,16),GC_104,MDL_MD,ZERO,PL(0,793)
6007
6082
$ ,COEFS)
6008
6083
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,88),4,COEFS,4,4,WL(1,0,1
6009
6084
$ ,793))
6010
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,793),2,4,26,1,984,H)
6085
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,793),2,4,26,1,1,984,H)
6011
6086
C Coefficient construction for loop diagram with ID 473
6012
6087
CALL FFS4L2_1(PL(0,88),W(1,17),GC_105,MDL_MD,ZERO,PL(0,794)
6013
6088
$ ,COEFS)
6014
6089
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,88),4,COEFS,4,4,WL(1,0,1
6015
6090
$ ,794))
6016
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,794),2,4,26,1,985,H)
6091
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,794),2,4,26,1,1,985,H)
6017
6092
C Coefficient construction for loop diagram with ID 474
6018
6093
CALL FFV1L2P0_3(PL(0,84),W(1,4),GC_1,ZERO,ZERO,PL(0,795)
6019
6094
$ ,COEFS)
6023
6098
$ ,COEFS)
6024
6099
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,795),4,COEFS,4,4,WL(1,0,1
6025
6100
$ ,796))
6026
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,796),4,4,18,1,986,H)
6101
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,796),4,4,18,1,1,986,H)
6027
6102
C Coefficient construction for loop diagram with ID 475
6028
6103
CALL FFV2_3L2_3(PL(0,84),W(1,4),GC_68,GC_76,MDL_MZ,MDL_WZ
6029
6104
$ ,PL(0,797),COEFS)
6033
6108
$ ,PL(0,798),COEFS)
6034
6109
CALL ML5_0_UPDATE_WL_5_1(WL(1,0,1,797),4,COEFS,4,4,WL(1,0,1
6035
6110
$ ,798))
6036
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,798),6,4,93,1,987,H)
6111
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,798),6,4,93,1,1,987,H)
6037
6112
C Coefficient construction for loop diagram with ID 476
6038
6113
CALL FFS2L2_3(PL(0,84),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0,799)
6039
6114
$ ,COEFS)
6043
6118
$ ,COEFS)
6044
6119
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,799),4,COEFS,1,4,WL(1,0,1
6045
6120
$ ,800))
6046
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,800),4,4,93,1,988,H)
6121
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,800),4,4,93,1,1,988,H)
6047
6122
C Coefficient construction for loop diagram with ID 477
6048
6123
CALL FFS4L2_3(PL(0,84),W(1,4),GC_105,MDL_MH,MDL_WH,PL(0,801)
6049
6124
$ ,COEFS)
6053
6128
$ ,COEFS)
6054
6129
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,801),4,COEFS,1,4,WL(1,0,1
6055
6130
$ ,802))
6056
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,802),4,4,94,1,989,H)
6131
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,802),4,4,94,1,1,989,H)
6057
6132
C Coefficient construction for loop diagram with ID 478
6058
6133
CALL FFV1L2P0_3(PL(0,88),W(1,4),GC_1,ZERO,ZERO,PL(0,803)
6059
6134
$ ,COEFS)
6063
6138
$ ,COEFS)
6064
6139
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,803),4,COEFS,4,4,WL(1,0,1
6065
6140
$ ,804))
6066
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,804),2,4,18,1,990,H)
6141
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,804),2,4,18,1,1,990,H)
6067
6142
C Coefficient construction for loop diagram with ID 479
6068
6143
CALL FFV2_3L2_3(PL(0,88),W(1,4),GC_68,GC_76,MDL_MZ,MDL_WZ
6069
6144
$ ,PL(0,805),COEFS)
6073
6148
$ ,PL(0,806),COEFS)
6074
6149
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,805),4,COEFS,4,4,WL(1,0,1
6075
6150
$ ,806))
6076
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,806),4,4,93,1,991,H)
6151
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,806),4,4,93,1,1,991,H)
6077
6152
C Coefficient construction for loop diagram with ID 480
6078
6153
CALL FFS2L2_3(PL(0,88),W(1,4),GC_104,MDL_MZ,MDL_WZ,PL(0,807)
6079
6154
$ ,COEFS)
6083
6158
$ ,COEFS)
6084
6159
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,807),4,COEFS,1,4,WL(1,0,1
6085
6160
$ ,808))
6086
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,808),2,4,93,1,992,H)
6161
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,808),2,4,93,1,1,992,H)
6087
6162
C Coefficient construction for loop diagram with ID 481
6088
6163
CALL FFS4L2_3(PL(0,88),W(1,4),GC_105,MDL_MH,MDL_WH,PL(0,809)
6089
6164
$ ,COEFS)
6093
6168
$ ,COEFS)
6094
6169
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,809),4,COEFS,1,4,WL(1,0,1
6095
6170
$ ,810))
6096
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,810),2,4,94,1,993,H)
6171
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,810),2,4,94,1,1,993,H)
6097
6172
C Coefficient construction for loop diagram with ID 482
6098
6173
CALL FFV1L2_1(PL(0,0),W(1,6),GC_1,MDL_MS,ZERO,PL(0,811)
6099
6174
$ ,COEFS)
6103
6178
$ ,COEFS)
6104
6179
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,811),4,COEFS,4,4,WL(1,0,1
6105
6180
$ ,812))
6106
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,812),2,4,95,1,994,H)
6181
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,812),2,4,95,1,1,994,H)
6107
6182
C Coefficient construction for loop diagram with ID 483
6108
6183
CALL FFV2_3L2_1(PL(0,811),W(1,15),GC_68,GC_76,MDL_MS,ZERO
6109
6184
$ ,PL(0,813),COEFS)
6110
6185
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,811),4,COEFS,4,4,WL(1,0,1
6111
6186
$ ,813))
6112
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,813),2,4,95,1,995,H)
6187
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,813),2,4,95,1,1,995,H)
6113
6188
C Coefficient construction for loop diagram with ID 484
6114
6189
CALL FFS2L2_1(PL(0,811),W(1,16),GC_114,MDL_MS,ZERO,PL(0,814)
6115
6190
$ ,COEFS)
6116
6191
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,811),4,COEFS,4,4,WL(1,0,1
6117
6192
$ ,814))
6118
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,814),2,4,95,1,996,H)
6193
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,814),2,4,95,1,1,996,H)
6119
6194
C Coefficient construction for loop diagram with ID 485
6120
6195
CALL FFS4L2_1(PL(0,811),W(1,17),GC_115,MDL_MS,ZERO,PL(0,815)
6121
6196
$ ,COEFS)
6122
6197
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,811),4,COEFS,4,4,WL(1,0,1
6123
6198
$ ,815))
6124
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,815),2,4,95,1,997,H)
6199
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,815),2,4,95,1,1,997,H)
6125
6200
C Coefficient construction for loop diagram with ID 486
6126
6201
CALL FFV2_3L2_1(PL(0,0),W(1,7),GC_68,GC_76,MDL_MS,ZERO,PL(0
6127
6202
$ ,816),COEFS)
6131
6206
$ ,COEFS)
6132
6207
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,816),4,COEFS,4,4,WL(1,0,1
6133
6208
$ ,817))
6134
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,817),2,4,95,1,998,H)
6209
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,817),2,4,95,1,1,998,H)
6135
6210
C Coefficient construction for loop diagram with ID 487
6136
6211
CALL FFV2_3L2_1(PL(0,816),W(1,15),GC_68,GC_76,MDL_MS,ZERO
6137
6212
$ ,PL(0,818),COEFS)
6138
6213
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,816),4,COEFS,4,4,WL(1,0,1
6139
6214
$ ,818))
6140
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,818),2,4,95,1,999,H)
6215
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,818),2,4,95,1,1,999,H)
6141
6216
C Coefficient construction for loop diagram with ID 488
6142
6217
CALL FFS2L2_1(PL(0,816),W(1,16),GC_114,MDL_MS,ZERO,PL(0,819)
6143
6218
$ ,COEFS)
6144
6219
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,816),4,COEFS,4,4,WL(1,0,1
6145
6220
$ ,819))
6146
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,819),2,4,95,1,1000,H)
6221
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,819),2,4,95,1,1,1000,H)
6147
6222
C Coefficient construction for loop diagram with ID 489
6148
6223
CALL FFS4L2_1(PL(0,816),W(1,17),GC_115,MDL_MS,ZERO,PL(0,820)
6149
6224
$ ,COEFS)
6150
6225
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,816),4,COEFS,4,4,WL(1,0,1
6151
6226
$ ,820))
6152
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,820),2,4,95,1,1001,H)
6227
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,820),2,4,95,1,1,1001,H)
6153
6228
C Coefficient construction for loop diagram with ID 490
6154
6229
CALL FFS2L2_1(PL(0,0),W(1,8),GC_114,MDL_MS,ZERO,PL(0,821)
6155
6230
$ ,COEFS)
6159
6234
$ ,COEFS)
6160
6235
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,821),4,COEFS,4,4,WL(1,0,1
6161
6236
$ ,822))
6162
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,822),2,4,95,1,1002,H)
6237
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,822),2,4,95,1,1,1002,H)
6163
6238
C Coefficient construction for loop diagram with ID 491
6164
6239
CALL FFV2_3L2_1(PL(0,821),W(1,15),GC_68,GC_76,MDL_MS,ZERO
6165
6240
$ ,PL(0,823),COEFS)
6166
6241
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,821),4,COEFS,4,4,WL(1,0,1
6167
6242
$ ,823))
6168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,823),2,4,95,1,1003,H)
6243
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,823),2,4,95,1,1,1003,H)
6169
6244
C Coefficient construction for loop diagram with ID 492
6170
6245
CALL FFS2L2_1(PL(0,821),W(1,16),GC_114,MDL_MS,ZERO,PL(0,824)
6171
6246
$ ,COEFS)
6172
6247
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,821),4,COEFS,4,4,WL(1,0,1
6173
6248
$ ,824))
6174
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,824),2,4,95,1,1004,H)
6249
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,824),2,4,95,1,1,1004,H)
6175
6250
C Coefficient construction for loop diagram with ID 493
6176
6251
CALL FFS4L2_1(PL(0,821),W(1,17),GC_115,MDL_MS,ZERO,PL(0,825)
6177
6252
$ ,COEFS)
6178
6253
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,821),4,COEFS,4,4,WL(1,0,1
6179
6254
$ ,825))
6180
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,825),2,4,95,1,1005,H)
6255
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,825),2,4,95,1,1,1005,H)
6181
6256
C Coefficient construction for loop diagram with ID 494
6182
6257
CALL FFS4L2_1(PL(0,0),W(1,9),GC_115,MDL_MS,ZERO,PL(0,826)
6183
6258
$ ,COEFS)
6187
6262
$ ,COEFS)
6188
6263
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,826),4,COEFS,4,4,WL(1,0,1
6189
6264
$ ,827))
6190
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,827),2,4,95,1,1006,H)
6265
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,827),2,4,95,1,1,1006,H)
6191
6266
C Coefficient construction for loop diagram with ID 495
6192
6267
CALL FFV2_3L2_1(PL(0,826),W(1,15),GC_68,GC_76,MDL_MS,ZERO
6193
6268
$ ,PL(0,828),COEFS)
6194
6269
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,826),4,COEFS,4,4,WL(1,0,1
6195
6270
$ ,828))
6196
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,828),2,4,95,1,1007,H)
6271
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,828),2,4,95,1,1,1007,H)
6197
6272
C Coefficient construction for loop diagram with ID 496
6198
6273
CALL FFS2L2_1(PL(0,826),W(1,16),GC_114,MDL_MS,ZERO,PL(0,829)
6199
6274
$ ,COEFS)
6200
6275
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,826),4,COEFS,4,4,WL(1,0,1
6201
6276
$ ,829))
6202
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,829),2,4,95,1,1008,H)
6277
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,829),2,4,95,1,1,1008,H)
6203
6278
C Coefficient construction for loop diagram with ID 497
6204
6279
CALL FFS4L2_1(PL(0,826),W(1,17),GC_115,MDL_MS,ZERO,PL(0,830)
6205
6280
$ ,COEFS)
6206
6281
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,826),4,COEFS,4,4,WL(1,0,1
6207
6282
$ ,830))
6208
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,830),2,4,95,1,1009,H)
6283
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,830),2,4,95,1,1,1009,H)
6209
6284
C Coefficient construction for loop diagram with ID 498
6210
6285
CALL VVV1L3_2(PL(0,458),W(1,14),GC_4,MDL_MW,MDL_WW,PL(0,831)
6211
6286
$ ,COEFS)
6212
6287
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,458),4,COEFS,4,4,WL(1,0,1
6213
6288
$ ,831))
6214
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,831),5,4,96,1,1010,H)
6289
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,831),5,4,96,1,1,1010,H)
6215
6290
C Coefficient construction for loop diagram with ID 499
6216
6291
CALL VVV1L2_1(PL(0,458),W(1,15),GC_71,MDL_MW,MDL_WW,PL(0
6217
6292
$ ,832),COEFS)
6218
6293
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,458),4,COEFS,4,4,WL(1,0,1
6219
6294
$ ,832))
6220
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,832),5,4,96,1,1011,H)
6295
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,832),5,4,96,1,1,1011,H)
6221
6296
C Coefficient construction for loop diagram with ID 500
6222
6297
CALL VVS1L2_1(PL(0,458),W(1,17),GC_90,MDL_MW,MDL_WW,PL(0
6223
6298
$ ,833),COEFS)
6224
6299
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,458),4,COEFS,4,4,WL(1,0,1
6225
6300
$ ,833))
6226
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,833),5,4,96,1,1012,H)
6301
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,833),5,4,96,1,1,1012,H)
6227
6302
C Coefficient construction for loop diagram with ID 501
6228
6303
CALL VVS1L3_2(PL(0,479),W(1,14),GC_92,MDL_MW,MDL_WW,PL(0
6229
6304
$ ,834),COEFS)
6230
6305
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,479),4,COEFS,1,4,WL(1,0,1
6231
6306
$ ,834))
6232
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,834),2,4,96,1,1013,H)
6307
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,834),2,4,96,1,1,1013,H)
6233
6308
C Coefficient construction for loop diagram with ID 502
6234
6309
CALL VVS1L3_1(PL(0,479),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
6235
6310
$ ,835),COEFS)
6236
6311
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,479),4,COEFS,1,4,WL(1,0,1
6237
6312
$ ,835))
6238
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,835),2,4,96,1,1014,H)
6313
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,835),2,4,96,1,1,1014,H)
6239
6314
C Coefficient construction for loop diagram with ID 503
6240
6315
CALL VSS1L3_1(PL(0,479),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
6241
6316
$ ,836),COEFS)
6242
6317
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,479),4,COEFS,1,4,WL(1,0,1
6243
6318
$ ,836))
6244
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,836),4,4,96,1,1015,H)
6319
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,836),4,4,96,1,1,1015,H)
6245
6320
C Coefficient construction for loop diagram with ID 504
6246
6321
CALL VSS1L2_1(PL(0,479),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6247
6322
$ ,837),COEFS)
6248
6323
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,479),4,COEFS,1,4,WL(1,0,1
6249
6324
$ ,837))
6250
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,837),4,4,96,1,1016,H)
6325
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,837),4,4,96,1,1,1016,H)
6251
6326
C Coefficient construction for loop diagram with ID 505
6252
6327
CALL VVS1L2_3(PL(0,469),W(1,14),GC_93,MDL_MW,MDL_WW,PL(0
6253
6328
$ ,838),COEFS)
6254
6329
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,469),1,COEFS,4,1,WL(1,0,1
6255
6330
$ ,838))
6256
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,838),3,1,96,1,1017,H)
6331
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,838),3,1,96,1,1,1017,H)
6257
6332
C Coefficient construction for loop diagram with ID 506
6258
6333
CALL VVS1L1_3(PL(0,469),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
6259
6334
$ ,839),COEFS)
6260
6335
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,469),1,COEFS,4,1,WL(1,0,1
6261
6336
$ ,839))
6262
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,839),3,1,96,1,1018,H)
6337
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,839),3,1,96,1,1,1018,H)
6263
6338
C Coefficient construction for loop diagram with ID 507
6264
6339
CALL VSS1L1_3(PL(0,469),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
6265
6340
$ ,840),COEFS)
6266
6341
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,469),1,COEFS,4,1,WL(1,0,1
6267
6342
$ ,840))
6268
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,840),4,1,96,1,1019,H)
6343
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,840),4,1,96,1,1,1019,H)
6269
6344
C Coefficient construction for loop diagram with ID 508
6270
6345
CALL VSS1L1_2(PL(0,469),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6271
6346
$ ,841),COEFS)
6272
6347
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,469),1,COEFS,4,1,WL(1,0,1
6273
6348
$ ,841))
6274
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,841),4,1,96,1,1020,H)
6349
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,841),4,1,96,1,1,1020,H)
6275
6350
C Coefficient construction for loop diagram with ID 509
6276
6351
CALL VSS1L3_2(PL(0,488),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0,842)
6277
6352
$ ,COEFS)
6278
6353
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,488),1,COEFS,1,1,WL(1,0,1
6279
6354
$ ,842))
6280
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,842),2,1,96,1,1021,H)
6355
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,842),2,1,96,1,1,1021,H)
6281
6356
C Coefficient construction for loop diagram with ID 510
6282
6357
CALL VSS1L3_2(PL(0,488),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
6283
6358
$ ,843),COEFS)
6284
6359
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,488),1,COEFS,1,1,WL(1,0,1
6285
6360
$ ,843))
6286
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,843),2,1,96,1,1022,H)
6361
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,843),2,1,96,1,1,1022,H)
6287
6362
C Coefficient construction for loop diagram with ID 511
6288
6363
CALL SSS1L2_1(PL(0,488),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
6289
6364
$ ,844),COEFS)
6290
6365
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,488),1,COEFS,1,1,WL(1,0,1
6291
6366
$ ,844))
6292
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,844),1,1,96,1,1023,H)
6367
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,844),1,1,96,1,1,1023,H)
6293
6368
C Coefficient construction for loop diagram with ID 512
6294
6369
CALL FFV1L2_1(PL(0,136),W(1,14),GC_1,MDL_MS,ZERO,PL(0,845)
6295
6370
$ ,COEFS)
6296
6371
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,136),4,COEFS,4,4,WL(1,0,1
6297
6372
$ ,845))
6298
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,845),4,4,27,1,1024,H)
6373
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,845),4,4,27,1,1,1024,H)
6299
6374
C Coefficient construction for loop diagram with ID 513
6300
6375
CALL FFV2_3L2_1(PL(0,136),W(1,15),GC_68,GC_76,MDL_MS,ZERO
6301
6376
$ ,PL(0,846),COEFS)
6302
6377
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,136),4,COEFS,4,4,WL(1,0,1
6303
6378
$ ,846))
6304
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,846),4,4,27,1,1025,H)
6379
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,846),4,4,27,1,1,1025,H)
6305
6380
C Coefficient construction for loop diagram with ID 514
6306
6381
CALL FFS2L2_1(PL(0,136),W(1,16),GC_114,MDL_MS,ZERO,PL(0,847)
6307
6382
$ ,COEFS)
6308
6383
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,136),4,COEFS,4,4,WL(1,0,1
6309
6384
$ ,847))
6310
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,847),4,4,27,1,1026,H)
6385
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,847),4,4,27,1,1,1026,H)
6311
6386
C Coefficient construction for loop diagram with ID 515
6312
6387
CALL FFS4L2_1(PL(0,136),W(1,17),GC_115,MDL_MS,ZERO,PL(0,848)
6313
6388
$ ,COEFS)
6314
6389
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,136),4,COEFS,4,4,WL(1,0,1
6315
6390
$ ,848))
6316
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,848),4,4,27,1,1027,H)
6391
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,848),4,4,27,1,1,1027,H)
6317
6392
C Coefficient construction for loop diagram with ID 516
6318
6393
CALL FFV1L2_1(PL(0,139),W(1,14),GC_1,MDL_MS,ZERO,PL(0,849)
6319
6394
$ ,COEFS)
6320
6395
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,139),4,COEFS,4,4,WL(1,0,1
6321
6396
$ ,849))
6322
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,849),2,4,27,1,1028,H)
6397
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,849),2,4,27,1,1,1028,H)
6323
6398
C Coefficient construction for loop diagram with ID 517
6324
6399
CALL FFV2_3L2_1(PL(0,139),W(1,15),GC_68,GC_76,MDL_MS,ZERO
6325
6400
$ ,PL(0,850),COEFS)
6326
6401
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,139),4,COEFS,4,4,WL(1,0,1
6327
6402
$ ,850))
6328
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,850),2,4,27,1,1029,H)
6403
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,850),2,4,27,1,1,1029,H)
6329
6404
C Coefficient construction for loop diagram with ID 518
6330
6405
CALL FFS2L2_1(PL(0,139),W(1,16),GC_114,MDL_MS,ZERO,PL(0,851)
6331
6406
$ ,COEFS)
6332
6407
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,139),4,COEFS,4,4,WL(1,0,1
6333
6408
$ ,851))
6334
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,851),2,4,27,1,1030,H)
6409
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,851),2,4,27,1,1,1030,H)
6335
6410
C Coefficient construction for loop diagram with ID 519
6336
6411
CALL FFS4L2_1(PL(0,139),W(1,17),GC_115,MDL_MS,ZERO,PL(0,852)
6337
6412
$ ,COEFS)
6338
6413
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,139),4,COEFS,4,4,WL(1,0,1
6339
6414
$ ,852))
6340
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,852),2,4,27,1,1031,H)
6415
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,852),2,4,27,1,1,1031,H)
6341
6416
C Coefficient construction for loop diagram with ID 520
6342
6417
CALL FFV1L2_1(PL(0,0),W(1,6),GC_1,MDL_MB,ZERO,PL(0,853)
6343
6418
$ ,COEFS)
6347
6422
$ ,COEFS)
6348
6423
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,853),4,COEFS,4,4,WL(1,0,1
6349
6424
$ ,854))
6350
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,854),2,4,97,1,1032,H)
6425
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,854),2,4,97,1,1,1032,H)
6351
6426
C Coefficient construction for loop diagram with ID 521
6352
6427
CALL FFV2_3L2_1(PL(0,853),W(1,15),GC_68,GC_76,MDL_MB,ZERO
6353
6428
$ ,PL(0,855),COEFS)
6354
6429
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,853),4,COEFS,4,4,WL(1,0,1
6355
6430
$ ,855))
6356
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,855),2,4,97,1,1033,H)
6431
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,855),2,4,97,1,1,1033,H)
6357
6432
C Coefficient construction for loop diagram with ID 522
6358
6433
CALL FFS2L2_1(PL(0,853),W(1,16),GC_100,MDL_MB,ZERO,PL(0,856)
6359
6434
$ ,COEFS)
6360
6435
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,853),4,COEFS,4,4,WL(1,0,1
6361
6436
$ ,856))
6362
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,856),2,4,97,1,1034,H)
6437
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,856),2,4,97,1,1,1034,H)
6363
6438
C Coefficient construction for loop diagram with ID 523
6364
6439
CALL FFS4L2_1(PL(0,853),W(1,17),GC_101,MDL_MB,ZERO,PL(0,857)
6365
6440
$ ,COEFS)
6366
6441
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,853),4,COEFS,4,4,WL(1,0,1
6367
6442
$ ,857))
6368
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,857),2,4,97,1,1035,H)
6443
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,857),2,4,97,1,1,1035,H)
6369
6444
C Coefficient construction for loop diagram with ID 524
6370
6445
CALL FFV2_3L2_1(PL(0,0),W(1,7),GC_68,GC_76,MDL_MB,ZERO,PL(0
6371
6446
$ ,858),COEFS)
6375
6450
$ ,COEFS)
6376
6451
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,858),4,COEFS,4,4,WL(1,0,1
6377
6452
$ ,859))
6378
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,859),2,4,97,1,1036,H)
6453
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,859),2,4,97,1,1,1036,H)
6379
6454
C Coefficient construction for loop diagram with ID 525
6380
6455
CALL FFV2_3L2_1(PL(0,858),W(1,15),GC_68,GC_76,MDL_MB,ZERO
6381
6456
$ ,PL(0,860),COEFS)
6382
6457
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,858),4,COEFS,4,4,WL(1,0,1
6383
6458
$ ,860))
6384
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,860),2,4,97,1,1037,H)
6459
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,860),2,4,97,1,1,1037,H)
6385
6460
C Coefficient construction for loop diagram with ID 526
6386
6461
CALL FFS2L2_1(PL(0,858),W(1,16),GC_100,MDL_MB,ZERO,PL(0,861)
6387
6462
$ ,COEFS)
6388
6463
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,858),4,COEFS,4,4,WL(1,0,1
6389
6464
$ ,861))
6390
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,861),2,4,97,1,1038,H)
6465
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,861),2,4,97,1,1,1038,H)
6391
6466
C Coefficient construction for loop diagram with ID 527
6392
6467
CALL FFS4L2_1(PL(0,858),W(1,17),GC_101,MDL_MB,ZERO,PL(0,862)
6393
6468
$ ,COEFS)
6394
6469
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,858),4,COEFS,4,4,WL(1,0,1
6395
6470
$ ,862))
6396
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,862),2,4,97,1,1039,H)
6471
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,862),2,4,97,1,1,1039,H)
6397
6472
C Coefficient construction for loop diagram with ID 528
6398
6473
CALL FFS2L2_1(PL(0,0),W(1,8),GC_100,MDL_MB,ZERO,PL(0,863)
6399
6474
$ ,COEFS)
6403
6478
$ ,COEFS)
6404
6479
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,863),4,COEFS,4,4,WL(1,0,1
6405
6480
$ ,864))
6406
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,864),2,4,97,1,1040,H)
6481
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,864),2,4,97,1,1,1040,H)
6407
6482
C Coefficient construction for loop diagram with ID 529
6408
6483
CALL FFV2_3L2_1(PL(0,863),W(1,15),GC_68,GC_76,MDL_MB,ZERO
6409
6484
$ ,PL(0,865),COEFS)
6410
6485
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,863),4,COEFS,4,4,WL(1,0,1
6411
6486
$ ,865))
6412
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,865),2,4,97,1,1041,H)
6487
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,865),2,4,97,1,1,1041,H)
6413
6488
C Coefficient construction for loop diagram with ID 530
6414
6489
CALL FFS2L2_1(PL(0,863),W(1,16),GC_100,MDL_MB,ZERO,PL(0,866)
6415
6490
$ ,COEFS)
6416
6491
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,863),4,COEFS,4,4,WL(1,0,1
6417
6492
$ ,866))
6418
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,866),2,4,97,1,1042,H)
6493
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,866),2,4,97,1,1,1042,H)
6419
6494
C Coefficient construction for loop diagram with ID 531
6420
6495
CALL FFS4L2_1(PL(0,863),W(1,17),GC_101,MDL_MB,ZERO,PL(0,867)
6421
6496
$ ,COEFS)
6422
6497
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,863),4,COEFS,4,4,WL(1,0,1
6423
6498
$ ,867))
6424
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,867),2,4,97,1,1043,H)
6499
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,867),2,4,97,1,1,1043,H)
6425
6500
C Coefficient construction for loop diagram with ID 532
6426
6501
CALL FFS4L2_1(PL(0,0),W(1,9),GC_101,MDL_MB,ZERO,PL(0,868)
6427
6502
$ ,COEFS)
6431
6506
$ ,COEFS)
6432
6507
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,868),4,COEFS,4,4,WL(1,0,1
6433
6508
$ ,869))
6434
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,869),2,4,97,1,1044,H)
6509
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,869),2,4,97,1,1,1044,H)
6435
6510
C Coefficient construction for loop diagram with ID 533
6436
6511
CALL FFV2_3L2_1(PL(0,868),W(1,15),GC_68,GC_76,MDL_MB,ZERO
6437
6512
$ ,PL(0,870),COEFS)
6438
6513
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,868),4,COEFS,4,4,WL(1,0,1
6439
6514
$ ,870))
6440
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,870),2,4,97,1,1045,H)
6515
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,870),2,4,97,1,1,1045,H)
6441
6516
C Coefficient construction for loop diagram with ID 534
6442
6517
CALL FFS2L2_1(PL(0,868),W(1,16),GC_100,MDL_MB,ZERO,PL(0,871)
6443
6518
$ ,COEFS)
6444
6519
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,868),4,COEFS,4,4,WL(1,0,1
6445
6520
$ ,871))
6446
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,871),2,4,97,1,1046,H)
6521
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,871),2,4,97,1,1,1046,H)
6447
6522
C Coefficient construction for loop diagram with ID 535
6448
6523
CALL FFS4L2_1(PL(0,868),W(1,17),GC_101,MDL_MB,ZERO,PL(0,872)
6449
6524
$ ,COEFS)
6450
6525
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,868),4,COEFS,4,4,WL(1,0,1
6451
6526
$ ,872))
6452
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,872),2,4,97,1,1047,H)
6527
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,872),2,4,97,1,1,1047,H)
6453
6528
C Coefficient construction for loop diagram with ID 536
6454
6529
CALL VVV1L3_2(PL(0,462),W(1,14),GC_4,MDL_MW,MDL_WW,PL(0,873)
6455
6530
$ ,COEFS)
6456
6531
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,462),4,COEFS,4,4,WL(1,0,1
6457
6532
$ ,873))
6458
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,873),5,4,98,1,1048,H)
6533
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,873),5,4,98,1,1,1048,H)
6459
6534
C Coefficient construction for loop diagram with ID 537
6460
6535
CALL VVV1L2_1(PL(0,462),W(1,15),GC_71,MDL_MW,MDL_WW,PL(0
6461
6536
$ ,874),COEFS)
6462
6537
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,462),4,COEFS,4,4,WL(1,0,1
6463
6538
$ ,874))
6464
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,874),5,4,98,1,1049,H)
6539
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,874),5,4,98,1,1,1049,H)
6465
6540
C Coefficient construction for loop diagram with ID 538
6466
6541
CALL VVS1L2_1(PL(0,462),W(1,17),GC_90,MDL_MW,MDL_WW,PL(0
6467
6542
$ ,875),COEFS)
6468
6543
CALL ML5_0_UPDATE_WL_3_2(WL(1,0,1,462),4,COEFS,4,4,WL(1,0,1
6469
6544
$ ,875))
6470
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,875),5,4,98,1,1050,H)
6545
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,875),5,4,98,1,1,1050,H)
6471
6546
C Coefficient construction for loop diagram with ID 539
6472
6547
CALL VVS1L3_2(PL(0,482),W(1,14),GC_92,MDL_MW,MDL_WW,PL(0
6473
6548
$ ,876),COEFS)
6474
6549
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,482),4,COEFS,1,4,WL(1,0,1
6475
6550
$ ,876))
6476
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,876),2,4,98,1,1051,H)
6551
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,876),2,4,98,1,1,1051,H)
6477
6552
C Coefficient construction for loop diagram with ID 540
6478
6553
CALL VVS1L3_1(PL(0,482),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
6479
6554
$ ,877),COEFS)
6480
6555
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,482),4,COEFS,1,4,WL(1,0,1
6481
6556
$ ,877))
6482
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,877),2,4,98,1,1052,H)
6557
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,877),2,4,98,1,1,1052,H)
6483
6558
C Coefficient construction for loop diagram with ID 541
6484
6559
CALL VSS1L3_1(PL(0,482),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
6485
6560
$ ,878),COEFS)
6486
6561
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,482),4,COEFS,1,4,WL(1,0,1
6487
6562
$ ,878))
6488
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,878),4,4,98,1,1053,H)
6563
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,878),4,4,98,1,1,1053,H)
6489
6564
C Coefficient construction for loop diagram with ID 542
6490
6565
CALL VSS1L2_1(PL(0,482),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6491
6566
$ ,879),COEFS)
6492
6567
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,482),4,COEFS,1,4,WL(1,0,1
6493
6568
$ ,879))
6494
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,879),4,4,98,1,1054,H)
6569
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,879),4,4,98,1,1,1054,H)
6495
6570
C Coefficient construction for loop diagram with ID 543
6496
6571
CALL VVS1L2_3(PL(0,473),W(1,14),GC_93,MDL_MW,MDL_WW,PL(0
6497
6572
$ ,880),COEFS)
6498
6573
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,473),1,COEFS,4,1,WL(1,0,1
6499
6574
$ ,880))
6500
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,880),3,1,98,1,1055,H)
6575
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,880),3,1,98,1,1,1055,H)
6501
6576
C Coefficient construction for loop diagram with ID 544
6502
6577
CALL VVS1L1_3(PL(0,473),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
6503
6578
$ ,881),COEFS)
6504
6579
CALL ML5_0_UPDATE_WL_3_0(WL(1,0,1,473),1,COEFS,4,1,WL(1,0,1
6505
6580
$ ,881))
6506
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,881),3,1,98,1,1056,H)
6581
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,881),3,1,98,1,1,1056,H)
6507
6582
C Coefficient construction for loop diagram with ID 545
6508
6583
CALL VSS1L1_3(PL(0,473),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
6509
6584
$ ,882),COEFS)
6510
6585
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,473),1,COEFS,4,1,WL(1,0,1
6511
6586
$ ,882))
6512
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,882),4,1,98,1,1057,H)
6587
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,882),4,1,98,1,1,1057,H)
6513
6588
C Coefficient construction for loop diagram with ID 546
6514
6589
CALL VSS1L1_2(PL(0,473),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6515
6590
$ ,883),COEFS)
6516
6591
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,473),1,COEFS,4,1,WL(1,0,1
6517
6592
$ ,883))
6518
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,883),4,1,98,1,1058,H)
6593
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,883),4,1,98,1,1,1058,H)
6519
6594
C Coefficient construction for loop diagram with ID 547
6520
6595
CALL VSS1L3_2(PL(0,491),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0,884)
6521
6596
$ ,COEFS)
6522
6597
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,491),1,COEFS,1,1,WL(1,0,1
6523
6598
$ ,884))
6524
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,884),2,1,98,1,1059,H)
6599
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,884),2,1,98,1,1,1059,H)
6525
6600
C Coefficient construction for loop diagram with ID 548
6526
6601
CALL VSS1L3_2(PL(0,491),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
6527
6602
$ ,885),COEFS)
6528
6603
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,491),1,COEFS,1,1,WL(1,0,1
6529
6604
$ ,885))
6530
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,885),2,1,98,1,1060,H)
6605
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,885),2,1,98,1,1,1060,H)
6531
6606
C Coefficient construction for loop diagram with ID 549
6532
6607
CALL SSS1L2_1(PL(0,491),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
6533
6608
$ ,886),COEFS)
6534
6609
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,491),1,COEFS,1,1,WL(1,0,1
6535
6610
$ ,886))
6536
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,886),1,1,98,1,1061,H)
6611
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,886),1,1,98,1,1,1061,H)
6537
6612
C Coefficient construction for loop diagram with ID 550
6538
6613
CALL FFV1L2_1(PL(0,142),W(1,14),GC_1,MDL_MB,ZERO,PL(0,887)
6539
6614
$ ,COEFS)
6540
6615
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,142),4,COEFS,4,4,WL(1,0,1
6541
6616
$ ,887))
6542
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,887),4,4,28,1,1062,H)
6617
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,887),4,4,28,1,1,1062,H)
6543
6618
C Coefficient construction for loop diagram with ID 551
6544
6619
CALL FFV2_3L2_1(PL(0,142),W(1,15),GC_68,GC_76,MDL_MB,ZERO
6545
6620
$ ,PL(0,888),COEFS)
6546
6621
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,142),4,COEFS,4,4,WL(1,0,1
6547
6622
$ ,888))
6548
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,888),4,4,28,1,1063,H)
6623
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,888),4,4,28,1,1,1063,H)
6549
6624
C Coefficient construction for loop diagram with ID 552
6550
6625
CALL FFS2L2_1(PL(0,142),W(1,16),GC_100,MDL_MB,ZERO,PL(0,889)
6551
6626
$ ,COEFS)
6552
6627
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,142),4,COEFS,4,4,WL(1,0,1
6553
6628
$ ,889))
6554
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,889),4,4,28,1,1064,H)
6629
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,889),4,4,28,1,1,1064,H)
6555
6630
C Coefficient construction for loop diagram with ID 553
6556
6631
CALL FFS4L2_1(PL(0,142),W(1,17),GC_101,MDL_MB,ZERO,PL(0,890)
6557
6632
$ ,COEFS)
6558
6633
CALL ML5_0_UPDATE_WL_3_1(WL(1,0,1,142),4,COEFS,4,4,WL(1,0,1
6559
6634
$ ,890))
6560
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,890),4,4,28,1,1065,H)
6635
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,890),4,4,28,1,1,1065,H)
6561
6636
C Coefficient construction for loop diagram with ID 554
6562
6637
CALL FFV1L2_1(PL(0,145),W(1,14),GC_1,MDL_MB,ZERO,PL(0,891)
6563
6638
$ ,COEFS)
6564
6639
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,145),4,COEFS,4,4,WL(1,0,1
6565
6640
$ ,891))
6566
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,891),2,4,28,1,1066,H)
6641
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,891),2,4,28,1,1,1066,H)
6567
6642
C Coefficient construction for loop diagram with ID 555
6568
6643
CALL FFV2_3L2_1(PL(0,145),W(1,15),GC_68,GC_76,MDL_MB,ZERO
6569
6644
$ ,PL(0,892),COEFS)
6570
6645
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,145),4,COEFS,4,4,WL(1,0,1
6571
6646
$ ,892))
6572
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,892),2,4,28,1,1067,H)
6647
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,892),2,4,28,1,1,1067,H)
6573
6648
C Coefficient construction for loop diagram with ID 556
6574
6649
CALL FFS2L2_1(PL(0,145),W(1,16),GC_100,MDL_MB,ZERO,PL(0,893)
6575
6650
$ ,COEFS)
6576
6651
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,145),4,COEFS,4,4,WL(1,0,1
6577
6652
$ ,893))
6578
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,893),2,4,28,1,1068,H)
6653
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,893),2,4,28,1,1,1068,H)
6579
6654
C Coefficient construction for loop diagram with ID 557
6580
6655
CALL FFS4L2_1(PL(0,145),W(1,17),GC_101,MDL_MB,ZERO,PL(0,894)
6581
6656
$ ,COEFS)
6582
6657
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,145),4,COEFS,4,4,WL(1,0,1
6583
6658
$ ,894))
6584
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,894),2,4,28,1,1069,H)
6659
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,894),2,4,28,1,1,1069,H)
6585
6660
C Coefficient construction for loop diagram with ID 558
6586
6661
CALL VVV1L1_3(PL(0,0),W(1,10),GC_4,MDL_MW,MDL_WW,PL(0,895)
6587
6662
$ ,COEFS)
6591
6666
$ ,COEFS)
6592
6667
CALL ML5_0_UPDATE_WL_2_1(WL(1,0,1,895),4,COEFS,4,4,WL(1,0,1
6593
6668
$ ,896))
6594
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,896),3,4,99,1,1070,H)
6669
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,896),3,4,99,1,1,1070,H)
6595
6670
C Coefficient construction for loop diagram with ID 559
6596
6671
CALL VVS1L1_3(PL(0,0),W(1,10),GC_92,MDL_MW,MDL_WW,PL(0,897)
6597
6672
$ ,COEFS)
6601
6676
$ ,COEFS)
6602
6677
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,897),4,COEFS,1,4,WL(1,0,1
6603
6678
$ ,898))
6604
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,898),0,4,99,1,1071,H)
6679
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,898),0,4,99,1,1,1071,H)
6605
6680
C Coefficient construction for loop diagram with ID 560
6606
6681
CALL VVS1L2P0_1(PL(0,895),W(1,13),GC_92,ZERO,ZERO,PL(0,899)
6607
6682
$ ,COEFS)
6608
6683
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,895),4,COEFS,4,4,WL(1,0,1
6609
6684
$ ,899))
6610
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,899),2,4,99,1,1072,H)
6685
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,899),2,4,99,1,1,1072,H)
6611
6686
C Coefficient construction for loop diagram with ID 561
6612
6687
CALL VSS1L2P0_1(PL(0,897),W(1,13),GC_3,ZERO,ZERO,PL(0,900)
6613
6688
$ ,COEFS)
6614
6689
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,897),4,COEFS,1,4,WL(1,0,1
6615
6690
$ ,900))
6616
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,900),1,4,99,1,1073,H)
6691
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,900),1,4,99,1,1,1073,H)
6617
6692
C Coefficient construction for loop diagram with ID 562
6618
6693
CALL VSS1L1_3(PL(0,0),W(1,11),GC_3,MDL_MW,MDL_WW,PL(0,901)
6619
6694
$ ,COEFS)
6623
6698
$ ,COEFS)
6624
6699
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,901),4,COEFS,1,4,WL(1,0,1
6625
6700
$ ,902))
6626
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,902),1,4,99,1,1074,H)
6701
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,902),1,4,99,1,1,1074,H)
6627
6702
C Coefficient construction for loop diagram with ID 563
6628
6703
CALL VVS1L1_2(PL(0,0),W(1,11),GC_93,MDL_MW,MDL_WW,PL(0,903)
6629
6704
$ ,COEFS)
6633
6708
$ ,COEFS)
6634
6709
CALL ML5_0_UPDATE_WL_2_1(WL(1,0,1,903),4,COEFS,4,4,WL(1,0,1
6635
6710
$ ,904))
6636
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,904),3,4,99,1,1075,H)
6711
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,904),3,4,99,1,1,1075,H)
6637
6712
C Coefficient construction for loop diagram with ID 564
6638
6713
CALL VSS1L2P0_1(PL(0,901),W(1,13),GC_3,ZERO,ZERO,PL(0,905)
6639
6714
$ ,COEFS)
6640
6715
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,901),4,COEFS,1,4,WL(1,0,1
6641
6716
$ ,905))
6642
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,905),2,4,99,1,1076,H)
6717
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,905),2,4,99,1,1,1076,H)
6643
6718
C Coefficient construction for loop diagram with ID 565
6644
6719
CALL VVS1L2P0_1(PL(0,903),W(1,13),GC_92,ZERO,ZERO,PL(0,906)
6645
6720
$ ,COEFS)
6646
6721
CALL ML5_0_UPDATE_WL_2_0(WL(1,0,1,903),4,COEFS,4,4,WL(1,0,1
6647
6722
$ ,906))
6648
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,906),2,4,99,1,1077,H)
6723
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,906),2,4,99,1,1,1077,H)
6649
6724
C Coefficient construction for loop diagram with ID 566
6650
6725
CALL VVS1L1_3(PL(0,0),W(1,7),GC_99,MDL_MH,MDL_WH,PL(0,907)
6651
6726
$ ,COEFS)
6655
6730
$ ,908),COEFS)
6656
6731
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,907),4,COEFS,1,4,WL(1,0,1
6657
6732
$ ,908))
6658
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,908),1,4,101,1,1078,H)
6733
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,908),1,4,101,1,1,1078
6734
$ ,H)
6659
6735
C Coefficient construction for loop diagram with ID 567
6660
6736
CALL VSS1L3_1(PL(0,907),W(1,16),GC_78,MDL_MZ,MDL_WZ,PL(0
6661
6737
$ ,909),COEFS)
6662
6738
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,907),4,COEFS,1,4,WL(1,0,1
6663
6739
$ ,909))
6664
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,909),3,4,101,1,1079,H)
6740
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,909),3,4,101,1,1,1079
6741
$ ,H)
6665
6742
C Coefficient construction for loop diagram with ID 568
6666
6743
CALL VSS1L1_3(PL(0,0),W(1,8),GC_78,MDL_MH,MDL_WH,PL(0,910)
6667
6744
$ ,COEFS)
6671
6748
$ ,911),COEFS)
6672
6749
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,910),4,COEFS,1,4,WL(1,0,1
6673
6750
$ ,911))
6674
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,911),2,4,101,1,1080,H)
6751
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,911),2,4,101,1,1,1080
6752
$ ,H)
6675
6753
C Coefficient construction for loop diagram with ID 569
6676
6754
CALL VVSS1L2_1(PL(0,0),W(1,8),W(1,16),GC_83,MDL_MZ,MDL_WZ
6677
6755
$ ,PL(0,912),COEFS)
6678
6756
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6679
6757
$ ,912))
6680
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,912),2,4,100,2,1081,H)
6758
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,912),2,4,100,2,1,1081
6759
$ ,H)
6681
6760
C Coefficient construction for loop diagram with ID 570
6682
6761
CALL VSS1L3_1(PL(0,910),W(1,16),GC_78,MDL_MZ,MDL_WZ,PL(0
6683
6762
$ ,913),COEFS)
6684
6763
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,910),4,COEFS,1,4,WL(1,0,1
6685
6764
$ ,913))
6686
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,913),4,4,101,1,1082,H)
6765
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,913),4,4,101,1,1,1082
6766
$ ,H)
6687
6767
C Coefficient construction for loop diagram with ID 571
6688
6768
CALL VVSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_83,MDL_MZ,MDL_WZ
6689
6769
$ ,PL(0,914),COEFS)
6690
6770
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6691
6771
$ ,914))
6692
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,914),2,4,100,2,1083,H)
6772
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,914),2,4,100,2,1,1083
6773
$ ,H)
6693
6774
C Coefficient construction for loop diagram with ID 572
6694
6775
CALL VSS1L1_2(PL(0,0),W(1,9),GC_78,MDL_MZ,MDL_WZ,PL(0,915)
6695
6776
$ ,COEFS)
6699
6780
$ ,916),COEFS)
6700
6781
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,915),4,COEFS,1,4,WL(1,0,1
6701
6782
$ ,916))
6702
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,916),4,4,102,1,1084,H)
6783
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,916),4,4,102,1,1,1084
6784
$ ,H)
6703
6785
C Coefficient construction for loop diagram with ID 573
6704
6786
CALL VVS1L2_1(PL(0,0),W(1,9),GC_99,MDL_MZ,MDL_WZ,PL(0,917)
6705
6787
$ ,COEFS)
6709
6791
$ ,918),COEFS)
6710
6792
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,917),4,COEFS,4,4,WL(1,0,1
6711
6793
$ ,918))
6712
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,918),4,4,102,2,1085,H)
6794
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,918),4,4,102,2,1,1085
6795
$ ,H)
6713
6796
C Coefficient construction for loop diagram with ID 574
6714
6797
CALL VVVV2L4_3(PL(0,0),W(1,10),W(1,12),GC_54,MDL_MZ,MDL_WZ
6715
6798
$ ,PL(0,919),COEFS)
6716
6799
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6717
6800
$ ,919))
6718
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,919),2,4,100,2,1086,H)
6801
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,919),2,4,100,2,1,1086
6802
$ ,H)
6719
6803
C Coefficient construction for loop diagram with ID 575
6720
6804
CALL VVV1L3_2(PL(0,0),W(1,10),GC_71,MDL_MW,MDL_WW,PL(0,920)
6721
6805
$ ,COEFS)
6725
6809
$ ,921),COEFS)
6726
6810
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,920),4,COEFS,4,4,WL(1,0,1
6727
6811
$ ,921))
6728
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,921),4,4,103,1,1087,H)
6812
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,921),4,4,103,1,1,1087
6813
$ ,H)
6729
6814
C Coefficient construction for loop diagram with ID 576
6730
6815
CALL VVS1L2_3(PL(0,0),W(1,10),GC_85,MDL_MW,MDL_WW,PL(0,922)
6731
6816
$ ,COEFS)
6735
6820
$ ,923),COEFS)
6736
6821
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,922),4,COEFS,1,4,WL(1,0,1
6737
6822
$ ,923))
6738
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,923),1,4,103,1,1088,H)
6823
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,923),1,4,103,1,1,1088
6824
$ ,H)
6739
6825
C Coefficient construction for loop diagram with ID 577
6740
6826
CALL VVS1L1_2(PL(0,920),W(1,13),GC_85,MDL_MZ,MDL_WZ,PL(0
6741
6827
$ ,924),COEFS)
6742
6828
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,920),4,COEFS,4,4,WL(1,0,1
6743
6829
$ ,924))
6744
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,924),4,4,103,1,1089,H)
6830
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,924),4,4,103,1,1,1089
6831
$ ,H)
6745
6832
C Coefficient construction for loop diagram with ID 578
6746
6833
CALL VSS1L2_1(PL(0,922),W(1,13),GC_79,MDL_MZ,MDL_WZ,PL(0
6747
6834
$ ,925),COEFS)
6748
6835
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,922),4,COEFS,1,4,WL(1,0,1
6749
6836
$ ,925))
6750
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,925),3,4,103,1,1090,H)
6837
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,925),3,4,103,1,1,1090
6838
$ ,H)
6751
6839
C Coefficient construction for loop diagram with ID 579
6752
6840
CALL VSS1L1_3(PL(0,0),W(1,11),GC_79,MDL_MW,MDL_WW,PL(0,926)
6753
6841
$ ,COEFS)
6757
6845
$ ,927),COEFS)
6758
6846
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,926),4,COEFS,1,4,WL(1,0,1
6759
6847
$ ,927))
6760
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,927),2,4,103,1,1091,H)
6848
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,927),2,4,103,1,1,1091
6849
$ ,H)
6761
6850
C Coefficient construction for loop diagram with ID 580
6762
6851
CALL VVS1L2_1(PL(0,0),W(1,11),GC_84,MDL_MW,MDL_WW,PL(0,928)
6763
6852
$ ,COEFS)
6767
6856
$ ,929),COEFS)
6768
6857
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,928),4,COEFS,4,4,WL(1,0,1
6769
6858
$ ,929))
6770
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,929),4,4,103,1,1092,H)
6859
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,929),4,4,103,1,1,1092
6860
$ ,H)
6771
6861
C Coefficient construction for loop diagram with ID 581
6772
6862
CALL VVSS1L2_1(PL(0,0),W(1,11),W(1,13),GC_82,MDL_MZ,MDL_WZ
6773
6863
$ ,PL(0,930),COEFS)
6774
6864
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6775
6865
$ ,930))
6776
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,930),2,4,100,2,1093,H)
6866
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,930),2,4,100,2,1,1093
6867
$ ,H)
6777
6868
C Coefficient construction for loop diagram with ID 582
6778
6869
CALL VSS1L2_1(PL(0,926),W(1,13),GC_79,MDL_MZ,MDL_WZ,PL(0
6779
6870
$ ,931),COEFS)
6780
6871
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,926),4,COEFS,1,4,WL(1,0,1
6781
6872
$ ,931))
6782
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,931),4,4,103,1,1094,H)
6873
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,931),4,4,103,1,1,1094
6874
$ ,H)
6783
6875
C Coefficient construction for loop diagram with ID 583
6784
6876
CALL VVS1L1_2(PL(0,928),W(1,13),GC_85,MDL_MZ,MDL_WZ,PL(0
6785
6877
$ ,932),COEFS)
6786
6878
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,928),4,COEFS,4,4,WL(1,0,1
6787
6879
$ ,932))
6788
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,932),4,4,103,1,1095,H)
6880
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,932),4,4,103,1,1,1095
6881
$ ,H)
6789
6882
C Coefficient construction for loop diagram with ID 584
6790
6883
CALL VVVV2L4_3(PL(0,0),W(1,6),W(1,14),GC_5,MDL_MW,MDL_WW
6791
6884
$ ,PL(0,933),COEFS)
6792
6885
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6793
6886
$ ,933))
6794
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,933),2,4,104,1,1096,H)
6887
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,933),2,4,104,1,1,1096
6888
$ ,H)
6795
6889
C Coefficient construction for loop diagram with ID 585
6796
6890
CALL VVV1L3_2(PL(0,0),W(1,6),GC_4,MDL_MW,MDL_WW,PL(0,934)
6797
6891
$ ,COEFS)
6801
6895
$ ,COEFS)
6802
6896
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,934),4,COEFS,4,4,WL(1,0,1
6803
6897
$ ,935))
6804
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,935),4,4,105,1,1097,H)
6898
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,935),4,4,105,1,1,1097
6899
$ ,H)
6805
6900
C Coefficient construction for loop diagram with ID 586
6806
6901
CALL VVS1L2_3(PL(0,0),W(1,6),GC_93,MDL_MW,MDL_WW,PL(0,936)
6807
6902
$ ,COEFS)
6811
6906
$ ,937),COEFS)
6812
6907
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,936),4,COEFS,1,4,WL(1,0,1
6813
6908
$ ,937))
6814
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,937),1,4,105,1,1098,H)
6909
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,937),1,4,105,1,1,1098
6910
$ ,H)
6815
6911
C Coefficient construction for loop diagram with ID 587
6816
6912
CALL VVS1L2_3(PL(0,0),W(1,6),GC_92,MDL_MW,MDL_WW,PL(0,938)
6817
6913
$ ,COEFS)
6821
6917
$ ,939),COEFS)
6822
6918
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,938),4,COEFS,1,4,WL(1,0,1
6823
6919
$ ,939))
6824
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,939),1,4,105,1,1099,H)
6920
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,939),1,4,105,1,1,1099
6921
$ ,H)
6825
6922
C Coefficient construction for loop diagram with ID 588
6826
6923
CALL VVVV5L3_2(PL(0,0),W(1,6),W(1,15),GC_75,MDL_MW,MDL_WW
6827
6924
$ ,PL(0,940),COEFS)
6828
6925
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6829
6926
$ ,940))
6830
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,940),2,4,104,1,1100,H)
6927
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,940),2,4,104,1,1,1100
6928
$ ,H)
6831
6929
C Coefficient construction for loop diagram with ID 589
6832
6930
CALL VVV1L2_1(PL(0,934),W(1,15),GC_71,MDL_MW,MDL_WW,PL(0
6833
6931
$ ,941),COEFS)
6834
6932
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,934),4,COEFS,4,4,WL(1,0,1
6835
6933
$ ,941))
6836
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,941),4,4,105,1,1101,H)
6934
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,941),4,4,105,1,1,1101
6935
$ ,H)
6837
6936
C Coefficient construction for loop diagram with ID 590
6838
6937
CALL VVS1L3_1(PL(0,936),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
6839
6938
$ ,942),COEFS)
6840
6939
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,936),4,COEFS,1,4,WL(1,0,1
6841
6940
$ ,942))
6842
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,942),1,4,105,1,1102,H)
6941
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,942),1,4,105,1,1,1102
6942
$ ,H)
6843
6943
C Coefficient construction for loop diagram with ID 591
6844
6944
CALL VVS1L3_1(PL(0,938),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
6845
6945
$ ,943),COEFS)
6846
6946
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,938),4,COEFS,1,4,WL(1,0,1
6847
6947
$ ,943))
6848
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,943),1,4,105,1,1103,H)
6948
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,943),1,4,105,1,1,1103
6949
$ ,H)
6849
6950
C Coefficient construction for loop diagram with ID 592
6850
6951
CALL VSS1L3_1(PL(0,936),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
6851
6952
$ ,944),COEFS)
6852
6953
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,936),4,COEFS,1,4,WL(1,0,1
6853
6954
$ ,944))
6854
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,944),3,4,105,1,1104,H)
6955
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,944),3,4,105,1,1,1104
6956
$ ,H)
6855
6957
C Coefficient construction for loop diagram with ID 593
6856
6958
CALL VSS1L3_1(PL(0,938),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
6857
6959
$ ,945),COEFS)
6858
6960
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,938),4,COEFS,1,4,WL(1,0,1
6859
6961
$ ,945))
6860
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,945),3,4,105,1,1105,H)
6962
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,945),3,4,105,1,1,1105
6963
$ ,H)
6861
6964
C Coefficient construction for loop diagram with ID 594
6862
6965
CALL VVS1L2_1(PL(0,934),W(1,17),GC_90,MDL_MW,MDL_WW,PL(0
6863
6966
$ ,946),COEFS)
6864
6967
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,934),4,COEFS,4,4,WL(1,0,1
6865
6968
$ ,946))
6866
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,946),4,4,105,1,1106,H)
6969
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,946),4,4,105,1,1,1106
6970
$ ,H)
6867
6971
C Coefficient construction for loop diagram with ID 595
6868
6972
CALL VSS1L2_1(PL(0,936),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6869
6973
$ ,947),COEFS)
6870
6974
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,936),4,COEFS,1,4,WL(1,0,1
6871
6975
$ ,947))
6872
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,947),3,4,105,1,1107,H)
6976
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,947),3,4,105,1,1,1107
6977
$ ,H)
6873
6978
C Coefficient construction for loop diagram with ID 596
6874
6979
CALL VSS1L2_1(PL(0,938),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6875
6980
$ ,948),COEFS)
6876
6981
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,938),4,COEFS,1,4,WL(1,0,1
6877
6982
$ ,948))
6878
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,948),3,4,105,1,1108,H)
6983
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,948),3,4,105,1,1,1108
6984
$ ,H)
6879
6985
C Coefficient construction for loop diagram with ID 597
6880
6986
CALL VVVV5L3_2(PL(0,0),W(1,14),W(1,7),GC_75,MDL_MW,MDL_WW
6881
6987
$ ,PL(0,949),COEFS)
6882
6988
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6883
6989
$ ,949))
6884
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,949),2,4,104,1,1109,H)
6990
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,949),2,4,104,1,1,1109
6991
$ ,H)
6885
6992
C Coefficient construction for loop diagram with ID 598
6886
6993
CALL VVV1L2_1(PL(0,0),W(1,7),GC_71,MDL_MW,MDL_WW,PL(0,950)
6887
6994
$ ,COEFS)
6891
6998
$ ,COEFS)
6892
6999
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,950),4,COEFS,4,4,WL(1,0,1
6893
7000
$ ,951))
6894
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,951),4,4,105,1,1110,H)
7001
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,951),4,4,105,1,1,1110
7002
$ ,H)
6895
7003
C Coefficient construction for loop diagram with ID 599
6896
7004
CALL VVS1L1_3(PL(0,0),W(1,7),GC_84,MDL_MW,MDL_WW,PL(0,952)
6897
7005
$ ,COEFS)
6901
7009
$ ,953),COEFS)
6902
7010
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,952),4,COEFS,1,4,WL(1,0,1
6903
7011
$ ,953))
6904
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,953),1,4,105,1,1111,H)
7012
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,953),1,4,105,1,1,1111
7013
$ ,H)
6905
7014
C Coefficient construction for loop diagram with ID 600
6906
7015
CALL VVS1L1_3(PL(0,0),W(1,7),GC_85,MDL_MW,MDL_WW,PL(0,954)
6907
7016
$ ,COEFS)
6911
7020
$ ,955),COEFS)
6912
7021
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,954),4,COEFS,1,4,WL(1,0,1
6913
7022
$ ,955))
6914
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,955),1,4,105,1,1112,H)
7023
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,955),1,4,105,1,1,1112
7024
$ ,H)
6915
7025
C Coefficient construction for loop diagram with ID 601
6916
7026
CALL VVVV2L2_1(PL(0,0),W(1,7),W(1,15),GC_54,MDL_MW,MDL_WW
6917
7027
$ ,PL(0,956),COEFS)
6918
7028
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
6919
7029
$ ,956))
6920
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,956),2,4,104,1,1113,H)
7030
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,956),2,4,104,1,1,1113
7031
$ ,H)
6921
7032
C Coefficient construction for loop diagram with ID 602
6922
7033
CALL VVV1L2_1(PL(0,950),W(1,15),GC_71,MDL_MW,MDL_WW,PL(0
6923
7034
$ ,957),COEFS)
6924
7035
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,950),4,COEFS,4,4,WL(1,0,1
6925
7036
$ ,957))
6926
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,957),4,4,105,1,1114,H)
7037
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,957),4,4,105,1,1,1114
7038
$ ,H)
6927
7039
C Coefficient construction for loop diagram with ID 603
6928
7040
CALL VVS1L3_1(PL(0,952),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
6929
7041
$ ,958),COEFS)
6930
7042
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,952),4,COEFS,1,4,WL(1,0,1
6931
7043
$ ,958))
6932
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,958),1,4,105,1,1115,H)
7044
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,958),1,4,105,1,1,1115
7045
$ ,H)
6933
7046
C Coefficient construction for loop diagram with ID 604
6934
7047
CALL VVS1L3_1(PL(0,954),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
6935
7048
$ ,959),COEFS)
6936
7049
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,954),4,COEFS,1,4,WL(1,0,1
6937
7050
$ ,959))
6938
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,959),1,4,105,1,1116,H)
7051
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,959),1,4,105,1,1,1116
7052
$ ,H)
6939
7053
C Coefficient construction for loop diagram with ID 605
6940
7054
CALL VSS1L3_1(PL(0,952),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
6941
7055
$ ,960),COEFS)
6942
7056
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,952),4,COEFS,1,4,WL(1,0,1
6943
7057
$ ,960))
6944
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,960),3,4,105,1,1117,H)
7058
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,960),3,4,105,1,1,1117
7059
$ ,H)
6945
7060
C Coefficient construction for loop diagram with ID 606
6946
7061
CALL VSS1L3_1(PL(0,954),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
6947
7062
$ ,961),COEFS)
6948
7063
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,954),4,COEFS,1,4,WL(1,0,1
6949
7064
$ ,961))
6950
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,961),3,4,105,1,1118,H)
7065
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,961),3,4,105,1,1,1118
7066
$ ,H)
6951
7067
C Coefficient construction for loop diagram with ID 607
6952
7068
CALL VVS1L2_1(PL(0,950),W(1,17),GC_90,MDL_MW,MDL_WW,PL(0
6953
7069
$ ,962),COEFS)
6954
7070
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,950),4,COEFS,4,4,WL(1,0,1
6955
7071
$ ,962))
6956
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,962),4,4,105,1,1119,H)
7072
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,962),4,4,105,1,1,1119
7073
$ ,H)
6957
7074
C Coefficient construction for loop diagram with ID 608
6958
7075
CALL VSS1L2_1(PL(0,952),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6959
7076
$ ,963),COEFS)
6960
7077
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,952),4,COEFS,1,4,WL(1,0,1
6961
7078
$ ,963))
6962
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,963),3,4,105,1,1120,H)
7079
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,963),3,4,105,1,1,1120
7080
$ ,H)
6963
7081
C Coefficient construction for loop diagram with ID 609
6964
7082
CALL VSS1L2_1(PL(0,954),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
6965
7083
$ ,964),COEFS)
6966
7084
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,954),4,COEFS,1,4,WL(1,0,1
6967
7085
$ ,964))
6968
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,964),3,4,105,1,1121,H)
7086
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,964),3,4,105,1,1,1121
7087
$ ,H)
6969
7088
C Coefficient construction for loop diagram with ID 610
6970
7089
CALL VSS1L1_3(PL(0,0),W(1,8),GC_56,MDL_MW,MDL_WW,PL(0,965)
6971
7090
$ ,COEFS)
6975
7094
$ ,966),COEFS)
6976
7095
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,965),4,COEFS,1,4,WL(1,0,1
6977
7096
$ ,966))
6978
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,966),2,4,105,1,1122,H)
7097
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,966),2,4,105,1,1,1122
7098
$ ,H)
6979
7099
C Coefficient construction for loop diagram with ID 611
6980
7100
CALL VSS1L1_3(PL(0,0),W(1,8),GC_57,MDL_MW,MDL_WW,PL(0,967)
6981
7101
$ ,COEFS)
6985
7105
$ ,968),COEFS)
6986
7106
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,967),4,COEFS,1,4,WL(1,0,1
6987
7107
$ ,968))
6988
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,968),2,4,105,1,1123,H)
7108
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,968),2,4,105,1,1,1123
7109
$ ,H)
6989
7110
C Coefficient construction for loop diagram with ID 612
6990
7111
CALL VVS1L3_1(PL(0,965),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
6991
7112
$ ,969),COEFS)
6992
7113
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,965),4,COEFS,1,4,WL(1,0,1
6993
7114
$ ,969))
6994
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,969),2,4,105,1,1124,H)
7115
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,969),2,4,105,1,1,1124
7116
$ ,H)
6995
7117
C Coefficient construction for loop diagram with ID 613
6996
7118
CALL VVS1L3_1(PL(0,967),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
6997
7119
$ ,970),COEFS)
6998
7120
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,967),4,COEFS,1,4,WL(1,0,1
6999
7121
$ ,970))
7000
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,970),2,4,105,1,1125,H)
7122
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,970),2,4,105,1,1,1125
7123
$ ,H)
7001
7124
C Coefficient construction for loop diagram with ID 614
7002
7125
CALL VVSS1L2_1(PL(0,0),W(1,8),W(1,16),GC_52,MDL_MW,MDL_WW
7003
7126
$ ,PL(0,971),COEFS)
7004
7127
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7005
7128
$ ,971))
7006
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,971),2,4,104,1,1126,H)
7129
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,971),2,4,104,1,1,1126
7130
$ ,H)
7007
7131
C Coefficient construction for loop diagram with ID 615
7008
7132
CALL VSS1L3_1(PL(0,965),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
7009
7133
$ ,972),COEFS)
7010
7134
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,965),4,COEFS,1,4,WL(1,0,1
7011
7135
$ ,972))
7012
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,972),4,4,105,1,1127,H)
7136
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,972),4,4,105,1,1,1127
7137
$ ,H)
7013
7138
C Coefficient construction for loop diagram with ID 616
7014
7139
CALL VSS1L3_1(PL(0,967),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
7015
7140
$ ,973),COEFS)
7016
7141
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,967),4,COEFS,1,4,WL(1,0,1
7017
7142
$ ,973))
7018
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,973),4,4,105,1,1128,H)
7143
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,973),4,4,105,1,1,1128
7144
$ ,H)
7019
7145
C Coefficient construction for loop diagram with ID 617
7020
7146
CALL VSS1L2_1(PL(0,965),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
7021
7147
$ ,974),COEFS)
7022
7148
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,965),4,COEFS,1,4,WL(1,0,1
7023
7149
$ ,974))
7024
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,974),4,4,105,1,1129,H)
7150
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,974),4,4,105,1,1,1129
7151
$ ,H)
7025
7152
C Coefficient construction for loop diagram with ID 618
7026
7153
CALL VSS1L2_1(PL(0,967),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
7027
7154
$ ,975),COEFS)
7028
7155
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,967),4,COEFS,1,4,WL(1,0,1
7029
7156
$ ,975))
7030
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,975),4,4,105,1,1130,H)
7157
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,975),4,4,105,1,1,1130
7158
$ ,H)
7031
7159
C Coefficient construction for loop diagram with ID 619
7032
7160
CALL VSS1L1_2(PL(0,0),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,976)
7033
7161
$ ,COEFS)
7037
7165
$ ,977),COEFS)
7038
7166
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,976),4,COEFS,1,4,WL(1,0,1
7039
7167
$ ,977))
7040
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,977),2,4,105,1,1131,H)
7168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,977),2,4,105,1,1,1131
7169
$ ,H)
7041
7170
C Coefficient construction for loop diagram with ID 620
7042
7171
CALL VVS1L2_1(PL(0,0),W(1,9),GC_90,MDL_MW,MDL_WW,PL(0,978)
7043
7172
$ ,COEFS)
7047
7176
$ ,COEFS)
7048
7177
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,978),4,COEFS,4,4,WL(1,0,1
7049
7178
$ ,979))
7050
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,979),4,4,105,1,1132,H)
7179
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,979),4,4,105,1,1,1132
7180
$ ,H)
7051
7181
C Coefficient construction for loop diagram with ID 621
7052
7182
CALL VSS1L1_2(PL(0,0),W(1,9),GC_55,MDL_MW,MDL_WW,PL(0,980)
7053
7183
$ ,COEFS)
7057
7187
$ ,981),COEFS)
7058
7188
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,980),4,COEFS,1,4,WL(1,0,1
7059
7189
$ ,981))
7060
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,981),2,4,105,1,1133,H)
7190
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,981),2,4,105,1,1,1133
7191
$ ,H)
7061
7192
C Coefficient construction for loop diagram with ID 622
7062
7193
CALL VVS1L3_1(PL(0,976),W(1,15),GC_85,MDL_MW,MDL_WW,PL(0
7063
7194
$ ,982),COEFS)
7064
7195
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,976),4,COEFS,1,4,WL(1,0,1
7065
7196
$ ,982))
7066
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,982),2,4,105,1,1134,H)
7197
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,982),2,4,105,1,1,1134
7198
$ ,H)
7067
7199
C Coefficient construction for loop diagram with ID 623
7068
7200
CALL VVV1L2_1(PL(0,978),W(1,15),GC_71,MDL_MW,MDL_WW,PL(0
7069
7201
$ ,983),COEFS)
7070
7202
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,978),4,COEFS,4,4,WL(1,0,1
7071
7203
$ ,983))
7072
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,983),4,4,105,1,1135,H)
7204
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,983),4,4,105,1,1,1135
7205
$ ,H)
7073
7206
C Coefficient construction for loop diagram with ID 624
7074
7207
CALL VVS1L3_1(PL(0,980),W(1,15),GC_84,MDL_MW,MDL_WW,PL(0
7075
7208
$ ,984),COEFS)
7076
7209
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,980),4,COEFS,1,4,WL(1,0,1
7077
7210
$ ,984))
7078
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,984),2,4,105,1,1136,H)
7211
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,984),2,4,105,1,1,1136
7212
$ ,H)
7079
7213
C Coefficient construction for loop diagram with ID 625
7080
7214
CALL VSS1L3_1(PL(0,976),W(1,16),GC_57,MDL_MW,MDL_WW,PL(0
7081
7215
$ ,985),COEFS)
7082
7216
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,976),4,COEFS,1,4,WL(1,0,1
7083
7217
$ ,985))
7084
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,985),4,4,105,1,1137,H)
7218
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,985),4,4,105,1,1,1137
7219
$ ,H)
7085
7220
C Coefficient construction for loop diagram with ID 626
7086
7221
CALL VSS1L3_1(PL(0,980),W(1,16),GC_56,MDL_MW,MDL_WW,PL(0
7087
7222
$ ,986),COEFS)
7088
7223
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,980),4,COEFS,1,4,WL(1,0,1
7089
7224
$ ,986))
7090
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,986),4,4,105,1,1138,H)
7225
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,986),4,4,105,1,1,1138
7226
$ ,H)
7091
7227
C Coefficient construction for loop diagram with ID 627
7092
7228
CALL VVSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_52,MDL_MW,MDL_WW
7093
7229
$ ,PL(0,987),COEFS)
7094
7230
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7095
7231
$ ,987))
7096
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,987),2,4,104,1,1139,H)
7232
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,987),2,4,104,1,1,1139
7233
$ ,H)
7097
7234
C Coefficient construction for loop diagram with ID 628
7098
7235
CALL VSS1L2_1(PL(0,976),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
7099
7236
$ ,988),COEFS)
7100
7237
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,976),4,COEFS,1,4,WL(1,0,1
7101
7238
$ ,988))
7102
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,988),4,4,105,1,1140,H)
7239
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,988),4,4,105,1,1,1140
7240
$ ,H)
7103
7241
C Coefficient construction for loop diagram with ID 629
7104
7242
CALL VVS1L2_1(PL(0,978),W(1,17),GC_90,MDL_MW,MDL_WW,PL(0
7105
7243
$ ,989),COEFS)
7106
7244
CALL ML5_0_UPDATE_WL_2_2(WL(1,0,1,978),4,COEFS,4,4,WL(1,0,1
7107
7245
$ ,989))
7108
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,989),4,4,105,1,1141,H)
7246
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,989),4,4,105,1,1,1141
7247
$ ,H)
7109
7248
C Coefficient construction for loop diagram with ID 630
7110
7249
CALL VSS1L2_1(PL(0,980),W(1,17),GC_55,MDL_MW,MDL_WW,PL(0
7111
7250
$ ,990),COEFS)
7112
7251
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,980),4,COEFS,1,4,WL(1,0,1
7113
7252
$ ,990))
7114
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,990),4,4,105,1,1142,H)
7253
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,990),4,4,105,1,1,1142
7254
$ ,H)
7115
7255
C Coefficient construction for loop diagram with ID 631
7116
7256
CALL VVVV2L3_1(PL(0,0),W(1,10),W(1,12),GC_53,MDL_MW,MDL_WW
7117
7257
$ ,PL(0,991),COEFS)
7118
7258
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7119
7259
$ ,991))
7120
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,991),2,4,104,1,1143,H)
7260
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,991),2,4,104,1,1,1143
7261
$ ,H)
7121
7262
C Coefficient construction for loop diagram with ID 632
7122
7263
CALL VVS1L2_3(PL(0,0),W(1,10),GC_90,MDL_MH,MDL_WH,PL(0,992)
7123
7264
$ ,COEFS)
7127
7268
$ ,993),COEFS)
7128
7269
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,992),4,COEFS,1,4,WL(1,0,1
7129
7270
$ ,993))
7130
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,993),1,4,107,1,1144,H)
7271
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,993),1,4,107,1,1,1144
7272
$ ,H)
7131
7273
C Coefficient construction for loop diagram with ID 633
7132
7274
CALL VSS1L3_1(PL(0,992),W(1,13),GC_55,MDL_MW,MDL_WW,PL(0
7133
7275
$ ,994),COEFS)
7134
7276
CALL ML5_0_UPDATE_WL_0_3(WL(1,0,1,992),4,COEFS,1,4,WL(1,0,1
7135
7277
$ ,994))
7136
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,994),3,4,107,1,1145,H)
7278
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,994),3,4,107,1,1,1145
7279
$ ,H)
7137
7280
C Coefficient construction for loop diagram with ID 634
7138
7281
CALL VSS1L1_3(PL(0,0),W(1,11),GC_55,MDL_MH,MDL_WH,PL(0,995)
7139
7282
$ ,COEFS)
7143
7286
$ ,996),COEFS)
7144
7287
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,995),4,COEFS,1,4,WL(1,0,1
7145
7288
$ ,996))
7146
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,996),2,4,107,1,1146,H)
7289
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,996),2,4,107,1,1,1146
7290
$ ,H)
7147
7291
C Coefficient construction for loop diagram with ID 635
7148
7292
CALL VVSS1L2_1(PL(0,0),W(1,11),W(1,13),GC_52,MDL_MW,MDL_WW
7149
7293
$ ,PL(0,997),COEFS)
7150
7294
CALL ML5_0_UPDATE_WL_0_2(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7151
7295
$ ,997))
7152
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,997),2,4,104,1,1147,H)
7296
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,997),2,4,104,1,1,1147
7297
$ ,H)
7153
7298
C Coefficient construction for loop diagram with ID 636
7154
7299
CALL VSS1L1_2(PL(0,0),W(1,11),GC_56,MDL_MZ,MDL_WZ,PL(0,998)
7155
7300
$ ,COEFS)
7159
7304
$ ,999),COEFS)
7160
7305
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,998),4,COEFS,1,4,WL(1,0,1
7161
7306
$ ,999))
7162
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,999),4,4,106,1,1148,H)
7307
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,999),4,4,106,1,1,1148
7308
$ ,H)
7163
7309
C Coefficient construction for loop diagram with ID 637
7164
7310
CALL VSS1L3_1(PL(0,995),W(1,13),GC_55,MDL_MW,MDL_WW,PL(0
7165
7311
$ ,1000),COEFS)
7166
7312
CALL ML5_0_UPDATE_WL_1_3(WL(1,0,1,995),4,COEFS,1,4,WL(1,0,1
7167
7313
$ ,1000))
7168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1000),4,4,107,1,1149,H)
7314
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1000),4,4,107,1,1,1149
7315
$ ,H)
7169
7316
C Coefficient construction for loop diagram with ID 638
7170
7317
CALL UUV1L1_2(PL(0,0),W(1,10),GC_3,MDL_MW,ZERO,PL(0,1001)
7171
7318
$ ,COEFS)
7175
7322
$ ,COEFS)
7176
7323
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1001),1,COEFS,1,1,WL(1,0,1
7177
7324
$ ,1002))
7178
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1002),2,1,99,1,1150,H)
7325
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1002),2,1,99,1,1,1150
7326
$ ,H)
7179
7327
C Coefficient construction for loop diagram with ID 639
7180
7328
CALL UUV1L2_1(PL(0,0),W(1,10),GC_4,MDL_MW,ZERO,PL(0,1003)
7181
7329
$ ,COEFS)
7185
7333
$ ,COEFS)
7186
7334
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1003),1,COEFS,1,1,WL(1,0,1
7187
7335
$ ,1004))
7188
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1004),2,1,99,1,1151,H)
7336
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1004),2,1,99,1,1,1151
7337
$ ,H)
7189
7338
C Coefficient construction for loop diagram with ID 640
7190
7339
CALL UUS1L1_2(PL(0,1001),W(1,13),GC_93,ZERO,ZERO,PL(0,1005)
7191
7340
$ ,COEFS)
7192
7341
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1001),1,COEFS,1,1,WL(1,0,1
7193
7342
$ ,1005))
7194
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1005),1,1,99,1,1152,H)
7343
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1005),1,1,99,1,1,1152
7344
$ ,H)
7195
7345
C Coefficient construction for loop diagram with ID 641
7196
7346
CALL UUS1L2_1(PL(0,0),W(1,11),GC_92,MDL_MW,ZERO,PL(0,1006)
7197
7347
$ ,COEFS)
7201
7351
$ ,COEFS)
7202
7352
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1006),1,COEFS,1,1,WL(1,0,1
7203
7353
$ ,1007))
7204
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1007),1,1,99,1,1153,H)
7354
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1007),1,1,99,1,1,1153
7355
$ ,H)
7205
7356
C Coefficient construction for loop diagram with ID 642
7206
7357
CALL UUS1L1_2(PL(0,0),W(1,9),GC_98,MDL_MZ,ZERO,PL(0,1008)
7207
7358
$ ,COEFS)
7211
7362
$ ,1009),COEFS)
7212
7363
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1008),1,COEFS,1,1,WL(1,0,1
7213
7364
$ ,1009))
7214
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1009),0,1,102,1,1154,H)
7365
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1009),0,1,102,1,1,1154
7366
$ ,H)
7215
7367
C Coefficient construction for loop diagram with ID 643
7216
7368
CALL UUV1L1_2(PL(0,0),W(1,10),GC_70,MDL_MW,ZERO,PL(0,1010)
7217
7369
$ ,COEFS)
7221
7373
$ ,1011),COEFS)
7222
7374
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1010),1,COEFS,1,1,WL(1,0,1
7223
7375
$ ,1011))
7224
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1011),2,1,103,1,1155,H)
7376
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1011),2,1,103,1,1,1155
7377
$ ,H)
7225
7378
C Coefficient construction for loop diagram with ID 644
7226
7379
CALL UUV1L2_1(PL(0,0),W(1,10),GC_71,MDL_MW,ZERO,PL(0,1012)
7227
7380
$ ,COEFS)
7231
7384
$ ,1013),COEFS)
7232
7385
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1012),1,COEFS,1,1,WL(1,0,1
7233
7386
$ ,1013))
7234
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1013),2,1,103,1,1156,H)
7387
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1013),2,1,103,1,1,1156
7388
$ ,H)
7235
7389
C Coefficient construction for loop diagram with ID 645
7236
7390
CALL UUS1L1_2(PL(0,1010),W(1,13),GC_96,MDL_MZ,ZERO,PL(0
7237
7391
$ ,1014),COEFS)
7238
7392
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1010),1,COEFS,1,1,WL(1,0,1
7239
7393
$ ,1014))
7240
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1014),1,1,103,1,1157,H)
7394
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1014),1,1,103,1,1,1157
7395
$ ,H)
7241
7396
C Coefficient construction for loop diagram with ID 646
7242
7397
CALL UUS1L2_1(PL(0,1012),W(1,13),GC_94,MDL_MZ,ZERO,PL(0
7243
7398
$ ,1015),COEFS)
7244
7399
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1012),1,COEFS,1,1,WL(1,0,1
7245
7400
$ ,1015))
7246
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1015),1,1,103,1,1158,H)
7401
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1015),1,1,103,1,1,1158
7402
$ ,H)
7247
7403
C Coefficient construction for loop diagram with ID 647
7248
7404
CALL UUS1L1_2(PL(0,0),W(1,11),GC_97,MDL_MW,ZERO,PL(0,1016)
7249
7405
$ ,COEFS)
7253
7409
$ ,1017),COEFS)
7254
7410
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1016),1,COEFS,1,1,WL(1,0,1
7255
7411
$ ,1017))
7256
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1017),1,1,103,1,1159,H)
7412
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1017),1,1,103,1,1,1159
7413
$ ,H)
7257
7414
C Coefficient construction for loop diagram with ID 648
7258
7415
CALL UUS1L2_1(PL(0,0),W(1,11),GC_95,MDL_MW,ZERO,PL(0,1018)
7259
7416
$ ,COEFS)
7263
7420
$ ,1019),COEFS)
7264
7421
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1018),1,COEFS,1,1,WL(1,0,1
7265
7422
$ ,1019))
7266
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1019),1,1,103,1,1160,H)
7423
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1019),1,1,103,1,1,1160
7424
$ ,H)
7267
7425
C Coefficient construction for loop diagram with ID 649
7268
7426
CALL UUS1L1_2(PL(0,1016),W(1,13),GC_96,MDL_MZ,ZERO,PL(0
7269
7427
$ ,1020),COEFS)
7270
7428
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1016),1,COEFS,1,1,WL(1,0,1
7271
7429
$ ,1020))
7272
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1020),0,1,103,1,1161,H)
7430
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1020),0,1,103,1,1,1161
7431
$ ,H)
7273
7432
C Coefficient construction for loop diagram with ID 650
7274
7433
CALL UUS1L2_1(PL(0,1018),W(1,13),GC_94,MDL_MZ,ZERO,PL(0
7275
7434
$ ,1021),COEFS)
7276
7435
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1018),1,COEFS,1,1,WL(1,0,1
7277
7436
$ ,1021))
7278
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1021),0,1,103,1,1162,H)
7437
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1021),0,1,103,1,1,1162
7438
$ ,H)
7279
7439
C Coefficient construction for loop diagram with ID 651
7280
7440
CALL UUV1L1_2(PL(0,0),W(1,6),GC_3,MDL_MW,ZERO,PL(0,1022)
7281
7441
$ ,COEFS)
7285
7445
$ ,COEFS)
7286
7446
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1022),1,COEFS,1,1,WL(1,0,1
7287
7447
$ ,1023))
7288
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1023),2,1,105,1,1163,H)
7448
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1023),2,1,105,1,1,1163
7449
$ ,H)
7289
7450
C Coefficient construction for loop diagram with ID 652
7290
7451
CALL UUV1L1_2(PL(0,1022),W(1,15),GC_70,MDL_MW,ZERO,PL(0
7291
7452
$ ,1024),COEFS)
7292
7453
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1022),1,COEFS,1,1,WL(1,0,1
7293
7454
$ ,1024))
7294
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1024),2,1,105,1,1164,H)
7455
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1024),2,1,105,1,1,1164
7456
$ ,H)
7295
7457
C Coefficient construction for loop diagram with ID 653
7296
7458
CALL UUS1L1_2(PL(0,1022),W(1,16),GC_91,MDL_MW,ZERO,PL(0
7297
7459
$ ,1025),COEFS)
7298
7460
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1022),1,COEFS,1,1,WL(1,0,1
7299
7461
$ ,1025))
7300
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1025),1,1,105,1,1165,H)
7462
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1025),1,1,105,1,1,1165
7463
$ ,H)
7301
7464
C Coefficient construction for loop diagram with ID 654
7302
7465
CALL UUS1L1_2(PL(0,1022),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7303
7466
$ ,1026),COEFS)
7304
7467
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1022),1,COEFS,1,1,WL(1,0,1
7305
7468
$ ,1026))
7306
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1026),1,1,105,1,1166,H)
7469
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1026),1,1,105,1,1,1166
7470
$ ,H)
7307
7471
C Coefficient construction for loop diagram with ID 655
7308
7472
CALL UUV1L1_2(PL(0,0),W(1,7),GC_70,MDL_MW,ZERO,PL(0,1027)
7309
7473
$ ,COEFS)
7313
7477
$ ,COEFS)
7314
7478
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1027),1,COEFS,1,1,WL(1,0,1
7315
7479
$ ,1028))
7316
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1028),2,1,105,1,1167,H)
7480
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1028),2,1,105,1,1,1167
7481
$ ,H)
7317
7482
C Coefficient construction for loop diagram with ID 656
7318
7483
CALL UUV1L1_2(PL(0,1027),W(1,15),GC_70,MDL_MW,ZERO,PL(0
7319
7484
$ ,1029),COEFS)
7320
7485
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1027),1,COEFS,1,1,WL(1,0,1
7321
7486
$ ,1029))
7322
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1029),2,1,105,1,1168,H)
7487
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1029),2,1,105,1,1,1168
7488
$ ,H)
7323
7489
C Coefficient construction for loop diagram with ID 657
7324
7490
CALL UUS1L1_2(PL(0,1027),W(1,16),GC_91,MDL_MW,ZERO,PL(0
7325
7491
$ ,1030),COEFS)
7326
7492
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1027),1,COEFS,1,1,WL(1,0,1
7327
7493
$ ,1030))
7328
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1030),1,1,105,1,1169,H)
7494
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1030),1,1,105,1,1,1169
7495
$ ,H)
7329
7496
C Coefficient construction for loop diagram with ID 658
7330
7497
CALL UUS1L1_2(PL(0,1027),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7331
7498
$ ,1031),COEFS)
7332
7499
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1027),1,COEFS,1,1,WL(1,0,1
7333
7500
$ ,1031))
7334
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1031),1,1,105,1,1170,H)
7501
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1031),1,1,105,1,1,1170
7502
$ ,H)
7335
7503
C Coefficient construction for loop diagram with ID 659
7336
7504
CALL UUS1L1_2(PL(0,0),W(1,8),GC_91,MDL_MW,ZERO,PL(0,1032)
7337
7505
$ ,COEFS)
7341
7509
$ ,COEFS)
7342
7510
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1032),1,COEFS,1,1,WL(1,0,1
7343
7511
$ ,1033))
7344
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1033),1,1,105,1,1171,H)
7512
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1033),1,1,105,1,1,1171
7513
$ ,H)
7345
7514
C Coefficient construction for loop diagram with ID 660
7346
7515
CALL UUV1L1_2(PL(0,1032),W(1,15),GC_70,MDL_MW,ZERO,PL(0
7347
7516
$ ,1034),COEFS)
7348
7517
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1032),1,COEFS,1,1,WL(1,0,1
7349
7518
$ ,1034))
7350
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1034),1,1,105,1,1172,H)
7519
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1034),1,1,105,1,1,1172
7520
$ ,H)
7351
7521
C Coefficient construction for loop diagram with ID 661
7352
7522
CALL UUS1L1_2(PL(0,1032),W(1,16),GC_91,MDL_MW,ZERO,PL(0
7353
7523
$ ,1035),COEFS)
7354
7524
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1032),1,COEFS,1,1,WL(1,0,1
7355
7525
$ ,1035))
7356
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1035),0,1,105,1,1173,H)
7526
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1035),0,1,105,1,1,1173
7527
$ ,H)
7357
7528
C Coefficient construction for loop diagram with ID 662
7358
7529
CALL UUS1L1_2(PL(0,1032),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7359
7530
$ ,1036),COEFS)
7360
7531
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1032),1,COEFS,1,1,WL(1,0,1
7361
7532
$ ,1036))
7362
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1036),0,1,105,1,1174,H)
7533
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1036),0,1,105,1,1,1174
7534
$ ,H)
7363
7535
C Coefficient construction for loop diagram with ID 663
7364
7536
CALL UUS1L1_2(PL(0,0),W(1,9),GC_89,MDL_MW,ZERO,PL(0,1037)
7365
7537
$ ,COEFS)
7369
7541
$ ,COEFS)
7370
7542
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1037),1,COEFS,1,1,WL(1,0,1
7371
7543
$ ,1038))
7372
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1038),1,1,105,1,1175,H)
7544
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1038),1,1,105,1,1,1175
7545
$ ,H)
7373
7546
C Coefficient construction for loop diagram with ID 664
7374
7547
CALL UUV1L1_2(PL(0,1037),W(1,15),GC_70,MDL_MW,ZERO,PL(0
7375
7548
$ ,1039),COEFS)
7376
7549
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1037),1,COEFS,1,1,WL(1,0,1
7377
7550
$ ,1039))
7378
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1039),1,1,105,1,1176,H)
7551
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1039),1,1,105,1,1,1176
7552
$ ,H)
7379
7553
C Coefficient construction for loop diagram with ID 665
7380
7554
CALL UUS1L1_2(PL(0,1037),W(1,16),GC_91,MDL_MW,ZERO,PL(0
7381
7555
$ ,1040),COEFS)
7382
7556
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1037),1,COEFS,1,1,WL(1,0,1
7383
7557
$ ,1040))
7384
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1040),0,1,105,1,1177,H)
7558
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1040),0,1,105,1,1,1177
7559
$ ,H)
7385
7560
C Coefficient construction for loop diagram with ID 666
7386
7561
CALL UUS1L1_2(PL(0,1037),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7387
7562
$ ,1041),COEFS)
7388
7563
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1037),1,COEFS,1,1,WL(1,0,1
7389
7564
$ ,1041))
7390
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1041),0,1,105,1,1178,H)
7565
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1041),0,1,105,1,2,1178
7566
$ ,H)
7391
7567
C Coefficient construction for loop diagram with ID 667
7392
7568
CALL UUV1L1_2(PL(0,0),W(1,6),GC_4,MDL_MW,ZERO,PL(0,1042)
7393
7569
$ ,COEFS)
7397
7573
$ ,COEFS)
7398
7574
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1042),1,COEFS,1,1,WL(1,0,1
7399
7575
$ ,1043))
7400
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1043),2,1,105,1,1179,H)
7576
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1043),2,1,105,1,1,1179
7577
$ ,H)
7401
7578
C Coefficient construction for loop diagram with ID 668
7402
7579
CALL UUV1L1_2(PL(0,1042),W(1,15),GC_71,MDL_MW,ZERO,PL(0
7403
7580
$ ,1044),COEFS)
7404
7581
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1042),1,COEFS,1,1,WL(1,0,1
7405
7582
$ ,1044))
7406
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1044),2,1,105,1,1180,H)
7583
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1044),2,1,105,1,1,1180
7584
$ ,H)
7407
7585
C Coefficient construction for loop diagram with ID 669
7408
7586
CALL UUS1L1_2(PL(0,1042),W(1,16),GC_88,MDL_MW,ZERO,PL(0
7409
7587
$ ,1045),COEFS)
7410
7588
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1042),1,COEFS,1,1,WL(1,0,1
7411
7589
$ ,1045))
7412
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1045),1,1,105,1,1181,H)
7590
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1045),1,1,105,1,1,1181
7591
$ ,H)
7413
7592
C Coefficient construction for loop diagram with ID 670
7414
7593
CALL UUS1L1_2(PL(0,1042),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7415
7594
$ ,1046),COEFS)
7416
7595
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1042),1,COEFS,1,1,WL(1,0,1
7417
7596
$ ,1046))
7418
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1046),1,1,105,1,1182,H)
7597
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1046),1,1,105,1,1,1182
7598
$ ,H)
7419
7599
C Coefficient construction for loop diagram with ID 671
7420
7600
CALL UUV1L1_2(PL(0,0),W(1,7),GC_71,MDL_MW,ZERO,PL(0,1047)
7421
7601
$ ,COEFS)
7425
7605
$ ,COEFS)
7426
7606
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1047),1,COEFS,1,1,WL(1,0,1
7427
7607
$ ,1048))
7428
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1048),2,1,105,1,1183,H)
7608
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1048),2,1,105,1,1,1183
7609
$ ,H)
7429
7610
C Coefficient construction for loop diagram with ID 672
7430
7611
CALL UUV1L1_2(PL(0,1047),W(1,15),GC_71,MDL_MW,ZERO,PL(0
7431
7612
$ ,1049),COEFS)
7432
7613
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1047),1,COEFS,1,1,WL(1,0,1
7433
7614
$ ,1049))
7434
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1049),2,1,105,1,1184,H)
7615
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1049),2,1,105,1,1,1184
7616
$ ,H)
7435
7617
C Coefficient construction for loop diagram with ID 673
7436
7618
CALL UUS1L1_2(PL(0,1047),W(1,16),GC_88,MDL_MW,ZERO,PL(0
7437
7619
$ ,1050),COEFS)
7438
7620
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1047),1,COEFS,1,1,WL(1,0,1
7439
7621
$ ,1050))
7440
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1050),1,1,105,1,1185,H)
7622
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1050),1,1,105,1,1,1185
7623
$ ,H)
7441
7624
C Coefficient construction for loop diagram with ID 674
7442
7625
CALL UUS1L1_2(PL(0,1047),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7443
7626
$ ,1051),COEFS)
7444
7627
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1047),1,COEFS,1,1,WL(1,0,1
7445
7628
$ ,1051))
7446
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1051),1,1,105,1,1186,H)
7629
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1051),1,1,105,1,1,1186
7630
$ ,H)
7447
7631
C Coefficient construction for loop diagram with ID 675
7448
7632
CALL UUS1L1_2(PL(0,0),W(1,8),GC_88,MDL_MW,ZERO,PL(0,1052)
7449
7633
$ ,COEFS)
7453
7637
$ ,COEFS)
7454
7638
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1052),1,COEFS,1,1,WL(1,0,1
7455
7639
$ ,1053))
7456
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1053),1,1,105,1,1187,H)
7640
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1053),1,1,105,1,1,1187
7641
$ ,H)
7457
7642
C Coefficient construction for loop diagram with ID 676
7458
7643
CALL UUV1L1_2(PL(0,1052),W(1,15),GC_71,MDL_MW,ZERO,PL(0
7459
7644
$ ,1054),COEFS)
7460
7645
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1052),1,COEFS,1,1,WL(1,0,1
7461
7646
$ ,1054))
7462
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1054),1,1,105,1,1188,H)
7647
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1054),1,1,105,1,1,1188
7648
$ ,H)
7463
7649
C Coefficient construction for loop diagram with ID 677
7464
7650
CALL UUS1L1_2(PL(0,1052),W(1,16),GC_88,MDL_MW,ZERO,PL(0
7465
7651
$ ,1055),COEFS)
7466
7652
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1052),1,COEFS,1,1,WL(1,0,1
7467
7653
$ ,1055))
7468
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1055),0,1,105,1,1189,H)
7654
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1055),0,1,105,1,1,1189
7655
$ ,H)
7469
7656
C Coefficient construction for loop diagram with ID 678
7470
7657
CALL UUS1L1_2(PL(0,1052),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7471
7658
$ ,1056),COEFS)
7472
7659
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1052),1,COEFS,1,1,WL(1,0,1
7473
7660
$ ,1056))
7474
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1056),0,1,105,1,1190,H)
7661
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1056),0,1,105,1,1,1190
7662
$ ,H)
7475
7663
C Coefficient construction for loop diagram with ID 679
7476
7664
CALL UUS1L1_2(PL(0,0),W(1,9),GC_89,MDL_MW,ZERO,PL(0,1057)
7477
7665
$ ,COEFS)
7481
7669
$ ,COEFS)
7482
7670
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1057),1,COEFS,1,1,WL(1,0,1
7483
7671
$ ,1058))
7484
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1058),1,1,105,1,1191,H)
7672
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1058),1,1,105,1,1,1191
7673
$ ,H)
7485
7674
C Coefficient construction for loop diagram with ID 680
7486
7675
CALL UUV1L1_2(PL(0,1057),W(1,15),GC_71,MDL_MW,ZERO,PL(0
7487
7676
$ ,1059),COEFS)
7488
7677
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1057),1,COEFS,1,1,WL(1,0,1
7489
7678
$ ,1059))
7490
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1059),1,1,105,1,1192,H)
7679
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1059),1,1,105,1,1,1192
7680
$ ,H)
7491
7681
C Coefficient construction for loop diagram with ID 681
7492
7682
CALL UUS1L1_2(PL(0,1057),W(1,16),GC_88,MDL_MW,ZERO,PL(0
7493
7683
$ ,1060),COEFS)
7494
7684
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1057),1,COEFS,1,1,WL(1,0,1
7495
7685
$ ,1060))
7496
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1060),0,1,105,1,1193,H)
7686
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1060),0,1,105,1,1,1193
7687
$ ,H)
7497
7688
C Coefficient construction for loop diagram with ID 682
7498
CALL UUS1L1_2(PL(0,1057),W(1,17),GC_89,MDL_MW,ZERO,PL(0
7499
$ ,1061),COEFS)
7500
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1057),1,COEFS,1,1,WL(1,0,1
7689
CALL FFV2L2_1(PL(0,0),W(1,7),GC_80,ZERO,ZERO,PL(0,1061)
7690
$ ,COEFS)
7691
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7501
7692
$ ,1061))
7502
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1061),0,1,105,1,1194,H)
7693
CALL FFV2L2_1(PL(0,1061),W(1,15),GC_80,ZERO,ZERO,PL(0,1062)
7694
$ ,COEFS)
7695
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1061),4,COEFS,4,4,WL(1,0,1
7696
$ ,1062))
7697
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1062),2,4,108,1,3,1194
7698
$ ,H)
7503
7699
C Coefficient construction for loop diagram with ID 683
7504
CALL FFV2L2_1(PL(0,0),W(1,7),GC_80,ZERO,ZERO,PL(0,1062)
7700
CALL FFV2L1_2(PL(0,0),W(1,10),GC_58,ZERO,ZERO,PL(0,1063)
7505
7701
$ ,COEFS)
7506
7702
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7507
$ ,1062))
7508
CALL FFV2L2_1(PL(0,1062),W(1,15),GC_80,ZERO,ZERO,PL(0,1063)
7509
$ ,COEFS)
7510
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1062),4,COEFS,4,4,WL(1,0,1
7511
7703
$ ,1063))
7512
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1063),2,4,108,1,1195,H)
7704
CALL FFV2L1_2(PL(0,1063),W(1,12),GC_58,MDL_ME,ZERO,PL(0
7705
$ ,1064),COEFS)
7706
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1063),4,COEFS,4,4,WL(1,0,1
7707
$ ,1064))
7708
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1064),2,4,109,1,1,1195
7709
$ ,H)
7513
7710
C Coefficient construction for loop diagram with ID 684
7514
CALL FFV2L1_2(PL(0,0),W(1,10),GC_58,ZERO,ZERO,PL(0,1064)
7515
$ ,COEFS)
7516
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7517
$ ,1064))
7518
CALL FFV2L1_2(PL(0,1064),W(1,12),GC_58,MDL_ME,ZERO,PL(0
7711
CALL FFS1L1_2(PL(0,1063),W(1,13),GC_107,MDL_ME,ZERO,PL(0
7519
7712
$ ,1065),COEFS)
7520
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1064),4,COEFS,4,4,WL(1,0,1
7713
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1063),4,COEFS,4,4,WL(1,0,1
7521
7714
$ ,1065))
7522
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1065),2,4,109,1,1196,H)
7715
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1065),2,4,109,1,1,1196
7716
$ ,H)
7523
7717
C Coefficient construction for loop diagram with ID 685
7524
CALL FFS1L1_2(PL(0,1064),W(1,13),GC_107,MDL_ME,ZERO,PL(0
7525
$ ,1066),COEFS)
7526
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1064),4,COEFS,4,4,WL(1,0,1
7718
CALL FFS3L1_2(PL(0,0),W(1,11),GC_106,ZERO,ZERO,PL(0,1066)
7719
$ ,COEFS)
7720
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7527
7721
$ ,1066))
7528
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1066),2,4,109,1,1197,H)
7722
CALL FFV2L1_2(PL(0,1066),W(1,12),GC_58,MDL_ME,ZERO,PL(0
7723
$ ,1067),COEFS)
7724
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1066),4,COEFS,4,4,WL(1,0,1
7725
$ ,1067))
7726
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1067),2,4,109,1,1,1197
7727
$ ,H)
7529
7728
C Coefficient construction for loop diagram with ID 686
7530
CALL FFS3L1_2(PL(0,0),W(1,11),GC_106,ZERO,ZERO,PL(0,1067)
7531
$ ,COEFS)
7532
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7533
$ ,1067))
7534
CALL FFV2L1_2(PL(0,1067),W(1,12),GC_58,MDL_ME,ZERO,PL(0
7729
CALL FFS1L1_2(PL(0,1066),W(1,13),GC_107,MDL_ME,ZERO,PL(0
7535
7730
$ ,1068),COEFS)
7536
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1067),4,COEFS,4,4,WL(1,0,1
7731
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1066),4,COEFS,4,4,WL(1,0,1
7537
7732
$ ,1068))
7538
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1068),2,4,109,1,1198,H)
7733
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1068),2,4,109,1,1,1198
7734
$ ,H)
7539
7735
C Coefficient construction for loop diagram with ID 687
7540
CALL FFS1L1_2(PL(0,1067),W(1,13),GC_107,MDL_ME,ZERO,PL(0
7541
$ ,1069),COEFS)
7542
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1067),4,COEFS,4,4,WL(1,0,1
7736
CALL FFV2L1_2(PL(0,0),W(1,10),GC_58,ZERO,ZERO,PL(0,1069)
7737
$ ,COEFS)
7738
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7543
7739
$ ,1069))
7544
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1069),2,4,109,1,1199,H)
7740
CALL FFV2L1_2(PL(0,1069),W(1,12),GC_58,MDL_MM,ZERO,PL(0
7741
$ ,1070),COEFS)
7742
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1069),4,COEFS,4,4,WL(1,0,1
7743
$ ,1070))
7744
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1070),2,4,110,1,1,1199
7745
$ ,H)
7545
7746
C Coefficient construction for loop diagram with ID 688
7546
CALL FFV2L2_1(PL(0,0),W(1,7),GC_80,ZERO,ZERO,PL(0,1070)
7547
$ ,COEFS)
7548
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7549
$ ,1070))
7550
CALL FFV2L2_1(PL(0,1070),W(1,15),GC_80,ZERO,ZERO,PL(0,1071)
7551
$ ,COEFS)
7552
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1070),4,COEFS,4,4,WL(1,0,1
7747
CALL FFS1L1_2(PL(0,1069),W(1,13),GC_111,MDL_MM,ZERO,PL(0
7748
$ ,1071),COEFS)
7749
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1069),4,COEFS,4,4,WL(1,0,1
7553
7750
$ ,1071))
7554
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1071),2,4,108,1,1200,H)
7751
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1071),2,4,110,1,1,1200
7752
$ ,H)
7555
7753
C Coefficient construction for loop diagram with ID 689
7556
CALL FFV2L1_2(PL(0,0),W(1,10),GC_58,ZERO,ZERO,PL(0,1072)
7754
CALL FFS3L1_2(PL(0,0),W(1,11),GC_110,ZERO,ZERO,PL(0,1072)
7557
7755
$ ,COEFS)
7558
7756
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7559
7757
$ ,1072))
7561
7759
$ ,1073),COEFS)
7562
7760
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1072),4,COEFS,4,4,WL(1,0,1
7563
7761
$ ,1073))
7564
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1073),2,4,110,1,1201,H)
7762
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1073),2,4,110,1,1,1201
7763
$ ,H)
7565
7764
C Coefficient construction for loop diagram with ID 690
7566
7765
CALL FFS1L1_2(PL(0,1072),W(1,13),GC_111,MDL_MM,ZERO,PL(0
7567
7766
$ ,1074),COEFS)
7568
7767
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1072),4,COEFS,4,4,WL(1,0,1
7569
7768
$ ,1074))
7570
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1074),2,4,110,1,1202,H)
7769
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1074),2,4,110,1,1,1202
7770
$ ,H)
7571
7771
C Coefficient construction for loop diagram with ID 691
7572
CALL FFS3L1_2(PL(0,0),W(1,11),GC_110,ZERO,ZERO,PL(0,1075)
7772
CALL FFV2L1_2(PL(0,0),W(1,10),GC_58,ZERO,ZERO,PL(0,1075)
7573
7773
$ ,COEFS)
7574
7774
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7575
7775
$ ,1075))
7576
CALL FFV2L1_2(PL(0,1075),W(1,12),GC_58,MDL_MM,ZERO,PL(0
7776
CALL FFV2L1_2(PL(0,1075),W(1,12),GC_58,MDL_MTA,ZERO,PL(0
7577
7777
$ ,1076),COEFS)
7578
7778
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1075),4,COEFS,4,4,WL(1,0,1
7579
7779
$ ,1076))
7580
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1076),2,4,110,1,1203,H)
7780
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1076),2,4,111,1,1,1203
7781
$ ,H)
7581
7782
C Coefficient construction for loop diagram with ID 692
7582
CALL FFS1L1_2(PL(0,1075),W(1,13),GC_111,MDL_MM,ZERO,PL(0
7783
CALL FFS1L1_2(PL(0,1075),W(1,13),GC_119,MDL_MTA,ZERO,PL(0
7583
7784
$ ,1077),COEFS)
7584
7785
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1075),4,COEFS,4,4,WL(1,0,1
7585
7786
$ ,1077))
7586
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1077),2,4,110,1,1204,H)
7787
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1077),2,4,111,1,1,1204
7788
$ ,H)
7587
7789
C Coefficient construction for loop diagram with ID 693
7588
CALL FFV2L2_1(PL(0,0),W(1,7),GC_80,ZERO,ZERO,PL(0,1078)
7790
CALL FFS3L1_2(PL(0,0),W(1,11),GC_118,ZERO,ZERO,PL(0,1078)
7589
7791
$ ,COEFS)
7590
7792
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7591
7793
$ ,1078))
7592
CALL FFV2L2_1(PL(0,1078),W(1,15),GC_80,ZERO,ZERO,PL(0,1079)
7593
$ ,COEFS)
7794
CALL FFV2L1_2(PL(0,1078),W(1,12),GC_58,MDL_MTA,ZERO,PL(0
7795
$ ,1079),COEFS)
7594
7796
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1078),4,COEFS,4,4,WL(1,0,1
7595
7797
$ ,1079))
7596
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1079),2,4,108,1,1205,H)
7798
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1079),2,4,111,1,1,1205
7799
$ ,H)
7597
7800
C Coefficient construction for loop diagram with ID 694
7598
CALL FFV2L1_2(PL(0,0),W(1,10),GC_58,ZERO,ZERO,PL(0,1080)
7599
$ ,COEFS)
7600
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7801
CALL FFS1L1_2(PL(0,1078),W(1,13),GC_119,MDL_MTA,ZERO,PL(0
7802
$ ,1080),COEFS)
7803
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1078),4,COEFS,4,4,WL(1,0,1
7601
7804
$ ,1080))
7602
CALL FFV2L1_2(PL(0,1080),W(1,12),GC_58,MDL_MTA,ZERO,PL(0
7603
$ ,1081),COEFS)
7604
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1080),4,COEFS,4,4,WL(1,0,1
7805
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1080),2,4,111,1,1,1206
7806
$ ,H)
7807
C Coefficient construction for loop diagram with ID 695
7808
CALL FFV1L2_1(PL(0,0),W(1,6),GC_3,MDL_ME,ZERO,PL(0,1081)
7809
$ ,COEFS)
7810
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7605
7811
$ ,1081))
7606
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1081),2,4,111,1,1206,H)
7607
C Coefficient construction for loop diagram with ID 695
7608
CALL FFS1L1_2(PL(0,1080),W(1,13),GC_119,MDL_MTA,ZERO,PL(0
7609
$ ,1082),COEFS)
7610
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1080),4,COEFS,4,4,WL(1,0,1
7812
CALL FFV1L2_1(PL(0,1081),W(1,14),GC_3,MDL_ME,ZERO,PL(0,1082)
7813
$ ,COEFS)
7814
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1081),4,COEFS,4,4,WL(1,0,1
7611
7815
$ ,1082))
7612
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1082),2,4,111,1,1207,H)
7816
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1082),2,4,112,1,1,1207
7817
$ ,H)
7613
7818
C Coefficient construction for loop diagram with ID 696
7614
CALL FFS3L1_2(PL(0,0),W(1,11),GC_118,ZERO,ZERO,PL(0,1083)
7615
$ ,COEFS)
7616
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7819
CALL FFV2_4L2_1(PL(0,1081),W(1,15),GC_68,GC_77,MDL_ME,ZERO
7820
$ ,PL(0,1083),COEFS)
7821
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1081),4,COEFS,4,4,WL(1,0,1
7617
7822
$ ,1083))
7618
CALL FFV2L1_2(PL(0,1083),W(1,12),GC_58,MDL_MTA,ZERO,PL(0
7823
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1083),2,4,112,1,1,1208
7824
$ ,H)
7825
C Coefficient construction for loop diagram with ID 697
7826
CALL FFS2L2_1(PL(0,1081),W(1,16),GC_108,MDL_ME,ZERO,PL(0
7619
7827
$ ,1084),COEFS)
7620
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1083),4,COEFS,4,4,WL(1,0,1
7828
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1081),4,COEFS,4,4,WL(1,0,1
7621
7829
$ ,1084))
7622
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1084),2,4,111,1,1208,H)
7623
C Coefficient construction for loop diagram with ID 697
7624
CALL FFS1L1_2(PL(0,1083),W(1,13),GC_119,MDL_MTA,ZERO,PL(0
7830
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1084),2,4,112,1,1,1209
7831
$ ,H)
7832
C Coefficient construction for loop diagram with ID 698
7833
CALL FFS4L2_1(PL(0,1081),W(1,17),GC_109,MDL_ME,ZERO,PL(0
7625
7834
$ ,1085),COEFS)
7626
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1083),4,COEFS,4,4,WL(1,0,1
7835
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1081),4,COEFS,4,4,WL(1,0,1
7627
7836
$ ,1085))
7628
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1085),2,4,111,1,1209,H)
7629
C Coefficient construction for loop diagram with ID 698
7630
CALL FFV1L2_1(PL(0,0),W(1,6),GC_3,MDL_ME,ZERO,PL(0,1086)
7631
$ ,COEFS)
7837
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1085),2,4,112,1,1,1210
7838
$ ,H)
7839
C Coefficient construction for loop diagram with ID 699
7840
CALL FFV2_4L2_1(PL(0,0),W(1,7),GC_68,GC_77,MDL_ME,ZERO,PL(0
7841
$ ,1086),COEFS)
7632
7842
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7633
7843
$ ,1086))
7634
7844
CALL FFV1L2_1(PL(0,1086),W(1,14),GC_3,MDL_ME,ZERO,PL(0,1087)
7635
7845
$ ,COEFS)
7636
7846
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1086),4,COEFS,4,4,WL(1,0,1
7637
7847
$ ,1087))
7638
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1087),2,4,112,1,1210,H)
7639
C Coefficient construction for loop diagram with ID 699
7848
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1087),2,4,112,1,1,1211
7849
$ ,H)
7850
C Coefficient construction for loop diagram with ID 700
7640
7851
CALL FFV2_4L2_1(PL(0,1086),W(1,15),GC_68,GC_77,MDL_ME,ZERO
7641
7852
$ ,PL(0,1088),COEFS)
7642
7853
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1086),4,COEFS,4,4,WL(1,0,1
7643
7854
$ ,1088))
7644
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1088),2,4,112,1,1211,H)
7645
C Coefficient construction for loop diagram with ID 700
7855
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1088),2,4,112,1,1,1212
7856
$ ,H)
7857
C Coefficient construction for loop diagram with ID 701
7646
7858
CALL FFS2L2_1(PL(0,1086),W(1,16),GC_108,MDL_ME,ZERO,PL(0
7647
7859
$ ,1089),COEFS)
7648
7860
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1086),4,COEFS,4,4,WL(1,0,1
7649
7861
$ ,1089))
7650
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1089),2,4,112,1,1212,H)
7651
C Coefficient construction for loop diagram with ID 701
7862
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1089),2,4,112,1,1,1213
7863
$ ,H)
7864
C Coefficient construction for loop diagram with ID 702
7652
7865
CALL FFS4L2_1(PL(0,1086),W(1,17),GC_109,MDL_ME,ZERO,PL(0
7653
7866
$ ,1090),COEFS)
7654
7867
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1086),4,COEFS,4,4,WL(1,0,1
7655
7868
$ ,1090))
7656
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1090),2,4,112,1,1213,H)
7657
C Coefficient construction for loop diagram with ID 702
7658
CALL FFV2_4L2_1(PL(0,0),W(1,7),GC_68,GC_77,MDL_ME,ZERO,PL(0
7659
$ ,1091),COEFS)
7869
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1090),2,4,112,1,1,1214
7870
$ ,H)
7871
C Coefficient construction for loop diagram with ID 703
7872
CALL FFS2L2_1(PL(0,0),W(1,8),GC_108,MDL_ME,ZERO,PL(0,1091)
7873
$ ,COEFS)
7660
7874
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7661
7875
$ ,1091))
7662
7876
CALL FFV1L2_1(PL(0,1091),W(1,14),GC_3,MDL_ME,ZERO,PL(0,1092)
7663
7877
$ ,COEFS)
7664
7878
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1091),4,COEFS,4,4,WL(1,0,1
7665
7879
$ ,1092))
7666
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1092),2,4,112,1,1214,H)
7667
C Coefficient construction for loop diagram with ID 703
7880
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1092),2,4,112,1,1,1215
7881
$ ,H)
7882
C Coefficient construction for loop diagram with ID 704
7668
7883
CALL FFV2_4L2_1(PL(0,1091),W(1,15),GC_68,GC_77,MDL_ME,ZERO
7669
7884
$ ,PL(0,1093),COEFS)
7670
7885
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1091),4,COEFS,4,4,WL(1,0,1
7671
7886
$ ,1093))
7672
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1093),2,4,112,1,1215,H)
7673
C Coefficient construction for loop diagram with ID 704
7887
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1093),2,4,112,1,1,1216
7888
$ ,H)
7889
C Coefficient construction for loop diagram with ID 705
7674
7890
CALL FFS2L2_1(PL(0,1091),W(1,16),GC_108,MDL_ME,ZERO,PL(0
7675
7891
$ ,1094),COEFS)
7676
7892
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1091),4,COEFS,4,4,WL(1,0,1
7677
7893
$ ,1094))
7678
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1094),2,4,112,1,1216,H)
7679
C Coefficient construction for loop diagram with ID 705
7894
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1094),2,4,112,1,1,1217
7895
$ ,H)
7896
C Coefficient construction for loop diagram with ID 706
7680
7897
CALL FFS4L2_1(PL(0,1091),W(1,17),GC_109,MDL_ME,ZERO,PL(0
7681
7898
$ ,1095),COEFS)
7682
7899
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1091),4,COEFS,4,4,WL(1,0,1
7683
7900
$ ,1095))
7684
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1095),2,4,112,1,1217,H)
7685
C Coefficient construction for loop diagram with ID 706
7686
CALL FFS2L2_1(PL(0,0),W(1,8),GC_108,MDL_ME,ZERO,PL(0,1096)
7901
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1095),2,4,112,1,1,1218
7902
$ ,H)
7903
C Coefficient construction for loop diagram with ID 707
7904
CALL FFS4L2_1(PL(0,0),W(1,9),GC_109,MDL_ME,ZERO,PL(0,1096)
7687
7905
$ ,COEFS)
7688
7906
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7689
7907
$ ,1096))
7691
7909
$ ,COEFS)
7692
7910
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1096),4,COEFS,4,4,WL(1,0,1
7693
7911
$ ,1097))
7694
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1097),2,4,112,1,1218,H)
7695
C Coefficient construction for loop diagram with ID 707
7912
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1097),2,4,112,1,1,1219
7913
$ ,H)
7914
C Coefficient construction for loop diagram with ID 708
7696
7915
CALL FFV2_4L2_1(PL(0,1096),W(1,15),GC_68,GC_77,MDL_ME,ZERO
7697
7916
$ ,PL(0,1098),COEFS)
7698
7917
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1096),4,COEFS,4,4,WL(1,0,1
7699
7918
$ ,1098))
7700
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1098),2,4,112,1,1219,H)
7701
C Coefficient construction for loop diagram with ID 708
7919
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1098),2,4,112,1,1,1220
7920
$ ,H)
7921
C Coefficient construction for loop diagram with ID 709
7702
7922
CALL FFS2L2_1(PL(0,1096),W(1,16),GC_108,MDL_ME,ZERO,PL(0
7703
7923
$ ,1099),COEFS)
7704
7924
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1096),4,COEFS,4,4,WL(1,0,1
7705
7925
$ ,1099))
7706
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1099),2,4,112,1,1220,H)
7707
C Coefficient construction for loop diagram with ID 709
7926
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1099),2,4,112,1,1,1221
7927
$ ,H)
7928
C Coefficient construction for loop diagram with ID 710
7708
7929
CALL FFS4L2_1(PL(0,1096),W(1,17),GC_109,MDL_ME,ZERO,PL(0
7709
7930
$ ,1100),COEFS)
7710
7931
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1096),4,COEFS,4,4,WL(1,0,1
7711
7932
$ ,1100))
7712
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1100),2,4,112,1,1221,H)
7713
C Coefficient construction for loop diagram with ID 710
7714
CALL FFS4L2_1(PL(0,0),W(1,9),GC_109,MDL_ME,ZERO,PL(0,1101)
7933
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1100),2,4,112,1,1,1222
7934
$ ,H)
7935
C Coefficient construction for loop diagram with ID 711
7936
CALL FFV1L2_1(PL(0,0),W(1,6),GC_3,MDL_MM,ZERO,PL(0,1101)
7715
7937
$ ,COEFS)
7716
7938
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7717
7939
$ ,1101))
7718
CALL FFV1L2_1(PL(0,1101),W(1,14),GC_3,MDL_ME,ZERO,PL(0,1102)
7940
CALL FFV1L2_1(PL(0,1101),W(1,14),GC_3,MDL_MM,ZERO,PL(0,1102)
7719
7941
$ ,COEFS)
7720
7942
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1101),4,COEFS,4,4,WL(1,0,1
7721
7943
$ ,1102))
7722
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1102),2,4,112,1,1222,H)
7723
C Coefficient construction for loop diagram with ID 711
7724
CALL FFV2_4L2_1(PL(0,1101),W(1,15),GC_68,GC_77,MDL_ME,ZERO
7944
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1102),2,4,113,1,1,1223
7945
$ ,H)
7946
C Coefficient construction for loop diagram with ID 712
7947
CALL FFV2_4L2_1(PL(0,1101),W(1,15),GC_68,GC_77,MDL_MM,ZERO
7725
7948
$ ,PL(0,1103),COEFS)
7726
7949
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1101),4,COEFS,4,4,WL(1,0,1
7727
7950
$ ,1103))
7728
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1103),2,4,112,1,1223,H)
7729
C Coefficient construction for loop diagram with ID 712
7730
CALL FFS2L2_1(PL(0,1101),W(1,16),GC_108,MDL_ME,ZERO,PL(0
7951
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1103),2,4,113,1,1,1224
7952
$ ,H)
7953
C Coefficient construction for loop diagram with ID 713
7954
CALL FFS2L2_1(PL(0,1101),W(1,16),GC_112,MDL_MM,ZERO,PL(0
7731
7955
$ ,1104),COEFS)
7732
7956
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1101),4,COEFS,4,4,WL(1,0,1
7733
7957
$ ,1104))
7734
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1104),2,4,112,1,1224,H)
7735
C Coefficient construction for loop diagram with ID 713
7736
CALL FFS4L2_1(PL(0,1101),W(1,17),GC_109,MDL_ME,ZERO,PL(0
7958
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1104),2,4,113,1,1,1225
7959
$ ,H)
7960
C Coefficient construction for loop diagram with ID 714
7961
CALL FFS4L2_1(PL(0,1101),W(1,17),GC_113,MDL_MM,ZERO,PL(0
7737
7962
$ ,1105),COEFS)
7738
7963
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1101),4,COEFS,4,4,WL(1,0,1
7739
7964
$ ,1105))
7740
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1105),2,4,112,1,1225,H)
7741
C Coefficient construction for loop diagram with ID 714
7742
CALL FFV1L2_1(PL(0,0),W(1,6),GC_3,MDL_MM,ZERO,PL(0,1106)
7743
$ ,COEFS)
7965
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1105),2,4,113,1,1,1226
7966
$ ,H)
7967
C Coefficient construction for loop diagram with ID 715
7968
CALL FFV2_4L2_1(PL(0,0),W(1,7),GC_68,GC_77,MDL_MM,ZERO,PL(0
7969
$ ,1106),COEFS)
7744
7970
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7745
7971
$ ,1106))
7746
7972
CALL FFV1L2_1(PL(0,1106),W(1,14),GC_3,MDL_MM,ZERO,PL(0,1107)
7747
7973
$ ,COEFS)
7748
7974
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1106),4,COEFS,4,4,WL(1,0,1
7749
7975
$ ,1107))
7750
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1107),2,4,113,1,1226,H)
7751
C Coefficient construction for loop diagram with ID 715
7976
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1107),2,4,113,1,1,1227
7977
$ ,H)
7978
C Coefficient construction for loop diagram with ID 716
7752
7979
CALL FFV2_4L2_1(PL(0,1106),W(1,15),GC_68,GC_77,MDL_MM,ZERO
7753
7980
$ ,PL(0,1108),COEFS)
7754
7981
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1106),4,COEFS,4,4,WL(1,0,1
7755
7982
$ ,1108))
7756
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1108),2,4,113,1,1227,H)
7757
C Coefficient construction for loop diagram with ID 716
7983
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1108),2,4,113,1,1,1228
7984
$ ,H)
7985
C Coefficient construction for loop diagram with ID 717
7758
7986
CALL FFS2L2_1(PL(0,1106),W(1,16),GC_112,MDL_MM,ZERO,PL(0
7759
7987
$ ,1109),COEFS)
7760
7988
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1106),4,COEFS,4,4,WL(1,0,1
7761
7989
$ ,1109))
7762
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1109),2,4,113,1,1228,H)
7763
C Coefficient construction for loop diagram with ID 717
7990
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1109),2,4,113,1,1,1229
7991
$ ,H)
7992
C Coefficient construction for loop diagram with ID 718
7764
7993
CALL FFS4L2_1(PL(0,1106),W(1,17),GC_113,MDL_MM,ZERO,PL(0
7765
7994
$ ,1110),COEFS)
7766
7995
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1106),4,COEFS,4,4,WL(1,0,1
7767
7996
$ ,1110))
7768
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1110),2,4,113,1,1229,H)
7769
C Coefficient construction for loop diagram with ID 718
7770
CALL FFV2_4L2_1(PL(0,0),W(1,7),GC_68,GC_77,MDL_MM,ZERO,PL(0
7771
$ ,1111),COEFS)
7997
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1110),2,4,113,1,1,1230
7998
$ ,H)
7999
C Coefficient construction for loop diagram with ID 719
8000
CALL FFS2L2_1(PL(0,0),W(1,8),GC_112,MDL_MM,ZERO,PL(0,1111)
8001
$ ,COEFS)
7772
8002
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7773
8003
$ ,1111))
7774
8004
CALL FFV1L2_1(PL(0,1111),W(1,14),GC_3,MDL_MM,ZERO,PL(0,1112)
7775
8005
$ ,COEFS)
7776
8006
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1111),4,COEFS,4,4,WL(1,0,1
7777
8007
$ ,1112))
7778
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1112),2,4,113,1,1230,H)
7779
C Coefficient construction for loop diagram with ID 719
8008
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1112),2,4,113,1,1,1231
8009
$ ,H)
8010
C Coefficient construction for loop diagram with ID 720
7780
8011
CALL FFV2_4L2_1(PL(0,1111),W(1,15),GC_68,GC_77,MDL_MM,ZERO
7781
8012
$ ,PL(0,1113),COEFS)
7782
8013
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1111),4,COEFS,4,4,WL(1,0,1
7783
8014
$ ,1113))
7784
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1113),2,4,113,1,1231,H)
7785
C Coefficient construction for loop diagram with ID 720
8015
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1113),2,4,113,1,1,1232
8016
$ ,H)
8017
C Coefficient construction for loop diagram with ID 721
7786
8018
CALL FFS2L2_1(PL(0,1111),W(1,16),GC_112,MDL_MM,ZERO,PL(0
7787
8019
$ ,1114),COEFS)
7788
8020
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1111),4,COEFS,4,4,WL(1,0,1
7789
8021
$ ,1114))
7790
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1114),2,4,113,1,1232,H)
7791
C Coefficient construction for loop diagram with ID 721
8022
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1114),2,4,113,1,1,1233
8023
$ ,H)
8024
C Coefficient construction for loop diagram with ID 722
7792
8025
CALL FFS4L2_1(PL(0,1111),W(1,17),GC_113,MDL_MM,ZERO,PL(0
7793
8026
$ ,1115),COEFS)
7794
8027
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1111),4,COEFS,4,4,WL(1,0,1
7795
8028
$ ,1115))
7796
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1115),2,4,113,1,1233,H)
7797
C Coefficient construction for loop diagram with ID 722
7798
CALL FFS2L2_1(PL(0,0),W(1,8),GC_112,MDL_MM,ZERO,PL(0,1116)
8029
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1115),2,4,113,1,1,1234
8030
$ ,H)
8031
C Coefficient construction for loop diagram with ID 723
8032
CALL FFS4L2_1(PL(0,0),W(1,9),GC_113,MDL_MM,ZERO,PL(0,1116)
7799
8033
$ ,COEFS)
7800
8034
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7801
8035
$ ,1116))
7803
8037
$ ,COEFS)
7804
8038
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1116),4,COEFS,4,4,WL(1,0,1
7805
8039
$ ,1117))
7806
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1117),2,4,113,1,1234,H)
7807
C Coefficient construction for loop diagram with ID 723
8040
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1117),2,4,113,1,1,1235
8041
$ ,H)
8042
C Coefficient construction for loop diagram with ID 724
7808
8043
CALL FFV2_4L2_1(PL(0,1116),W(1,15),GC_68,GC_77,MDL_MM,ZERO
7809
8044
$ ,PL(0,1118),COEFS)
7810
8045
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1116),4,COEFS,4,4,WL(1,0,1
7811
8046
$ ,1118))
7812
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1118),2,4,113,1,1235,H)
7813
C Coefficient construction for loop diagram with ID 724
8047
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1118),2,4,113,1,1,1236
8048
$ ,H)
8049
C Coefficient construction for loop diagram with ID 725
7814
8050
CALL FFS2L2_1(PL(0,1116),W(1,16),GC_112,MDL_MM,ZERO,PL(0
7815
8051
$ ,1119),COEFS)
7816
8052
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1116),4,COEFS,4,4,WL(1,0,1
7817
8053
$ ,1119))
7818
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1119),2,4,113,1,1236,H)
7819
C Coefficient construction for loop diagram with ID 725
8054
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1119),2,4,113,1,1,1237
8055
$ ,H)
8056
C Coefficient construction for loop diagram with ID 726
7820
8057
CALL FFS4L2_1(PL(0,1116),W(1,17),GC_113,MDL_MM,ZERO,PL(0
7821
8058
$ ,1120),COEFS)
7822
8059
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1116),4,COEFS,4,4,WL(1,0,1
7823
8060
$ ,1120))
7824
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1120),2,4,113,1,1237,H)
7825
C Coefficient construction for loop diagram with ID 726
7826
CALL FFS4L2_1(PL(0,0),W(1,9),GC_113,MDL_MM,ZERO,PL(0,1121)
8061
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1120),2,4,113,1,1,1238
8062
$ ,H)
8063
C Coefficient construction for loop diagram with ID 727
8064
CALL FFV1L2_1(PL(0,0),W(1,6),GC_3,MDL_MTA,ZERO,PL(0,1121)
7827
8065
$ ,COEFS)
7828
8066
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7829
8067
$ ,1121))
7830
CALL FFV1L2_1(PL(0,1121),W(1,14),GC_3,MDL_MM,ZERO,PL(0,1122)
7831
$ ,COEFS)
8068
CALL FFV1L2_1(PL(0,1121),W(1,14),GC_3,MDL_MTA,ZERO,PL(0
8069
$ ,1122),COEFS)
7832
8070
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1121),4,COEFS,4,4,WL(1,0,1
7833
8071
$ ,1122))
7834
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1122),2,4,113,1,1238,H)
7835
C Coefficient construction for loop diagram with ID 727
7836
CALL FFV2_4L2_1(PL(0,1121),W(1,15),GC_68,GC_77,MDL_MM,ZERO
8072
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1122),2,4,114,1,1,1239
8073
$ ,H)
8074
C Coefficient construction for loop diagram with ID 728
8075
CALL FFV2_4L2_1(PL(0,1121),W(1,15),GC_68,GC_77,MDL_MTA,ZERO
7837
8076
$ ,PL(0,1123),COEFS)
7838
8077
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1121),4,COEFS,4,4,WL(1,0,1
7839
8078
$ ,1123))
7840
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1123),2,4,113,1,1239,H)
7841
C Coefficient construction for loop diagram with ID 728
7842
CALL FFS2L2_1(PL(0,1121),W(1,16),GC_112,MDL_MM,ZERO,PL(0
8079
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1123),2,4,114,1,1,1240
8080
$ ,H)
8081
C Coefficient construction for loop diagram with ID 729
8082
CALL FFS2L2_1(PL(0,1121),W(1,16),GC_120,MDL_MTA,ZERO,PL(0
7843
8083
$ ,1124),COEFS)
7844
8084
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1121),4,COEFS,4,4,WL(1,0,1
7845
8085
$ ,1124))
7846
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1124),2,4,113,1,1240,H)
7847
C Coefficient construction for loop diagram with ID 729
7848
CALL FFS4L2_1(PL(0,1121),W(1,17),GC_113,MDL_MM,ZERO,PL(0
8086
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1124),2,4,114,1,1,1241
8087
$ ,H)
8088
C Coefficient construction for loop diagram with ID 730
8089
CALL FFS4L2_1(PL(0,1121),W(1,17),GC_121,MDL_MTA,ZERO,PL(0
7849
8090
$ ,1125),COEFS)
7850
8091
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1121),4,COEFS,4,4,WL(1,0,1
7851
8092
$ ,1125))
7852
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1125),2,4,113,1,1241,H)
7853
C Coefficient construction for loop diagram with ID 730
7854
CALL FFV1L2_1(PL(0,0),W(1,6),GC_3,MDL_MTA,ZERO,PL(0,1126)
7855
$ ,COEFS)
8093
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1125),2,4,114,1,1,1242
8094
$ ,H)
8095
C Coefficient construction for loop diagram with ID 731
8096
CALL FFV2_4L2_1(PL(0,0),W(1,7),GC_68,GC_77,MDL_MTA,ZERO,PL(0
8097
$ ,1126),COEFS)
7856
8098
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7857
8099
$ ,1126))
7858
8100
CALL FFV1L2_1(PL(0,1126),W(1,14),GC_3,MDL_MTA,ZERO,PL(0
7859
8101
$ ,1127),COEFS)
7860
8102
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1126),4,COEFS,4,4,WL(1,0,1
7861
8103
$ ,1127))
7862
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1127),2,4,114,1,1242,H)
7863
C Coefficient construction for loop diagram with ID 731
8104
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1127),2,4,114,1,1,1243
8105
$ ,H)
8106
C Coefficient construction for loop diagram with ID 732
7864
8107
CALL FFV2_4L2_1(PL(0,1126),W(1,15),GC_68,GC_77,MDL_MTA,ZERO
7865
8108
$ ,PL(0,1128),COEFS)
7866
8109
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1126),4,COEFS,4,4,WL(1,0,1
7867
8110
$ ,1128))
7868
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1128),2,4,114,1,1243,H)
7869
C Coefficient construction for loop diagram with ID 732
8111
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1128),2,4,114,1,1,1244
8112
$ ,H)
8113
C Coefficient construction for loop diagram with ID 733
7870
8114
CALL FFS2L2_1(PL(0,1126),W(1,16),GC_120,MDL_MTA,ZERO,PL(0
7871
8115
$ ,1129),COEFS)
7872
8116
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1126),4,COEFS,4,4,WL(1,0,1
7873
8117
$ ,1129))
7874
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1129),2,4,114,1,1244,H)
7875
C Coefficient construction for loop diagram with ID 733
8118
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1129),2,4,114,1,1,1245
8119
$ ,H)
8120
C Coefficient construction for loop diagram with ID 734
7876
8121
CALL FFS4L2_1(PL(0,1126),W(1,17),GC_121,MDL_MTA,ZERO,PL(0
7877
8122
$ ,1130),COEFS)
7878
8123
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1126),4,COEFS,4,4,WL(1,0,1
7879
8124
$ ,1130))
7880
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1130),2,4,114,1,1245,H)
7881
C Coefficient construction for loop diagram with ID 734
7882
CALL FFV2_4L2_1(PL(0,0),W(1,7),GC_68,GC_77,MDL_MTA,ZERO,PL(0
7883
$ ,1131),COEFS)
8125
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1130),2,4,114,1,1,1246
8126
$ ,H)
8127
C Coefficient construction for loop diagram with ID 735
8128
CALL FFS2L2_1(PL(0,0),W(1,8),GC_120,MDL_MTA,ZERO,PL(0,1131)
8129
$ ,COEFS)
7884
8130
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7885
8131
$ ,1131))
7886
8132
CALL FFV1L2_1(PL(0,1131),W(1,14),GC_3,MDL_MTA,ZERO,PL(0
7887
8133
$ ,1132),COEFS)
7888
8134
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1131),4,COEFS,4,4,WL(1,0,1
7889
8135
$ ,1132))
7890
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1132),2,4,114,1,1246,H)
7891
C Coefficient construction for loop diagram with ID 735
8136
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1132),2,4,114,1,1,1247
8137
$ ,H)
8138
C Coefficient construction for loop diagram with ID 736
7892
8139
CALL FFV2_4L2_1(PL(0,1131),W(1,15),GC_68,GC_77,MDL_MTA,ZERO
7893
8140
$ ,PL(0,1133),COEFS)
7894
8141
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1131),4,COEFS,4,4,WL(1,0,1
7895
8142
$ ,1133))
7896
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1133),2,4,114,1,1247,H)
7897
C Coefficient construction for loop diagram with ID 736
8143
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1133),2,4,114,1,1,1248
8144
$ ,H)
8145
C Coefficient construction for loop diagram with ID 737
7898
8146
CALL FFS2L2_1(PL(0,1131),W(1,16),GC_120,MDL_MTA,ZERO,PL(0
7899
8147
$ ,1134),COEFS)
7900
8148
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1131),4,COEFS,4,4,WL(1,0,1
7901
8149
$ ,1134))
7902
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1134),2,4,114,1,1248,H)
7903
C Coefficient construction for loop diagram with ID 737
8150
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1134),2,4,114,1,1,1249
8151
$ ,H)
8152
C Coefficient construction for loop diagram with ID 738
7904
8153
CALL FFS4L2_1(PL(0,1131),W(1,17),GC_121,MDL_MTA,ZERO,PL(0
7905
8154
$ ,1135),COEFS)
7906
8155
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1131),4,COEFS,4,4,WL(1,0,1
7907
8156
$ ,1135))
7908
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1135),2,4,114,1,1249,H)
7909
C Coefficient construction for loop diagram with ID 738
7910
CALL FFS2L2_1(PL(0,0),W(1,8),GC_120,MDL_MTA,ZERO,PL(0,1136)
8157
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1135),2,4,114,1,1,1250
8158
$ ,H)
8159
C Coefficient construction for loop diagram with ID 739
8160
CALL FFS4L2_1(PL(0,0),W(1,9),GC_121,MDL_MTA,ZERO,PL(0,1136)
7911
8161
$ ,COEFS)
7912
8162
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
7913
8163
$ ,1136))
7915
8165
$ ,1137),COEFS)
7916
8166
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1136),4,COEFS,4,4,WL(1,0,1
7917
8167
$ ,1137))
7918
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1137),2,4,114,1,1250,H)
7919
C Coefficient construction for loop diagram with ID 739
8168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1137),2,4,114,1,1,1251
8169
$ ,H)
8170
C Coefficient construction for loop diagram with ID 740
7920
8171
CALL FFV2_4L2_1(PL(0,1136),W(1,15),GC_68,GC_77,MDL_MTA,ZERO
7921
8172
$ ,PL(0,1138),COEFS)
7922
8173
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1136),4,COEFS,4,4,WL(1,0,1
7923
8174
$ ,1138))
7924
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1138),2,4,114,1,1251,H)
7925
C Coefficient construction for loop diagram with ID 740
8175
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1138),2,4,114,1,1,1252
8176
$ ,H)
8177
C Coefficient construction for loop diagram with ID 741
7926
8178
CALL FFS2L2_1(PL(0,1136),W(1,16),GC_120,MDL_MTA,ZERO,PL(0
7927
8179
$ ,1139),COEFS)
7928
8180
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1136),4,COEFS,4,4,WL(1,0,1
7929
8181
$ ,1139))
7930
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1139),2,4,114,1,1252,H)
7931
C Coefficient construction for loop diagram with ID 741
8182
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1139),2,4,114,1,1,1253
8183
$ ,H)
8184
C Coefficient construction for loop diagram with ID 742
7932
8185
CALL FFS4L2_1(PL(0,1136),W(1,17),GC_121,MDL_MTA,ZERO,PL(0
7933
8186
$ ,1140),COEFS)
7934
8187
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1136),4,COEFS,4,4,WL(1,0,1
7935
8188
$ ,1140))
7936
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1140),2,4,114,1,1253,H)
7937
C Coefficient construction for loop diagram with ID 742
7938
CALL FFS4L2_1(PL(0,0),W(1,9),GC_121,MDL_MTA,ZERO,PL(0,1141)
7939
$ ,COEFS)
7940
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),4,COEFS,4,4,WL(1,0,1
8189
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1140),2,4,114,1,1,1254
8190
$ ,H)
8191
C Coefficient construction for loop diagram with ID 743
8192
CALL VVSS1L4_3(PL(0,0),W(1,7),W(1,15),GC_83,MDL_MH,MDL_WH
8193
$ ,PL(0,1141),COEFS)
8194
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
7941
8195
$ ,1141))
7942
CALL FFV1L2_1(PL(0,1141),W(1,14),GC_3,MDL_MTA,ZERO,PL(0
7943
$ ,1142),COEFS)
7944
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1141),4,COEFS,4,4,WL(1,0,1
8196
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1141),0,1,115,2,1,1255
8197
$ ,H)
8198
C Coefficient construction for loop diagram with ID 744
8199
CALL VSS1L3_2(PL(0,0),W(1,7),GC_78,MDL_MZ,MDL_WZ,PL(0,1142)
8200
$ ,COEFS)
8201
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
7945
8202
$ ,1142))
7946
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1142),2,4,114,1,1254,H)
7947
C Coefficient construction for loop diagram with ID 743
7948
CALL FFV2_4L2_1(PL(0,1141),W(1,15),GC_68,GC_77,MDL_MTA,ZERO
7949
$ ,PL(0,1143),COEFS)
7950
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1141),4,COEFS,4,4,WL(1,0,1
8203
CALL VSS1L2_3(PL(0,1142),W(1,15),GC_78,MDL_MH,MDL_WH,PL(0
8204
$ ,1143),COEFS)
8205
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1142),1,COEFS,1,1,WL(1,0,1
7951
8206
$ ,1143))
7952
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1143),2,4,114,1,1255,H)
7953
C Coefficient construction for loop diagram with ID 744
7954
CALL FFS2L2_1(PL(0,1141),W(1,16),GC_120,MDL_MTA,ZERO,PL(0
8207
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1143),2,1,116,1,1,1256
8208
$ ,H)
8209
C Coefficient construction for loop diagram with ID 745
8210
CALL SSS1L1_3(PL(0,1142),W(1,16),GC_86,MDL_MH,MDL_WH,PL(0
7955
8211
$ ,1144),COEFS)
7956
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1141),4,COEFS,4,4,WL(1,0,1
8212
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1142),1,COEFS,1,1,WL(1,0,1
7957
8213
$ ,1144))
7958
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1144),2,4,114,1,1256,H)
7959
C Coefficient construction for loop diagram with ID 745
7960
CALL FFS4L2_1(PL(0,1141),W(1,17),GC_121,MDL_MTA,ZERO,PL(0
7961
$ ,1145),COEFS)
7962
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1141),4,COEFS,4,4,WL(1,0,1
8214
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1144),1,1,116,1,1,1257
8215
$ ,H)
8216
C Coefficient construction for loop diagram with ID 746
8217
CALL SSS1L3_1(PL(0,0),W(1,8),GC_86,MDL_MZ,MDL_WZ,PL(0,1145)
8218
$ ,COEFS)
8219
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
7963
8220
$ ,1145))
7964
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1145),2,4,114,1,1257,H)
7965
C Coefficient construction for loop diagram with ID 746
7966
CALL VVSS1L4_3(PL(0,0),W(1,7),W(1,15),GC_83,MDL_MH,MDL_WH
7967
$ ,PL(0,1146),COEFS)
7968
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8221
CALL VSS1L2_3(PL(0,1145),W(1,15),GC_78,MDL_MH,MDL_WH,PL(0
8222
$ ,1146),COEFS)
8223
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1145),1,COEFS,1,1,WL(1,0,1
7969
8224
$ ,1146))
7970
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1146),0,1,115,2,1258,H)
8225
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1146),1,1,116,1,1,1258
8226
$ ,H)
7971
8227
C Coefficient construction for loop diagram with ID 747
7972
CALL VSS1L3_2(PL(0,0),W(1,7),GC_78,MDL_MZ,MDL_WZ,PL(0,1147)
7973
$ ,COEFS)
7974
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8228
CALL SSSS1L4_3(PL(0,0),W(1,8),W(1,16),GC_49,MDL_MH,MDL_WH
8229
$ ,PL(0,1147),COEFS)
8230
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
7975
8231
$ ,1147))
7976
CALL VSS1L2_3(PL(0,1147),W(1,15),GC_78,MDL_MH,MDL_WH,PL(0
8232
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1147),0,1,115,2,1,1259
8233
$ ,H)
8234
C Coefficient construction for loop diagram with ID 748
8235
CALL SSS1L1_3(PL(0,1145),W(1,16),GC_86,MDL_MH,MDL_WH,PL(0
7977
8236
$ ,1148),COEFS)
7978
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1147),1,COEFS,1,1,WL(1,0,1
8237
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1145),1,COEFS,1,1,WL(1,0,1
7979
8238
$ ,1148))
7980
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1148),2,1,116,1,1259,H)
7981
C Coefficient construction for loop diagram with ID 748
7982
CALL SSS1L1_3(PL(0,1147),W(1,16),GC_86,MDL_MH,MDL_WH,PL(0
7983
$ ,1149),COEFS)
7984
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1147),1,COEFS,1,1,WL(1,0,1
8239
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1148),0,1,116,1,1,1260
8240
$ ,H)
8241
C Coefficient construction for loop diagram with ID 749
8242
CALL SSSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_51,MDL_MH,MDL_WH
8243
$ ,PL(0,1149),COEFS)
8244
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
7985
8245
$ ,1149))
7986
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1149),1,1,116,1,1260,H)
7987
C Coefficient construction for loop diagram with ID 749
7988
CALL SSS1L3_1(PL(0,0),W(1,8),GC_86,MDL_MZ,MDL_WZ,PL(0,1150)
8246
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1149),0,1,115,2,1,1261
8247
$ ,H)
8248
C Coefficient construction for loop diagram with ID 750
8249
CALL SSS1L2_1(PL(0,0),W(1,9),GC_87,MDL_MH,MDL_WH,PL(0,1150)
7989
8250
$ ,COEFS)
7990
8251
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
7991
8252
$ ,1150))
7992
CALL VSS1L2_3(PL(0,1150),W(1,15),GC_78,MDL_MH,MDL_WH,PL(0
8253
CALL SSS1L2_1(PL(0,1150),W(1,17),GC_87,MDL_MH,MDL_WH,PL(0
7993
8254
$ ,1151),COEFS)
7994
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1150),1,COEFS,1,1,WL(1,0,1
8255
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1150),1,COEFS,1,1,WL(1,0,1
7995
8256
$ ,1151))
7996
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1151),1,1,116,1,1261,H)
7997
C Coefficient construction for loop diagram with ID 750
7998
CALL SSSS1L4_3(PL(0,0),W(1,8),W(1,16),GC_49,MDL_MH,MDL_WH
8257
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1151),0,1,117,2,1,1262
8258
$ ,H)
8259
C Coefficient construction for loop diagram with ID 751
8260
CALL VVSS1L4_3(PL(0,0),W(1,10),W(1,12),GC_52,MDL_MH,MDL_WH
7999
8261
$ ,PL(0,1152),COEFS)
8000
8262
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8001
8263
$ ,1152))
8002
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1152),0,1,115,2,1262,H)
8003
C Coefficient construction for loop diagram with ID 751
8004
CALL SSS1L1_3(PL(0,1150),W(1,16),GC_86,MDL_MH,MDL_WH,PL(0
8005
$ ,1153),COEFS)
8006
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1150),1,COEFS,1,1,WL(1,0,1
8264
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1152),0,1,115,2,1,1263
8265
$ ,H)
8266
C Coefficient construction for loop diagram with ID 752
8267
CALL VSS1L3_2(PL(0,0),W(1,10),GC_55,MDL_MW,MDL_WW,PL(0,1153)
8268
$ ,COEFS)
8269
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8007
8270
$ ,1153))
8008
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1153),0,1,116,1,1263,H)
8009
C Coefficient construction for loop diagram with ID 752
8010
CALL SSSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_51,MDL_MH,MDL_WH
8011
$ ,PL(0,1154),COEFS)
8012
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8271
CALL VSS1L2_3(PL(0,1153),W(1,12),GC_55,MDL_MH,MDL_WH,PL(0
8272
$ ,1154),COEFS)
8273
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1153),1,COEFS,1,1,WL(1,0,1
8013
8274
$ ,1154))
8014
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1154),0,1,115,2,1264,H)
8275
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1154),2,1,118,1,1,1264
8276
$ ,H)
8015
8277
C Coefficient construction for loop diagram with ID 753
8016
CALL SSS1L2_1(PL(0,0),W(1,9),GC_87,MDL_MH,MDL_WH,PL(0,1155)
8017
$ ,COEFS)
8018
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8278
CALL SSS1L1_3(PL(0,1153),W(1,13),GC_86,MDL_MH,MDL_WH,PL(0
8279
$ ,1155),COEFS)
8280
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1153),1,COEFS,1,1,WL(1,0,1
8019
8281
$ ,1155))
8020
CALL SSS1L2_1(PL(0,1155),W(1,17),GC_87,MDL_MH,MDL_WH,PL(0
8021
$ ,1156),COEFS)
8022
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1155),1,COEFS,1,1,WL(1,0,1
8282
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1155),1,1,118,1,1,1265
8283
$ ,H)
8284
C Coefficient construction for loop diagram with ID 754
8285
CALL SSS1L3_2(PL(0,0),W(1,11),GC_86,MDL_MW,MDL_WW,PL(0,1156)
8286
$ ,COEFS)
8287
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8023
8288
$ ,1156))
8024
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1156),0,1,117,2,1265,H)
8025
C Coefficient construction for loop diagram with ID 754
8026
CALL VVSS1L4_3(PL(0,0),W(1,10),W(1,12),GC_52,MDL_MH,MDL_WH
8027
$ ,PL(0,1157),COEFS)
8028
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8289
CALL VSS1L2_3(PL(0,1156),W(1,12),GC_55,MDL_MH,MDL_WH,PL(0
8290
$ ,1157),COEFS)
8291
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1156),1,COEFS,1,1,WL(1,0,1
8029
8292
$ ,1157))
8030
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1157),0,1,115,2,1266,H)
8293
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1157),1,1,118,1,1,1266
8294
$ ,H)
8031
8295
C Coefficient construction for loop diagram with ID 755
8032
CALL VSS1L3_2(PL(0,0),W(1,10),GC_55,MDL_MW,MDL_WW,PL(0,1158)
8033
$ ,COEFS)
8034
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8296
CALL SSSS1L4_3(PL(0,0),W(1,11),W(1,13),GC_49,MDL_MH,MDL_WH
8297
$ ,PL(0,1158),COEFS)
8298
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8035
8299
$ ,1158))
8036
CALL VSS1L2_3(PL(0,1158),W(1,12),GC_55,MDL_MH,MDL_WH,PL(0
8300
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1158),0,1,115,2,1,1267
8301
$ ,H)
8302
C Coefficient construction for loop diagram with ID 756
8303
CALL SSS1L1_3(PL(0,1156),W(1,13),GC_86,MDL_MH,MDL_WH,PL(0
8037
8304
$ ,1159),COEFS)
8038
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1158),1,COEFS,1,1,WL(1,0,1
8305
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1156),1,COEFS,1,1,WL(1,0,1
8039
8306
$ ,1159))
8040
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1159),2,1,118,1,1267,H)
8041
C Coefficient construction for loop diagram with ID 756
8042
CALL SSS1L1_3(PL(0,1158),W(1,13),GC_86,MDL_MH,MDL_WH,PL(0
8043
$ ,1160),COEFS)
8044
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1158),1,COEFS,1,1,WL(1,0,1
8307
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1159),0,1,118,1,1,1268
8308
$ ,H)
8309
C Coefficient construction for loop diagram with ID 757
8310
CALL VVSS1L4_3(PL(0,0),W(1,7),W(1,15),GC_83,MDL_MZ,MDL_WZ
8311
$ ,PL(0,1160),COEFS)
8312
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8045
8313
$ ,1160))
8046
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1160),1,1,118,1,1268,H)
8047
C Coefficient construction for loop diagram with ID 757
8048
CALL SSS1L3_2(PL(0,0),W(1,11),GC_86,MDL_MW,MDL_WW,PL(0,1161)
8049
$ ,COEFS)
8314
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1160),0,1,100,2,1,1269
8315
$ ,H)
8316
C Coefficient construction for loop diagram with ID 758
8317
CALL SSSS1L2_1(PL(0,0),W(1,8),W(1,16),GC_51,MDL_MZ,MDL_WZ
8318
$ ,PL(0,1161),COEFS)
8050
8319
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8051
8320
$ ,1161))
8052
CALL VSS1L2_3(PL(0,1161),W(1,12),GC_55,MDL_MH,MDL_WH,PL(0
8053
$ ,1162),COEFS)
8054
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1161),1,COEFS,1,1,WL(1,0,1
8321
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1161),0,1,100,2,1,1270
8322
$ ,H)
8323
C Coefficient construction for loop diagram with ID 759
8324
CALL SSSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_49,MDL_MZ,MDL_WZ
8325
$ ,PL(0,1162),COEFS)
8326
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8055
8327
$ ,1162))
8056
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1162),1,1,118,1,1269,H)
8057
C Coefficient construction for loop diagram with ID 758
8058
CALL SSSS1L4_3(PL(0,0),W(1,11),W(1,13),GC_49,MDL_MH,MDL_WH
8059
$ ,PL(0,1163),COEFS)
8328
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1162),0,1,100,2,1,1271
8329
$ ,H)
8330
C Coefficient construction for loop diagram with ID 760
8331
CALL SSS1L2_1(PL(0,0),W(1,9),GC_86,MDL_MZ,MDL_WZ,PL(0,1163)
8332
$ ,COEFS)
8060
8333
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8061
8334
$ ,1163))
8062
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1163),0,1,115,2,1270,H)
8063
C Coefficient construction for loop diagram with ID 759
8064
CALL SSS1L1_3(PL(0,1161),W(1,13),GC_86,MDL_MH,MDL_WH,PL(0
8335
CALL SSS1L2_1(PL(0,1163),W(1,17),GC_86,MDL_MZ,MDL_WZ,PL(0
8065
8336
$ ,1164),COEFS)
8066
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1161),1,COEFS,1,1,WL(1,0,1
8337
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1163),1,COEFS,1,1,WL(1,0,1
8067
8338
$ ,1164))
8068
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1164),0,1,118,1,1271,H)
8069
C Coefficient construction for loop diagram with ID 760
8070
CALL VVSS1L4_3(PL(0,0),W(1,7),W(1,15),GC_83,MDL_MZ,MDL_WZ
8339
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1164),0,1,102,2,1,1272
8340
$ ,H)
8341
C Coefficient construction for loop diagram with ID 761
8342
CALL VVSS1L4_3(PL(0,0),W(1,10),W(1,12),GC_52,MDL_MZ,MDL_WZ
8071
8343
$ ,PL(0,1165),COEFS)
8072
8344
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8073
8345
$ ,1165))
8074
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1165),0,1,100,2,1272,H)
8075
C Coefficient construction for loop diagram with ID 761
8076
CALL SSSS1L2_1(PL(0,0),W(1,8),W(1,16),GC_51,MDL_MZ,MDL_WZ
8077
$ ,PL(0,1166),COEFS)
8078
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8346
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1165),0,1,100,2,1,1273
8347
$ ,H)
8348
C Coefficient construction for loop diagram with ID 762
8349
CALL VSS1L2_3(PL(0,0),W(1,10),GC_57,MDL_MW,MDL_WW,PL(0,1166)
8350
$ ,COEFS)
8351
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8079
8352
$ ,1166))
8080
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1166),0,1,100,2,1273,H)
8081
C Coefficient construction for loop diagram with ID 762
8082
CALL SSSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_49,MDL_MZ,MDL_WZ
8083
$ ,PL(0,1167),COEFS)
8084
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8353
CALL VSS1L3_2(PL(0,1166),W(1,12),GC_56,MDL_MZ,MDL_WZ,PL(0
8354
$ ,1167),COEFS)
8355
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1166),1,COEFS,1,1,WL(1,0,1
8085
8356
$ ,1167))
8086
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1167),0,1,100,2,1274,H)
8357
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1167),2,1,103,1,1,1274
8358
$ ,H)
8087
8359
C Coefficient construction for loop diagram with ID 763
8088
CALL SSS1L2_1(PL(0,0),W(1,9),GC_86,MDL_MZ,MDL_WZ,PL(0,1168)
8089
$ ,COEFS)
8360
CALL SSSS1L2_1(PL(0,0),W(1,11),W(1,13),GC_49,MDL_MZ,MDL_WZ
8361
$ ,PL(0,1168),COEFS)
8090
8362
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8091
8363
$ ,1168))
8092
CALL SSS1L2_1(PL(0,1168),W(1,17),GC_86,MDL_MZ,MDL_WZ,PL(0
8093
$ ,1169),COEFS)
8094
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1168),1,COEFS,1,1,WL(1,0,1
8364
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1168),0,1,100,2,1,1275
8365
$ ,H)
8366
C Coefficient construction for loop diagram with ID 764
8367
CALL VVSS1L4_3(PL(0,0),W(1,6),W(1,14),GC_6,MDL_MW,MDL_WW
8368
$ ,PL(0,1169),COEFS)
8369
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8095
8370
$ ,1169))
8096
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1169),0,1,102,2,1275,H)
8097
C Coefficient construction for loop diagram with ID 764
8098
CALL VVSS1L4_3(PL(0,0),W(1,10),W(1,12),GC_52,MDL_MZ,MDL_WZ
8099
$ ,PL(0,1170),COEFS)
8100
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8371
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1169),0,1,104,1,1,1276
8372
$ ,H)
8373
C Coefficient construction for loop diagram with ID 765
8374
CALL VSS1L3_2(PL(0,0),W(1,6),GC_3,MDL_MW,MDL_WW,PL(0,1170)
8375
$ ,COEFS)
8376
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8101
8377
$ ,1170))
8102
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1170),0,1,100,2,1276,H)
8103
C Coefficient construction for loop diagram with ID 765
8104
CALL VSS1L2_3(PL(0,0),W(1,10),GC_57,MDL_MW,MDL_WW,PL(0,1171)
8105
$ ,COEFS)
8106
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8378
CALL VSS1L3_2(PL(0,1170),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0
8379
$ ,1171),COEFS)
8380
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1170),1,COEFS,1,1,WL(1,0,1
8107
8381
$ ,1171))
8108
CALL VSS1L3_2(PL(0,1171),W(1,12),GC_56,MDL_MZ,MDL_WZ,PL(0
8109
$ ,1172),COEFS)
8110
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1171),1,COEFS,1,1,WL(1,0,1
8382
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1171),2,1,105,1,1,1277
8383
$ ,H)
8384
C Coefficient construction for loop diagram with ID 766
8385
CALL VVSS1L4_3(PL(0,0),W(1,6),W(1,15),GC_81,MDL_MW,MDL_WW
8386
$ ,PL(0,1172),COEFS)
8387
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8111
8388
$ ,1172))
8112
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1172),2,1,103,1,1277,H)
8113
C Coefficient construction for loop diagram with ID 766
8114
CALL SSSS1L2_1(PL(0,0),W(1,11),W(1,13),GC_49,MDL_MZ,MDL_WZ
8115
$ ,PL(0,1173),COEFS)
8116
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8389
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1172),0,1,104,1,1,1278
8390
$ ,H)
8391
C Coefficient construction for loop diagram with ID 767
8392
CALL VSS1L3_2(PL(0,1170),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
8393
$ ,1173),COEFS)
8394
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1170),1,COEFS,1,1,WL(1,0,1
8117
8395
$ ,1173))
8118
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1173),0,1,100,2,1278,H)
8119
C Coefficient construction for loop diagram with ID 767
8120
CALL VVSS1L4_3(PL(0,0),W(1,6),W(1,14),GC_6,MDL_MW,MDL_WW
8121
$ ,PL(0,1174),COEFS)
8122
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8396
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1173),2,1,105,1,1,1279
8397
$ ,H)
8398
C Coefficient construction for loop diagram with ID 768
8399
CALL SSS1L2_1(PL(0,1170),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
8400
$ ,1174),COEFS)
8401
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1170),1,COEFS,1,1,WL(1,0,1
8123
8402
$ ,1174))
8124
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1174),0,1,104,1,1279,H)
8125
C Coefficient construction for loop diagram with ID 768
8126
CALL VSS1L3_2(PL(0,0),W(1,6),GC_3,MDL_MW,MDL_WW,PL(0,1175)
8127
$ ,COEFS)
8128
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8403
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1174),1,1,105,1,1,1280
8404
$ ,H)
8405
C Coefficient construction for loop diagram with ID 769
8406
CALL VVSS1L4_3(PL(0,0),W(1,14),W(1,7),GC_81,MDL_MW,MDL_WW
8407
$ ,PL(0,1175),COEFS)
8408
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8129
8409
$ ,1175))
8130
CALL VSS1L3_2(PL(0,1175),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0
8131
$ ,1176),COEFS)
8132
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1175),1,COEFS,1,1,WL(1,0,1
8410
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1175),0,1,104,1,1,1281
8411
$ ,H)
8412
C Coefficient construction for loop diagram with ID 770
8413
CALL VSS1L3_2(PL(0,0),W(1,7),GC_79,MDL_MW,MDL_WW,PL(0,1176)
8414
$ ,COEFS)
8415
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8133
8416
$ ,1176))
8134
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1176),2,1,105,1,1280,H)
8135
C Coefficient construction for loop diagram with ID 769
8136
CALL VVSS1L4_3(PL(0,0),W(1,6),W(1,15),GC_81,MDL_MW,MDL_WW
8137
$ ,PL(0,1177),COEFS)
8138
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8417
CALL VSS1L3_2(PL(0,1176),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0
8418
$ ,1177),COEFS)
8419
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1176),1,COEFS,1,1,WL(1,0,1
8139
8420
$ ,1177))
8140
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1177),0,1,104,1,1281,H)
8141
C Coefficient construction for loop diagram with ID 770
8142
CALL VSS1L3_2(PL(0,1175),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
8143
$ ,1178),COEFS)
8144
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1175),1,COEFS,1,1,WL(1,0,1
8421
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1177),2,1,105,1,1,1282
8422
$ ,H)
8423
C Coefficient construction for loop diagram with ID 771
8424
CALL VVSS1L4_3(PL(0,0),W(1,7),W(1,15),GC_82,MDL_MW,MDL_WW
8425
$ ,PL(0,1178),COEFS)
8426
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8145
8427
$ ,1178))
8146
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1178),2,1,105,1,1282,H)
8147
C Coefficient construction for loop diagram with ID 771
8148
CALL SSS1L2_1(PL(0,1175),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
8428
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1178),0,1,104,1,1,1283
8429
$ ,H)
8430
C Coefficient construction for loop diagram with ID 772
8431
CALL VSS1L3_2(PL(0,1176),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
8149
8432
$ ,1179),COEFS)
8150
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1175),1,COEFS,1,1,WL(1,0,1
8433
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1176),1,COEFS,1,1,WL(1,0,1
8151
8434
$ ,1179))
8152
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1179),1,1,105,1,1283,H)
8153
C Coefficient construction for loop diagram with ID 772
8154
CALL VVSS1L4_3(PL(0,0),W(1,14),W(1,7),GC_81,MDL_MW,MDL_WW
8155
$ ,PL(0,1180),COEFS)
8156
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8435
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1179),2,1,105,1,1,1284
8436
$ ,H)
8437
C Coefficient construction for loop diagram with ID 773
8438
CALL SSS1L2_1(PL(0,1176),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
8439
$ ,1180),COEFS)
8440
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1176),1,COEFS,1,1,WL(1,0,1
8157
8441
$ ,1180))
8158
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1180),0,1,104,1,1284,H)
8159
C Coefficient construction for loop diagram with ID 773
8160
CALL VSS1L3_2(PL(0,0),W(1,7),GC_79,MDL_MW,MDL_WW,PL(0,1181)
8161
$ ,COEFS)
8162
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8442
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1180),1,1,105,1,1,1285
8443
$ ,H)
8444
C Coefficient construction for loop diagram with ID 774
8445
CALL SSSS1L4_3(PL(0,0),W(1,8),W(1,16),GC_49,MDL_MW,MDL_WW
8446
$ ,PL(0,1181),COEFS)
8447
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8163
8448
$ ,1181))
8164
CALL VSS1L3_2(PL(0,1181),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0
8165
$ ,1182),COEFS)
8166
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1181),1,COEFS,1,1,WL(1,0,1
8449
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1181),0,1,104,1,1,1286
8450
$ ,H)
8451
C Coefficient construction for loop diagram with ID 775
8452
CALL SSS1L2_1(PL(0,0),W(1,9),GC_86,MDL_MW,MDL_WW,PL(0,1182)
8453
$ ,COEFS)
8454
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8167
8455
$ ,1182))
8168
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1182),2,1,105,1,1285,H)
8169
C Coefficient construction for loop diagram with ID 774
8170
CALL VVSS1L4_3(PL(0,0),W(1,7),W(1,15),GC_82,MDL_MW,MDL_WW
8171
$ ,PL(0,1183),COEFS)
8172
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8456
CALL VSS1L3_2(PL(0,1182),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0
8457
$ ,1183),COEFS)
8458
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1182),1,COEFS,1,1,WL(1,0,1
8173
8459
$ ,1183))
8174
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1183),0,1,104,1,1286,H)
8175
C Coefficient construction for loop diagram with ID 775
8176
CALL VSS1L3_2(PL(0,1181),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
8460
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1183),1,1,105,1,1,1287
8461
$ ,H)
8462
C Coefficient construction for loop diagram with ID 776
8463
CALL VSS1L3_2(PL(0,1182),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
8177
8464
$ ,1184),COEFS)
8178
CALL ML5_0_UPDATE_WL_1_1(WL(1,0,1,1181),1,COEFS,1,1,WL(1,0,1
8465
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1182),1,COEFS,1,1,WL(1,0,1
8179
8466
$ ,1184))
8180
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1184),2,1,105,1,1287,H)
8181
C Coefficient construction for loop diagram with ID 776
8182
CALL SSS1L2_1(PL(0,1181),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
8183
$ ,1185),COEFS)
8184
CALL ML5_0_UPDATE_WL_1_0(WL(1,0,1,1181),1,COEFS,1,1,WL(1,0,1
8467
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1184),1,1,105,1,1,1288
8468
$ ,H)
8469
C Coefficient construction for loop diagram with ID 777
8470
CALL SSSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_49,MDL_MW,MDL_WW
8471
$ ,PL(0,1185),COEFS)
8472
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8185
8473
$ ,1185))
8186
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1185),1,1,105,1,1288,H)
8187
C Coefficient construction for loop diagram with ID 777
8188
CALL SSSS1L4_3(PL(0,0),W(1,8),W(1,16),GC_49,MDL_MW,MDL_WW
8189
$ ,PL(0,1186),COEFS)
8190
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8474
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1185),0,1,104,1,1,1289
8475
$ ,H)
8476
C Coefficient construction for loop diagram with ID 778
8477
CALL SSS1L2_1(PL(0,1182),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
8478
$ ,1186),COEFS)
8479
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1182),1,COEFS,1,1,WL(1,0,1
8191
8480
$ ,1186))
8192
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1186),0,1,104,1,1289,H)
8193
C Coefficient construction for loop diagram with ID 778
8194
CALL SSS1L2_1(PL(0,0),W(1,9),GC_86,MDL_MW,MDL_WW,PL(0,1187)
8195
$ ,COEFS)
8481
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1186),0,1,105,1,1,1290
8482
$ ,H)
8483
C Coefficient construction for loop diagram with ID 779
8484
CALL VVSS1L4_3(PL(0,0),W(1,10),W(1,12),GC_52,MDL_MW,MDL_WW
8485
$ ,PL(0,1187),COEFS)
8196
8486
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8197
8487
$ ,1187))
8198
CALL VSS1L3_2(PL(0,1187),W(1,14),GC_3,MDL_MW,MDL_WW,PL(0
8199
$ ,1188),COEFS)
8200
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1187),1,COEFS,1,1,WL(1,0,1
8201
$ ,1188))
8202
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1188),1,1,105,1,1290,H)
8203
C Coefficient construction for loop diagram with ID 779
8204
CALL VSS1L3_2(PL(0,1187),W(1,15),GC_79,MDL_MW,MDL_WW,PL(0
8205
$ ,1189),COEFS)
8206
CALL ML5_0_UPDATE_WL_0_1(WL(1,0,1,1187),1,COEFS,1,1,WL(1,0,1
8207
$ ,1189))
8208
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1189),1,1,105,1,1291,H)
8488
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1187),0,1,104,1,1,1291
8489
$ ,H)
8209
8490
C Coefficient construction for loop diagram with ID 780
8210
CALL SSSS1L2_1(PL(0,0),W(1,9),W(1,17),GC_49,MDL_MW,MDL_WW
8211
$ ,PL(0,1190),COEFS)
8212
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8213
$ ,1190))
8214
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1190),0,1,104,1,1292,H)
8215
C Coefficient construction for loop diagram with ID 781
8216
CALL SSS1L2_1(PL(0,1187),W(1,17),GC_86,MDL_MW,MDL_WW,PL(0
8217
$ ,1191),COEFS)
8218
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,1187),1,COEFS,1,1,WL(1,0,1
8219
$ ,1191))
8220
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1191),0,1,105,1,1293,H)
8221
C Coefficient construction for loop diagram with ID 782
8222
CALL VVSS1L4_3(PL(0,0),W(1,10),W(1,12),GC_52,MDL_MW,MDL_WW
8223
$ ,PL(0,1192),COEFS)
8224
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8225
$ ,1192))
8226
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1192),0,1,104,1,1294,H)
8227
C Coefficient construction for loop diagram with ID 783
8228
8491
CALL SSSS1L3_1(PL(0,0),W(1,11),W(1,13),GC_50,MDL_MW,MDL_WW
8229
$ ,PL(0,1193),COEFS)
8492
$ ,PL(0,1188),COEFS)
8230
8493
CALL ML5_0_UPDATE_WL_0_0(WL(1,0,1,0),1,COEFS,1,1,WL(1,0,1
8231
$ ,1193))
8232
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1193),0,1,104,1,1295,H)
8494
$ ,1188))
8495
CALL ML5_0_CREATE_LOOP_COEFS(WL(1,0,1,1188),0,1,104,1,1,1292
8496
$ ,H)
8233
8497
C At this point, all loop coefficients needed for (QCD=2
8234
C QED=4), i.e. of split order ID=1, are computed.
8498
C QED=4), i.e. of split order ID=2, are computed.
8235
8499
IF(FILTER_SO.AND.SQSO_TARGET.EQ.2) GOTO 4000
8236
8500
C At this point, all loop coefficients needed for (QCD=0
8237
C QED=6), i.e. of split order ID=2, are computed.
8501
C QED=6), i.e. of split order ID=3, are computed.
8238
8502
IF(FILTER_SO.AND.SQSO_TARGET.EQ.3) GOTO 4000
8239
8503
4000 CONTINUE
8240
8504
LOOP_REQ_SO_DONE=.TRUE.
8241
8505
8506
8507
8242
8508
ENDIF
8243
8509
ENDDO
8244
8510
8251
8517
ENDDO
8252
8518
ENDDO
8253
8519
8520
8521
C MadLoop jumps to this label during stability checks when it
8522
C recomputes the same PS point with a different CTMode
8254
8523
300 CONTINUE
8524
8255
8525
C Free cache when using IREGI
8256
IF(IREGIRECY.AND.MLREDUCTIONLIB(I_LIB).EQ.3)CALL IREGI_FREE_PS
8526
IF(IREGIRECY.AND.MLREDUCTIONLIB(I_LIB).EQ.3) THEN
8527
CALL IREGI_FREE_PS()
8528
ENDIF
8529
8530
C Even if the user did ask to turn off the automatic TIR cache
8531
C clearing, we must do it now if the CTModeIndex rolls over the
8532
C size of the TIR cache employed.
8533
C Notice that we must do that only when processing a new CT mode
8534
C as part of the stability test and not when computing a new
8535
C helicity as part of the filtering process.
8536
C This we check that we are not in the initialization phase.
8537
C If we are not in CTModeRun=-1, then we never need to clear the
8538
C cache since the TIR will always be used for a unique computation
8539
C (not stab test).
8540
C Also, it is clear that if we are running OPP when reaching thi'
8541
C //'s line, then we shouldn't clear the TIR cache as it might
8542
C still be useful later.
8543
C Finally, notice that the conditional statement below should
8544
C never be true except you have TIR library supporting quadruple
8545
C precision or when TIR_CACHE_SIZE<2.
8546
IF((.NOT.CHECKPHASE.AND.(HELDOUBLECHECKED)).AND.CTMODERUN.EQ.
8547
$ -1.AND.MLREDUCTIONLIB(I_LIB).NE.1.AND.(ML5_0_TIRCACHE_INDEX(CTMO
8548
$ DE).EQ.(TIR_CACHE_SIZE+1))) THEN
8549
CALL ML5_0_CLEAR_TIR_CACHE()
8550
ENDIF
8551
8257
8552
8258
8553
DO I=0,NSQUAREDSO
8259
8554
DO J=1,3
8261
8556
ENDDO
8262
8557
ENDDO
8263
8558
8559
8264
8560
IF(SKIPLOOPEVAL) THEN
8265
8561
GOTO 1226
8266
8562
ENDIF
8362
8658
CALL ML5_0_LOOP_3(1,2,18,DCMPLX(MDL_MW),DCMPLX(MDL_MB)
8363
8659
$ ,DCMPLX(MDL_MB),4,I_SO,28)
8364
8660
C At this point, all reductions needed for (QCD=4 QED=2), i.e.
8365
C of split order ID=0, are computed.
8661
C of split order ID=1, are computed.
8366
8662
IF(FILTER_SO.AND.SQSO_TARGET.EQ.1) GOTO 5000
8367
8663
C CutTools call for loop numbers 57,58,59,60,61,62,63,64,65,66,67
8368
8664
C ,68,69,70,71,72
8583
8879
C CutTools call for loop numbers 551,556,553,557,558,631,632,554,
8584
8880
C 555,633,634,552
8585
8881
CALL ML5_0_LOOP_2(10,12,DCMPLX(MDL_MW),DCMPLX(ZERO),3,I_SO,99)
8586
C CutTools call for loop numbers 562,564,567,574,753,754,755,757,
8587
C 759
8882
C CutTools call for loop numbers 562,564,567,574,750,751,752,754,
8883
C 756
8588
8884
CALL ML5_0_LOOP_1_2(2,8,16,DCMPLX(MDL_MZ),2,I_SO,100)
8589
8885
C CutTools call for loop numbers 563,560,561,559
8590
8886
CALL ML5_0_LOOP_2(8,16,DCMPLX(MDL_MH),DCMPLX(MDL_MZ),4,I_SO
8591
8887
$ ,101)
8592
C CutTools call for loop numbers 565,566,635,756
8888
C CutTools call for loop numbers 565,566,635,753
8593
8889
CALL ML5_0_LOOP_2(9,17,DCMPLX(MDL_MZ),DCMPLX(MDL_MZ),4,I_SO
8594
8890
$ ,102)
8595
8891
C CutTools call for loop numbers 568,570,573,575,576,571,572,636,
8596
C 637,758,569,638,639,640,641,642,643
8892
C 637,755,569,638,639,640,641,642,643
8597
8893
CALL ML5_0_LOOP_2(10,12,DCMPLX(MDL_MW),DCMPLX(MDL_MZ),4,I_SO
8598
8894
$ ,103)
8599
8895
C CutTools call for loop numbers 577,581,590,594,607,620,624,628,
8600
C 760,762,765,767,770,773,775,776
8896
C 757,759,762,764,767,770,772,773
8601
8897
CALL ML5_0_LOOP_1_2(2,6,14,DCMPLX(MDL_MW),2,I_SO,104)
8602
8898
C CutTools call for loop numbers 578,582,587,591,595,600,608,609,
8603
8899
C 610,611,613,616,618,619,621,622,623,585,586,588,589,598,599,601
8604
8900
C ,602,603,604,605,606,612,614,615,617,644,645,648,649,660,661,66
8605
C 4,665,761,763,766,768,579,580,583,584,592,593,596,597,646,647,6
8606
C 50,651,652,653,656,657,662,663,666,667,668,669,672,673,764,769,
8607
C 771,772,654,655,658,659,670,671,674,675,774
8901
C 4,665,758,760,763,765,579,580,583,584,592,593,596,597,646,647,6
8902
C 50,651,652,653,656,657,662,663,666,667,668,669,672,673,761,766,
8903
C 768,769,654,655,658,659,670,671,674,771
8608
8904
CALL ML5_0_LOOP_2(6,14,DCMPLX(MDL_MW),DCMPLX(MDL_MW),4,I_SO
8609
8905
$ ,105)
8610
8906
C CutTools call for loop numbers 629
8613
8909
C CutTools call for loop numbers 630,626,627,625
8614
8910
CALL ML5_0_LOOP_2(11,13,DCMPLX(MDL_MH),DCMPLX(MDL_MW),4,I_SO
8615
8911
$ ,107)
8616
C CutTools call for loop numbers 676,681,686
8912
C CutTools call for loop numbers 675
8617
8913
CALL ML5_0_LOOP_2(7,15,DCMPLX(ZERO),DCMPLX(ZERO),2,I_SO,108)
8618
C CutTools call for loop numbers 677,678,679,680
8914
C CutTools call for loop numbers 676,677,678,679
8619
8915
CALL ML5_0_LOOP_2(10,12,DCMPLX(ZERO),DCMPLX(MDL_ME),2,I_SO,109)
8620
C CutTools call for loop numbers 682,683,684,685
8916
C CutTools call for loop numbers 680,681,682,683
8621
8917
CALL ML5_0_LOOP_2(10,12,DCMPLX(ZERO),DCMPLX(MDL_MM),2,I_SO,110)
8622
C CutTools call for loop numbers 687,688,689,690
8918
C CutTools call for loop numbers 684,685,686,687
8623
8919
CALL ML5_0_LOOP_2(10,12,DCMPLX(ZERO),DCMPLX(MDL_MTA),2,I_SO
8624
8920
$ ,111)
8625
C CutTools call for loop numbers 691,692,693,694,695,696,697,698,
8626
C 699,700,701,702,703,704,705,706
8921
C CutTools call for loop numbers 688,689,690,691,692,693,694,695,
8922
C 696,697,698,699,700,701,702,703
8627
8923
CALL ML5_0_LOOP_2(6,14,DCMPLX(MDL_ME),DCMPLX(MDL_ME),2,I_SO
8628
8924
$ ,112)
8629
C CutTools call for loop numbers 707,708,709,710,711,712,713,714,
8630
C 715,716,717,718,719,720,721,722
8925
C CutTools call for loop numbers 704,705,706,707,708,709,710,711,
8926
C 712,713,714,715,716,717,718,719
8631
8927
CALL ML5_0_LOOP_2(6,14,DCMPLX(MDL_MM),DCMPLX(MDL_MM),2,I_SO
8632
8928
$ ,113)
8633
C CutTools call for loop numbers 723,724,725,726,727,728,729,730,
8634
C 731,732,733,734,735,736,737,738
8929
C CutTools call for loop numbers 720,721,722,723,724,725,726,727,
8930
C 728,729,730,731,732,733,734,735
8635
8931
CALL ML5_0_LOOP_2(6,14,DCMPLX(MDL_MTA),DCMPLX(MDL_MTA),2,I_SO
8636
8932
$ ,114)
8637
C CutTools call for loop numbers 739,743,745,747,751
8933
C CutTools call for loop numbers 736,740,742,744,748
8638
8934
CALL ML5_0_LOOP_1_2(2,7,15,DCMPLX(MDL_MH),0,I_SO,115)
8639
C CutTools call for loop numbers 740,741,742,744
8935
C CutTools call for loop numbers 737,738,739,741
8640
8936
CALL ML5_0_LOOP_2(7,15,DCMPLX(MDL_MZ),DCMPLX(MDL_MH),2,I_SO
8641
8937
$ ,116)
8642
C CutTools call for loop numbers 746
8938
C CutTools call for loop numbers 743
8643
8939
CALL ML5_0_LOOP_2(9,17,DCMPLX(MDL_MH),DCMPLX(MDL_MH),0,I_SO
8644
8940
$ ,117)
8645
C CutTools call for loop numbers 748,749,750,752
8941
C CutTools call for loop numbers 745,746,747,749
8646
8942
CALL ML5_0_LOOP_2(10,12,DCMPLX(MDL_MW),DCMPLX(MDL_MH),2,I_SO
8647
8943
$ ,118)
8648
8944
C At this point, all reductions needed for (QCD=2 QED=4), i.e.
8649
C of split order ID=1, are computed.
8945
C of split order ID=2, are computed.
8650
8946
IF(FILTER_SO.AND.SQSO_TARGET.EQ.2) GOTO 5000
8651
8947
C At this point, all reductions needed for (QCD=0 QED=6), i.e.
8652
C of split order ID=2, are computed.
8948
C of split order ID=3, are computed.
8653
8949
IF(FILTER_SO.AND.SQSO_TARGET.EQ.3) GOTO 5000
8654
8950
GOTO 5001
8655
8951
5000 CONTINUE
8691
8987
HELSAVED(2,HELPICKED)=ANS(2,0)
8692
8988
HELSAVED(3,HELPICKED)=ANS(3,0)
8693
8989
8694
IF (CHECKPHASE) THEN
8990
IF (CHECKPHASE.AND.NTRY.NE.0) THEN
8695
8991
C SET THE HELICITY FILTER
8696
8992
IF(.NOT.FOUNDHELFILTER) THEN
8697
8993
HEL_INCONSISTENT=.FALSE.
8700
8996
IF(NTRY.EQ.1) THEN
8701
8997
GOODHEL(HELPICKED)=-HELOFFSET
8702
8998
ELSEIF(GOODHEL(HELPICKED).NE.-HELOFFSET) THEN
8703
WRITE(*,*) '##W02A WARNING Inconsistent helicity '
8704
$ ,HELPICKED
8999
WRITE(*,*) '##W02A WARNING Inconsistent zero helicit'
9000
$ //'y ',HELPICKED
8705
9001
IF(HELINITSTARTOVER) THEN
8706
9002
WRITE(*,*) '##I01 INFO Initialization starting ove'
8707
9003
$ //'r because of inconsistency in the helicit'
8711
9007
HEL_INCONSISTENT=.TRUE.
8712
9008
ENDIF
8713
9009
ENDIF
8714
ELSE
9010
ELSEIF(HELICITYFILTERLEVEL.GT.1) THEN
8715
9011
DO H=1,HELPICKED-1
8716
9012
IF(GOODHEL(H).GT.-HELOFFSET) THEN
8717
9013
C Be looser for helicity check, bring a factor 100
8728
9024
C Make sure we have paired this hel config to the
8729
9025
C same one last PS point
8730
9026
ELSEIF(GOODHEL(HELPICKED).NE.(-H-HELOFFSET)) THEN
8731
WRITE(*,*) '##W02B WARNING Inconsistent helicit'
8732
$ //'y ',HELPICKED
9027
WRITE(*,*) '##W02B WARNING Inconsistent matchin'
9028
$ //'g helicity ',HELPICKED
8733
9029
IF(HELINITSTARTOVER) THEN
8734
9030
WRITE(*,*) '##I01 INFO Initialization startin'
8735
9031
$ //'g over because of inconsistency in th'
8852
9148
IF(HELPICKED.NE.NCOMB) THEN
8853
9149
HELPICKED=HELPICKED+1
8854
9150
MP_DONE=.FALSE.
8855
GOTO 200
9151
GOTO 205
8856
9152
ELSE
8857
9153
C Useful printout
8858
9154
C do I=1,NCOMB
8875
9171
ENDIF
8876
9172
ENDIF
8877
9173
ENDIF
8878
8879
9174
ENDIF
8880
9175
8881
9176
DO K=1,3
8887
9182
ENDDO
8888
9183
ENDDO
8889
9184
9185
8890
9186
IF(.NOT.CHECKPHASE.AND.HELDOUBLECHECKED.AND.(CTMODERUN.EQ.
8891
9187
$ -1)) THEN
8892
9188
STAB_INDEX=STAB_INDEX+1
8920
9216
CTMODE=BASIC_CT_MODE+1
8921
9217
GOTO 300
8922
9218
ELSE
8923
C NO DIRECTION TEST LIBRARIES: e.g. PJFry++ and Golem95
9219
C If some TIR library would not support the loop direction
9220
C test (they all do for now), then we would just copy the
9221
C answer from mode 1 and carry on.
8924
9222
STAB_INDEX=STAB_INDEX+1
8925
9223
IF(DOING_QP_EVALS)THEN
8926
9224
DO I=0,NSQUAREDSO
9284
9582
$ -1)) THEN
9285
9583
GOTO 1231
9286
9584
ENDIF
9287
C Be loser for helicity comparison, so bring a factor 100
9288
ELSEIF(.NOT.ML5_0_ISZERO((RESA(J)/RESB(J))-DBLE(WGT_TO_TRY(I
9289
$ )),REF*100.0D0,-1,-1)) THEN
9585
C Be looser for helicity comparison, so bring a factor 100
9586
ELSEIF(.NOT.ML5_0_ISZERO(ABS((RESA(J)/RESB(J))-DBLE(WGT_TO_TR
9587
$ Y(I))),1.0D0,-1,-1)) THEN
9290
9588
GOTO 1231
9291
9589
ENDIF
9292
9590
ENDDO
9483
9781
DATA (SQPLITORDERS( 1,I),I= 1, 2) / 4, 2/
9484
9782
DATA (SQPLITORDERS( 2,I),I= 1, 2) / 2, 4/
9485
9783
DATA (SQPLITORDERS( 3,I),I= 1, 2) / 0, 6/
9784
COMMON/ML5_0_ML5SQPLITORDERS/SQPLITORDERS
9486
9785
C
9487
9786
C BEGIN CODE
9488
9787
C
9540
9839
C CONSTANTS
9541
9840
C
9542
9841
INTEGER NLOOPAMPS
9543
PARAMETER (NLOOPAMPS=1295)
9842
PARAMETER (NLOOPAMPS=1292)
9544
9843
C
9545
9844
C ARGUMENTS
9546
9845
C
9866
10165
$ , 4/
9867
10166
DATA (LOOPAMPORDERS(I),I=1286,1290) / 4, 4, 4, 4
9868
10167
$ , 4/
9869
DATA (LOOPAMPORDERS(I),I=1291,1295) / 4, 4, 4, 4
9870
$ , 4/
10168
DATA (LOOPAMPORDERS(I),I=1291,1292) / 4, 4/
9871
10169
C -----------
9872
10170
C BEGIN CODE
9873
10171
C -----------
9892
10190
C
9893
10191
C CONSTANTS
9894
10192
C
9895
9896
10193
INTEGER NSO, NSQUAREDSO, NAMPSO
9897
10194
PARAMETER (NSO=2, NSQUAREDSO=3, NAMPSO=4)
9898
10195
C
9908
10205
DATA (AMPSPLITORDERS( 2,I),I= 1, 2) / 0, 2/
9909
10206
DATA (AMPSPLITORDERS( 3,I),I= 1, 2) / 2, 2/
9910
10207
DATA (AMPSPLITORDERS( 4,I),I= 1, 2) / 0, 4/
10208
COMMON/ML5_0_ML5AMPSPLITORDERS/AMPSPLITORDERS
9911
10209
C
9912
10210
C FUNCTION
9913
10211
C
9922
10220
ML5_0_ML5SQSOINDEX=ML5_0_ML5SOINDEX_FOR_SQUARED_ORDERS(SQORDERS)
9923
10221
END
9924
10222
10223
C This is the inverse subroutine of ML5SOINDEX_FOR_SQUARED_ORDERS.
10224
C Not directly useful, but provided nonetheless.
10225
SUBROUTINE ML5_0_ML5GET_SQUARED_ORDERS_FOR_SOINDEX(SOINDEX
10226
$ ,ORDERS)
10227
C
10228
C This functions returns the orders identified by the squared
10229
C split order index in argument. Order values correspond to
10230
C following list of couplings (and in this order):
10231
C ['QCD', 'QED']
10232
C
10233
C CONSTANTS
10234
C
10235
INTEGER NSO, NSQSO
10236
PARAMETER (NSO=2, NSQSO=3)
10237
C
10238
C ARGUMENTS
10239
C
10240
INTEGER SOINDEX, ORDERS(NSO)
10241
C
10242
C LOCAL VARIABLES
10243
C
10244
INTEGER I
10245
INTEGER SQPLITORDERS(NSQSO,NSO)
10246
COMMON/ML5_0_ML5SQPLITORDERS/SQPLITORDERS
10247
C
10248
C BEGIN CODE
10249
C
10250
IF (SOINDEX.GT.0.AND.SOINDEX.LE.NSQSO) THEN
10251
DO I=1,NSO
10252
ORDERS(I) = SQPLITORDERS(SOINDEX,I)
10253
ENDDO
10254
RETURN
10255
ENDIF
10256
10257
WRITE(*,*) 'ERROR:: Stopping function ML5_0_ML5GET_SQUARED_ORDER'
10258
$ //'S_FOR_SOINDEX'
10259
WRITE(*,*) 'Could not find squared orders index ',SOINDEX
10260
STOP
10261
10262
END SUBROUTINE
10263
10264
C This is the inverse subroutine of getting amplitude SO orders.
10265
C Not directly useful, but provided nonetheless.
10266
SUBROUTINE ML5_0_ML5GET_ORDERS_FOR_AMPSOINDEX(SOINDEX,ORDERS)
10267
C
10268
C This functions returns the orders identified by the split order
10269
C index in argument. Order values correspond to following list of
10270
C couplings (and in this order):
10271
C ['QCD', 'QED']
10272
C
10273
C CONSTANTS
10274
C
10275
INTEGER NSO, NAMPSO
10276
PARAMETER (NSO=2, NAMPSO=4)
10277
C
10278
C ARGUMENTS
10279
C
10280
INTEGER SOINDEX, ORDERS(NSO)
10281
C
10282
C LOCAL VARIABLES
10283
C
10284
INTEGER I
10285
INTEGER AMPSPLITORDERS(NAMPSO,NSO)
10286
COMMON/ML5_0_ML5AMPSPLITORDERS/AMPSPLITORDERS
10287
C
10288
C BEGIN CODE
10289
C
10290
IF (SOINDEX.GT.0.AND.SOINDEX.LE.NAMPSO) THEN
10291
DO I=1,NSO
10292
ORDERS(I) = AMPSPLITORDERS(SOINDEX,I)
10293
ENDDO
10294
RETURN
10295
ENDIF
10296
10297
WRITE(*,*) 'ERROR:: Stopping function ML5_0_ML5GET_ORDERS_FOR_AM'
10298
$ //'PSOINDEX'
10299
WRITE(*,*) 'Could not find amplitude split orders index ',SOINDEX
10300
STOP
10301
10302
END SUBROUTINE
10303
10304
10305
C This function is not directly useful, but included for completene
10306
C ss
10307
INTEGER FUNCTION ML5_0_ML5SOINDEX_FOR_AMPORDERS(ORDERS)
10308
C
10309
C This functions returns the integer index identifying the
10310
C amplitude split orders passed in argument which correspond to
10311
C the values of the following list of couplings (and in this
10312
C order):
10313
C ['QCD', 'QED']
10314
C
10315
C CONSTANTS
10316
C
10317
INTEGER NSO, NAMPSO
10318
PARAMETER (NSO=2, NAMPSO=4)
10319
C
10320
C ARGUMENTS
10321
C
10322
INTEGER ORDERS(NSO)
10323
C
10324
C LOCAL VARIABLES
10325
C
10326
INTEGER I,J
10327
INTEGER AMPSPLITORDERS(NAMPSO,NSO)
10328
COMMON/ML5_0_ML5AMPSPLITORDERS/AMPSPLITORDERS
10329
C
10330
C BEGIN CODE
10331
C
10332
DO I=1,NAMPSO
10333
DO J=1,NSO
10334
IF (ORDERS(J).NE.AMPSPLITORDERS(I,J)) GOTO 1009
10335
ENDDO
10336
ML5_0_ML5SOINDEX_FOR_AMPORDERS = I
10337
RETURN
10338
1009 CONTINUE
10339
ENDDO
10340
10341
WRITE(*,*) 'ERROR:: Stopping function ML5_0_ML5SOINDEX_FOR_AMPOR'
10342
$ //'DERS'
10343
WRITE(*,*) 'Could not find squared orders ',(ORDERS(I),I=1,NSO)
10344
STOP
10345
10346
END
10347
9925
10348
C --=========================================--
9926
10349
C Definition of additional access routines
9927
10350
C --=========================================--
9941
10364
9942
10365
ALWAYS_TEST_STABILITY = ONOFF
9943
10366
9944
END
10367
END SUBROUTINE
10368
10369
SUBROUTINE ML5_0_SET_AUTOMATIC_TIR_CACHE_CLEARING(ONOFF)
10370
C
10371
C This function can be called by the MadLoop user so as to
10372
C manually chose when
10373
C to reset the TIR cache.
10374
C
10375
IMPLICIT NONE
10376
10377
INCLUDE 'MadLoopParams.inc'
10378
10379
LOGICAL ONOFF
10380
10381
LOGICAL AUTOMATIC_TIR_CACHE_CLEARING
10382
DATA AUTOMATIC_TIR_CACHE_CLEARING/.TRUE./
10383
COMMON/ML5_0_RUNTIME_OPTIONS/AUTOMATIC_TIR_CACHE_CLEARING
10384
10385
INTEGER N_DP_EVAL, N_QP_EVAL
10386
COMMON/ML5_0_N_EVALS/N_DP_EVAL,N_QP_EVAL
10387
10388
10389
AUTOMATIC_TIR_CACHE_CLEARING = ONOFF
10390
10391
IF (NROTATIONS_DP.NE.0.OR.NROTATIONS_QP.NE.0) THEN
10392
WRITE(*,*) 'Warning: One cannot remove the TIR cache automati'
10393
$ //'c clearing while at the same time keeping Lorent'
10394
$ //'z rotations for stability tests.'
10395
WRITE(*,*) 'MadLoop will therefore automatically set NRotation'
10396
$ //'s_DP and NRotations_QP to 0.'
10397
NROTATIONS_DP = 0
10398
NROTATIONS_QP = 0
10399
CALL ML5_0_SET_N_EVALS(N_DP_EVAL,N_QP_EVAL)
10400
ENDIF
10401
END SUBROUTINE
9945
10402
9946
10403
SUBROUTINE ML5_0_SET_COUPLINGORDERS_TARGET(SOTARGET)
9947
10404
IMPLICIT NONE
10162
10619
10163
10620
END
10164
10621
10622
C The subroutine below perform clean-up duties for MadLoop like
10623
C de-allocating
10624
C arrays
10625
SUBROUTINE ML5_0_EXIT_MADLOOP()
10626
CONTINUE
10627
END
10628
10629
Loggerhead is a web-based interface for Breezy
Version: 2.0.1