PROGRAM hec_adc c c program to provide simple access to atlas hadronic endcap c testbeam data c Contact: Michel Lefebvre c Authors: Michel Lefebvre, Dugan O'Neil, Carla Sbarra c c version 3.12 c c see file hec_adc.versions for an update of the code versions c see file hec_adc.readme for information c see web page http://wwwhep.phys.uvic.ca/~uvatlas/hec_adc c for full details c c please send comments to uvatlas@pp.phys.uvic.ca c implicit none c include'hec_par.inc' !shared parameters include'hec_datacard.inc' !datacard values c print *,' ' print *,' ********************************' print *,' * *' print *,' * HEC_ADC version 3.12 *' print *,' * *' print *,' ********************************' print *,' ' c c global initialization c call hec_ini c c offline mode c if (run_mode .eq. 1) then call hec_offline c c online mode c elseif (run_mode .eq. 2) then call hec_online endif c c global termination c call hec_ter c end