← Back to branch summary

~maddevelopers/mg5amcnlo/3.0.2-pineappl

« back to all changes in this revision

Viewing changes to tests/input_files/IOTestsComparison/IOExportFKSTest/test_wprod_fksew/%SubProcesses%P0_udx_veep%V0_udx_veep%TIR_interface.f

  • Committer: marco zaro
  • Date: 2020-09-18 11:00:14 UTC
  • mfrom: (956.1.11 3.0.4)
  • Revision ID: marcozaro@pcteor1.mi.infn.it-20200918110014-5jc20pkwceijqspw
merged with 3.0.4 rev967

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/input_files/IOTestsComparison/IOExportFKSTest/test_wprod_fksew/%SubProcesses%P0_udx_veep%V0_udx_veep%TIR_interface.f
7
7
C     
8
8
C     Interface between MG5 and TIR.
9
9
C     
10
 
C     Process: u d~ > ve e+ [ all = QED QCD ] QCD^2=0 QED^2=6
11
 
C     Process: c s~ > ve e+ [ all = QED QCD ] QCD^2=0 QED^2=6
 
10
C     Process: u d~ > ve e+ [ all = QCD QED ] QCD^2=0 QED^2=6
 
11
C     Process: c s~ > ve e+ [ all = QCD QED ] QCD^2=0 QED^2=6
12
12
C     
13
13
C     
14
14
C     CONSTANTS 
54
54
      INTEGER LAST_LIB_USED
55
55
      DATA LAST_LIB_USED/-1/
56
56
 
57
 
      COMPLEX*16 TIRCOEFS(0:LOOPMAXCOEFS-1,3),TIRCOEFSERRORS(0:LOOPMAXC
58
 
     $OEFS-1,3)
 
57
      COMPLEX*16 TIRCOEFS(0:LOOPMAXCOEFS-1,3)
 
58
     $ ,TIRCOEFSERRORS(0:LOOPMAXCOEFS-1,3)
59
59
      COMPLEX*16 PJCOEFS(0:LOOPMAXCOEFS-1,3)
60
60
C     
61
61
C     EXTERNAL FUNCTIONS
403
403
C     
404
404
      INCLUDE 'MadLoopParams.inc'
405
405
      INCLUDE 'process_info.inc'
406
 
C     Change the list 'LOOPLIBS_QPAVAILABLE' in loop_matrix_standalone.
407
 
C     inc to change the list of QPTools availables
 
406
C     Change the list 'LOOPLIBS_QPAVAILABLE' in
 
407
C      loop_matrix_standalone.inc to change the list of QPTools
 
408
C      availables
408
409
      LOGICAL QP_TOOLS_AVAILABLE
409
410
      INTEGER INDEX_QP_TOOLS(QP_NLOOPLIB+1)
410
411
      COMMON/LOOP_TOOLS/QP_TOOLS_AVAILABLE,INDEX_QP_TOOLS