ISAJET/isajet/jetsig.inc

   1 #ifndef CERNLIB_ISAJET_JETSIG_INC
   2 #define CERNLIB_ISAJET_JETSIG_INC
   3 *
   4 *
   5 * jetsig.inc
   6 *
   7       INTEGER   MXSIGS,IOPAK
   8       PARAMETER (MXSIGS=3000,IOPAK=100)
   9       COMMON/JETSIG/SIGMA,SIGS(MXSIGS),NSIGS,INOUT(MXSIGS),SIGEVT
  10       SAVE /JETSIG/
  11 #if defined(CERNLIB_LEVEL2)
  12 #include "isajet/l2sigs.inc"
  13 * Ignoring t=pass
  14 #endif
  15       INTEGER   NSIGS,INOUT
  16       REAL      SIGMA,SIGS,SIGEVT
  17
  18 #endif