1 |
* |
* |
2 |
* $Id: gpdhit.inc,v 3.6 2006/04/10 00:07:21 cafagna Exp $ |
* $Id: gpdhit.inc,v 3.7 2006/05/02 18:00:10 cafagna Exp $ |
3 |
* |
* |
4 |
* $Log: gpdhit.inc,v $ |
* $Log: gpdhit.inc,v $ |
5 |
|
* Revision 3.7 2006/05/02 18:00:10 cafagna |
6 |
|
* Bugs fixed in TOF set definition, TOF hit back to the original naming scheme |
7 |
|
* |
8 |
* Revision 3.6 2006/04/10 00:07:21 cafagna |
* Revision 3.6 2006/04/10 00:07:21 cafagna |
9 |
* The P0 range in ND hit changed |
* The P0 range in ND hit changed |
10 |
* |
* |
92 |
* No packing required for the last CAL hit to use the GSCHIT routine |
* No packing required for the last CAL hit to use the GSCHIT routine |
93 |
DATA NBHTOF/NHTOF*32/,NBHTRD/NHTRD*32/, |
DATA NBHTOF/NHTOF*32/,NBHTRD/NHTRD*32/, |
94 |
+ NBHCAT/NHCAT*32/,NBHCAS/NHCAS*32/,NBHSPE/NHSPE*32/, |
+ NBHCAT/NHCAT*32/,NBHCAS/NHCAS*32/,NBHSPE/NHSPE*32/, |
95 |
+ NBHCAL/NHCAL*32/,NBHND/NHND*32/,NBHCARD/NHCARD*32/ |
+ NBHCAL/NHCAL*32/,NBHCALI/NHCALI*32/,NBHND/NHND*32/, |
96 |
|
+ NBHCARD/NHCARD*32/ |
97 |
* The coordinates have to be always positive. We need microns for XYZ and eV. |
* The coordinates have to be always positive. We need microns for XYZ and eV. |
98 |
* Time is in second but we need psec. |
* Time is in second but we need psec. |
99 |
DATA OHTOF/6*100.,0.,0.,0.,0.,0./, |
DATA OHTOF/6*100.,0.,0.,0.,0.,0./, |
132 |
*END EM. |
*END EM. |
133 |
DATA OHND/6*100.,0.,0.,0.,0.,0./, |
DATA OHND/6*100.,0.,0.,0.,0.,0./, |
134 |
+ FHND/6*10000.,1.E9,1.E12,10000.,1.,1.E3/ |
+ FHND/6*10000.,1.E9,1.E12,10000.,1.,1.E3/ |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|