ISAJET/isajet/isaunt.inc

   1 #ifndef CERNLIB_ISAJET_ISAUNT_INC
   2 #define CERNLIB_ISAJET_ISAUNT_INC
   3 *
   4 *
   5 * isaunt.inc
   6 *
   7       COMMON/ISAUNT/ISUNIT,ISWRIT
   8       SAVE /ISAUNT/
   9       INTEGER ISUNIT,ISWRIT
  10 C  ISUNIT=file number to write(read) ISAJET ZEBRA output
  11 C  ISWRIT=        "   to write if ISUNIT used for reading
  12
  13 #endif