ISAJET/isajet/frame.inc

   1 #ifndef CERNLIB_ISAJET_FRAME_INC
   2 #define CERNLIB_ISAJET_FRAME_INC
   3 *
   4 *
   5 * frame.inc
   6 *
   7       COMMON/FRAME/FRAME(5,3),N0JETS,N0W,N0PAIR
   8       SAVE /FRAME/
   9       INTEGER   N0JETS,N0W,N0PAIR
  10       REAL      FRAME
  11
  12 #endif