* Event by event log info variable

        integer numday
        parameter (numday=3)
        integer numtim
        parameter (numtim=4)
        integer numutc
        parameter (numutc=7)
     
        integer ndaysksave(numday),ntimsksave(numtim),nsubsksave,nevsksave
        integer utctime(numutc)
        integer gps_sec,gps_nsec

	common/loginfo/ndaysksave,ntimsksave,nsubsksave,
     &         nevsksave,utctime,gps_sec,gps_nsec

	integer lunevlog 
	data lunevlog/29/
	integer lunsublog 
	data lunsublog/33/
	integer lunrunlog 
	data lunrunlog/31/

*******************************************************
* Mapping of isel indices to meaning

* pc1 

      integer MIDRD2_CUT
      parameter (MIDRD2_CUT=1)	

      integer PATCUT2_CUT
      parameter (PATCUT2_CUT=1)	

* pc2

      integer OLD_N_OUTER_MIN
      parameter (OLD_N_OUTER_MIN = 1)

      integer NEW_ENDVSWALL
      parameter (NEW_ENDVSWALL = 1)

      integer OLD_N_OUTER_2
      parameter (OLD_N_OUTER_2 = 2)

      integer OLD_N_OUTER
      parameter (OLD_N_OUTER = 3)

      integer OLD_PE200
      parameter (OLD_PE200 = 4)

      integer NEW_N_OD_CLUSTER
      parameter (NEW_N_OD_CLUSTER = 5)

      integer NEW_DIST_OD12
      parameter (NEW_DIST_OD12 = 6)

      integer NEW_OD_CHG2
      parameter (NEW_OD_CHG2 = 7)

      integer NEW_N_EARLY
      parameter (NEW_N_EARLY = 8)

      integer OLD_KEEP
      parameter (OLD_KEEP = 9)

      integer NEW_KEEP
      parameter (NEW_KEEP = 10)

      integer NEW_OR_OLD_KEEP
      parameter (NEW_OR_OLD_KEEP = 11)

* pc3

      integer FLASHTEST
      parameter (FLASHTEST=1)

      integer E_HIT_8M
      parameter (E_HIT_8M = 2)

* PC4

      integer PC4_QISMSK
      parameter (PC4_QISMSK = 1)

      integer DOT_PROD
      parameter (DOT_PROD = 2)

      integer MU_GOOD
      parameter (MU_GOOD = 3)
      
      integer MU_DIST
      parameter (MU_DIST = 4)

      integer D_CORN
      parameter (D_CORN = 5)

* PC5

      integer N_PC_HITS
      parameter (N_PC_HITS = 1)

      integer PC5_QISMSK
      parameter (PC5_QISMSK = 2)

      integer N_OD_CL3
      parameter (N_OD_CL3 = 3)

      integer DOD12
      parameter (DOD12 = 4)

      integer ODCLQ2
      parameter (ODCLQ2 = 5)
	
      integer PC5_CALSEL
      parameter (PC5_CALSEL = 6)

      integer PC5_DEADSEL
      parameter (PC5_DEADSEL = 7)

      integer PC5_BADSUB
      parameter (PC5_BADSUB = 8)
      
      integer PC5_GEJI
      parameter (PC5_GEJI = 9)

      integer PC5_THR5TH
      parameter (PC5_THR5TH = 10)    

      integer PC5_ST5TH
      parameter (PC5_ST5TH = 11)    

      integer PC5_CONE
      parameter (PC5_CONE = 12)    

      integer PC5_BYE
      parameter (PC5_BYE = 13)

      integer PC5_CLUSTER
      parameter (PC5_CLUSTER = 14)

      integer PC5_ANGLE
      parameter (PC5_ANGLE = 15)

      integer PC5_NOID
      parameter (PC5_NOID = 16)

      integer PC5_ANOOD
      parameter (PC5_ANOOD = 17)

      integer PC5_VETO
      parameter (PC5_VETO = 18)

      integer PC5_HITS
      parameter (PC5_HITS = 19)

      integer PC5_EVIS
      parameter (PC5_EVIS = 20)

      integer PC5_NEW_EVIS
      parameter (PC5_NEW_EVIS = 21)