( is a
function and is called by: hec_slow_pass.f
)
includes the following commons:
hec_par.inc
hec_datacard.inc
hec_epio.inc
hec_stats_epio.inc
This routine looks for a slow control bank
within the first 10 (or: maxrecords) records
of the file. (slow control records are usually at the beginning of an epio
file.)
The slow controls record is then read.
If there is a problem, hec_nextevt_epio_slow
gets set to be .false.
Calls the following subroutines:
hec_slow_ini.f
which initializes the slow contron common block
hec_slow_pc_epio
gets the slow controlPC data
hec_slow_sps_epio
gets thslow control SPS data data
hec_slow_beam_epio
gets the slow control BEAM data data
This function then returns:
hec_nextevt_epio_slow = .not.( b_pc.and.b_sps.and.b_beam
)