Warning, /include/isajet/mgsigs.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_MGSIGS_INC
0002 #define CERNLIB_ISAJET_MGSIGS_INC
0003 *
0004 *
0005 * mgsigs.inc
0006 *
0007 C
0008 C Running totals for MadGraph cross sections
0009 C WTTOT8/NWTTOT = total cross section
0010 C WTSUM8/NWT8 = channel cross section
0011 C IFUNC8, IDENT8 = MadGraph function code channel flavors
0012 C
0013 INTEGER MXSIG8
0014 PARAMETER (MXSIG8=1000)
0015 COMMON /MGSIGS/WTTOT8,WTSUM8(MXSIG8),WTMAX8(MXSIG8),NSIG8,
0016 $NWTTOT,NWT8(MXSIG8),IFUNC8(MXSIG8),IDENT8(MXLIM+2,MXSIG8),
0017 $ISORT8(MXSIG8)
0018 REAL*8 WTTOT8,WTSUM8,WTMAX8
0019 INTEGER NSIG8,NWTTOT,NWT8,IFUNC8,IDENT8,ISORT8
0020 SAVE /MGSIGS/
0021
0022 #endif
