      integer idtrace,idtres,idgen,iddet
      common /tresolh/idtrace,idtres,idgen,iddet

      real a0,a1,trise,tfall,R,anorm,dtmin,dtmax,dtcross,scintdecayt
      common /tresolc/a0,a1,trise,tfall,R,anorm,dtmin,dtmax,dtcross,
     +                scintdecayt

      real tracelen,tstep,ppar
      common /tresolp/tracelen,tmemory,tstep,ppar(9)
     
      integer max_events,max_samples,max_pixels
      parameter (max_events=1000000)
      parameter (max_samples=10000)
      parameter (max_pixels=15000)
      integer last_event
      real event_t0,event_amp,sample
      common /tresolq/last_event,sample(max_samples),
     +                event_t0(max_events),event_amp(max_events)

      logical verbose
      data verbose/.true./

      integer Npixels
      real Rnoise
      real fcrosstalk
      real trecovery
      integer nafterpulse
      integer max_afterpulse
      parameter (max_afterpulse=9)
      real fafterpulse(max_afterpulse)
      real tafterpulse(max_afterpulse)
      real pcount
      common /tresoln/Npixels,Rnoise,fcrosstalk,trecovery,
     +                nafterpulse,fafterpulse,tafterpulse,
     +                pcount
