/[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.1 by cafagna, Thu Jul 11 16:01:59 2002 UTC revision 3.4 by cafagna, Tue Dec 20 12:21:04 2005 UTC
# Line 1  Line 1 
1  *  *
2  * $Id$  * $Id: gpdhit.inc,v 3.3 2005/06/21 02:42:09 cafagna Exp $
3    *
4    * $Log: gpdhit.inc,v $
5    * Revision 3.3  2005/06/21 02:42:09  cafagna
6    * Major modification to the geometry and to the random number chain
7    *
8    * Revision 3.2  2003/12/17 11:32:49  pamela
9    * CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation
10    *
11    * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
12    * First GPAMELA release on CVS
13  *  *
 * $Log$  
14  *  *
15  *  *
16  * gpdhit.inc  * gpdhit.inc
# Line 32  C END ML. Line 41  C END ML.
41       +           'EREL','TIME','PATH','IPAR','P0  '/       +           'EREL','TIME','PATH','IPAR','P0  '/
42        DATA CHSPE/'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',        DATA CHSPE/'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',
43       +           'EREL','PATH','IPAR','P0  '/       +           'EREL','PATH','IPAR','P0  '/
44          DATA CHND/ 'XAVE','YAVE','ZAVE','XOUT','YOUT','ZOUT',
45         +           'EREL','TIME','IPAR','P0  '/
46  #endif  #endif
47  #if !defined(GPAMELA_INTER)  #if !defined(GPAMELA_INTER)
48        DATA CHTOF/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',        DATA CHTOF/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',
# Line 49  C END ML. Line 60  C END ML.
60        DATA CHSPE/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',        DATA CHSPE/'XIN ','YIN ','ZIN ','XOUT','YOUT','ZOUT',
61       +           'EREL','PATH','IPAR','P0  '/       +           'EREL','PATH','IPAR','P0  '/
62  C ML:  C ML:
63          DATA CHND/ 'XIN','YIN','ZIN','XOUT','YOUT','ZOUT',
64         +           'EREL','TIME','IPAR','P0  '/
65  C +SELF.  C +SELF.
66  #endif  #endif
67  #if defined(GPAMELA_GARFIELD)  #if defined(GPAMELA_GARFIELD)
# Line 56  C +SELF. Line 69  C +SELF.
69  #endif  #endif
70  C END ML.  C END ML.
71        DATA CHCAL/'XAVE','YAVE','ZAVE','EREL'/        DATA CHCAL/'XAVE','YAVE','ZAVE','EREL'/
72          DATA CHCALI/'MAP ','ESTR'/
73  * 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
74        DATA NBHTOF/NHTOF*32/,NBHTRD/NHTRD*32/,        DATA NBHTOF/NHTOF*32/,NBHTRD/NHTRD*32/,
75       +     NBHCAT/NHCAT*32/,NBHCAS/NHCAS*32/,NBHSPE/NHSPE*32/,       +     NBHCAT/NHCAT*32/,NBHCAS/NHCAS*32/,NBHSPE/NHSPE*32/,
76       +     NBHCAL/NHCAL*32/       +     NBHCAL/NHCAL*32/,NBHND/NHND*32/
77  * 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.
78  * Time is in second but we need psec.  * Time is in second but we need psec.
79        DATA OHTOF/6*100.,0.,0.,0.,0.,0./,        DATA OHTOF/6*100.,0.,0.,0.,0.,0./,
# Line 86  C END ML. Line 100  C END ML.
100        DATA OHSPE/6*100.,0.,0.,0.,0./,        DATA OHSPE/6*100.,0.,0.,0.,0./,
101       +     FHSPE/6*10000.,1.E9,10000.,1.,1.E3/       +     FHSPE/6*10000.,1.E9,10000.,1.,1.E3/
102  *EM:  *EM:
103    *ml: 21/03/2003:
104    c       DATA OHCAL/3*100.,0./,FHCAL/3*10000.,1.E9/
105    cml      DATA OHCAL/3*100.,0./,FHCAL/3*10000.,1.E5/
106  c      DATA OHCAL/3*100.,0./,FHCAL/3*10000.,1.E9/  c      DATA OHCAL/3*100.,0./,FHCAL/3*10000.,1.E9/
107        DATA OHCAL/3*100.,0./,FHCAL/3*10000.,1.E5/        DATA OHCAL/3*100.,0./,FHCAL/3*10000.,1.E9/
108          DATA OHCALI/0.,0./,FHCALI/1.,1.E9/
109    *end ml.
110  *END EM.  *END EM.
111          DATA OHND/6*100.,0.,0.,0.,0./,
112         +     FHND/6*10000.,1.E9,1.E12,1.,1.E9/
113    
114    
115    
Legend:
Removed from v.3.1  
changed lines
  Added in v.3.4
  ViewVC Help
Powered by ViewVC 1.1.23