← Back to branch summary

~maddevelopers/mg5amcnlo/2.7.1.3

« back to all changes in this revision

Viewing changes to Template/NLO/SubProcesses/cluster.f

  • Committer: olivier Mattelaer
  • Date: 2016-05-12 11:00:18 UTC
  • mfrom: (262.1.150 2.3.4)
  • Revision ID: olivier.mattelaer@uclouvain.be-20160512110018-sevb79f0wm4g8mpp
pass to 2.4.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
Template/NLO/SubProcesses/cluster.f
281
281
      integer maxflow
282
282
      parameter (maxflow=999)
283
283
      integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc),
284
 
     &     icolup(2,nexternal,maxflow)
285
 
      common /c_leshouche_inc/idup,mothup,icolup
 
284
     &     icolup(2,nexternal,maxflow),niprocs
 
285
      common /c_leshouche_inc/idup,mothup,icolup,niprocs
286
286
c External
287
287
      logical filgrp
288
288
      external filgrp
344
344
      integer maxflow
345
345
      parameter (maxflow=999)
346
346
      integer idup(nexternal,maxproc),mothup(2,nexternal,maxproc),
347
 
     &     icolup(2,nexternal,maxflow)
348
 
      common /c_leshouche_inc/idup,mothup,icolup
 
347
     &     icolup(2,nexternal,maxflow),niprocs
 
348
      common /c_leshouche_inc/idup,mothup,icolup,niprocs
349
349
      INTEGER NFKSPROCESS
350
350
      COMMON/C_NFKSPROCESS/NFKSPROCESS
351
351
      double precision dot