*_______________________________________________________________________ * sos_id_histid.cmn * * This common block contains the HBOOK histogram id numbers * for all sos particle id histograms in which direct hfill * calls are made. * * It also contains the paramter flags to turn on and off histograming * of each of the hard coded blocks. * * Created 9 April 1994 D. F. Geesaman * * $Log: sos_id_histid.cmn,v $ * Revision 1.2 1994/08/05 21:05:04 cdaq * (SAW) Add makereg directive with required include files * Add "CTPTYPE=parm" directive for auto generation of CTP reg calls * * Revision 1.1 1994/04/12 21:16:27 cdaq * Initial revision * *%% include 'gen_data_structures.cmn' *%% include 'sos_scin_parms.cmn' * * The following don't need to be registered?? * CTPTYPE=parm integer*4 sidscinrawtothits integer*4 sidscinplane integer*4 sidscincounters(SNUM_SCIN_PLANES) integer*4 sidscinposadc(SNUM_SCIN_PLANES,snum_scin_elements) integer*4 sidscinnegadc(SNUM_SCIN_PLANES,snum_scin_elements) integer*4 sidscinpostdc(SNUM_SCIN_PLANES,snum_scin_elements) integer*4 sidscinnegtdc(SNUM_SCIN_PLANES,snum_scin_elements) * common/sos_id_histid/ & sidscinrawtothits, & sidscinplane, & sidscincounters, & sidscinposadc, & sidscinnegadc, & sidscinpostdc, & sidscinnegtdc * * CTPTYPE=parm * * flags to turn on (.eq.1) or off (.eq. 0) hard coded histograms integer*4 sturnon_scin_raw_hist * common/sos_id_hist_flags/ & sturnon_scin_raw_hist