*Common Variable:1 ( PYTHIA Commons)
        Common/LUJETS/N,K(4000,5),Ppyth(4000,5),Vpyth(4000,5)
        Integer N,K
        real Ppyth,Vpyth
        COMMON/LUDAT1/MSTU(200),PARU(200),MSTJ(200),PARJ(200)
        Integer MSTU,MSTJ
        Real PARU,PARJ
        Common/LUDATR/MRLU(6),RRLU(100)
        Integer MRLU
        Real RRLU
        Common/PYSUBS/MSEL,MSUB(200),KFIN(2,-40:40),CKIN(200)
        Integer MSEL,MSUB,KFIN
        Real CKIN
        Common/PYPARS/MSTP(200),PARP(200),MSTI(200),PARI(200)
        INteger MSTP,MSTI
        Real PARP,PARI

      integer ievstat

caar
c     added as control variables for PISA event generator menu options
      real             rts     /200.0/      !root s
      character *3     fnct    /'CMS'/      !process (?!???)
      integer          strfnct /5005/       !structure function set (GRV94LO)

      integer evtnum, tnumevt  /2/         !current event number,
      integer istat                        !total number of events (user input)

caar