This is an incomplete but partially functional library for accessing
prgramming and reading out a set of Struck 3801 Latching Multi-scalers.

Basic routines

   s3801Init ( address, addr_inc, num_scalers)
      address  = base VME address of first scaler (A24 or A32)
      addr_inc = address increment between each scaler
      num_scalers = number of 3801 modules in the crate

   (this routine intializes scalers and creates id = 0,1,2,...)
  

   s3801Reset(id)  - reset scaler to power up state
   s3801Clear(id)  - clears scalers and FIFOs 
   s3801Enable(id) - enables scalers for counting
   s3801Next(id)   - latches scaler data in FIFO and clears counters
   s3801Disable(id) - disables scalers

   s3801Print(id, count) - prints FIFO data to standard out
   s3801Read(id, *data, count) - writes FIFO data to local buffer

   s3801Status(id) - prints scaler status to standard out




   Any questions - please call David Abbott x7190
