ISAJET/isajet/totals.inc

   1 #ifndef CERNLIB_ISAJET_TOTALS_INC
   2 #define CERNLIB_ISAJET_TOTALS_INC
   3 *
   4 *
   5 * totals.inc
   6 *
   7       COMMON/TOTALS/NKINPT,NWGEN,NKEEP,SUMWT,WT
   8       SAVE /TOTALS/
   9       INTEGER   NKINPT,NWGEN,NKEEP
  10       REAL      SUMWT,WT
  11
  12 #endif