Analyzer/INCLUDE/hack_.cmn - view

Return to hack_.cmn CVS log

Up to [HallC] / Analyzer / INCLUDE

File: [HallC] / Analyzer / INCLUDE / hack_.cmn (download)
Revision: 1.3, Wed Jan 17 15:58:04 1996 UTC (28 years, 8 months ago) by cdaq
Branch: MAIN
CVS Tags: spring03, sep0596, sep-26-2002, sep-25-2002, sep-24-2002, sep-09-2002, sane, pionct, online07, online04, online03, oct1199, nov2696, mduality, mar-24-2003, jan2496, jan1896, jan1796, gep_online, gep3, fpi2, emc, e01004, dec0198, bigcal, baryon, aug-12-2003, apr3096, apr-02-2003, Initial-CVS-Release, HEAD, Extra_Shower_Tubes_on_HMS_not_SOS
Changes since 1.2: +9 -16 lines

(JRA) Hacked it a bit

*---------------------------------------------------------------------------
*-- file: hack_.cmn
*-- include file for USER DEVOLOPMENT common block definitions;
*     used in files HACK_*.F
*-- The parameter hack_enable must be set to .ne. 0 to enable execution of
*     hack_anal subroutine for each event.
*-- any additional arrays or variables my be added by the user
*---------------------------------------------------------------------------
* $Log: hack_.cmn,v $
* Revision 1.3  1996/01/17 15:58:04  cdaq
* (JRA) Hacked it a bit
*
* Revision 1.2  1994/07/25 18:02:18  cdaq
* (HB) New version
*
* Revision 1.1  1994/07/22  13:55:48  cdaq
* Initial revision
*
*---------------------------------------------------------------------------
*
*     CTPTYPE=parm
*
      integer*4 hack_enable
      common /hack_c/ hack_enable
*
*
*     CTPTYPE=event
*
      integer hack_hmssc_au(16,4) !raw HMS-scintillator ADC up in fixed array
      integer hack_hmssc_ad(16,4) !raw HMS-scintillator ADC down in fixed array
      integer hack_hmssc_tu(16,4) !raw HMS-scintillator TDC up in fixed array
      integer hack_hmssc_td(16,4) !raw HMS-scintillator TDC down in fixed array
      integer hack_hmssc_go(16,4) !info about which ADC/TDC fired
*
      common/hack_copyeve_c/ hack_hmssc_au,hack_hmssc_ad,
     & hack_hmssc_tu,hack_hmssc_td,hack_hmssc_go

Analyzer/Replay: Mark Jones, Documents: Stephen Wood