c c epio banks statistics c c keep count of number of banks read c c stat_runh run header c stat_slow_pc slow control PC c stat_slow_sps slow control SPS c stat_slow_pc slow control beam c stat_evth event header c stat_dwpc beam chamber c stat_adc adc values c stat_fadc fadc c stat_scaler scaler c stat_tdc tdc c integer stat_evth integer stat_dwpc integer stat_adc integer stat_fadc integer stat_scaler integer stat_tdc integer stat_runh integer stat_slow_pc integer stat_slow_sps integer stat_slow_beam c common /sssepiostat/ stat_evth, + stat_dwpc, + stat_adc, + stat_fadc, + stat_scaler, + stat_tdc, + stat_runh, + stat_slow_pc, + stat_slow_sps, + stat_slow_beam c