| 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/ |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|