~madteam/mg5amcnlo/series2.0

« back to all changes in this revision

Viewing changes to madgraph/iolibs/template_files/loop_optimized/mp_helas_calls_split.inc

  • 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

Show diffs side-by-side

added added

removed removed

Lines of Context:
4
4
C  
5
5
C CONSTANTS
6
6
C  
7
 
          %(nbornamps_decl)s
8
7
      INTEGER    NEXTERNAL
9
8
      PARAMETER (NEXTERNAL=%(nexternal)d)
10
9
          INTEGER    NCOMB
11
10
      PARAMETER (NCOMB=%(ncomb)d)
 
11
  
 
12
## if (not LoopInduced) {
 
13
          INTEGER NBORNAMPS
 
14
      PARAMETER (NBORNAMPS=%(nbornamps)d)
 
15
## }
12
16
          INTEGER    NLOOPS, NLOOPGROUPS, NCTAMPS
13
17
      PARAMETER (NLOOPS=%(nloops)d, NLOOPGROUPS=%(nloop_groups)d, NCTAMPS=%(nctamps)d)
 
18
          INTEGER    NLOOPAMPS
 
19
          PARAMETER (NLOOPAMPS=%(nloopamps)d)
14
20
      INTEGER    NWAVEFUNCS,NLOOPWAVEFUNCS
15
21
      PARAMETER (NWAVEFUNCS=%(nwavefuncs)d,NLOOPWAVEFUNCS=%(nloopwavefuncs)d)
16
22
          INTEGER MAXLWFSIZE
50
56
          LOGICAL UVCT_REQ_SO_DONE,MP_UVCT_REQ_SO_DONE,CT_REQ_SO_DONE,MP_CT_REQ_SO_DONE,LOOP_REQ_SO_DONE,MP_LOOP_REQ_SO_DONE,CTCALL_REQ_SO_DONE,FILTER_SO
51
57
          common/%(proc_prefix)sSO_REQS/UVCT_REQ_SO_DONE,MP_UVCT_REQ_SO_DONE,CT_REQ_SO_DONE,MP_CT_REQ_SO_DONE,LOOP_REQ_SO_DONE,MP_LOOP_REQ_SO_DONE,CTCALL_REQ_SO_DONE,FILTER_SO
52
58
 
53
 
      %(mp_born_amps_decl)s
 
59
## if(not LoopInduced) {
 
60
          %(complex_mp_format)s AMP(NBORNAMPS)
 
61
          common/%(proc_prefix)sMP_AMPS/AMP
 
62
## }      
54
63
          %(complex_mp_format)s W(20,NWAVEFUNCS)
55
64
          common/%(proc_prefix)sMP_W/W
56
65
 
58
67
          %(complex_mp_format)s PL(0:3,0:NLOOPWAVEFUNCS)
59
68
          common/%(proc_prefix)sMP_WL/WL,PL
60
69
 
61
 
          %(complex_mp_format)s LOOPCOEFS(0:LOOPMAXCOEFS-1,NSQUAREDSO,NLOOPGROUPS)
62
 
          common/%(proc_prefix)sMP_LCOEFS/LOOPCOEFS
63
 
 
 
70
## if(not AmplitudeReduction){
64
71
      %(complex_mp_format)s AMPL(3,NCTAMPS)
 
72
## } else {
 
73
      %(complex_mp_format)s AMPL(3,NLOOPAMPS)
 
74
## } 
65
75
          common/%(proc_prefix)sMP_AMPL/AMPL
66
76
 
67
 
      %(complex_dp_format)s LOOPRES(3,NSQUAREDSO,NLOOPGROUPS)
68
 
          LOGICAL S(NSQUAREDSO,NLOOPGROUPS)
69
 
          common/%(proc_prefix)sLOOPRES/LOOPRES,S
70
77
C
71
78
C ----------
72
79
C BEGIN CODE