]>
Commit | Line | Data |
---|---|---|
4c039060 | 1 | /************************************************************************** |
2 | * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. * | |
3 | * * | |
4 | * Author: The ALICE Off-line Project. * | |
5 | * Contributors are mentioned in the code where appropriate. * | |
6 | * * | |
7 | * Permission to use, copy, modify and distribute this software and its * | |
8 | * documentation strictly for non-commercial purposes is hereby granted * | |
9 | * without fee, provided that the above copyright notice appears in all * | |
10 | * copies and that both the copyright notice and this permission notice * | |
11 | * appear in the supporting documentation. The authors make no claims * | |
12 | * about the suitability of this software for any purpose. It is * | |
13 | * provided "as is" without express or implied warranty. * | |
14 | **************************************************************************/ | |
15 | ||
16 | /* | |
17 | $Log$ | |
5b8cc8df | 18 | Revision 1.10 1999/10/06 19:56:50 fca |
19 | Add destructor | |
20 | ||
1c1b73f8 | 21 | Revision 1.9 1999/10/05 08:05:09 fca |
22 | Minor corrections for uninitialised variables. | |
23 | ||
593d2ea1 | 24 | Revision 1.8 1999/09/29 09:24:20 fca |
25 | Introduction of the Copyright and cvs Log | |
26 | ||
4c039060 | 27 | */ |
28 | ||
fe4da5cc | 29 | /////////////////////////////////////////////////////////////////////////////// |
30 | // // | |
31 | // Inner Traking System version 1 // | |
58005f18 | 32 | // This class contains the base procedures for the Inner Tracking System // |
fe4da5cc | 33 | // // |
58005f18 | 34 | // Authors: R. Barbera, A. Morsch. |
35 | // version 1. | |
36 | // Created 1998. | |
37 | // | |
38 | // NOTE: THIS IS THE COARSE pre.TDR geometry of the ITS. THIS WILL NOT WORK | |
39 | // with the geometry or module classes or any analysis classes. You are | |
40 | // strongly encouraged to uses AliITSv5. | |
fe4da5cc | 41 | // // |
42 | /////////////////////////////////////////////////////////////////////////////// | |
43 | ||
44 | #include <TMath.h> | |
45 | #include <TRandom.h> | |
46 | #include <TVector.h> | |
58005f18 | 47 | #include "AliITShit.h" |
fe4da5cc | 48 | #include "AliITSv1.h" |
49 | #include "AliRun.h" | |
50 | ||
51 | #include "AliMC.h" | |
52 | #include "AliConst.h" | |
53 | ||
54 | ClassImp(AliITSv1) | |
55 | ||
56 | //_____________________________________________________________________________ | |
593d2ea1 | 57 | AliITSv1::AliITSv1() { |
58 | // | |
59 | // Default constructor for the ITS | |
60 | // | |
61 | fId1N = 6; | |
62 | fId1Name = new char*[fId1N]; | |
63 | fId1Name[0] = "ITS1"; | |
64 | fId1Name[1] = "ITS2"; | |
65 | fId1Name[2] = "ITS3"; | |
66 | fId1Name[3] = "ITS4"; | |
67 | fId1Name[4] = "ITS5"; | |
68 | fId1Name[5] = "ITS6"; | |
fe4da5cc | 69 | } |
5b8cc8df | 70 | //_____________________________________________________________________________ |
71 | AliITSv1::~AliITSv1() { | |
72 | // | |
73 | // Standard destructor for the ITS | |
74 | // | |
75 | delete [] fId1Name; | |
76 | } | |
fe4da5cc | 77 | //_____________________________________________________________________________ |
593d2ea1 | 78 | AliITSv1::AliITSv1(const char *name, const char *title) : AliITS(name, title){ |
79 | // | |
80 | // Standard constructor for the ITS | |
81 | // | |
82 | fId1N = 6; | |
83 | fId1Name = new char*[fId1N]; | |
84 | fId1Name[0] = "ITS1"; | |
85 | fId1Name[1] = "ITS2"; | |
86 | fId1Name[2] = "ITS3"; | |
87 | fId1Name[3] = "ITS4"; | |
88 | fId1Name[4] = "ITS5"; | |
89 | fId1Name[5] = "ITS6"; | |
fe4da5cc | 90 | } |
91 | ||
1c1b73f8 | 92 | //_____________________________________________________________________________ |
93 | AliITSv1::~AliITSv1() { | |
94 | // | |
95 | // Standard destructor for the ITS | |
96 | // | |
97 | for (Int_t i=0;i<fId1N;++i) delete [] fId1Name[i]; | |
98 | delete [] fId1Name; | |
99 | fId1Name = 0; | |
100 | } | |
101 | ||
fe4da5cc | 102 | //_____________________________________________________________________________ |
103 | void AliITSv1::CreateGeometry() | |
104 | { | |
105 | // | |
106 | // Create geometry for version 1 of the ITS | |
107 | // | |
108 | // | |
109 | // Create Geometry for ITS version 0 | |
110 | // | |
58005f18 | 111 | // |
fe4da5cc | 112 | |
113 | ||
fe4da5cc | 114 | |
115 | Float_t drcer[6] = { 0.,0.,.08,.08,0.,0. }; //CERAMICS THICKNESS | |
116 | Float_t drepx[6] = { 0.,0.,0.,0.,.5357,.5357 }; //EPOXY THICKNESS | |
117 | Float_t drpla[6] = { 0.,0.,0.,0.,.1786,.1786 }; //PLASTIC THICKNESS | |
118 | Float_t dzb[6] = { 0.,0.,15.,15.,4.,4. }; //LENGTH OF BOXES | |
119 | Float_t dphi[6] = { 72.,72.,72.,72.,50.6,45. }; //COVERED PHI-RANGE FOR LAYERS 1-6 | |
120 | Float_t rl[6] = { 3.9,7.6,14.,24.,40.,45. }; //SILICON LAYERS INNER RADIUS | |
121 | Float_t drl[6] = { .755,.755,.809,.809,.7,.7 }; //THICKNESS OF LAYERS (in % radiation length) | |
122 | Float_t dzl[6] = { 12.67,16.91,20.85,29.15,45.11,50.975 };//HALF LENGTH OF LAYERS | |
123 | Float_t drpcb[6] = { 0.,0.,.06,.06,0.,0. }; //PCB THICKNESS | |
124 | Float_t drcu[6] = { 0.,0.,.0504,.0504,.0357,.0357 }; //COPPER THICKNESS | |
125 | Float_t drsi[6] = { 0.,0.,.006,.006,.3571,.3571 }; //SILICON THICKNESS | |
126 | ||
127 | Float_t drca = 0, dzfc; | |
128 | Int_t i, nsec; | |
129 | Float_t rend, drca_tpc, dzco, zend, dits[3], rlim, drsu, zmax; | |
130 | Float_t zpos, dzco1, dzco2; | |
131 | Float_t drcac[6], acone, dphii; | |
132 | Float_t pcits[15], xltpc; | |
133 | Float_t rzcone, rstep, r0, z0, acable, fp, dz, zi, ri; | |
134 | Int_t idrotm[399]; | |
135 | Float_t dgh[15]; | |
136 | ||
ad51aeb0 | 137 | Int_t *idtmed = fIdtmed->GetArray()-199; |
fe4da5cc | 138 | |
139 | // CONVERT INTO CM (RL(SI)=9.36 CM) | |
140 | for (i = 0; i < 6; ++i) { | |
141 | drl[i] = drl[i] / 100. * 9.36; | |
142 | } | |
143 | ||
144 | // SUPPORT ENDPLANE THICKNESS | |
145 | drsu = 2.*0.06+1./20; // 1./20. is 1 cm of honeycomb (1/20 carbon density); | |
146 | ||
147 | // CONE BELOW TPC | |
148 | ||
149 | drca_tpc = 1.2/4.; | |
150 | ||
151 | // CABLE THICKNESS (CONICAL CABLES CONNECTING THE LAYERS) | |
152 | ||
153 | ||
154 | // ITS CONE ANGLE | |
155 | ||
156 | acone = 45.; | |
157 | acone *= kDegrad; | |
158 | ||
159 | // CONE RADIUS AT 1ST LAYER | |
160 | ||
161 | rzcone = 30.; | |
162 | ||
163 | // FIELD CAGE HALF LENGTH | |
164 | ||
165 | dzfc = 64.5; | |
166 | rlim = 48.; | |
167 | zmax = 80.; | |
168 | xltpc = 275.; | |
169 | ||
170 | ||
171 | // PARAMETERS FOR SMALL (1/2) ITS | |
172 | ||
173 | for (i = 0; i < 6; ++i) { | |
174 | dzl[i] /= 2.; | |
175 | dzb[i] /= 2.; | |
176 | } | |
177 | drca /= 2.; | |
178 | acone /= 2.; | |
179 | drca_tpc /= 2.; | |
180 | rzcone /= 2.; | |
181 | dzfc /= 2.; | |
182 | zmax /= 2.; | |
183 | xltpc /= 2.; | |
184 | acable = 15.; | |
185 | ||
186 | ||
187 | ||
188 | // EQUAL DISTRIBUTION INTO THE 6 LAYERS | |
189 | rstep = drca_tpc / 6.; | |
190 | for (i = 0; i < 6; ++i) { | |
191 | drcac[i] = (i+1) * rstep; | |
192 | } | |
193 | ||
194 | // NUMBER OF PHI SECTORS | |
195 | ||
196 | nsec = 5; | |
197 | ||
198 | // PACK IN PHI AS MUCH AS POSSIBLE | |
199 | // NOW PACK USING THICKNESS | |
200 | ||
201 | for (i = 0; i < 6; ++i) { | |
202 | ||
203 | // PACKING FACTOR | |
204 | fp = rl[5] / rl[i]; | |
205 | ||
206 | // PHI-PACKING NOT SUFFICIENT ? | |
207 | ||
208 | if (dphi[i]/45 < fp) { | |
209 | drcac[i] = drcac[i] * fp * 45/dphi[i]; | |
210 | } | |
211 | } | |
212 | ||
213 | ||
214 | // --- Define ghost volume containing the six layers and fill it with air | |
215 | ||
216 | dgh[0] = 3.5; | |
217 | dgh[1] = 50.; | |
218 | dgh[2] = zmax; | |
cfce8870 | 219 | gMC->Gsvolu("ITSV", "TUBE", idtmed[275], dgh, 3); |
fe4da5cc | 220 | |
221 | // --- Place the ghost volume in its mother volume (ALIC) and make it | |
222 | // invisible | |
223 | ||
cfce8870 | 224 | gMC->Gspos("ITSV", 1, "ALIC", 0., 0., 0., 0, "ONLY"); |
225 | gMC->Gsatt("ITSV", "SEEN", 0); | |
fe4da5cc | 226 | |
227 | // ITS LAYERS (SILICON) | |
228 | ||
229 | dits[0] = rl[0]; | |
230 | dits[1] = rl[0] + drl[0]; | |
231 | dits[2] = dzl[0]; | |
cfce8870 | 232 | gMC->Gsvolu("ITS1", "TUBE", idtmed[199], dits, 3); |
233 | gMC->Gspos("ITS1", 1, "ITSV", 0., 0., 0., 0, "ONLY"); | |
fe4da5cc | 234 | |
235 | dits[0] = rl[1]; | |
236 | dits[1] = rl[1] + drl[1]; | |
237 | dits[2] = dzl[1]; | |
cfce8870 | 238 | gMC->Gsvolu("ITS2", "TUBE", idtmed[199], dits, 3); |
239 | gMC->Gspos("ITS2", 1, "ITSV", 0., 0., 0., 0, "ONLY"); | |
fe4da5cc | 240 | |
241 | dits[0] = rl[2]; | |
242 | dits[1] = rl[2] + drl[2]; | |
243 | dits[2] = dzl[2]; | |
cfce8870 | 244 | gMC->Gsvolu("ITS3", "TUBE", idtmed[224], dits, 3); |
245 | gMC->Gspos("ITS3", 1, "ITSV", 0., 0., 0., 0, "ONLY"); | |
fe4da5cc | 246 | |
247 | dits[0] = rl[3]; | |
248 | dits[1] = rl[3] + drl[3]; | |
249 | dits[2] = dzl[3]; | |
cfce8870 | 250 | gMC->Gsvolu("ITS4", "TUBE", idtmed[224], dits, 3); |
251 | gMC->Gspos("ITS4", 1, "ITSV", 0., 0., 0., 0, "ONLY"); | |
fe4da5cc | 252 | |
253 | dits[0] = rl[4]; | |
254 | dits[1] = rl[4] + drl[4]; | |
255 | dits[2] = dzl[4]; | |
cfce8870 | 256 | gMC->Gsvolu("ITS5", "TUBE", idtmed[249], dits, 3); |
257 | gMC->Gspos("ITS5", 1, "ITSV", 0., 0., 0., 0, "ONLY"); | |
fe4da5cc | 258 | |
259 | dits[0] = rl[5]; | |
260 | dits[1] = rl[5] + drl[5]; | |
261 | dits[2] = dzl[5]; | |
cfce8870 | 262 | gMC->Gsvolu("ITS6", "TUBE", idtmed[249], dits, 3); |
263 | gMC->Gspos("ITS6", 1, "ITSV", 0., 0., 0., 0, "ONLY"); | |
fe4da5cc | 264 | |
265 | // ELECTRONICS BOXES | |
266 | ||
267 | // PCB (layer #3 and #4) | |
268 | ||
cfce8870 | 269 | gMC->Gsvolu("IPCB", "TUBE", idtmed[233], dits, 0); |
fe4da5cc | 270 | for (i = 2; i < 4; ++i) { |
271 | dits[0] = rl[i]; | |
272 | dits[1] = dits[0] + drpcb[i]; | |
273 | dits[2] = dzb[i] / 2.; | |
274 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 275 | gMC->Gsposp("IPCB", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
276 | gMC->Gsposp("IPCB", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 277 | } |
278 | ||
279 | // COPPER (layer #3 and #4) | |
280 | ||
cfce8870 | 281 | gMC->Gsvolu("ICO2", "TUBE", idtmed[234], dits, 0); |
fe4da5cc | 282 | for (i = 2; i < 4; ++i) { |
283 | dits[0] = rl[i] + drpcb[i]; | |
284 | dits[1] = dits[0] + drcu[i]; | |
285 | dits[2] = dzb[i] / 2.; | |
286 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 287 | gMC->Gsposp("ICO2", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
288 | gMC->Gsposp("ICO2", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 289 | } |
290 | ||
291 | // CERAMICS (layer #3 and #4) | |
292 | ||
cfce8870 | 293 | gMC->Gsvolu("ICER", "TUBE", idtmed[235], dits, 0); |
fe4da5cc | 294 | for (i = 2; i < 4; ++i) { |
295 | dits[0] = rl[i] + drpcb[i] + drcu[i]; | |
296 | dits[1] = dits[0] + drcer[i]; | |
297 | dits[2] = dzb[i] / 2.; | |
298 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 299 | gMC->Gsposp("ICER", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
300 | gMC->Gsposp("ICER", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 301 | } |
302 | ||
303 | // SILICON (layer #3 and #4) | |
304 | ||
cfce8870 | 305 | gMC->Gsvolu("ISI2", "TUBE", idtmed[226], dits, 0); |
fe4da5cc | 306 | for (i = 2; i < 4; ++i) { |
307 | dits[0] = rl[i] + drpcb[i] + drcu[i] + drcer[i]; | |
308 | dits[1] = dits[0] + drsi[i]; | |
309 | dits[2] = dzb[i] / 2.; | |
310 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 311 | gMC->Gsposp("ISI2", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
312 | gMC->Gsposp("ISI2", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 313 | } |
314 | ||
315 | // PLASTIC (G10FR4) (layer #5 and #6) | |
316 | ||
cfce8870 | 317 | gMC->Gsvolu("IPLA", "TUBE", idtmed[262], dits, 0); |
fe4da5cc | 318 | for (i = 4; i < 6; ++i) { |
319 | dits[0] = rl[i]; | |
320 | dits[1] = dits[0] + drpla[i]; | |
321 | dits[2] = dzb[i] / 2.; | |
322 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 323 | gMC->Gsposp("IPLA", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
324 | gMC->Gsposp("IPLA", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 325 | } |
326 | ||
327 | // COPPER (layer #5 and #6) | |
328 | ||
cfce8870 | 329 | gMC->Gsvolu("ICO3", "TUBE", idtmed[259], dits, 0); |
fe4da5cc | 330 | for (i = 4; i < 6; ++i) { |
331 | dits[0] = rl[i] + drpla[i]; | |
332 | dits[1] = dits[0] + drcu[i]; | |
333 | dits[2] = dzb[i] / 2.; | |
334 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 335 | gMC->Gsposp("ICO3", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
336 | gMC->Gsposp("ICO3", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 337 | } |
338 | ||
339 | // EPOXY (layer #5 and #6) | |
340 | ||
cfce8870 | 341 | gMC->Gsvolu("IEPX", "TUBE", idtmed[262], dits, 0); |
fe4da5cc | 342 | for (i = 4; i < 6; ++i) { |
343 | dits[0] = rl[i] + drpla[i] + drcu[i]; | |
344 | dits[1] = dits[0] + drepx[i]; | |
345 | dits[2] = dzb[i] / 2.; | |
346 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 347 | gMC->Gsposp("IEPX", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
348 | gMC->Gsposp("IEPX", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 349 | } |
350 | ||
351 | // SILICON (layer #5 and #6) | |
352 | ||
cfce8870 | 353 | gMC->Gsvolu("ISI3", "TUBE", idtmed[251], dits, 0); |
fe4da5cc | 354 | for (i = 4; i < 6; ++i) { |
355 | dits[0] = rl[i] + drpla[i] + drcu[i] + drepx[i]; | |
356 | dits[1] = dits[0] + drsi[i]; | |
357 | dits[2] = dzb[i] / 2.; | |
358 | zpos = dzl[i] + dits[2]; | |
cfce8870 | 359 | gMC->Gsposp("ISI3", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
360 | gMC->Gsposp("ISI3", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 361 | } |
362 | ||
363 | // SUPPORT | |
364 | ||
cfce8870 | 365 | gMC->Gsvolu("ISUP", "TUBE", idtmed[274], dits, 0); |
fe4da5cc | 366 | for (i = 0; i < 6; ++i) { |
367 | dits[0] = rl[i]; | |
368 | if (i < 5) dits[1] = rl[i]; | |
369 | else dits[1] = rlim; | |
370 | dits[2] = drsu / 2.; | |
371 | zpos = dzl[i] + dzb[i] + dits[2]; | |
cfce8870 | 372 | gMC->Gsposp("ISUP", i+1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
373 | gMC->Gsposp("ISUP", i+7, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 374 | } |
375 | ||
376 | // CABLES (HORIZONTAL) | |
377 | ||
cfce8870 | 378 | gMC->Gsvolu("ICHO", "TUBE", idtmed[278], dits, 0); |
fe4da5cc | 379 | for (i = 0; i < 6; ++i) { |
380 | dits[0] = rl[i]; | |
381 | dits[1] = dits[0] + drca; | |
382 | dits[2] = (rzcone + TMath::Tan(acone) * (rl[i] - rl[0]) - (dzl[i]+ dzb[i] + drsu)) / 2.; | |
383 | zpos = dzl[i - 1] + dzb[i] + drsu + dits[2]; | |
cfce8870 | 384 | gMC->Gsposp("ICHO", i+1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3); |
385 | gMC->Gsposp("ICHO", i+7, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3); | |
fe4da5cc | 386 | } |
387 | // DEFINE A CONICAL GHOST VOLUME FOR THE PHI SEGMENTATION | |
388 | pcits[0] = 0.; | |
389 | pcits[1] = 360.; | |
390 | pcits[2] = 2.; | |
391 | pcits[3] = rzcone; | |
392 | pcits[4] = 3.5; | |
393 | pcits[5] = rl[0]; | |
394 | pcits[6] = pcits[3] + TMath::Tan(acone) * (rlim - rl[0]); | |
395 | pcits[7] = rlim - rl[0] + 3.5; | |
396 | pcits[8] = rlim; | |
cfce8870 | 397 | gMC->Gsvolu("ICMO", "PCON", idtmed[275], pcits, 9); |
fe4da5cc | 398 | AliMatrix(idrotm[200], 90., 0., 90., 90., 180., 0.); |
cfce8870 | 399 | gMC->Gspos("ICMO", 1, "ITSV", 0., 0., 0., 0, "ONLY"); |
400 | gMC->Gspos("ICMO", 2, "ITSV", 0., 0., 0., idrotm[200], "ONLY"); | |
fe4da5cc | 401 | |
402 | // DIVIDE INTO NSEC PHI-SECTIONS | |
403 | ||
cfce8870 | 404 | gMC->Gsdvn("ICMD", "ICMO", nsec, 2); |
405 | gMC->Gsatt("ICMO", "SEEN", 0); | |
406 | gMC->Gsatt("ICMD", "SEEN", 0); | |
fe4da5cc | 407 | |
408 | // CONICAL CABLES | |
409 | ||
410 | pcits[2] = 2.; | |
cfce8870 | 411 | gMC->Gsvolu("ICCO", "PCON", idtmed[278], pcits, 0); |
fe4da5cc | 412 | for (i = 1; i < 6; ++i) { |
413 | pcits[0] = -dphi[i] / 2.; | |
414 | pcits[1] = dphi[i]; | |
415 | if (i < 5) { | |
416 | dzco = TMath::Tan(acone) * (rl[i+1] - rl[i]); | |
417 | } else { | |
418 | dzco1 = zmax - (rzcone + TMath::Tan(acone) * (rl[5] - rl[0])) -2.; | |
419 | dzco2 = (rlim - rl[5]) * TMath::Tan(acone); | |
420 | if (rl[5] + dzco1 / TMath::Tan(acone) < rlim) { | |
421 | dzco = dzco1; | |
422 | } else { | |
423 | dzco = dzco2; | |
424 | } | |
425 | } | |
426 | pcits[3] = rzcone + TMath::Tan(acone) * (rl[i] - rl[0]); | |
427 | pcits[4] = rl[i] - drcac[i] / TMath::Sin(acone); | |
428 | pcits[5] = rl[i]; | |
429 | pcits[6] = pcits[3] + dzco; | |
430 | pcits[7] = rl[i] + dzco / TMath::Tan(acone) - drcac[i] / TMath::Sin(acone); | |
431 | pcits[8] = rl[i] + dzco / TMath::Tan(acone); | |
432 | ||
cfce8870 | 433 | gMC->Gsposp("ICCO", i, "ICMD", 0., 0., 0., 0, "ONLY", pcits, 9); |
fe4da5cc | 434 | |
435 | } | |
436 | zend = pcits[6]; | |
437 | rend = pcits[8]; | |
438 | ||
439 | // CONICAL CABLES BELOW TPC | |
440 | ||
441 | // DEFINE A CONICAL GHOST VOLUME FOR THE PHI SEGMENTATION | |
442 | pcits[0] = 0.; | |
443 | pcits[1] = 360.; | |
444 | pcits[2] = 2.; | |
445 | pcits[3] = zend; | |
446 | pcits[5] = rend; | |
447 | pcits[4] = pcits[5] - drca_tpc; | |
448 | pcits[6] = xltpc; | |
449 | pcits[8] = pcits[4] + (pcits[6] - pcits[3]) * TMath::Tan(acable * kDegrad); | |
450 | pcits[7] = pcits[8] - drca_tpc; | |
451 | AliMatrix(idrotm[200], 90., 0., 90., 90., 180., 0.); | |
cfce8870 | 452 | gMC->Gsvolu("ICCM", "PCON", idtmed[275], pcits, 9); |
453 | gMC->Gspos("ICCM", 1, "ALIC", 0., 0., 0., 0, "ONLY"); | |
454 | gMC->Gspos("ICCM", 2, "ALIC", 0., 0., 0., idrotm[200], "ONLY"); | |
455 | gMC->Gsdvn("ITMD", "ICCM", nsec, 2); | |
456 | gMC->Gsatt("ITMD", "SEEN", 0); | |
457 | gMC->Gsatt("ICCM", "SEEN", 0); | |
fe4da5cc | 458 | |
459 | // NOW PLACE SEGMENTS WITH DECREASING PHI SEGMENTS INTO THE | |
460 | // GHOST-VOLUME | |
461 | ||
462 | pcits[2] = 2.; | |
cfce8870 | 463 | gMC->Gsvolu("ITTT", "PCON", idtmed[278], pcits, 0); |
fe4da5cc | 464 | r0 = rend; |
465 | z0 = zend; | |
466 | dz = (xltpc - zend) / 9.; | |
467 | for (i = 0; i < 9; ++i) { | |
468 | zi = z0 + i*dz + dz / 2.; | |
469 | ri = r0 + (zi - z0) * TMath::Tan(acable * kDegrad); | |
470 | dphii = dphi[5] * r0 / ri; | |
471 | pcits[0] = -dphii / 2.; | |
472 | pcits[1] = dphii; | |
473 | pcits[3] = zi - dz / 2.; | |
474 | pcits[5] = r0 + (pcits[3] - z0) * TMath::Tan(acable * kDegrad); | |
475 | pcits[4] = pcits[5] - drca_tpc; | |
476 | pcits[6] = zi + dz / 2.; | |
477 | pcits[8] = r0 + (pcits[6] - z0) * TMath::Tan(acable * kDegrad); | |
478 | pcits[7] = pcits[8] - drca_tpc; | |
479 | ||
cfce8870 | 480 | gMC->Gsposp("ITTT", i+1, "ITMD", 0., 0., 0., 0, "ONLY", pcits, 9); |
fe4da5cc | 481 | } |
482 | ||
483 | // --- Outputs the geometry tree in the EUCLID/CAD format | |
484 | ||
485 | if (fEuclidOut) { | |
cfce8870 | 486 | gMC->WriteEuclid("ITSgeometry", "ITSV", 1, 5); |
fe4da5cc | 487 | } |
488 | } | |
489 | ||
490 | //_____________________________________________________________________________ | |
491 | void AliITSv1::CreateMaterials() | |
492 | { | |
493 | // | |
494 | // Create the materials for ITS | |
495 | // | |
496 | AliITS::CreateMaterials(); | |
497 | } | |
498 | ||
499 | //_____________________________________________________________________________ | |
593d2ea1 | 500 | void AliITSv1::Init(){ |
501 | // | |
502 | // Initialise the ITS after it has been built | |
503 | // | |
504 | Int_t i,j,l; | |
505 | ||
506 | fIdN = fId1N;; | |
507 | fIdName = new char*[fIdN]; | |
508 | fIdSens = new Int_t[fIdN]; | |
509 | for(i=0;i<fId1N;i++) { | |
510 | l = strlen(fId1Name[i]); | |
511 | fIdName[i] = new char[l+1]; | |
512 | for(j=0;j<l;j++) fIdName[i][j] = fId1Name[i][j]; | |
513 | fIdName[i][l] = '\0'; // Null terminate this string. | |
514 | } // end for i | |
515 | // | |
516 | AliITS::Init(); | |
517 | fMajorVersion = 1; | |
518 | fMinorVersion = 0; | |
fe4da5cc | 519 | } |
520 | ||
521 | //_____________________________________________________________________________ | |
2cb30c3a | 522 | void AliITSv1::DrawModule() |
fe4da5cc | 523 | { |
524 | // | |
525 | // Draw a shaded view of the FMD version 1 | |
526 | // | |
527 | ||
fe4da5cc | 528 | |
529 | // Set everything unseen | |
cfce8870 | 530 | gMC->Gsatt("*", "seen", -1); |
fe4da5cc | 531 | // |
532 | // Set ALIC mother visible | |
cfce8870 | 533 | gMC->Gsatt("ALIC","SEEN",0); |
fe4da5cc | 534 | // |
535 | // Set the volumes visible | |
cfce8870 | 536 | gMC->Gsatt("ITSV","SEEN",0); |
537 | gMC->Gsatt("ITS1","SEEN",1); | |
538 | gMC->Gsatt("ITS2","SEEN",1); | |
539 | gMC->Gsatt("ITS3","SEEN",1); | |
540 | gMC->Gsatt("ITS4","SEEN",1); | |
541 | gMC->Gsatt("ITS5","SEEN",1); | |
542 | gMC->Gsatt("ITS6","SEEN",1); | |
fe4da5cc | 543 | |
cfce8870 | 544 | gMC->Gsatt("IPCB","SEEN",1); |
545 | gMC->Gsatt("ICO2","SEEN",1); | |
546 | gMC->Gsatt("ICER","SEEN",0); | |
547 | gMC->Gsatt("ISI2","SEEN",0); | |
548 | gMC->Gsatt("IPLA","SEEN",0); | |
549 | gMC->Gsatt("ICO3","SEEN",0); | |
550 | gMC->Gsatt("IEPX","SEEN",0); | |
551 | gMC->Gsatt("ISI3","SEEN",1); | |
552 | gMC->Gsatt("ISUP","SEEN",0); | |
553 | gMC->Gsatt("ICHO","SEEN",0); | |
554 | gMC->Gsatt("ICMO","SEEN",0); | |
555 | gMC->Gsatt("ICMD","SEEN",0); | |
556 | gMC->Gsatt("ICCO","SEEN",1); | |
557 | gMC->Gsatt("ICCM","SEEN",0); | |
558 | gMC->Gsatt("ITMD","SEEN",0); | |
559 | gMC->Gsatt("ITTT","SEEN",1); | |
fe4da5cc | 560 | |
561 | // | |
cfce8870 | 562 | gMC->Gdopt("hide", "on"); |
563 | gMC->Gdopt("shad", "on"); | |
564 | gMC->Gsatt("*", "fill", 7); | |
565 | gMC->SetClipBox("."); | |
566 | gMC->SetClipBox("*", 0, 300, -300, 300, -300, 300); | |
567 | gMC->DefaultRange(); | |
568 | gMC->Gdraw("alic", 40, 30, 0, 11, 10, .07, .07); | |
569 | gMC->Gdhead(1111, "Inner Tracking System Version 1"); | |
570 | gMC->Gdman(17, 6, "MAN"); | |
fe4da5cc | 571 | } |
572 | ||
573 | //_____________________________________________________________________________ | |
574 | void AliITSv1::StepManager() | |
575 | { | |
576 | // | |
577 | // Called at every step in the ITS | |
578 | // | |
579 | Int_t copy, id; | |
58005f18 | 580 | Float_t hits[8]; |
581 | Int_t vol[4]; | |
0a6d8768 | 582 | TLorentzVector position, momentum; |
fe4da5cc | 583 | TClonesArray &lhits = *fHits; |
fe4da5cc | 584 | // |
58005f18 | 585 | // Track status |
586 | vol[3] = 0; | |
587 | if(gMC->IsTrackInside()) vol[3] += 1; | |
588 | if(gMC->IsTrackEntering()) vol[3] += 2; | |
589 | if(gMC->IsTrackExiting()) vol[3] += 4; | |
590 | if(gMC->IsTrackOut()) vol[3] += 8; | |
591 | if(gMC->IsTrackDisappeared()) vol[3] += 16; | |
592 | if(gMC->IsTrackStop()) vol[3] += 32; | |
593 | if(gMC->IsTrackAlive()) vol[3] += 64; | |
594 | // | |
595 | // Fill hit structure. | |
cfce8870 | 596 | if(gMC->TrackCharge() && gMC->Edep()) { |
fe4da5cc | 597 | // |
598 | // Only entering charged tracks | |
58005f18 | 599 | if((id=gMC->CurrentVolID(copy))==fIdSens[0]) { |
fe4da5cc | 600 | vol[0]=1; |
0a6d8768 | 601 | id=gMC->CurrentVolOffID(1,copy); |
fe4da5cc | 602 | vol[1]=copy; |
0a6d8768 | 603 | id=gMC->CurrentVolOffID(2,copy); |
fe4da5cc | 604 | vol[2]=copy; |
58005f18 | 605 | } else if(id==fIdSens[1]) { |
fe4da5cc | 606 | vol[0]=2; |
0a6d8768 | 607 | id=gMC->CurrentVolOffID(1,copy); |
fe4da5cc | 608 | vol[1]=copy; |
0a6d8768 | 609 | id=gMC->CurrentVolOffID(2,copy); |
fe4da5cc | 610 | vol[2]=copy; |
58005f18 | 611 | } else if(id==fIdSens[2]) { |
fe4da5cc | 612 | vol[0]=3; |
613 | vol[1]=copy; | |
0a6d8768 | 614 | id=gMC->CurrentVolOffID(1,copy); |
fe4da5cc | 615 | vol[2]=copy; |
58005f18 | 616 | } else if(id==fIdSens[3]) { |
fe4da5cc | 617 | vol[0]=4; |
618 | vol[1]=copy; | |
0a6d8768 | 619 | id=gMC->CurrentVolOffID(1,copy); |
fe4da5cc | 620 | vol[2]=copy; |
58005f18 | 621 | } else if(id==fIdSens[4]) { |
fe4da5cc | 622 | vol[0]=5; |
623 | vol[1]=copy; | |
0a6d8768 | 624 | id=gMC->CurrentVolOffID(1,copy); |
fe4da5cc | 625 | vol[2]=copy; |
58005f18 | 626 | } else if(id==fIdSens[5]) { |
fe4da5cc | 627 | vol[0]=6; |
628 | vol[1]=copy; | |
0a6d8768 | 629 | id=gMC->CurrentVolOffID(1,copy); |
fe4da5cc | 630 | vol[2]=copy; |
631 | } else return; | |
cfce8870 | 632 | gMC->TrackPosition(position); |
633 | gMC->TrackMomentum(momentum); | |
fe4da5cc | 634 | hits[0]=position[0]; |
635 | hits[1]=position[1]; | |
636 | hits[2]=position[2]; | |
0a6d8768 | 637 | hits[3]=momentum[0]; |
638 | hits[4]=momentum[1]; | |
58005f18 | 639 | hits[5]=momentum[2]; |
cfce8870 | 640 | hits[6]=gMC->Edep(); |
58005f18 | 641 | hits[7]=gMC->TrackTime(); |
fe4da5cc | 642 | new(lhits[fNhits++]) AliITShit(fIshunt,gAlice->CurrentTrack(),vol,hits); |
643 | } | |
644 | } | |
593d2ea1 | 645 | |
646 | //____________________________________________________________________________ | |
647 | void AliITSv1::Streamer(TBuffer &R__b) | |
648 | { | |
649 | // Stream an object of class AliITSv1. | |
650 | ||
651 | if (R__b.IsReading()) { | |
652 | Version_t R__v = R__b.ReadVersion(); if (R__v) { } | |
653 | AliITS::Streamer(R__b); | |
654 | // This information does not need to be read. It is "hard wired" | |
655 | // into this class via its creators. | |
656 | //R__b >> fId1N; | |
657 | //R__b.ReadArray(fId1Name); | |
658 | } else { | |
659 | R__b.WriteVersion(AliITSv1::IsA()); | |
660 | AliITS::Streamer(R__b); | |
661 | // This information does not need to be saved. It is "hard wired" | |
662 | // into this class via its creators. | |
663 | //R__b << fId1N; | |
664 | //R__b.WriteArray(fId1Name, __COUNTER__); | |
665 | } | |
666 | } |