      INTEGER IRUN,IEV
      COMMON/MCEVENT/IRUN,IEV

      integer space(1000)
      common /cfread/ space

      integer do_ntuple        !Non-zero enables ntuple output
      integer irurndm(2)       !random number seeds   
      integer irseq            !randome number sequence
      integer ibatch           !flag if running in batch/interactive mode
      real magnify             !magnification power for drawing package
      integer hpmod
      common /mcflags/ do_ntuple,irurndm,irseq,ibatch,
     +  magnify,hpmod
