|
version 1.7.2.1, 2003/04/02 22:26:55
|
version 1.7.2.2, 2003/04/03 14:02:13
|
|
|
|
| * h_scin_eff calculates efficiencies for the hodoscope. | * h_scin_eff calculates efficiencies for the hodoscope. |
| * | * |
| * $Log$ | * $Log$ |
| |
* Revision 1.7.2.2 2003/04/03 14:02:13 cdaq |
| |
* Remove extra enddo (JRA) |
| |
* |
| * Revision 1.7.2.1 2003/04/02 22:26:55 cdaq | * Revision 1.7.2.1 2003/04/02 22:26:55 cdaq |
| * added some extra scint. effic calculations (from oct 1999 online) - JRA | * added some extra scint. effic calculations (from oct 1999 online) - JRA |
| * | * |
|
|
|
| endif | endif |
| endif | endif |
| | |
| enddo !loop over hsnum_pmt_hit |
|
| |
|
| * Determine if one or both PMTs had a good tdc. | * Determine if one or both PMTs had a good tdc. |
| if (hgood_tdc_pos(hsnum_fptrack,nhit) .and. | if (hgood_tdc_pos(hsnum_fptrack,nhit) .and. |
| & hgood_tdc_neg(hsnum_fptrack,nhit) ) good_tdc_bothsides(pln)=.true. | & hgood_tdc_neg(hsnum_fptrack,nhit) ) good_tdc_bothsides(pln)=.true. |
Return to
h_scin_eff.f
CVS log
Up to [HallC] / Analyzer / HTRACKING