Analyzer/T20/gen_misc.cmn - view

Return to gen_misc.cmn CVS log

Up to [HallC] / Analyzer / T20

File: [HallC] / Analyzer / T20 / gen_misc.cmn (download)
Revision: 1.1, Tue Dec 1 21:03:34 1998 UTC (25 years, 9 months ago) by saw
Branch: MAIN
CVS Tags: spring03, sep-26-2002, sep-25-2002, sep-24-2002, sep-09-2002, sane, pionct, online07, online04, online03, oct1199, mduality, mar-24-2003, gep_online, gep3, fpi2, emc, e01004, bigcal, baryon, aug-12-2003, apr-02-2003, Initial-CVS-Release, HEAD, Extra_Shower_Tubes_on_HMS_not_SOS

Initial revision

*     file name: gen_misc.cmn
*
* $Log: gen_misc.cmn,v $
* Revision 1.1  1998/12/01 21:03:34  saw
* Initial revision
*
*     purpose: define varibles for
*     - scaler histograms
*     - coincidence TDCs (coin between HMS and Polder)
*
*
*--------------------------------------------------------------------------
*  for display of scalers or test values in histograms
*
*    CTPTYPE=parm
      integer*4 g_maxscal_h
      parameter (g_maxscal_h=50)  !max number of scalers per histogram
      integer*4
     2  g_scal_his1, g_scal_his2, g_scal_his3, g_scal_his4,
     2  g_scal_his5, g_scal_his6, g_scal_his7, g_scal_his8
*
*    CTPTYPE=event
*
      real*4
     1  g_scaler_h1(g_maxscal_h), g_scaler_h_old1(g_maxscal_h),
     1  g_scaler_h2(g_maxscal_h), g_scaler_h_old2(g_maxscal_h),
     1  g_scaler_h3(g_maxscal_h), g_scaler_h_old3(g_maxscal_h),
     1  g_scaler_h4(g_maxscal_h), g_scaler_h_old4(g_maxscal_h),
     1  g_scaler_h5(g_maxscal_h), g_scaler_h_old5(g_maxscal_h),
     1  g_scaler_h6(g_maxscal_h), g_scaler_h_old6(g_maxscal_h),
     1  g_scaler_h7(g_maxscal_h), g_scaler_h_old7(g_maxscal_h),
     1  g_scaler_h8(g_maxscal_h), g_scaler_h_old8(g_maxscal_h)

      common /g_scaler_hist/
     1  g_scaler_h1, g_scaler_h_old1,
     1  g_scaler_h2, g_scaler_h_old2,
     1  g_scaler_h3, g_scaler_h_old3,
     1  g_scaler_h4, g_scaler_h_old4,
     1  g_scaler_h5, g_scaler_h_old5,
     1  g_scaler_h6, g_scaler_h_old6,
     1  g_scaler_h7, g_scaler_h_old7,
     1  g_scaler_h8, g_scaler_h_old8,
     2  g_scal_his1, g_scal_his2, g_scal_his3, g_scal_his4,
     2  g_scal_his5, g_scal_his6, g_scal_his7, g_scal_his8

*--------------------------------------------------------------------------
*
*    CTPTYPE=event
*
      integer*4
     1   c_hrtdc_s22,
     3   c_hrtdc_hms, 
     6   c_mhtdc_hms 
*
      common/gcoin_misc/
     1   c_hrtdc_s22,
     3   c_hrtdc_hms, 
     6   c_mhtdc_hms 
*

Analyzer/Replay: Mark Jones, Documents: Stephen Wood