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

Legend:
Removed from v.3.4  
changed lines
  Added in v.3.23

  ViewVC Help
Powered by ViewVC 1.1.23