ISAJET/isajet/zvout.inc

   1 #ifndef CERNLIB_ISAJET_ZVOUT_INC
   2 #define CERNLIB_ISAJET_ZVOUT_INC
   3 *
   4 *
   5 * zvout.inc
   6 *
   7       COMMON/ZVOUT/ZVOUT(512)
   8       SAVE /ZVOUT/
   9 #if defined(CERNLIB_LEVEL2)
  10 #include "isajet/l2zout.inc"
  11 * Ignoring t=pass
  12 #endif
  13       REAL      ZVOUT
  14
  15 #endif