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

Diff of /gpamela/gpcdes/gpdgeo.inc

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

revision 3.3 by cafagna, Tue Jun 21 02:42:08 2005 UTC revision 3.20 by pam-ba, Tue Nov 28 10:26:14 2006 UTC
# Line 1  Line 1 
1  *  *
2  * $Id: gpdgeo.inc,v 3.2 2002/12/05 10:17:42 pamela Exp $  * $Id: gpdgeo.inc,v 3.19 2006/11/16 18:45:29 pam-ba Exp $
3  *  *
4  * $Log: gpdgeo.inc,v $  * $Log: gpdgeo.inc,v $
5  * Revision 3.2  2002/12/05 10:17:42  pamela  * Revision 3.19  2006/11/16 18:45:29  pam-ba
6  * Update CAS and CALO geometries and positions. Makefile updated as well  * Simulated an aluminum container for S4
7  *  *
8  * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna  * Revision 3.18  2006/11/16 12:01:13  pam-ba
9  * First GPAMELA release on CVS  * S4 dimensions corrected.
10  *  *
11  *  * Revision 3.17  2006/11/10 11:39:34  pam-ba
12  *  * S2 and S1 z-positions corrected, He3 and plystyrene mixture added, Top Plate geometry simulated and titanium mixture added.
13  * gpdgeo.inc  *
14  *  * Revision 3.16  2006/10/12 11:11:21  pam-ba
15  *                16/07/2004  16.44.06  by  Alexey Bakaldin  * ND geometry updated.
16  *                17/10/2002  22.31.45  by  Jens Lund  *
17  *CMZ :  3.00/00 14/11/2000  09.13.05  by  Emiliano Mocchiutti  * Revision 3.15  2006/06/30 15:38:16  pam-ba
18  *CMZ :  2.02/00 12/10/2000  18.43.21  by  Francesco Cafagna  * S22 and S12 heights positioned in GPAMELA at the nominal heights in PAMELA (see document: Main geometrical parameters of the PAMELA sub-detectors, 20 December 2005)
19  *CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola  *
20  *CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna  * Revision 3.14  2006/05/18 10:52:31  pam-ba
21  *CMZ :  1.02/00 04/02/2000  18.40.04  by  Francesco Cafagna  * TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
22  *CMZ :  1.01/00 06/05/96  11.40.48  by  Francesco Cafagna  *
23  *CMZ :  1.00/02 02/04/96  16.44.16  by  Francesco Cafagna  * Revision 3.13  2006/05/09 12:01:16  cafagna
24  *-- Author :    Francesco Cafagna   05/12/95  * Calo geometry updated
25        DATA PAME/0.,53.,130./  *
26  *     AB:  * Revision 3.12  2006/05/02 12:30:02  bottai
27  C     DATA SHEL/69.8,70.,75./  *  change in trcp dimension in order to not overlap with its mother
28  cml             DATA SHEL/40.6,52.35,52.5,43.62253,43.77253/  *
29  cml             DATA MSHE/52.25,52.5,20./  * Revision 3.11  2006/05/02 11:32:14  pam-ba
30  cml             DATA BSPH/52.25,52.5,90.,180.,0.,360./  * TOF geometry and position updated and a new material, the mylar, added
31  cml:  *
32          DATA SHEL/38.25,52.5,52.65,43.77,43.92/  * Revision 3.10  2006/04/09 23:28:54  cafagna
33          DATA MSHE/52.5,52.75,20./  * Several new things, among this: ND and CARD
34          DATA BSPH/52.5,52.75,90.,180.,0.,360./  *
35  c     end ml  * Revision 3.9  2005/12/20 12:21:04  cafagna
36  *     END: AB.  * gpnd directory added along with ND files
37  C     DATA TFLA/126.8,127.,0.,33.45,0.,360./  *
38          DATA TFLA/0.,43.77253,0.125/  * Revision 3.8  2005/12/16 10:20:18  cafagna
39  *     AB:  * Bug fixed in the new update
40  C     DATA TSPH/0., 150.,0.,0.,0.,360./  *
41  cml             DATA TSPH/239.83,240.,0.,0.,0.,360./  * Revision 3.7  2005/12/16 09:13:55  cafagna
42  cml:  * New small valume added to the tracker frame
43          DATA TSPH/239.83,240.,0.,0.,0.,360./  *
44  c     end ml.  * Revision 3.6  2005/12/13 10:31:29  pam-ba
45  *     END: AB.  * added a new volume, TPGI, in the spectrometer
46          DATA GAPTOP/2./  *
47  c ml:26/10/04          * Revision 3.5  2005/12/05 12:15:20  pam-ba
48  c     DATA S11/22.,19.2,.45/  * new spectrometer geometry and internal magnetic field
49          DATA S11/20.4,16.5,.375/  *
50  c     DATA S12/22.,19.2,.45/  * Revision 3.4  2005/07/25 11:53:21  cafagna
51          DATA S12/20.4,16.5,.375/  * Several updates. See history for details
52  c     DATA S21/9.,7.2,.35/  *
53          DATA S21/9.,7.5,.375/  * Revision 3.3  2005/06/21 02:42:08  cafagna
54  c     DATA S22/9.,7.2,.35/  * Major modification to the geometry and to the random number chain
55          DATA S22/9.,7.5,.375/  *
56  c ml: 28/10/04:  * Revision 3.2  2002/12/05 10:17:42  pamela
57  c dimensions of top plate. At the moment, it is a reduced version,  * Update CAS and CALO geometries and positions. Makefile updated as well
58  c i.e. a gap of gas with a surface equal to S21.  *
59          DATA TPLA/9.,7.5,.25/  * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
60  c end ml.  * First GPAMELA release on CVS
61  c     DATA S31/9.,7.2,.35/  *
62          DATA S31/9.,7.5,.40/  *
63  c     DATA S32/9.,7.2,.35/  *
64          DATA S32/9.,7.5,.40/  * gpdgeo.inc
65  c end ml:  *
66          DATA S4/18.,16.,.5/  *                16/07/2004  16.44.06  by  Alexey Bakaldin
67          DATA SCTIC/0.025/  *                17/10/2002  22.31.45  by  Jens Lund
68  c ml:26/10/04:  *CMZ :  3.00/00 14/11/2000  09.13.05  by  Emiliano Mocchiutti
69  c        DATA NS11X/9/  *CMZ :  2.02/00 12/10/2000  18.43.21  by  Francesco Cafagna
70          DATA NS11Y/8/  *CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
71  c     DATA NS12Y/9/  *CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
72          DATA NS12X/6/  *CMZ :  1.02/00 04/02/2000  18.40.04  by  Francesco Cafagna
73  c     DATA NS21X/4/  *CMZ :  1.01/00 06/05/96  11.40.48  by  Francesco Cafagna
74          DATA NS21X/2/  *CMZ :  1.00/02 02/04/96  16.44.16  by  Francesco Cafagna
75  c     DATA NS22Y/4/  *-- Author :    Francesco Cafagna   05/12/95
76          DATA NS22Y/2/        DATA PAME/0.,53.,130./
77  c     DATA NS31Y/4/  *     AB:
78          DATA NS31Y/3/  C     DATA SHEL/69.8,70.,75./
79  c     DATA NS32X/4/  cml             DATA SHEL/40.6,52.35,52.5,43.62253,43.77253/
80          DATA NS32X/3/  cml             DATA MSHE/52.25,52.5,20./
81  c end ml.  cml             DATA BSPH/52.25,52.5,90.,180.,0.,360./
82          DATA ZS11,ZS12,ZS21,ZS22,ZS31,ZS32,ZS4  cml:
83  c ml 22/10/04:          DATA SHEL/38.25,52.5,52.65,43.77,43.92/
84  c     +  /107.8,106.8,74.9,74.1,27.1,26.3,2.3/          DATA MSHE/52.5,52.75,20./
85  c ml 28/10/04: introducing the top plate and calculating the zpos of S21, S22          DATA BSPH/52.5,52.75,90.,180.,0.,360./
86  c starting from the zpos of CATA:  c     end ml
87  c     +   /106.66,105.66,74.9,74.1,27.1,26.3,2.3/  *     END: AB.
88       +   /106.66,105.66,74.875,74.125,27.1,26.3,2.3/  C     DATA TFLA/126.8,127.,0.,33.45,0.,360./
89          DATA ZTPLA/73.5/          DATA TFLA/0.,43.77253,0.125/
90  c end ml 28/10/04  *     AB:
91  c end ml 22/10/04:  C     DATA TSPH/0., 150.,0.,0.,0.,360./
92  C CAT data  cml             DATA TSPH/239.83,240.,0.,0.,0.,360./
93  *EM:  cml:
94  *JeL:          DATA TSPH/239.83,240.,0.,0.,0.,360./
95          DATA CATA/28.0,0.6,27.165/  c     end ml.
96  *END: JeL.  *     END: AB.
97  c        DATA CATB/22.05,21.05,0.55/          DATA GAPTOP/2./
98          DATA CATB/22.2,21.3,0.5/  c ml:26/10/04        
99  c        DATA CATL/15.75,6.675,0.55/  c        DATA S1/20.4,16.5,.375/
100  c        DATA CATT/6.3,14.375,0.55/  c        DATA S2/20.4,16.5,.375/
101          DATA CATL/2.6,14.9,0.4/  c        DATA S1A/9.,7.5,.375/
102          DATA CATT/8.45,21.2,0.4/  c        DATA S2A/9.,7.5,.375/
103          DATA CATH/9.4,7.7,0.5/          DATA S3/0.,0.,0./
104          DATA CATF/2.6,3.15,0.4/  c        DATA S4/18.,16.,.5/
105          DATA CATO/9.3,0.05,0.5/          DATA S4/24.1,24.1,0.5/
106          DATA CATP/0.05,7.7,0.5/          DATA S4AL/24.2,24.2,0.6/
107          DATA ZCAT/75.85/          DATA S11M/0.,0.,0./
108  C CAS data          DATA S12M/0.,0.,0./
109  *EM:          DATA S21M/0.,0.,0./
110  *JeL:          DATA S22M/0.,0.,0./
111          DATA CASA/21.45,0.6,20.55/          DATA S31M/0.,0.,0./
112  *END: JeL.          DATA S32M/0.,0.,0./
113  C        DATA CASX/15.25,0.55,23./          DATA POL1/0.,0.,0./
114  C        DATA CASY/0.55,14.75,23./          DATA POL2/0.,0.,0./
115          DATA CSSX/15.7,0.5,21.6/          DATA POLY/0.,0.,0./
116          DATA CSSY/0.5,15.7,21.6/          DATA S11Y/2.55,16.5,0.35/
117          DATA CASX/15.6,0.4,21.5/          DATA S12X/20.4,2.75,0.35/
118          DATA CASY/0.4,15.6,21.5/          DATA S21X/9.,3.75,0.25/
119          DATA CASXD/2.4/          DATA S22Y/4.5,7.5,0.25/
120          DATA CASYD/2.2/          DATA S31Y/3.,7.5,0.35/
121          DATA ZCAS/51.25/          DATA S32X/9.,2.5,0.35/
122  *END: EM.  c        DATA HMYLTOF/0.0025/
123  C TRD data          DATA HMYLTOF/0.0023/
124  c ml: 11/11/04          DATA HGLUTOF/0.01/
125  c        DATA TRFR/19,17.5,.2/          DATA HPVCMAX/0.9/
126          DATA TRFR/21.1,19.0,.275/          DATA HPVCMIN/0.4/
127          DATA TRFD/19.75,13.9,.2425/          DATA HALTOF/0.033/
128          DATA TRFU/19.4,13.55,.2425/          DATA HAIRS3/0.15/
129          DATA TRFM/21.1,19.0,0.1375/          DATA HTABLE/24.7/
130          DATA TRFL/20.175,14.325,1.13/          DATA DTABLEAL/1.7/
131  c        DATA TRFI/15.5,14.,.2/          DATA XTPLA/23.2/
132          DATA TRR0/21.1,38.5,.25/          DATA YTPLA/22.1/
133          DATA TRI0/10.65,8.85,.15/  c ml: 28/10/04:
134          DATA TRRF/16.0,15.4,0.1/  c dimensions of top plate. At the moment, it is a reduced version,
135          DATA TRRI/9.8,8.0,0.1/  c i.e. a gap of gas with a surface equal to S21.
136  c end ml.  c        DATA TPLA/9.,7.5,.25/
137          DATA TRBS/3.3,18.3,1./  c dimensions of top plate from CAD draws:
138  *ml: 10/11/66:  c        DATA TPLA/21.9,21.1,1.6/
139          DATA TRAL/3.3,2.15,1./          DATA TPLA/28.,27.165,1.6/
140          DATA TRR2/19.025,13.175,1.51/  C        DATA TPCA/18.1,18.2,0.6/
141  *end ml.  C        DATA TPS2/10.,8.1,0.75/
142          DATA TRDS/24.,24.5,13.5/          DATA TPCV/8.5,7.,0.25/
143          DATA TRDT/3.,3.,.25/          DATA TPTU/2.55,1.95,0.6/
144          DATA TRDB/17.7,18.5,0/          DATA TPTM/3.45,3.3,0.75/
145          DATA TRSO/0.197,0.2,14./          DATA TPTL/21.9,21.1,.25/
146  C        DATA TRSI/0.,0.197,14./  c end ml.
147          DATA TRSI/0.,0.2,14./  c        DATA SCTIC/0.025/
148  *ml: 12/11/04:  c ml:26/10/04:
149  c        DATA TRRA/13.2,14.,0/          DATA NS11Y/8/
150          DATA TRRA/18.25,12.4,0.76/          DATA NS12X/6/
151  *end ml.          DATA NS21X/2/
152  *ml: 17/11/04:          DATA NS22Y/2/
153  c        DATA TRAN/1.75,1.75,1.0/          DATA NS31Y/3/
154  c        DATA TRAI/1.75,1.65,0.9/          DATA NS32X/3/
155          DATA TRAN/1.8,1.8,1.0/  c end ml.
156          DATA TRAI/1.0,1.0,1.0/  C ml 28/03/06: official z coordinates in the PAMELA reference system with
157  *end ml.  c origin in the centre of the central plane of the central magnetic module:
158          DATA ZTRD/90.55/  c        DATA ZPAMS31,ZPAMS32/-23.49,-24.34/
159          DATA GAPTRD/1.5/          DATA DTPS3/0.845/
160  C Spectrometer data  c        DATA ZS11,ZS12,ZS21,ZS22,ZS31,ZS32,ZS4
161          DATA SPEB/12.,11.4,0./  c ml 22/10/04:
162  c ml: 26/10/04:  c     +  /107.8,106.8,74.9,74.1,27.1,26.3,2.3/
163  c     DATA MGPL/12.,11.4,4.05/  c ml 28/10/04: introducing the top plate and calculating the zpos of S21, S22
164          DATA MGPL/12.,11.4,4.0/  c starting from the zpos of CATA:
165  c     DATA MGPI/8.05,6.55,4.05/  c     +   /106.66,105.66,74.9,74.1,27.1,26.3,2.3/
166          DATA MGPI/8.1,6.6,4.0/  c     +   /106.66,105.66,74.875,74.125,27.1,26.3,2.3/
167  c ml:17/12/04:  c        DATA ZTPLA/73.5/
168  c        DATA TRPB/12.,11.4,0.4/  C HORMG is the distance beteween the bottom the tracker and the center of
169          DATA TRPB/10.49,12.15,0.365/  c the third magnetic module.
170  ccc ml: 20/04/05:          DATA HORMG/22.57/
171  cc        DATA TRPL/0.,7.,0.4/  c end ml 28/10/04
172  c        DATA TRPL/0.,10.125,0.4/  c end ml 22/10/04:
173  ccc        DATA TRPL/8.1,9.75,0.365/  C CAT data
174          DATA TPAI/8.0995,8.5,0.055/  *EM:
175          DATA TPAS/8.0995,9.75,0.06/  *JeL:
176  c        DATA TRSL/0.,7.,0./          DATA CATA/28.0,0.6,27.165/
177          DATA TRSL/2.6665,7.,0.015/  *END: JeL.
178  c        DATA TSPA/2.666,3.5,0.015/  c        DATA CATB/22.05,21.05,0.55/
179          DATA TSPA/2.596,3.413,0.015/          DATA CATB/22.2,21.3,0.5/
180          DATA THBP/2.6665,2.75,0.015/  c        DATA CATL/15.75,6.675,0.55/
181  c        DATA TRCP/0.005,7.,0.3/  c        DATA CATT/6.3,14.375,0.55/
182          DATA TRCP/0.025,10.125,0.25/          DATA CATL/2.6,14.9,0.4/
183          DATA ZSPEC/50.6/          DATA CATT/8.45,21.2,0.4/
184          DATA NTRSL/3/          DATA CATH/9.4,7.7,0.5/
185          DATA NTHBP/3/          DATA CATF/2.6,3.15,0.4/
186  c     end ml.          DATA CATO/9.3,0.05,0.5/
187  C Calorimeter data          DATA CATP/0.05,7.7,0.5/
188  *EM:  c        DATA ZCAT/75.85/
189  *        DATA CASI/3.9,3.9,0.019/  C CAS data
190          DATA CASI/3.904,3.904,0.019/  *EM:
191  *F.V.&ML:  *JeL:
192  C        DATA CG10/12.1,12.1,0.0875/          DATA CASA/21.45,0.6,20.55/
193  C        DATA C10C/12.1,12.1,0.08/  *END: JeL.
194  C        DATA CAAB/12.1,12.1,0.133/  C        DATA CASX/15.25,0.55,23./
195  C        DATA CAPL/12.1,12.1,0./  C        DATA CASY/0.55,14.75,23./
196  C        DATA CAAD/12.1,12.1,0.133/          DATA CSSX/15.7,0.5,21.6/
197  C        DATA CAPD/12.1,12.1,0./          DATA CSSY/0.5,15.7,21.6/
198  C        DATA CALB/19.7,19.7,10.2/          DATA CASX/15.6,0.4,21.5/
199          DATA CG10/12.3,12.3,0.0875/          DATA CASY/0.4,15.6,21.5/
200          DATA C10C/12.3,12.3,0.08/          DATA CASXD/2.4/
201          DATA CAAB/12.3,12.3,0.1315/          DATA CASYD/2.2/
202          DATA CAPL/12.3,12.3,0./  C       DATA ZCAS/51.25/
203          DATA CANS/12.3,12.3,0./  *END: EM.
204          DATA CAAD/12.3,12.3,0.133/  C CARD data
205          DATA CAPD/12.3,12.3,0./          DATA CARDB/10.,10.,10./
206  *ML:  C TRD data
207  *       DATA CALB/19.7,19.7,10.45/  c ml: 11/11/04
208          DATA CALB/23.2,23.2,10.589/  c        DATA TRFR/19,17.5,.2/
209  *END ML.          DATA TRFR/21.1,19.0,.275/
210  *END F.V.&ML.          DATA TRFD/19.75,13.9,.2425/
211  *ML:          DATA TRFU/19.4,13.55,.2425/
212  *        DATA CALS/20.,20.,10.5/          DATA TRFM/21.1,19.0,0.1375/
213          DATA CALS/24.2,24.2,10.639/          DATA TRFL/20.175,14.325,1.13/
214          DATA ZCAL/13.05/  c        DATA TRFI/15.5,14.,.2/
215  C with ZCAL=13.03 the distance between the bottom of the magnet and          DATA TRR0/21.1,38.5,.25/
216  C the top of the top silicon strips is about 44.24 mm, as it has to be          DATA TRI0/10.65,8.85,.15/
217  C if 37 mm is the height of the base plate and 7.24 mm is the distance          DATA TRRF/16.0,15.4,0.1/
218  C between the bottom of the end of the base plate and the top silicium          DATA TRRI/9.8,8.0,0.1/
219  C strips. Because of the difference is small and the height of the base  c end ml.
220  C plate could be approximate, I left ZCAL=13.05.            DATA TRBS/3.3,18.3,1./
221  C       DATA ZCAL/13.03/  *ml: 10/11/66:
222  *END ML.          DATA TRAL/3.3,2.15,1./
223  *        DATA CALSTWID/0.36/          DATA TRR2/19.025,13.175,1.51/
224          DATA CALSTWID/0.244/  *end ml.
225  *          DATA TRDS/24.,24.5,13.5/
226  * NOTE: IF you change NCAPL, remember to modify the NCPL, NCSI, NOCAPL,          DATA TRDT/3.,3.,.25/
227  *     NOCASI array dimentions in $GPKEY, $GPDKEY common and data block.          DATA TRDB/17.7,18.5,0/
228  *     The corresponding FFKEY call in GPFFR must be changed as well.          DATA TRSO/0.197,0.2,14./
229  *     The GPDAT loop on these arrays should be checked too.  C        DATA TRSI/0.,0.197,14./
230  *          DATA TRSI/0.,0.2,14./
231          DATA NCAPL/22/  *ml: 12/11/04:
232          DATA NCAPLD/1/  c        DATA TRRA/13.2,14.,0/
233  C        DATA DCASIX/0.3/          DATA TRRA/18.25,12.4,0.76/
234  *F.V.&ML:  *end ml.
235  C        DATA DCASIX/0.292/  *ml: 17/11/04:
236          DATA DCASIX/0.242/  c        DATA TRAN/1.75,1.75,1.0/
237  *END F.V.&ML.  c        DATA TRAI/1.75,1.65,0.9/
238  C        DATA DCASIY/0.3/          DATA TRAN/1.8,1.8,1.0/
239  * F.V.&FRA:          DATA TRAI/1.0,1.0,1.0/
240  C        DATA DCASIY/0.292/  *end ml.
241          DATA DCASIY/0.242/          DATA ZTRD/90.55/
242  * END F.V.&FRA          DATA GAPTRD/1.5/
243          DATA DCASIZ/0.15/  C Spectrometer data, mod by Caf on 20 Jul 2005
244          DATA NCASTR/32/          DATA SPEB/15.,14.4,22.615/
245  *  c ml: 31/10/05:
246  * F.V.&ML:  c        DATA MGFR/14.,13.4,4.0/
247  C        DATA CAKA/12.,12.1,0.005/          DATA MGFR/15.,14.4,4.45/
248  C        DATA CAGL/12.,12.1,0.005/  c end ml.
249  C        DATA CAKP/12.,12.1,0.0025/  c ml: 26/10/04:
250          DATA CAKA/12.3,12.3,0.0025/  c     DATA MGPL/12.,11.4,4.05/
251          DATA CAGL/12.3,12.3,0.005/          DATA MGPL/12.,11.4,4.0/
252          DATA CAKP/12.3,12.3,0.0025/          DATA MGPA/8.1,6.6,4.0/
253  * END F.V.&ML.  c     DATA MGPI/8.05,6.55,4.05/
254  *END EM.  c ml: 31/10/05:
255  C  c        DATA MGPI/8.1,6.6,4.0/
256    C        DATA MGPI/8.07,6.57,4./
257    C        DATA MGPI/8.07,6.57,4.03/
258            DATA MGPI/8.07,6.57,4./
259    C end ml.
260    c ml:31/10/05:
261    c new volumes:
262    C        DATA TPGA/10.5,10.65,0.055/
263            DATA TPGA/10.29,10.65,0.04/
264            DATA TPGU/10.49,12.15,0.01/
265            DATA TPGD/12.,11.4,0.005/
266            DATA TPGI/8.07,6.57,0.015/
267    c end ml.
268    c ml:17/12/04:
269    c        DATA TRPB/12.,11.4,0.4/
270    c$$$ mod by Caf on 20 Jul 2005
271    c$$$        DATA TRPB/10.49,12.15,0.365/
272    c ml 31/10/05:
273    c       DATA TRPB/15.,14.4,0.365/
274            DATA TRPB/10.49,12.15,0.365/
275    c end ml.
276    ccc ml: 20/04/05:
277    cc        DATA TRPL/0.,7.,0.4/
278    C #         DATA TPAI/8.0995,8.5,0.055/
279    C #         DATA TPAS/8.0995,9.75,0.06/
280    C # Mod by CAF on 15 Jul 2005
281    c        DATA TPAI/8.0995,1.25,0.055/
282    c        DATA TPAS/8.0995,9.75,0.365/
283    c ml: 15/12/05:
284    c ml 19/9/05:
285    c        DATA TPAS/8.144,9.9,0.365/
286            DATA TPAS/8.2,9.9,0.365/
287            DATA TPAI/8.144,1.25,0.05/
288    C # End mod
289    c        DATA TRSL/0.,7.,0./
290    C #         DATA TRSL/2.6665,7.,0.015/
291            DATA TRSL/2.6665,3.5,0.015/
292    c        DATA TSPA/2.666,3.5,0.015/
293            DATA TSPA/2.596,3.413,0.015/
294            DATA THBP/2.6665,2.75,0.015/
295    c        DATA TRCP/0.005,7.,0.3/
296    c        DATA TRCP/0.025,10.125,0.25/
297    c ml: 19/9/05: (based on the measure of the final version of the tracker plane)
298    c        DATA TRCP/0.035,10.125,0.25/
299    c change TRCP in order to not overla with mother
300            DATA TRCP/0.035,9.9,0.25/
301            DATA TBAL/1.49,2.25,0.365/
302    c ml:16/11/05: distance between the bottom of the tracker and the bottom of
303    c the base plate.
304            DATA ZSPEBP/2.97/
305    c        DATA ZSPEC/50.6/
306    C ml: 15/12/05: xglue is the dimension along x of the glue between each carbon
307    c               fiber barrel and the TRSL volume
308            DATA XGLUE/0.0015/
309    C #         DATA NTRSL/3/
310            DATA NTRSL/6/
311            DATA NTHBP/3/
312    c     end ml.
313    C Calorimeter data
314    *EM:
315    *        DATA CASI/3.9,3.9,0.019/
316            DATA CASI/3.904,3.904,0.019/
317    *F.V.&ML:
318    C        DATA CG10/12.1,12.1,0.0875/
319    C        DATA C10C/12.1,12.1,0.08/
320    C        DATA CAAB/12.1,12.1,0.133/
321    C        DATA CAPL/12.1,12.1,0./
322    C        DATA CAAD/12.1,12.1,0.133/
323    C        DATA CAPD/12.1,12.1,0./
324    C        DATA CALB/19.7,19.7,10.2/
325    *MA
326            DATA DZM0/0.19/, DZST/0.390/
327            DATA CG10/12.3,12.3,0.0875/
328    C #         DATA C10C/12.3,12.3,0.08/
329    C #         DATA CAAB/12.3,12.3,0.1315/
330            DATA C10C/12.3,12.3,0.06/
331            DATA CAAB/12.3,12.3,0.1315/
332    * end MA
333            DATA CAPL/12.3,12.3,0./
334            DATA CANS/12.3,12.3,0./
335            DATA CAAD/12.3,12.3,0.133/
336            DATA CAPD/12.3,12.3,0./
337    *ML:
338    *       DATA CALB/19.7,19.7,10.45/
339            DATA CALB/23.2,23.2,10.589/
340    *END ML.
341    *END F.V.&ML.
342    *ML:
343    *        DATA CALS/20.,20.,10.5/
344            DATA CALS/24.2,24.2,10.639/
345            DATA ZCAL/13.05/
346    C with ZCAL=13.03 the distance between the bottom of the magnet and
347    C the top of the top silicon strips is about 44.24 mm, as it has to be
348    C if 37 mm is the height of the base plate and 7.24 mm is the distance
349    C between the bottom of the end of the base plate and the top silicium
350    C strips. Because of the difference is small and the height of the base
351    C plate could be approximate, I left ZCAL=13.05.  
352    C       DATA ZCAL/13.03/
353    *END ML.
354    *        DATA CALSTWID/0.36/
355            DATA CALSTWID/0.244/
356    *
357    * NOTE: IF you change NCAPL, remember to modify the NCPL, NCSI, NOCAPL,
358    *     NOCASI array dimentions in $GPKEY, $GPDKEY common and data block.
359    *     The corresponding FFKEY call in GPFFR must be changed as well.
360    *     The GPDAT loop on these arrays should be checked too.
361    *
362            DATA NCAPL/22/
363            DATA NCAPLD/1/
364            DATA DCASIX/0.242/
365            DATA DCASIY/0.242/
366            DATA DCASIZ/0.694/
367            DATA NCASTR/32/
368            DATA CAKA/12.3,12.3,0.0025/
369            DATA CAGL/12.3,12.3,0.005/
370            DATA CAKP/12.3,12.3,0.0025/
371    C
372    ***** Neutron detector
373          DATA NDBI/21.2,21.2,6.875/,NDTU/0.92,0.925,10./,NDTI/0.,0.92,10./,
374         +     NDPB/21.2,21.2,1.0/,NDCD/21.25,21.25,6.9/
375          DATA NDBX/21.45,21.45,7./
376          DATA NDCO/27.5,30.,0.5/
377          DATA NDBO/27.5,30.,7.5/
378          DATA NDBS/15.,4.275,7./
379          DATA NDSS/14.8,4.075,6.8/
380          DATA NDCI/21.2,11.3,0.325/
381          DATA NDCM/21.2,4.25,0.325/
382          DATA NDCE/14.6,2.875,0.325/
383          DATA NDSI/1.,7.26,0.325/
384          DATA NDSM/1.,5.8,0.325/
385          DATA NDSE/4.2,1.05,0.325/
386          DATA TNDBX/0.2/
387          DATA TNDCD/0.05/
388          DATA GNDTU/0.5/
389    

Legend:
Removed from v.3.3  
changed lines
  Added in v.3.20

  ViewVC Help
Powered by ViewVC 1.1.23