/[PAMELA software]/gpamela/gpcdes/gpdhit.inc
ViewVC logotype

Diff of /gpamela/gpcdes/gpdhit.inc

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3.6 by cafagna, Mon Apr 10 00:07:21 2006 UTC revision 3.8 by cafagna, Thu May 11 00:15:51 2006 UTC
# Line 1  Line 1 
1  *  *
2  * $Id: gpdhit.inc,v 3.5 2006/04/09 23:28:55 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
9    * The P0 range in ND hit changed
10    *
11  * Revision 3.5  2006/04/09 23:28:55  cafagna  * Revision 3.5  2006/04/09 23:28:55  cafagna
12  * Several new things, among this: ND and CARD  * Several new things, among this: ND and CARD
13  *  *
# Line 11  Line 17 
17  * Revision 3.3  2005/06/21 02:42:09  cafagna  * Revision 3.3  2005/06/21 02:42:09  cafagna
18  * Major modification to the geometry and to the random number chain  * Major modification to the geometry and to the random number chain
19  *  *
20  * Revision 3.2  2003/12/17 11:32:49  pamela  *     Revision 3.2 2003/12/17 11:32:49 pamela CALO SIMULATION COMPLETED:
21  * CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation  *     geometry and special tracking parameters updated and simulation
22    *     checked by a comparison with the Trieste's standalone Monte Carlo
23    *     simulation
24  *  *
25  * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna  * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
26  * First GPAMELA release on CVS  * First GPAMELA release on CVS
# Line 34  Line 42 
42  #if defined(GPAMELA_INTER)  #if defined(GPAMELA_INTER)
43  * Interactive case. The average position inside the set has been stored  * Interactive case. The average position inside the set has been stored
44        DATA CHTOF/'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',        DATA CHTOF/'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',
45       +           'P0  ','TIME','PATH','IPAR','EREL'/       +           'EREL','TIME','PATH','IPAR','P0  '/
46  C ML:  C ML:
47  C      DATA CHTRD/'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',  C      DATA CHTRD/'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',
48  C     +           'EREL','PATH','IPAR','P0  '/  C     +           'EREL','PATH','IPAR','P0  '/
# Line 54  C END ML. Line 62  C END ML.
62  #endif  #endif
63  #if !defined(GPAMELA_INTER)  #if !defined(GPAMELA_INTER)
64        DATA CHTOF/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',        DATA CHTOF/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',
65       +           'P0  ','TIME','PATH','IPAR','EREL'/       +           'EREL','TIME','PATH','IPAR','P0  '/
66  C ML:  C ML:
67  C      DATA CHTRD/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',  C      DATA CHTRD/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',
68  C     +           'EREL','PATH','IPAR','P0  '/  C     +           'EREL','PATH','IPAR','P0  '/
# Line 84  C END ML. Line 92  C END ML.
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./,
100  *ML:  *ML:
101  *     +     FHTOF/6*10000.,1.E9,1.E12,10000.,1.,1.E3/  *     +     FHTOF/6*10000.,1.E9,1.E12,10000.,1.,1.E3/
102       +     FHTOF/6*10000.,1.E3,1.E12,10000.,1.,1.E9/       +     FHTOF/6*10000.,1.E9,1.E12,10000.,1.,1.E3/
103  *END ML.  *END ML.
104  C ML:  C ML:
105  C      DATA OHTRD/6*100.,0.,0.,0.,0./,  C      DATA OHTRD/6*100.,0.,0.,0.,0./,
# Line 123  c      DATA OHCAL/3*100.,0./,FHCAL/3*100 Line 132  c      DATA OHCAL/3*100.,0./,FHCAL/3*100
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/
   
   
   
   
   
   
   
Legend:
Removed from v.3.6  
changed lines
  Added in v.3.8
  ViewVC Help
Powered by ViewVC 1.1.23