/[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.6 by pam-ba, Tue Dec 13 10:31:29 2005 UTC revision 3.8 by cafagna, Fri Dec 16 10:20:18 2005 UTC
# Line 1  Line 1 
1  *  *
2  * $Id: gpdgeo.inc,v 3.5 2005/12/05 12:15:20 pam-ba Exp $  * $Id: gpdgeo.inc,v 3.7 2005/12/16 09:13:55 cafagna Exp $
3  *  *
4  * $Log: gpdgeo.inc,v $  * $Log: gpdgeo.inc,v $
5  * Revision 3.5  2005/12/05 12:15:20  pam-ba  * Revision 3.7  2005/12/16 09:13:55  cafagna
6  * new spectrometer geometry and internal magnetic field  * New small valume added to the tracker frame
7  *  *
8  * Revision 3.4  2005/07/25 11:53:21  cafagna  * Revision 3.6  2005/12/13 10:31:29  pam-ba
9  * Several updates. See history for details  * added a new volume, TPGI, in the spectrometer
10  *  *
11  * Revision 3.3  2005/06/21 02:42:08  cafagna  * Revision 3.5  2005/12/05 12:15:20  pam-ba
12  * Major modification to the geometry and to the random number chain  * new spectrometer geometry and internal magnetic field
13  *  *
14  * Revision 3.2  2002/12/05 10:17:42  pamela  * Revision 3.4  2005/07/25 11:53:21  cafagna
15  * Update CAS and CALO geometries and positions. Makefile updated as well  * Several updates. See history for details
16  *  *
17  * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna  * Revision 3.3  2005/06/21 02:42:08  cafagna
18  * First GPAMELA release on CVS  * Major modification to the geometry and to the random number chain
19  *  *
20  *  * Revision 3.2  2002/12/05 10:17:42  pamela
21  *  * Update CAS and CALO geometries and positions. Makefile updated as well
22  * gpdgeo.inc  *
23  *  * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
24  *                16/07/2004  16.44.06  by  Alexey Bakaldin  * First GPAMELA release on CVS
25  *                17/10/2002  22.31.45  by  Jens Lund  *
26  *CMZ :  3.00/00 14/11/2000  09.13.05  by  Emiliano Mocchiutti  *
27  *CMZ :  2.02/00 12/10/2000  18.43.21  by  Francesco Cafagna  *
28  *CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola  * gpdgeo.inc
29  *CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna  *
30  *CMZ :  1.02/00 04/02/2000  18.40.04  by  Francesco Cafagna  *                16/07/2004  16.44.06  by  Alexey Bakaldin
31  *CMZ :  1.01/00 06/05/96  11.40.48  by  Francesco Cafagna  *                17/10/2002  22.31.45  by  Jens Lund
32  *CMZ :  1.00/02 02/04/96  16.44.16  by  Francesco Cafagna  *CMZ :  3.00/00 14/11/2000  09.13.05  by  Emiliano Mocchiutti
33  *-- Author :    Francesco Cafagna   05/12/95  *CMZ :  2.02/00 12/10/2000  18.43.21  by  Francesco Cafagna
34        DATA PAME/0.,53.,130./  *CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
35  *     AB:  *CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
36  C     DATA SHEL/69.8,70.,75./  *CMZ :  1.02/00 04/02/2000  18.40.04  by  Francesco Cafagna
37  cml             DATA SHEL/40.6,52.35,52.5,43.62253,43.77253/  *CMZ :  1.01/00 06/05/96  11.40.48  by  Francesco Cafagna
38  cml             DATA MSHE/52.25,52.5,20./  *CMZ :  1.00/02 02/04/96  16.44.16  by  Francesco Cafagna
39  cml             DATA BSPH/52.25,52.5,90.,180.,0.,360./  *-- Author :    Francesco Cafagna   05/12/95
40  cml:        DATA PAME/0.,53.,130./
41          DATA SHEL/38.25,52.5,52.65,43.77,43.92/  *     AB:
42          DATA MSHE/52.5,52.75,20./  C     DATA SHEL/69.8,70.,75./
43          DATA BSPH/52.5,52.75,90.,180.,0.,360./  cml             DATA SHEL/40.6,52.35,52.5,43.62253,43.77253/
44  c     end ml  cml             DATA MSHE/52.25,52.5,20./
45  *     END: AB.  cml             DATA BSPH/52.25,52.5,90.,180.,0.,360./
46  C     DATA TFLA/126.8,127.,0.,33.45,0.,360./  cml:
47          DATA TFLA/0.,43.77253,0.125/          DATA SHEL/38.25,52.5,52.65,43.77,43.92/
48  *     AB:          DATA MSHE/52.5,52.75,20./
49  C     DATA TSPH/0., 150.,0.,0.,0.,360./          DATA BSPH/52.5,52.75,90.,180.,0.,360./
50  cml             DATA TSPH/239.83,240.,0.,0.,0.,360./  c     end ml
51  cml:  *     END: AB.
52          DATA TSPH/239.83,240.,0.,0.,0.,360./  C     DATA TFLA/126.8,127.,0.,33.45,0.,360./
53  c     end ml.          DATA TFLA/0.,43.77253,0.125/
54  *     END: AB.  *     AB:
55          DATA GAPTOP/2./  C     DATA TSPH/0., 150.,0.,0.,0.,360./
56  c ml:26/10/04          cml             DATA TSPH/239.83,240.,0.,0.,0.,360./
57  c     DATA S11/22.,19.2,.45/  cml:
58          DATA S11/20.4,16.5,.375/          DATA TSPH/239.83,240.,0.,0.,0.,360./
59  c     DATA S12/22.,19.2,.45/  c     end ml.
60          DATA S12/20.4,16.5,.375/  *     END: AB.
61  c     DATA S21/9.,7.2,.35/          DATA GAPTOP/2./
62          DATA S21/9.,7.5,.375/  c ml:26/10/04        
63  c     DATA S22/9.,7.2,.35/  c     DATA S11/22.,19.2,.45/
64          DATA S22/9.,7.5,.375/          DATA S11/20.4,16.5,.375/
65  c ml: 28/10/04:  c     DATA S12/22.,19.2,.45/
66  c dimensions of top plate. At the moment, it is a reduced version,          DATA S12/20.4,16.5,.375/
67  c i.e. a gap of gas with a surface equal to S21.  c     DATA S21/9.,7.2,.35/
68          DATA TPLA/9.,7.5,.25/          DATA S21/9.,7.5,.375/
69  c end ml.  c     DATA S22/9.,7.2,.35/
70  c     DATA S31/9.,7.2,.35/          DATA S22/9.,7.5,.375/
71          DATA S31/9.,7.5,.40/  c ml: 28/10/04:
72  c     DATA S32/9.,7.2,.35/  c dimensions of top plate. At the moment, it is a reduced version,
73          DATA S32/9.,7.5,.40/  c i.e. a gap of gas with a surface equal to S21.
74  c end ml:          DATA TPLA/9.,7.5,.25/
75          DATA S4/18.,16.,.5/  c end ml.
76          DATA SCTIC/0.025/  c     DATA S31/9.,7.2,.35/
77  c ml:26/10/04:          DATA S31/9.,7.5,.40/
78  c        DATA NS11X/9/  c     DATA S32/9.,7.2,.35/
79          DATA NS11Y/8/          DATA S32/9.,7.5,.40/
80  c     DATA NS12Y/9/  c end ml:
81          DATA NS12X/6/          DATA S4/18.,16.,.5/
82  c     DATA NS21X/4/          DATA SCTIC/0.025/
83          DATA NS21X/2/  c ml:26/10/04:
84  c     DATA NS22Y/4/  c        DATA NS11X/9/
85          DATA NS22Y/2/          DATA NS11Y/8/
86  c     DATA NS31Y/4/  c     DATA NS12Y/9/
87          DATA NS31Y/3/          DATA NS12X/6/
88  c     DATA NS32X/4/  c     DATA NS21X/4/
89          DATA NS32X/3/          DATA NS21X/2/
90  c end ml.  c     DATA NS22Y/4/
91          DATA ZS11,ZS12,ZS21,ZS22,ZS31,ZS32,ZS4          DATA NS22Y/2/
92  c ml 22/10/04:  c     DATA NS31Y/4/
93  c     +  /107.8,106.8,74.9,74.1,27.1,26.3,2.3/          DATA NS31Y/3/
94  c ml 28/10/04: introducing the top plate and calculating the zpos of S21, S22  c     DATA NS32X/4/
95  c starting from the zpos of CATA:          DATA NS32X/3/
96  c     +   /106.66,105.66,74.9,74.1,27.1,26.3,2.3/  c end ml.
97       +   /106.66,105.66,74.875,74.125,27.1,26.3,2.3/          DATA ZS11,ZS12,ZS21,ZS22,ZS31,ZS32,ZS4
98          DATA ZTPLA/73.5/  c ml 22/10/04:
99  c end ml 28/10/04  c     +  /107.8,106.8,74.9,74.1,27.1,26.3,2.3/
100  c end ml 22/10/04:  c ml 28/10/04: introducing the top plate and calculating the zpos of S21, S22
101  C CAT data  c starting from the zpos of CATA:
102  *EM:  c     +   /106.66,105.66,74.9,74.1,27.1,26.3,2.3/
103  *JeL:       +   /106.66,105.66,74.875,74.125,27.1,26.3,2.3/
104          DATA CATA/28.0,0.6,27.165/          DATA ZTPLA/73.5/
105  *END: JeL.  c end ml 28/10/04
106  c        DATA CATB/22.05,21.05,0.55/  c end ml 22/10/04:
107          DATA CATB/22.2,21.3,0.5/  C CAT data
108  c        DATA CATL/15.75,6.675,0.55/  *EM:
109  c        DATA CATT/6.3,14.375,0.55/  *JeL:
110          DATA CATL/2.6,14.9,0.4/          DATA CATA/28.0,0.6,27.165/
111          DATA CATT/8.45,21.2,0.4/  *END: JeL.
112          DATA CATH/9.4,7.7,0.5/  c        DATA CATB/22.05,21.05,0.55/
113          DATA CATF/2.6,3.15,0.4/          DATA CATB/22.2,21.3,0.5/
114          DATA CATO/9.3,0.05,0.5/  c        DATA CATL/15.75,6.675,0.55/
115          DATA CATP/0.05,7.7,0.5/  c        DATA CATT/6.3,14.375,0.55/
116          DATA ZCAT/75.85/          DATA CATL/2.6,14.9,0.4/
117  C CAS data          DATA CATT/8.45,21.2,0.4/
118  *EM:          DATA CATH/9.4,7.7,0.5/
119  *JeL:          DATA CATF/2.6,3.15,0.4/
120          DATA CASA/21.45,0.6,20.55/          DATA CATO/9.3,0.05,0.5/
121  *END: JeL.          DATA CATP/0.05,7.7,0.5/
122  C        DATA CASX/15.25,0.55,23./          DATA ZCAT/75.85/
123  C        DATA CASY/0.55,14.75,23./  C CAS data
124          DATA CSSX/15.7,0.5,21.6/  *EM:
125          DATA CSSY/0.5,15.7,21.6/  *JeL:
126          DATA CASX/15.6,0.4,21.5/          DATA CASA/21.45,0.6,20.55/
127          DATA CASY/0.4,15.6,21.5/  *END: JeL.
128          DATA CASXD/2.4/  C        DATA CASX/15.25,0.55,23./
129          DATA CASYD/2.2/  C        DATA CASY/0.55,14.75,23./
130          DATA ZCAS/51.25/          DATA CSSX/15.7,0.5,21.6/
131  *END: EM.          DATA CSSY/0.5,15.7,21.6/
132  C TRD data          DATA CASX/15.6,0.4,21.5/
133  c ml: 11/11/04          DATA CASY/0.4,15.6,21.5/
134  c        DATA TRFR/19,17.5,.2/          DATA CASXD/2.4/
135          DATA TRFR/21.1,19.0,.275/          DATA CASYD/2.2/
136          DATA TRFD/19.75,13.9,.2425/          DATA ZCAS/51.25/
137          DATA TRFU/19.4,13.55,.2425/  *END: EM.
138          DATA TRFM/21.1,19.0,0.1375/  C TRD data
139          DATA TRFL/20.175,14.325,1.13/  c ml: 11/11/04
140  c        DATA TRFI/15.5,14.,.2/  c        DATA TRFR/19,17.5,.2/
141          DATA TRR0/21.1,38.5,.25/          DATA TRFR/21.1,19.0,.275/
142          DATA TRI0/10.65,8.85,.15/          DATA TRFD/19.75,13.9,.2425/
143          DATA TRRF/16.0,15.4,0.1/          DATA TRFU/19.4,13.55,.2425/
144          DATA TRRI/9.8,8.0,0.1/          DATA TRFM/21.1,19.0,0.1375/
145  c end ml.          DATA TRFL/20.175,14.325,1.13/
146          DATA TRBS/3.3,18.3,1./  c        DATA TRFI/15.5,14.,.2/
147  *ml: 10/11/66:          DATA TRR0/21.1,38.5,.25/
148          DATA TRAL/3.3,2.15,1./          DATA TRI0/10.65,8.85,.15/
149          DATA TRR2/19.025,13.175,1.51/          DATA TRRF/16.0,15.4,0.1/
150  *end ml.          DATA TRRI/9.8,8.0,0.1/
151          DATA TRDS/24.,24.5,13.5/  c end ml.
152          DATA TRDT/3.,3.,.25/          DATA TRBS/3.3,18.3,1./
153          DATA TRDB/17.7,18.5,0/  *ml: 10/11/66:
154          DATA TRSO/0.197,0.2,14./          DATA TRAL/3.3,2.15,1./
155  C        DATA TRSI/0.,0.197,14./          DATA TRR2/19.025,13.175,1.51/
156          DATA TRSI/0.,0.2,14./  *end ml.
157  *ml: 12/11/04:          DATA TRDS/24.,24.5,13.5/
158  c        DATA TRRA/13.2,14.,0/          DATA TRDT/3.,3.,.25/
159          DATA TRRA/18.25,12.4,0.76/          DATA TRDB/17.7,18.5,0/
160  *end ml.          DATA TRSO/0.197,0.2,14./
161  *ml: 17/11/04:  C        DATA TRSI/0.,0.197,14./
162  c        DATA TRAN/1.75,1.75,1.0/          DATA TRSI/0.,0.2,14./
163  c        DATA TRAI/1.75,1.65,0.9/  *ml: 12/11/04:
164          DATA TRAN/1.8,1.8,1.0/  c        DATA TRRA/13.2,14.,0/
165          DATA TRAI/1.0,1.0,1.0/          DATA TRRA/18.25,12.4,0.76/
166  *end ml.  *end ml.
167          DATA ZTRD/90.55/  *ml: 17/11/04:
168          DATA GAPTRD/1.5/  c        DATA TRAN/1.75,1.75,1.0/
169  C Spectrometer data, mod by Caf on 20 Jul 2005  c        DATA TRAI/1.75,1.65,0.9/
170          DATA SPEB/15.,14.4,0./          DATA TRAN/1.8,1.8,1.0/
171  c ml: 31/10/05:          DATA TRAI/1.0,1.0,1.0/
172  c        DATA MGFR/14.,13.4,4.0/  *end ml.
173          DATA MGFR/15.,14.4,4.45/          DATA ZTRD/90.55/
174  c end ml.          DATA GAPTRD/1.5/
175  c ml: 26/10/04:  C Spectrometer data, mod by Caf on 20 Jul 2005
176  c     DATA MGPL/12.,11.4,4.05/          DATA SPEB/15.,14.4,0./
177          DATA MGPL/12.,11.4,4.0/  c ml: 31/10/05:
178          DATA MGPA/8.1,6.6,4.0/  c        DATA MGFR/14.,13.4,4.0/
179  c     DATA MGPI/8.05,6.55,4.05/          DATA MGFR/15.,14.4,4.45/
180  c ml: 31/10/05:  c end ml.
181  c        DATA MGPI/8.1,6.6,4.0/  c ml: 26/10/04:
182          DATA MGPI/8.07,6.57,4./  c     DATA MGPL/12.,11.4,4.05/
183  C        DATA MGPI/8.07,6.57,4.03/          DATA MGPL/12.,11.4,4.0/
184  C end ml.          DATA MGPA/8.1,6.6,4.0/
185  c ml:31/10/05:  c     DATA MGPI/8.05,6.55,4.05/
186  c new volumes:  c ml: 31/10/05:
187  C        DATA TPGA/10.5,10.65,0.055/  c        DATA MGPI/8.1,6.6,4.0/
188          DATA TPGA/10.29,10.65,0.04/  C        DATA MGPI/8.07,6.57,4./
189          DATA TPGU/10.49,12.15,0.01/  C        DATA MGPI/8.07,6.57,4.03/
190          DATA TPGD/12.,11.4,0.005/          DATA MGPI/8.07,6.57,4./
191          DATA TPGI/8.07,6.57,0.015/  C end ml.
192  c end ml.  c ml:31/10/05:
193  c ml:17/12/04:  c new volumes:
194  c        DATA TRPB/12.,11.4,0.4/  C        DATA TPGA/10.5,10.65,0.055/
195  c$$$ mod by Caf on 20 Jul 2005          DATA TPGA/10.29,10.65,0.04/
196  c$$$        DATA TRPB/10.49,12.15,0.365/          DATA TPGU/10.49,12.15,0.01/
197  c ml 31/10/05:          DATA TPGD/12.,11.4,0.005/
198  c       DATA TRPB/15.,14.4,0.365/          DATA TPGI/8.07,6.57,0.015/
199          DATA TRPB/10.49,12.15,0.365/  c end ml.
200  c end ml.  c ml:17/12/04:
201  ccc ml: 20/04/05:  c        DATA TRPB/12.,11.4,0.4/
202  cc        DATA TRPL/0.,7.,0.4/  c$$$ mod by Caf on 20 Jul 2005
203  C #         DATA TPAI/8.0995,8.5,0.055/  c$$$        DATA TRPB/10.49,12.15,0.365/
204  C #         DATA TPAS/8.0995,9.75,0.06/  c ml 31/10/05:
205  C # Mod by CAF on 15 Jul 2005  c       DATA TRPB/15.,14.4,0.365/
206  c        DATA TPAI/8.0995,1.25,0.055/          DATA TRPB/10.49,12.15,0.365/
207  c        DATA TPAS/8.0995,9.75,0.365/  c end ml.
208  c ml 19/9/05:  ccc ml: 20/04/05:
209          DATA TPAS/8.144,9.9,0.365/  cc        DATA TRPL/0.,7.,0.4/
210          DATA TPAI/8.144,1.25,0.05/  C #         DATA TPAI/8.0995,8.5,0.055/
211  C # End mod  C #         DATA TPAS/8.0995,9.75,0.06/
212  c        DATA TRSL/0.,7.,0./  C # Mod by CAF on 15 Jul 2005
213  C #         DATA TRSL/2.6665,7.,0.015/  c        DATA TPAI/8.0995,1.25,0.055/
214          DATA TRSL/2.6665,3.5,0.015/  c        DATA TPAS/8.0995,9.75,0.365/
215  c        DATA TSPA/2.666,3.5,0.015/  c ml: 15/12/05:
216          DATA TSPA/2.596,3.413,0.015/  c ml 19/9/05:
217          DATA THBP/2.6665,2.75,0.015/  c        DATA TPAS/8.144,9.9,0.365/
218  c        DATA TRCP/0.005,7.,0.3/          DATA TPAS/8.2,9.9,0.365/
219  c        DATA TRCP/0.025,10.125,0.25/          DATA TPAI/8.144,1.25,0.05/
220  c ml: 19/9/05: (based on the measure of the final version of the tracker plane)  C # End mod
221          DATA TRCP/0.035,10.125,0.25/  c        DATA TRSL/0.,7.,0./
222  c ml:16/11/05: distance between the bottom of the tracker and the bottom of  C #         DATA TRSL/2.6665,7.,0.015/
223  c the base plate.          DATA TRSL/2.6665,3.5,0.015/
224          DATA ZSPEBP/2.97/  c        DATA TSPA/2.666,3.5,0.015/
225  c ml:16/11/05: ZSPEC is the offset in z to go from the reference system of          DATA TSPA/2.596,3.413,0.015/
226  c PAME to the reference system of tracker (it is the center of the third          DATA THBP/2.6665,2.75,0.015/
227  c magnetic module). It is obtained so:  c        DATA TRCP/0.005,7.,0.3/
228  c zspec=zcal+cals(3)+zspebp+zospeb. zcal is the position of the center of the  c        DATA TRCP/0.025,10.125,0.25/
229  c calorometer box in PAME, zspebp is the distance between the bottom of the  c ml: 19/9/05: (based on the measure of the final version of the tracker plane)
230  c last alluminum frame of the tracker and the bottom of the base plate, zospeb          DATA TRCP/0.035,10.125,0.25/
231  c is the center of the third magnetic module (22.57 cm from the bottom of          DATA TBAL/1.49,2.25,0.365/
232  c the tracker and 22.66 cm from the top).  c ml:16/11/05: distance between the bottom of the tracker and the bottom of
233  c        DATA ZSPEC/50.6/  c the base plate.
234          DATA ZSPEC/49.229/          DATA ZSPEBP/2.97/
235  C #         DATA NTRSL/3/  c ml:16/11/05: ZSPEC is the offset in z to go from the reference system of
236          DATA NTRSL/6/  c PAME to the reference system of tracker (it is the center of the third
237          DATA NTHBP/3/  c magnetic module). It is obtained so:
238  c     end ml.  c zspec=zcal+cals(3)+zspebp+zospeb. zcal is the position of the center of the
239  C Calorimeter data  c calorometer box in PAME, zspebp is the distance between the bottom of the
240  *EM:  c last alluminum frame of the tracker and the bottom of the base plate, zospeb
241  *        DATA CASI/3.9,3.9,0.019/  c is the center of the third magnetic module (22.57 cm from the bottom of
242          DATA CASI/3.904,3.904,0.019/  c the tracker and 22.66 cm from the top).
243  *F.V.&ML:  c        DATA ZSPEC/50.6/
244  C        DATA CG10/12.1,12.1,0.0875/          DATA ZSPEC/49.229/
245  C        DATA C10C/12.1,12.1,0.08/  C ml: 15/12/05: xglue is the dimension along x of the glue between each carbon
246  C        DATA CAAB/12.1,12.1,0.133/  c               fiber barrel and the TRSL volume
247  C        DATA CAPL/12.1,12.1,0./          DATA XGLUE/0.0015/
248  C        DATA CAAD/12.1,12.1,0.133/  C #         DATA NTRSL/3/
249  C        DATA CAPD/12.1,12.1,0./          DATA NTRSL/6/
250  C        DATA CALB/19.7,19.7,10.2/          DATA NTHBP/3/
251  *MA  c     end ml.
252          DATA DZM0/0.256/, DZST/0.390/  C Calorimeter data
253          DATA CG10/12.3,12.3,0.0875/  *EM:
254  C #         DATA C10C/12.3,12.3,0.08/  *        DATA CASI/3.9,3.9,0.019/
255  C #         DATA CAAB/12.3,12.3,0.1315/          DATA CASI/3.904,3.904,0.019/
256          DATA C10C/12.3,12.3,0.06/  *F.V.&ML:
257          DATA CAAB/12.3,12.3,0.115/  C        DATA CG10/12.1,12.1,0.0875/
258  * end MA  C        DATA C10C/12.1,12.1,0.08/
259          DATA CAPL/12.3,12.3,0./  C        DATA CAAB/12.1,12.1,0.133/
260          DATA CANS/12.3,12.3,0./  C        DATA CAPL/12.1,12.1,0./
261          DATA CAAD/12.3,12.3,0.133/  C        DATA CAAD/12.1,12.1,0.133/
262          DATA CAPD/12.3,12.3,0./  C        DATA CAPD/12.1,12.1,0./
263  *ML:  C        DATA CALB/19.7,19.7,10.2/
264  *       DATA CALB/19.7,19.7,10.45/  *MA
265          DATA CALB/23.2,23.2,10.589/          DATA DZM0/0.256/, DZST/0.390/
266  *END ML.          DATA CG10/12.3,12.3,0.0875/
267  *END F.V.&ML.  C #         DATA C10C/12.3,12.3,0.08/
268  *ML:  C #         DATA CAAB/12.3,12.3,0.1315/
269  *        DATA CALS/20.,20.,10.5/          DATA C10C/12.3,12.3,0.06/
270          DATA CALS/24.2,24.2,10.639/          DATA CAAB/12.3,12.3,0.115/
271          DATA ZCAL/13.05/  * end MA
272  C with ZCAL=13.03 the distance between the bottom of the magnet and          DATA CAPL/12.3,12.3,0./
273  C the top of the top silicon strips is about 44.24 mm, as it has to be          DATA CANS/12.3,12.3,0./
274  C if 37 mm is the height of the base plate and 7.24 mm is the distance          DATA CAAD/12.3,12.3,0.133/
275  C between the bottom of the end of the base plate and the top silicium          DATA CAPD/12.3,12.3,0./
276  C strips. Because of the difference is small and the height of the base  *ML:
277  C plate could be approximate, I left ZCAL=13.05.    *       DATA CALB/19.7,19.7,10.45/
278  C       DATA ZCAL/13.03/          DATA CALB/23.2,23.2,10.589/
279  *END ML.  *END ML.
280  *        DATA CALSTWID/0.36/  *END F.V.&ML.
281          DATA CALSTWID/0.244/  *ML:
282  *  *        DATA CALS/20.,20.,10.5/
283  * NOTE: IF you change NCAPL, remember to modify the NCPL, NCSI, NOCAPL,          DATA CALS/24.2,24.2,10.639/
284  *     NOCASI array dimentions in $GPKEY, $GPDKEY common and data block.          DATA ZCAL/13.05/
285  *     The corresponding FFKEY call in GPFFR must be changed as well.  C with ZCAL=13.03 the distance between the bottom of the magnet and
286  *     The GPDAT loop on these arrays should be checked too.  C the top of the top silicon strips is about 44.24 mm, as it has to be
287  *  C if 37 mm is the height of the base plate and 7.24 mm is the distance
288          DATA NCAPL/22/  C between the bottom of the end of the base plate and the top silicium
289          DATA NCAPLD/1/  C strips. Because of the difference is small and the height of the base
290  C        DATA DCASIX/0.3/  C plate could be approximate, I left ZCAL=13.05.  
291  *F.V.&ML:  C       DATA ZCAL/13.03/
292  C        DATA DCASIX/0.292/  *END ML.
293          DATA DCASIX/0.242/  *        DATA CALSTWID/0.36/
294  *END F.V.&ML.          DATA CALSTWID/0.244/
295  C        DATA DCASIY/0.3/  *
296  * F.V.&FRA:  * NOTE: IF you change NCAPL, remember to modify the NCPL, NCSI, NOCAPL,
297  C        DATA DCASIY/0.292/  *     NOCASI array dimentions in $GPKEY, $GPDKEY common and data block.
298          DATA DCASIY/0.242/  *     The corresponding FFKEY call in GPFFR must be changed as well.
299  * END F.V.&FRA  *     The GPDAT loop on these arrays should be checked too.
300          DATA DCASIZ/0.15/  *
301          DATA NCASTR/32/          DATA NCAPL/22/
302  *          DATA NCAPLD/1/
303  * F.V.&ML:  C        DATA DCASIX/0.3/
304  C        DATA CAKA/12.,12.1,0.005/  *F.V.&ML:
305  C        DATA CAGL/12.,12.1,0.005/  C        DATA DCASIX/0.292/
306  C        DATA CAKP/12.,12.1,0.0025/          DATA DCASIX/0.242/
307          DATA CAKA/12.3,12.3,0.0025/  *END F.V.&ML.
308          DATA CAGL/12.3,12.3,0.005/  C        DATA DCASIY/0.3/
309          DATA CAKP/12.3,12.3,0.0025/  * F.V.&FRA:
310  * END F.V.&ML.  C        DATA DCASIY/0.292/
311  *END EM.          DATA DCASIY/0.242/
312  C  * END F.V.&FRA
313            DATA DCASIZ/0.15/
314            DATA NCASTR/32/
315    *
316    * F.V.&ML:
317    C        DATA CAKA/12.,12.1,0.005/
318    C        DATA CAGL/12.,12.1,0.005/
319    C        DATA CAKP/12.,12.1,0.0025/
320            DATA CAKA/12.3,12.3,0.0025/
321            DATA CAGL/12.3,12.3,0.005/
322            DATA CAKP/12.3,12.3,0.0025/
323    * END F.V.&ML.
324    *END EM.
325    C

Legend:
Removed from v.3.6  
changed lines
  Added in v.3.8

  ViewVC Help
Powered by ViewVC 1.1.23