]> git.uio.no Git - u/mrichter/AliRoot.git/blame - ITS/AliITSvPPRcoarsesymm.cxx
git://git.uio.no / u / mrichter / AliRoot.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Sun compiler correction
[u/mrichter/AliRoot.git] / ITS / AliITSvPPRcoarsesymm.cxx
CommitLineData
69efe7cb 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$
89909db5 18Revision 1.11 2000/10/30 08:02:25 barbera
19PCON's changed into simpler CONS and TUBS. Services now allow for the rails to go through them.
20
4ebc1b6a 21Revision 1.3.2.7 2000/10/27 17:20:00 barbera
22Position of rails w.r.t. the interaction point corrected.
23
acb52b3d 24Revision 1.9 2000/10/27 13:31:29 barbera
25Rails between ITS and TPC added.
26
c54243df 27Revision 1.8 2000/10/27 13:03:08 barbera
28Small changes in the SPD volumes and materials
29
6c251614 30Revision 1.6 2000/10/16 14:45:37 barbera
31Mother volume ITSD modified to avoid some overlaps
32
e8031268 33Revision 1.5 2000/10/16 13:49:15 barbera
34Services volumes slightly modified and material added following Pierluigi Barberis' information
35
e6892b92 36Revision 1.4 2000/10/07 15:33:07 barbera
37Small corrections to the ITSV mother volume
38
990d421f 39Revision 1.3 2000/10/07 13:06:50 barbera
40Some new materials and media defined
41
d12d92a5 42Revision 1.2 2000/10/07 10:42:43 barbera
43Mother volume ITSV corrected
44
c6e3abc5 45Revision 1.1 2000/10/06 23:09:12 barbera
46New coarse geometry (symmetric services
47
69efe7cb 48Revision 1.20 2000/10/02 21:28:08 fca
49Removal of useless dependecies via forward declarations
50
51Revision 1.19 2000/07/10 16:07:19 fca
52Release version of ITS code
53
54Revision 1.14.2.2 2000/05/19 10:09:21 nilsen
55fix for bug with HP and Sun unix + fix for event display in ITS-working branch
56
57Revision 1.14.2.1 2000/03/04 23:45:19 nilsen
58Fixed up the comments/documentation.
59
60Revision 1.14 1999/11/25 06:52:56 fca
61Correct value of drca
62
63Revision 1.13.2.1 1999/11/25 06:52:21 fca
64Correct value of drca
65
66Revision 1.13 1999/10/27 11:16:26 fca
67Correction of problem in geometry
68
69Revision 1.12 1999/10/22 08:25:25 fca
70remove double definition of destructors
71
72Revision 1.11 1999/10/22 08:16:49 fca
73Correct destructors, thanks to I.Hrivnacova
74
75Revision 1.10 1999/10/06 19:56:50 fca
76Add destructor
77
78Revision 1.9 1999/10/05 08:05:09 fca
79Minor corrections for uninitialised variables.
80
81Revision 1.8 1999/09/29 09:24:20 fca
82Introduction of the Copyright and cvs Log
83
84*/
85
86///////////////////////////////////////////////////////////////////////////////
87// //
88// Inner Traking System version PPR coarse symmetric //
89// This class contains the base procedures for the Inner Tracking System //
90// //
91// Authors: R. Barbera
92// version 6.
93// Created 2000.
94//
95// NOTE: THIS IS THE COARSE SYMMETRIC PPR geometry of the ITS.
96// THIS WILL NOT WORK
97// with the geometry or module classes or any analysis classes. You are
98// strongly encouraged to uses AliITSv5.
99// //
100///////////////////////////////////////////////////////////////////////////////
101
102#include <TMath.h>
103#include <TRandom.h>
104#include <TVector.h>
105#include <TGeometry.h>
106#include <TNode.h>
107#include <TTUBE.h>
108#include <TFile.h> // only required for Tracking function?
109#include <TCanvas.h>
110#include <TObjArray.h>
111#include <TClonesArray.h>
112
113
114#include "AliMC.h"
115#include "AliMagF.h"
116#include "AliConst.h"
117
118#include "AliITShit.h"
119#include "AliITSvPPRcoarsesymm.h"
120#include "AliRun.h"
121
122
123ClassImp(AliITSvPPRcoarsesymm)
124
125//_____________________________________________________________________________
126AliITSvPPRcoarsesymm::AliITSvPPRcoarsesymm() {
127////////////////////////////////////////////////////////////////////////
128// Standard default constructor for the ITS version 7.
129////////////////////////////////////////////////////////////////////////
130
131 fIdN = 6;
132 fIdName = new TString[fIdN];
133 fIdName[0] = "ITS1";
134 fIdName[1] = "ITS2";
135 fIdName[2] = "ITS3";
136 fIdName[3] = "ITS4";
137 fIdName[4] = "ITS5";
138 fIdName[5] = "ITS6";
139 fIdSens = new Int_t[fIdN];
140 for (Int_t i=0;i<fIdN;i++) fIdSens[i]=fIdName[i].Length();
141}
142//_____________________________________________________________________________
143AliITSvPPRcoarsesymm::AliITSvPPRcoarsesymm(const char *name, const char *title) : AliITS(name, title){
144////////////////////////////////////////////////////////////////////////
145// Standard constructor for the ITS version 7.
146////////////////////////////////////////////////////////////////////////
147
148 fIdN = 6;
149 fIdName = new TString[fIdN];
150 fIdName[0] = "ITS1";
151 fIdName[1] = "ITS2";
152 fIdName[2] = "ITS3";
153 fIdName[3] = "ITS4";
154 fIdName[4] = "ITS5";
155 fIdName[5] = "ITS6";
156 fIdSens = new Int_t[fIdN];
157 for (Int_t i=0;i<fIdN;i++) fIdSens[i]=fIdName[i].Length();
158
159}
160//____________________________________________________________________________
161AliITSvPPRcoarsesymm::AliITSvPPRcoarsesymm(const AliITSvPPRcoarsesymm &source){
162////////////////////////////////////////////////////////////////////////
163// Copy Constructor for ITS version 7.
164////////////////////////////////////////////////////////////////////////
165 if(&source == this) return;
166 printf("Not allowed to copy AliITSvPPRcoarsesymm\n");
167 return;
168}
169//_____________________________________________________________________________
170AliITSvPPRcoarsesymm& AliITSvPPRcoarsesymm::operator=(const AliITSvPPRcoarsesymm &source){
171////////////////////////////////////////////////////////////////////////
172// Assignment operator for the ITS version 7.
173////////////////////////////////////////////////////////////////////////
174 if(&source == this) return *this;
175 printf("Not allowed to copy AliITSvPPRcoarsesymm\n");
176 return *this;
177}
178//_____________________________________________________________________________
179AliITSvPPRcoarsesymm::~AliITSvPPRcoarsesymm() {
180////////////////////////////////////////////////////////////////////////
181// Standard destructor for the ITS version 7.
182////////////////////////////////////////////////////////////////////////
183}
184
185//__________________________________________________________________________
186void AliITSvPPRcoarsesymm::BuildGeometry(){
187////////////////////////////////////////////////////////////////////////
188// Geometry builder for the ITS version 7.
189////////////////////////////////////////////////////////////////////////
190 TNode *node, *top;
191 const int kColorITS=kYellow;
192 //
193 top = gAlice->GetGeometry()->GetNode("alice");
194
195 new TTUBE("S_layer1","Layer1 of ITS","void",3.95,3.95+0.05475,12.25);
196 top->cd();
197 node = new TNode("Layer1","Layer1","S_layer1",0,0,0,"");
198 node->SetLineColor(kColorITS);
199 fNodes->Add(node);
200
201 new TTUBE("S_layer2","Layer2 of ITS","void",7.,7.+0.05475,16.3);
202 top->cd();
203 node = new TNode("Layer2","Layer2","S_layer2",0,0,0,"");
204 node->SetLineColor(kColorITS);
205 fNodes->Add(node);
206
207 new TTUBE("S_layer3","Layer3 of ITS","void",15.,15.+0.05288,21.1);
208 top->cd();
209 node = new TNode("Layer3","Layer3","S_layer3",0,0,0,"");
210 node->SetLineColor(kColorITS);
211 fNodes->Add(node);
212
213 new TTUBE("S_layer4","Layer4 of ITS","void",24,24+0.05288,29.6);
214 top->cd();
215 node = new TNode("Layer4","Layer4","S_layer4",0,0,0,"");
216 node->SetLineColor(kColorITS);
217 fNodes->Add(node);
218
219 new TTUBE("S_layer5","Layer5 of ITS","void",40,40+0.05382,45.1);
220 top->cd();
221 node = new TNode("Layer5","Layer5","S_layer5",0,0,0,"");
222 node->SetLineColor(kColorITS);
223 fNodes->Add(node);
224
225 new TTUBE("S_layer6","Layer6 of ITS","void",45,45+0.05382,50.4);
226 top->cd();
227 node = new TNode("Layer6","Layer6","S_layer6",0,0,0,"");
228 node->SetLineColor(kColorITS);
229 fNodes->Add(node);
230}
231//_____________________________________________________________________________
232void AliITSvPPRcoarsesymm::CreateGeometry(){
233////////////////////////////////////////////////////////////////////////
234// This routine defines and Creates the geometry for version 7 of the ITS.
235////////////////////////////////////////////////////////////////////////
236
237 //INNER RADII OF THE SILICON LAYERS
6c251614 238 Float_t rl[6] = { 3.8095,7.,15.,24.,38.1,43.5765 };
69efe7cb 239 //THICKNESSES OF LAYERS (in % radiation length)
6c251614 240 Float_t drl[6] = { 1.03,1.03,0.94,0.95,0.91,0.87 };
69efe7cb 241 //HALF LENGTHS OF LAYERS
6c251614 242 Float_t dzl[6] = { 14.35,14.35,25.1,32.1,49.405,55.27 };
69efe7cb 243 //LENGTHS OF END-LADDER BOXES (ALL INCLUDED)
89909db5 244 Float_t dzb[6] = { 12.4,12.4,13.5,15.,7.5,7.5 };
69efe7cb 245 //THICKNESSES OF END-LADDER BOXES (ALL INCLUDED)
89909db5 246 Float_t drb[6] = { rl[1]-rl[0],0.2,5.,5.,4.,4. };
69efe7cb 247
248
249 Float_t dits[3], rlim, zmax;
250 Float_t zpos;
251 Float_t pcits[15], xltpc;
252 Int_t idrotm[399], i;
253 Float_t dgh[50];
254
255 Int_t *idtmed = fIdtmed->GetArray()-199;
256
257 // CONVERT INTO CM (RL(SI)=9.36 CM)
258 for (i = 0; i < 6; ++i) {
259 drl[i] = drl[i] / 100. * 9.36;
260 }
261
262 // FIELD CAGE HALF LENGTH
263
264 rlim = 56.;
265 zmax = 76.708;
266 xltpc = 284.;
267
c6e3abc5 268 // --- Define ghost volume containing the whole ITS (including services)
269 // and fill it with air
270
271 dgh[0] = 0.;
272 dgh[1] = 360.;
273 dgh[2] = 12.;
274 dgh[3] = -xltpc-5.-0.1;
275 dgh[4] = 62.4;
276 dgh[5] = 85.;
277 dgh[6] = -xltpc;
278 dgh[7] = 61.5;
279 dgh[8] = 85.;
280 dgh[9] = -xltpc;
281 dgh[10] = 61.5;
282 dgh[11] = 61.5+4.;
283 dgh[12] = -100.7;
284 dgh[13] = 44.9;
285 dgh[14] = 56.1;
990d421f 286 dgh[15] = -77.2;
c6e3abc5 287 dgh[16] = 44.9;
288 dgh[17] = 56.1;
6c251614 289 dgh[18] = -40.;
4ebc1b6a 290 dgh[19] = 3.295;
c6e3abc5 291 dgh[20] = 56.1;
4ebc1b6a 292
293/*
294 dgh[21] = -35.;
295 dgh[22] = 3.295;
296 dgh[23] = 56.1;
297
298 dgh[24] = -35.;
299 dgh[25] = 5.;
300 dgh[26] = 56.1;
301
302 dgh[27] = -29.;
303 dgh[28] = 5.;
304 dgh[29] = 56.1;
305
306 dgh[30] = -29.;
307 dgh[31] = 3.295;
308 dgh[32] = 56.1;
309
310*/
311
312
6c251614 313 dgh[21] = 40.;
4ebc1b6a 314 dgh[22] = 3.295;
c6e3abc5 315 dgh[23] = 56.1;
990d421f 316 dgh[24] = 77.2;
c6e3abc5 317 dgh[25] = 44.9;
318 dgh[26] = 56.1;
319 dgh[27] = 100.7;
320 dgh[28] = 44.9;
321 dgh[29] = 56.1;
322 dgh[30] = xltpc;
323 dgh[31] = 61.5;
324 dgh[32] = 61.5+4.;
325 dgh[33] = xltpc;
326 dgh[34] = 61.5;
327 dgh[35] = 85.;
328 dgh[36] = xltpc+4.+0.1;
329 dgh[37] = 62.4;
330 dgh[38] = 85.;
331
332 gMC->Gsvolu("ITSV", "PCON", idtmed[275], dgh, 39);
333
334 // --- Place the ghost volume in its mother volume (ALIC) and make it
335 // invisible
336
337 gMC->Gspos("ITSV", 1, "ALIC", 0., 0., 0., 0, "ONLY");
338 //gMC->Gsatt("ITSV", "SEEN", 0);
339
69efe7cb 340
341 // --- Define ghost volume containing the six layers and fill it with air
342
343 dgh[0] = 0.;
344 dgh[1] = 360.;
345 dgh[2] = 4.;
e8031268 346 dgh[3] = -77.2;
69efe7cb 347 dgh[4] = 45.;
348 dgh[5] = 56.;
6c251614 349 dgh[6] = -40.;
69efe7cb 350 dgh[7] = 3.3;
351 dgh[8] = 56.;
6c251614 352 dgh[9] = 40.;
69efe7cb 353 dgh[10] = 3.3;
354 dgh[11] = 56.;
e8031268 355 dgh[12] = 77.2;
69efe7cb 356 dgh[13] = 45.;
357 dgh[14] = 56.;
c6e3abc5 358 gMC->Gsvolu("ITSD", "PCON", idtmed[275], dgh, 15);
69efe7cb 359
c6e3abc5 360 // --- Place the ghost volume in its mother volume (ALIC) and make it
69efe7cb 361 // invisible
362
c6e3abc5 363 gMC->Gspos("ITSD", 1, "ITSV", 0., 0., 0., 0, "ONLY");
69efe7cb 364 //gMC->Gsatt("ITSV", "SEEN", 0);
365
366 // ITS LAYERS (SILICON)
367
368 dits[0] = rl[0];
369 dits[1] = rl[0] + drl[0];
370 dits[2] = dzl[0];
371 gMC->Gsvolu("ITS1", "TUBE", idtmed[199], dits, 3);
c6e3abc5 372 gMC->Gspos("ITS1", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 373
374 dits[0] = rl[1];
375 dits[1] = rl[1] + drl[1];
376 dits[2] = dzl[1];
377 gMC->Gsvolu("ITS2", "TUBE", idtmed[199], dits, 3);
c6e3abc5 378 gMC->Gspos("ITS2", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 379
380 dits[0] = rl[2];
381 dits[1] = rl[2] + drl[2];
382 dits[2] = dzl[2];
383 gMC->Gsvolu("ITS3", "TUBE", idtmed[224], dits, 3);
c6e3abc5 384 gMC->Gspos("ITS3", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 385
386 dits[0] = rl[3];
387 dits[1] = rl[3] + drl[3];
388 dits[2] = dzl[3];
389 gMC->Gsvolu("ITS4", "TUBE", idtmed[224], dits, 3);
c6e3abc5 390 gMC->Gspos("ITS4", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 391
392 dits[0] = rl[4];
393 dits[1] = rl[4] + drl[4];
394 dits[2] = dzl[4];
395 gMC->Gsvolu("ITS5", "TUBE", idtmed[249], dits, 3);
c6e3abc5 396 gMC->Gspos("ITS5", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 397
398 dits[0] = rl[5];
399 dits[1] = rl[5] + drl[5];
400 dits[2] = dzl[5];
401 gMC->Gsvolu("ITS6", "TUBE", idtmed[249], dits, 3);
c6e3abc5 402 gMC->Gspos("ITS6", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 403
d12d92a5 404 // END-LADDER ELECTRONICS BOXES AND CABLES FOR SPD
69efe7cb 405
d12d92a5 406 gMC->Gsvolu("IEL1", "TUBE", idtmed[208], dits, 0);
407 for (i = 0; i < 2; i++) {
69efe7cb 408 dits[0] = rl[i];
409 dits[1] = dits[0] + drb[i];
410 dits[2] = dzb[i] / 2.;
411 zpos = dzl[i] + dits[2];
d12d92a5 412 gMC->Gsposp("IEL1", i+1, "ITSD", 0., 0., zpos, 0, "ONLY", dits, 3);
413 gMC->Gsposp("IEL1", i+1+6, "ITSD", 0., 0.,-zpos, 0, "ONLY", dits, 3);
69efe7cb 414 }
d12d92a5 415
416 // END-LADDER ELECTRONICS BOXES AND CABLES FOR SDD
417
418 gMC->Gsvolu("IEL2", "TUBE", idtmed[237], dits, 0);
89909db5 419 for (i = 2; i < 3; i++) {
420 dits[0] = rl[i]-2.5;
d12d92a5 421 dits[1] = dits[0] + drb[i];
422 dits[2] = dzb[i] / 2.;
423 zpos = dzl[i] + dits[2];
424 gMC->Gsposp("IEL2", i+1, "ITSD", 0., 0., zpos, 0, "ONLY", dits, 3);
425 gMC->Gsposp("IEL2", i+1+6, "ITSD", 0., 0.,-zpos, 0, "ONLY", dits, 3);
426 }
89909db5 427 for (i = 3; i < 4; i++) {
428 dits[0] = rl[i]-1.4;
429 dits[1] = dits[0] + drb[i];
430 dits[2] = dzb[i] / 2.;
431 zpos = dzl[i] + dits[2];
432 gMC->Gsposp("IEL2", i+1, "ITSD", 0., 0., zpos, 0, "ONLY", dits, 3);
433 gMC->Gsposp("IEL2", i+1+6, "ITSD", 0., 0.,-zpos, 0, "ONLY", dits, 3);
434 }
435
d12d92a5 436
437 // END-LADDER ELECTRONICS BOXES AND CABLES FOR SSD
438
439 gMC->Gsvolu("IEL3", "TUBE", idtmed[263], dits, 0);
89909db5 440 for (i = 4; i < 5; i++) {
441 dits[0] = rl[i]+1.4;
d12d92a5 442 dits[1] = dits[0] + drb[i];
443 dits[2] = dzb[i] / 2.;
444 zpos = dzl[i] + dits[2];
445 gMC->Gsposp("IEL3", i+1, "ITSD", 0., 0., zpos, 0, "ONLY", dits, 3);
446 gMC->Gsposp("IEL3", i+1+6, "ITSD", 0., 0.,-zpos, 0, "ONLY", dits, 3);
447 }
89909db5 448 for (i = 5; i < 6; i++) {
449 dits[0] = rl[i]+0.4235;
450 dits[1] = dits[0] + drb[i];
451 dits[2] = dzb[i] / 2.;
452 zpos = dzl[i] + dits[2];
453 gMC->Gsposp("IEL3", i+1, "ITSD", 0., 0., zpos, 0, "ONLY", dits, 3);
454 gMC->Gsposp("IEL3", i+1+6, "ITSD", 0., 0.,-zpos, 0, "ONLY", dits, 3);
455 }
69efe7cb 456
6c251614 457 // DEFINE THERMAL SCREEN FOR SPD
69efe7cb 458
6c251614 459 pcits[0] = 8.3;
460 pcits[1] = 8.5;
461 pcits[2] = 42.5;
462 gMC->Gsvolu("ICY1", "TUBE", idtmed[274], pcits, 3);
463 gMC->Gspos("ICY1", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 464
69efe7cb 465 // DEFINE END CONES FOR SDD
466
4ebc1b6a 467 pcits[0] = (59.-42.5)/2.;
468 pcits[1] = 8.5;
89909db5 469 pcits[2] = 8.5+0.1;
4ebc1b6a 470 pcits[3] = 28.;
89909db5 471 pcits[4] = 28.+0.1;
4ebc1b6a 472 gMC->Gsvolu("ICO1", "CONE", idtmed[274], pcits, 5);
6c251614 473 AliMatrix(idrotm[200], 90., 0., 90., 90., 180., 0.);
4ebc1b6a 474 gMC->Gspos("ICO1", 1, "ITSD", 0., 0., 42.5+pcits[0], 0, "ONLY");
475 gMC->Gspos("ICO1", 2, "ITSD", 0., 0., -(42.5+pcits[0]), idrotm[200], "ONLY");
6c251614 476
477 // DEFINE CYLINDER BETWEEN SDD AND SSD
478
479 pcits[0] = (59.5-0.13/2.)/2.;
480 pcits[1] = (59.5+0.13/2.)/2.;
481 pcits[2] = 57.;
89909db5 482 gMC->Gsvolu("ICY2", "TUBE", idtmed[240], pcits, 3);
146fb996 483 gMC->Gspos("ICY2", 1, "ITSD", 0., 0., 0., 0, "ONLY");
69efe7cb 484
485 // DEFINE END CONES FOR SSD
486
4ebc1b6a 487 pcits[0] = (74.-59.)/2.;
488 pcits[1] = 28.;
89909db5 489 pcits[2] = 28.+0.1;
4ebc1b6a 490 pcits[3] = 47.;
89909db5 491 pcits[4] = 47.+0.1;
492 gMC->Gsvolu("ICO2", "CONE", idtmed[266], pcits, 5);
4ebc1b6a 493 gMC->Gspos("ICO2", 1, "ITSD", 0., 0., 59.+pcits[0], 0, "ONLY");
494 gMC->Gspos("ICO2", 2, "ITSD", 0., 0., -(59.+pcits[0]), idrotm[200], "ONLY");
146fb996 495
69efe7cb 496
69efe7cb 497 // SERVICES
498
499
4ebc1b6a 500 // --- DEFINE CABLES AT THE END OF THE ITS CONES - COPPER PART
69efe7cb 501
502 dgh[0] = 45.;
e6892b92 503 dgh[1] = 45.+1.0;
e8031268 504 dgh[2] = 9.5;
e6892b92 505
506 gMC->Gsvolu("ICCU", "TUBE", idtmed[279], dgh, 3);
e8031268 507 gMC->Gspos("ICCU", 1, "ITSV", 0., 0., 86.7, 0, "ONLY");
508 gMC->Gspos("ICCU", 2, "ITSV", 0., 0., -86.7, idrotm[200], "ONLY");
e6892b92 509
c54243df 510 // --- DEFINE CABLES AT THE END OF THE ITS CONES - CARBON PART
e6892b92 511
512 dgh[0] = 45.+1.0;
513 dgh[1] = 45.+1.0+1.5;
e8031268 514 dgh[2] = 9.5;
69efe7cb 515
e6892b92 516 gMC->Gsvolu("ICCC", "TUBE", idtmed[274], dgh, 3);
e8031268 517 gMC->Gspos("ICCC", 1, "ITSV", 0., 0., 86.7, 0, "ONLY");
518 gMC->Gspos("ICCC", 2, "ITSV", 0., 0., -86.7, idrotm[200], "ONLY");
69efe7cb 519
c54243df 520 // --- DEFINE PATCH PANELS AT THE END OF THE ITS CONES
69efe7cb 521
522 dgh[0] = 45.;
523 dgh[1] = 56.;
524 dgh[2] = 2.25;
525
e6892b92 526 gMC->Gsvolu("IPAN", "TUBE", idtmed[285], dgh, 3);
c6e3abc5 527 gMC->Gspos("IPAN", 1, "ITSV", 0., 0., 98.45, 0, "ONLY");
528 gMC->Gspos("IPAN", 2, "ITSV", 0., 0., -98.45, idrotm[200], "ONLY");
69efe7cb 529
4ebc1b6a 530 // --- DEFINE CABLES/COOLING BELOW THE TPC - COPPER PART - UPPER PART
531
532 dgh[0] = (xltpc-100.7)/2.;
533 dgh[1] = 45.2;
534 dgh[2] = 45.2+1.0;
535 dgh[3] = 61.8;
536 dgh[4] = 61.8+1.0;
537 dgh[5] = 12.;
538 dgh[6] = 168.;
539 gMC->Gsvolu("ICU1", "CONS", idtmed[279], dgh, 7);
540 gMC->Gspos("ICU1", 1, "ITSV", 0., 0., 100.7+dgh[0], 0, "ONLY");
541 gMC->Gspos("ICU1", 2, "ITSV", 0., 0., -(100.7+dgh[0]), idrotm[200], "ONLY");
542
543 // --- DEFINE CABLES/COOLING BELOW THE TPC - COPPER PART - LOWER PART
544
545 dgh[0] = (xltpc-100.7)/2.;
546 dgh[1] = 45.2;
547 dgh[2] = 45.2+1.0;
548 dgh[3] = 61.8;
549 dgh[4] = 61.8+1.0;
550 dgh[5] = 192.;
551 dgh[6] = 348.;
552 gMC->Gsvolu("ICU2", "CONS", idtmed[279], dgh, 7);
553 gMC->Gspos("ICU2", 1, "ITSV", 0., 0., 100.7+dgh[0], 0, "ONLY");
554 gMC->Gspos("ICU2", 2, "ITSV", 0., 0., -(100.7+dgh[0]), idrotm[200], "ONLY");
555
556 // --- DEFINE CABLES/COOLING BELOW THE TPC - CARBON PART - UPPER PART
557
558 dgh[0] = (xltpc-100.7)/2.;
559 dgh[1] = 45.2+1.0;
560 dgh[2] = 45.2+1.0+1.5;
561 dgh[3] = 61.8+1.0;
562 dgh[4] = 61.8+1.0+1.5;
563 dgh[5] = 12.;
564 dgh[6] = 168.;
565 gMC->Gsvolu("ICC1", "CONS", idtmed[274], dgh, 7);
566 gMC->Gspos("ICC1", 1, "ITSV", 0., 0., 100.7+dgh[0], 0, "ONLY");
567 gMC->Gspos("ICC1", 2, "ITSV", 0., 0., -(100.7+dgh[0]), idrotm[200], "ONLY");
568
569 // --- DEFINE CABLES/COOLING BELOW THE TPC - CARBON PART - LOWER PART
570
571 dgh[0] = (xltpc-100.7)/2.;
572 dgh[1] = 45.2+1.0;
573 dgh[2] = 45.2+1.0+1.5;
574 dgh[3] = 61.8+1.0;
575 dgh[4] = 61.8+1.0+1.5;
576 dgh[5] = 192.;
577 dgh[6] = 348.;
578 gMC->Gsvolu("ICC2", "CONS", idtmed[274], dgh, 7);
579 gMC->Gspos("ICC2", 1, "ITSV", 0., 0., 100.7+dgh[0], 0, "ONLY");
580 gMC->Gspos("ICC2", 2, "ITSV", 0., 0., -(100.7+dgh[0]), idrotm[200], "ONLY");
581
582 // --- DEFINE CABLES/COOLING BEHIND THE TPC - COPPER PART - UPPER PART
583
584 dgh[0] = 62.5;
585 dgh[1] = 74.5;
586 dgh[2] = 0.5;
587 dgh[3] = 12.;
588 dgh[4] = 168.;
589 gMC->Gsvolu("ICU3", "TUBS", idtmed[279], dgh, 5);
590 gMC->Gspos("ICU3", 1, "ITSV", 0., 0., xltpc+1.5+dgh[2], 0, "ONLY");
591 gMC->Gspos("ICU3", 2, "ITSV", 0., 0., -(xltpc+1.5+dgh[2]), idrotm[200], "ONLY");
592
593 // --- DEFINE CABLES/COOLING BEHIND THE TPC - COPPER PART - LOWER PART
594
595 dgh[0] = 62.5;
596 dgh[1] = 74.5;
597 dgh[2] = 0.5;
598 dgh[3] = 192.;
599 dgh[4] = 348.;
600 gMC->Gsvolu("ICU4", "TUBS", idtmed[279], dgh, 5);
601 gMC->Gspos("ICU4", 1, "ITSV", 0., 0., xltpc+1.5+dgh[2], 0, "ONLY");
602 gMC->Gspos("ICU4", 2, "ITSV", 0., 0., -(xltpc+1.5+dgh[2]), idrotm[200], "ONLY");
603
604 // --- DEFINE CABLES/COOLING BEHIND THE TPC - CARBON PART - UPPER PART
605
606 dgh[0] = 62.5;
607 dgh[1] = 74.5;
608 dgh[2] = 0.75;
609 dgh[3] = 12.;
610 dgh[4] = 168.;
611 gMC->Gsvolu("ICC3", "TUBS", idtmed[274], dgh, 5);
612 gMC->Gspos("ICC3", 1, "ITSV", 0., 0., xltpc+dgh[2], 0, "ONLY");
613 gMC->Gspos("ICC3", 2, "ITSV", 0., 0., -(xltpc+dgh[2]), idrotm[200], "ONLY");
614
615 // --- DEFINE CABLES/COOLING BEHIND THE TPC - CARBON PART - LOWER PART
616
617 dgh[0] = 62.5;
618 dgh[1] = 74.5;
619 dgh[2] = 0.75;
620 dgh[3] = 192.;
621 dgh[4] = 348.;
622 gMC->Gsvolu("ICC4", "TUBS", idtmed[274], dgh, 5);
623 gMC->Gspos("ICC4", 1, "ITSV", 0., 0., xltpc+dgh[2], 0, "ONLY");
624 gMC->Gspos("ICC4", 2, "ITSV", 0., 0., -(xltpc+dgh[2]), idrotm[200], "ONLY");
625
626 // --- DEFINE HOOK TO THE TPC ON OTHER SIDE W.R.T. THE ABSORBER - UPPER PART
e6892b92 627
4ebc1b6a 628 dgh[0] = 74.5;
629 dgh[1] = 79.5;
630 dgh[2] = 2.5;
631 dgh[3] = 12.;
632 dgh[4] = 168.;
633 gMC->Gsvolu("IHK1", "TUBS", idtmed[284], dgh, 5);
634 gMC->Gspos("IHK1", 1, "ITSV", 0., 0., -xltpc-dgh[2], 0, "ONLY");
69efe7cb 635
4ebc1b6a 636 // --- DEFINE HOOK TO THE TPC ON OTHER SIDE W.R.T. THE ABSORBER - LOWER PART
69efe7cb 637
638 dgh[0] = 74.5;
639 dgh[1] = 79.5;
640 dgh[2] = 2.5;
4ebc1b6a 641 dgh[3] = 192.;
642 dgh[4] = 348.;
643 gMC->Gsvolu("IHK2", "TUBS", idtmed[284], dgh, 5);
644 gMC->Gspos("IHK2", 1, "ITSV", 0., 0., -xltpc-dgh[2], 0, "ONLY");
69efe7cb 645
c54243df 646 // --- DEFINE RAILS BETWEEN THE ITS AND THE TPC
647
89909db5 648 //dgh[0] = 0.85;
649 //dgh[1] = 10.;
650 //dgh[2] = 190.;
651 //gMC->Gsvolu("IRAI", "BOX ", idtmed[285], dgh, 3);
652 //gMC->Gspos("IRAI", 1, "ITSV", 53., 0., -69.5, 0, "ONLY");
653 //gMC->Gspos("IRAI", 2, "ITSV", -53., 0., -69.5, 0, "ONLY");
4ebc1b6a 654
655 // --- DEFINE CYLINDERS HOLDING RAILS BETWEEN THE ITS AND THE TPC
c54243df 656
89909db5 657
4ebc1b6a 658 dgh[0] = 58.;
659 dgh[1] = 59.;
89909db5 660 dgh[2] = 0.6;
4ebc1b6a 661 gMC->Gsvolu("ICYL", "TUBE", idtmed[285], dgh, 3);
89909db5 662 gMC->Gspos("ICYL", 1, "ALIC", 0., 0., 74., 0, "ONLY");
663 gMC->Gspos("ICYL", 2, "ALIC", 0., 0., -74., idrotm[200], "ONLY");
69efe7cb 664
665 // --- Outputs the geometry tree in the EUCLID/CAD format
666
667 if (fEuclidOut) {
668 gMC->WriteEuclid("ITSgeometry", "ITSV", 1, 5);
669 }
670}
671//_____________________________________________________________________________
672void AliITSvPPRcoarsesymm::CreateMaterials(){
673////////////////////////////////////////////////////////////////////////
674 //
675 // Create ITS materials
676 // This function defines the default materials used in the Geant
677 // Monte Carlo simulations for the geometries AliITSv1, AliITSv3,
678 // AliITSvPPRcoarsesymm, AliITSvPPRcoarseasymm.
679 // In general it is automatically replaced by
680 // the CreatMaterials routine defined in AliITSv?. Should the function
681 // CreateMaterials not exist for the geometry version you are using this
682 // one is used. See the definition found in AliITSv5 or the other routine
683 // for a complete definition.
684 //
685 // Water H2O
686 Float_t awat[2] = { 1.00794,15.9994 };
687 Float_t zwat[2] = { 1.,8. };
688 Float_t wwat[2] = { 2.,1. };
689 Float_t denswat = 1.;
690 // Freon
691 Float_t afre[2] = { 12.011,18.9984032 };
692 Float_t zfre[2] = { 6.,9. };
693 Float_t wfre[2] = { 5.,12. };
694 Float_t densfre = 1.5;
695 // Ceramics
696 // 94.4% Al2O3 , 2.8% SiO2 , 2.3% MnO , 0.5% Cr2O3
697 Float_t acer[5] = { 26.981539,15.9994,28.0855,54.93805,51.9961 };
698 Float_t zcer[5] = { 13.,8.,14.,25., 24. };
699 Float_t wcer[5] = { .49976,1.01233,.01307, .01782,.00342 };
700 Float_t denscer = 3.6;
701 //
702 // 60% SiO2 , 40% G10FR4
703 // PC board
704 Float_t apcb[3] = { 28.0855,15.9994,17.749 };
705 Float_t zpcb[3] = { 14.,8.,8.875 };
706 Float_t wpcb[3] = { .28,.32,.4 };
707 Float_t denspcb = 1.8;
708 // POLYETHYL
709 Float_t apoly[2] = { 12.01,1. };
710 Float_t zpoly[2] = { 6.,1. };
711 Float_t wpoly[2] = { .33,.67 };
d12d92a5 712 // old SERVICES
69efe7cb 713 Float_t zserv[4] = { 1.,6.,26.,29. };
714 Float_t aserv[4] = { 1.,12.,55.8,63.5 };
715 Float_t wserv[4] = { .014,.086,.42,.48 };
d12d92a5 716 // Stainless steel
717 Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
718 Float_t zsteel[4] = { 26.,24.,28.,14. };
719 Float_t wsteel[4] = { .715,.18,.1,.005 };
720
69efe7cb 721
722 Int_t isxfld = gAlice->Field()->Integ();
723 Float_t sxmgmx = gAlice->Field()->Max();
724
725
726 // --- Define the various materials for GEANT ---
727
728 // 200-224 --> Silicon Pixel Detectors (detectors, chips, buses, cooling,..)
729
730 AliMaterial(0, "SPD Si$", 28.0855, 14., 2.33, 9.36, 999);
731 AliMaterial(1, "SPD Si chip$", 28.0855, 14., 2.33, 9.36, 999);
732 AliMaterial(2, "SPD Si bus$", 28.0855, 14., 2.33, 9.36, 999);
733 AliMaterial(3, "SPD C$", 12.011, 6., 2.265,18.8, 999);
734 // v. dens
735 AliMaterial(4, "SPD Air$", 14.61, 7.3, .001205, 30423., 999);
736 AliMaterial(5, "SPD Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
737 AliMaterial(6, "SPD Al$", 26.981539, 13., 2.6989, 8.9, 999);
738 AliMixture( 7, "SPD Water $", awat, zwat, denswat, -2, wwat);
739 AliMixture( 8, "SPD Freon$", afre, zfre, densfre, -2, wfre);
6c251614 740 AliMaterial(9, "SPD End ladder$", 55.845, 26., 7.87/10., 1.76*10., 999);
89909db5 741 //AliMaterial(9, "SPD End ladder$", 55.845, 26., -7.87/10., -1.76*10., 999);
d12d92a5 742 AliMaterial(10, "SPD cone$",28.0855, 14., 2.33, 9.36, 999); // check !!!!
69efe7cb 743 // **
d12d92a5 744 AliMedium(0, "SPD Si$", 0, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
745 AliMedium(1, "SPD Si chip$", 1, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
746 AliMedium(2, "SPD Si bus$", 2, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
747 AliMedium(3, "SPD C$", 3, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
748 AliMedium(4, "SPD Air$", 4, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
749 AliMedium(5, "SPD Vacuum$", 5, 0,isxfld,sxmgmx, 10.,1.00, .1, .100,10.00);
750 AliMedium(6, "SPD Al$", 6, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
751 AliMedium(7, "SPD Water $", 7, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
752 AliMedium(8, "SPD Freon$", 8, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
753 AliMedium(9, "SPD End ladder",9, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
754 AliMedium(10, "SPD cone$", 10, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
69efe7cb 755
756 // 225-249 --> Silicon Drift Detectors (detectors, chips, buses, cooling,..)
757
758 AliMaterial(25, "SDD Si$", 28.0855, 14., 2.33, 9.36, 999);
759 AliMaterial(26, "SDD Si chip$", 28.0855, 14., 2.33, 9.36, 999);
760 AliMaterial(27, "SDD Si bus$", 28.0855, 14., 2.33, 9.36, 999);
761 AliMaterial(28, "SDD C$", 12.011, 6., 2.265,18.8, 999);
762 // v. dens
763 AliMaterial(29, "SDD Air$", 14.61, 7.3, .001205, 30423., 999);
764 AliMaterial(30, "SDD Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
765 AliMaterial(31, "SDD Al$", 26.981539, 13., 2.6989, 8.9, 999);
766 // After a call with ratios by number (negative number of elements),
767 // the ratio array is changed to the ratio by weight, so all successive
768 // calls with the same array must specify the number of elements as
769 // positive
770 AliMixture(32, "SDD Water $", awat, zwat, denswat, 2, wwat);
771 // After a call with ratios by number (negative number of elements),
772 // the ratio array is changed to the ratio by weight, so all successive
773 // calls with the same array must specify the number of elements as
774 // positive
775 AliMixture( 33, "SDD Freon$", afre, zfre, densfre, 2, wfre);
776 AliMixture( 34, "SDD PCB$", apcb, zpcb, denspcb, 3, wpcb);
777 AliMaterial(35, "SDD Copper$", 63.546, 29., 8.96, 1.43, 999);
778 AliMixture( 36, "SDD Ceramics$", acer, zcer, denscer, -5, wcer);
779 AliMaterial(37, "SDD Kapton$", 12.011, 6., 1.3, 31.27, 999);
89909db5 780 AliMaterial(38, "SDD End ladder$", 69.9298, 29.8246, 0.3824, 36.5103, 999);
781 AliMaterial(39, "SDD cone$", 63.546, 29., 1.15, 1.265, 999);
782 //AliMaterial(38, "SDD End ladder$", 69.9298, 29.8246, -0.3824, -36.5103, 999);
783 //AliMaterial(39, "SDD cone$", 63.546, 29., -1.15, -1.265, 999);
69efe7cb 784 // **
785 // check A and Z
d12d92a5 786 AliMedium(25, "SDD Si$", 25, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
69efe7cb 787 AliMedium(26, "SDD Si chip$", 26, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
788 AliMedium(27, "SDD Si bus$", 27, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
789 AliMedium(28, "SDD C$", 28, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
790 AliMedium(29, "SDD Air$", 29, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
791 AliMedium(30, "SDD Vacuum$", 30, 0,isxfld,sxmgmx, 10.,1.00, .1, .100,10.00);
792 AliMedium(31, "SDD Al$", 31, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
793 AliMedium(32, "SDD Water $", 32, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
794 AliMedium(33, "SDD Freon$", 33, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
795 AliMedium(34, "SDD PCB$", 34, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
796 AliMedium(35, "SDD Copper$", 35, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
797 AliMedium(36, "SDD Ceramics$",36, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
798 AliMedium(37, "SDD Kapton$", 37, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
d12d92a5 799 AliMedium(38, "SDD End ladder",38, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
800 AliMedium(39, "SDD cone$", 39, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
69efe7cb 801
802 // 250-274 --> Silicon Strip Detectors (detectors, chips, buses, cooling,..)
803
804 AliMaterial(50, "SSD Si$", 28.0855, 14., 2.33, 9.36, 999.);
805 AliMaterial(51, "SSD Si chip$", 28.0855, 14., 2.33, 9.36, 999.);
806 AliMaterial(52, "SSD Si bus$", 28.0855, 14., 2.33, 9.36, 999.);
807 AliMaterial(53, "SSD C$", 12.011, 6., 2.265,18.8, 999.);
808 // v. dens
809 AliMaterial(54, "SSD Air$", 14.61, 7.3, .001205, 30423., 999);
810 AliMaterial(55, "SSD Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
811 AliMaterial(56, "SSD Al$", 26.981539, 13., 2.6989, 8.9, 999);
812 // After a call with ratios by number (negative number of elements),
813 // the ratio array is changed to the ratio by weight, so all successive
814 // calls with the same array must specify the number of elements as
815 // positive
816 AliMixture(57, "SSD Water $", awat, zwat, denswat, 2, wwat);
817 // After a call with ratios by number (negative number of elements),
818 // the ratio array is changed to the ratio by weight, so all successive
819 // calls with the same array must specify the number of elements as
820 // positive
821 AliMixture(58, "SSD Freon$", afre, zfre, densfre, 2, wfre);
822 AliMixture(59, "SSD PCB$", apcb, zpcb, denspcb, 3, wpcb);
823 AliMaterial(60, "SSD Copper$", 63.546, 29., 8.96, 1.43, 999.);
824 // After a call with ratios by number (negative number of elements),
825 // the ratio array is changed to the ratio by weight, so all successive
826 // calls with the same array must specify the number of elements as
827 // positive
828 AliMixture( 61, "SSD Ceramics$", acer, zcer, denscer, 5, wcer);
829 AliMaterial(62, "SSD Kapton$", 12.011, 6., 1.3, 31.27, 999.);
830 // check A and Z
d12d92a5 831 AliMaterial(63, "SSD G10FR4$", 17.749, 8.875, 1.8, 21.822, 999.);
89909db5 832 AliMaterial(64, "SSD End ladder$", 32.0988, 15.4021, 0.68, 35.3238, 999);
833 AliMaterial(65, "SSD cone$",63.546, 29., 1.15, 1.265, 999);
834 //AliMaterial(64, "SSD End ladder$", 32.0988, 15.4021, -0.68, -35.3238, 999);
835 //AliMaterial(65, "SSD cone$",63.546, 29., -1.15, -1.265, 999);
69efe7cb 836 // **
d12d92a5 837 AliMedium(50, "SSD Si$", 50, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
69efe7cb 838 AliMedium(51, "SSD Si chip$", 51, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
839 AliMedium(52, "SSD Si bus$", 52, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
840 AliMedium(53, "SSD C$", 53, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
841 AliMedium(54, "SSD Air$", 54, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
842 AliMedium(55, "SSD Vacuum$", 55, 0,isxfld,sxmgmx, 10.,1.00, .1, .100,10.00);
843 AliMedium(56, "SSD Al$", 56, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
844 AliMedium(57, "SSD Water $", 57, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
845 AliMedium(58, "SSD Freon$", 58, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
846 AliMedium(59, "SSD PCB$", 59, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
847 AliMedium(60, "SSD Copper$", 60, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
848 AliMedium(61, "SSD Ceramics$",61, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
849 AliMedium(62, "SSD Kapton$", 62, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
850 AliMedium(63, "SSD G10FR4$", 63, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
d12d92a5 851 AliMedium(64, "SPD End ladder",64, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
852 AliMedium(65, "SPD cone$", 65, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
69efe7cb 853
854 // 275-299 --> General (end-caps, frames, cooling, cables, etc.)
855
856 AliMaterial(75, "GEN C$", 12.011, 6., 2.265, 18.8, 999.);
857 // verify density
858 AliMaterial(76, "GEN Air$", 14.61, 7.3, .001205, 30423., 999);
859 AliMaterial(77, "GEN Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
860 AliMixture( 78, "GEN POLYETHYL$", apoly, zpoly, .95, -2, wpoly);
861 AliMixture( 79, "GEN SERVICES$", aserv, zserv, 4.68, 4, wserv);
e6892b92 862 AliMaterial(80, "GEN Copper$", 63.546, 29., 8.96, 1.43, 999.);
69efe7cb 863 // After a call with ratios by number (negative number of elements),
864 // the ratio array is changed to the ratio by weight, so all successive
865 // calls with the same array must specify the number of elements as
866 // positive
867 AliMixture(81, "GEN Water $", awat, zwat, denswat, 2, wwat);
e6892b92 868 //AliMaterial(82, "GEN Cables$", 12.011, 6., 2.265, 18.8, 999.); // check !!!
869 //AliMaterial(83, "GEN patch pan$", 12.011, 6., 2.265, 18.8, 999.); // check !!!
870 //AliMaterial(84, "GEN serv$", 12.011, 6., 2.265, 18.8, 999.); // check !!!
d12d92a5 871 AliMixture(85, "GEN Inox$", asteel, zsteel, 7.88, 4, wsteel);
e6892b92 872 AliMaterial(86, "GEN Al$", 26.981539, 13., 2.6989, 8.9, 999);
69efe7cb 873 // **
874 AliMedium(75,"GEN C$", 75, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
875 AliMedium(76,"GEN Air$", 76, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
876 AliMedium(77,"GEN Vacuum$", 77, 0,isxfld,sxmgmx, 10., .10, .1, .100,10.00);
877 AliMedium(78,"GEN POLYETHYL$",78, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
878 AliMedium(79,"GEN SERVICES$", 79, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
879 AliMedium(80,"GEN Copper$", 80, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
880 AliMedium(81,"GEN Water $", 81, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
e6892b92 881 //AliMedium(82,"GEN Cables$", 82, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
882 //AliMedium(83,"GEN patch pan$",83, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
883 //AliMedium(84,"GEN serv$", 84, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
d12d92a5 884 AliMedium(85,"GEN Inox$", 85, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
e6892b92 885 AliMedium(86, "GEN Al$", 86, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
886
69efe7cb 887}
888//_____________________________________________________________________________
889void AliITSvPPRcoarsesymm::Init(){
890////////////////////////////////////////////////////////////////////////
891// Initialise the ITS after it has been created.
892////////////////////////////////////////////////////////////////////////
893
894 //
895 AliITS::Init();
896 fMajorVersion = 1;
897 fMinorVersion = 0;
898}
899
900//_____________________________________________________________________________
901void AliITSvPPRcoarsesymm::DrawModule(){
902////////////////////////////////////////////////////////////////////////
903// Draw a shaded view of the FMD version 6.
904////////////////////////////////////////////////////////////////////////
905
906 // Set everything unseen
907 gMC->Gsatt("*", "seen", -1);
908 //
909 // Set ALIC mother visible
910 gMC->Gsatt("ALIC","SEEN",0);
911 //
912 // Set the volumes visible
913 gMC->Gsatt("ITSD","SEEN",0);
914 gMC->Gsatt("ITS1","SEEN",1);
915 gMC->Gsatt("ITS2","SEEN",1);
916 gMC->Gsatt("ITS3","SEEN",1);
917 gMC->Gsatt("ITS4","SEEN",1);
918 gMC->Gsatt("ITS5","SEEN",1);
919 gMC->Gsatt("ITS6","SEEN",1);
920
921 gMC->Gsatt("IPCB","SEEN",1);
922 gMC->Gsatt("ICO2","SEEN",1);
923 gMC->Gsatt("ICER","SEEN",0);
924 gMC->Gsatt("ISI2","SEEN",0);
925 gMC->Gsatt("IPLA","SEEN",0);
926 gMC->Gsatt("ICO3","SEEN",0);
927 gMC->Gsatt("IEPX","SEEN",0);
928 gMC->Gsatt("ISI3","SEEN",1);
929 gMC->Gsatt("ISUP","SEEN",0);
930 gMC->Gsatt("ICHO","SEEN",0);
931 gMC->Gsatt("ICMO","SEEN",0);
932 gMC->Gsatt("ICMD","SEEN",0);
933 gMC->Gsatt("ICCO","SEEN",1);
934 gMC->Gsatt("ICCM","SEEN",0);
935 gMC->Gsatt("ITMD","SEEN",0);
936 gMC->Gsatt("ITTT","SEEN",1);
937
938 //
939 gMC->Gdopt("hide", "on");
940 gMC->Gdopt("shad", "on");
941 gMC->Gsatt("*", "fill", 7);
942 gMC->SetClipBox(".");
943 gMC->SetClipBox("*", 0, 300, -300, 300, -300, 300);
944 gMC->DefaultRange();
945 gMC->Gdraw("alic", 40, 30, 0, 11, 10, .07, .07);
946 gMC->Gdhead(1111, "Inner Tracking System Version 1");
947 gMC->Gdman(17, 6, "MAN");
948}
949//_____________________________________________________________________________
950void AliITSvPPRcoarsesymm::StepManager(){
951////////////////////////////////////////////////////////////////////////
952// Called for every step in the ITS, then calls the AliITShit class
953// creator with the information to be recoreded about that hit.
954////////////////////////////////////////////////////////////////////////
c6e3abc5 955
956/*
69efe7cb 957 Int_t copy, id;
958 Float_t hits[8];
959 Int_t vol[4];
960 TLorentzVector position, momentum;
961// TClonesArray &lhits = *fHits;
962//
963// no hits for this coarse symmetric version.
964//
965
966 //
967 // Track status
968 vol[3] = 0;
969 if(gMC->IsTrackInside()) vol[3] += 1;
970 if(gMC->IsTrackEntering()) vol[3] += 2;
971 if(gMC->IsTrackExiting()) vol[3] += 4;
972 if(gMC->IsTrackOut()) vol[3] += 8;
973 if(gMC->IsTrackDisappeared()) vol[3] += 16;
974 if(gMC->IsTrackStop()) vol[3] += 32;
975 if(gMC->IsTrackAlive()) vol[3] += 64;
976 //
977 // Fill hit structure.
978 if( !(gMC->TrackCharge()) ) return;
979 //
980 // Only entering charged tracks
981 if((id=gMC->CurrentVolID(copy))==fIdSens[0]) {
982 vol[0]=1;
983 id=gMC->CurrentVolOffID(1,copy);
984 vol[1]=copy;
985 id=gMC->CurrentVolOffID(2,copy);
986 vol[2]=copy;
987 } else if(id==fIdSens[1]) {
988 vol[0]=2;
989 id=gMC->CurrentVolOffID(1,copy);
990 vol[1]=copy;
991 id=gMC->CurrentVolOffID(2,copy);
992 vol[2]=copy;
993 } else if(id==fIdSens[2]) {
994 vol[0]=3;
995 vol[1]=copy;
996 id=gMC->CurrentVolOffID(1,copy);
997 vol[2]=copy;
998 } else if(id==fIdSens[3]) {
999 vol[0]=4;
1000 vol[1]=copy;
1001 id=gMC->CurrentVolOffID(1,copy);
1002 vol[2]=copy;
1003 } else if(id==fIdSens[4]) {
1004 vol[0]=5;
1005 vol[1]=copy;
1006 id=gMC->CurrentVolOffID(1,copy);
1007 vol[2]=copy;
1008 } else if(id==fIdSens[5]) {
1009 vol[0]=6;
1010 vol[1]=copy;
1011 id=gMC->CurrentVolOffID(1,copy);
1012 vol[2]=copy;
1013 } else return;
1014 gMC->TrackPosition(position);
1015 gMC->TrackMomentum(momentum);
1016 hits[0]=position[0];
1017 hits[1]=position[1];
1018 hits[2]=position[2];
1019 hits[3]=momentum[0];
1020 hits[4]=momentum[1];
1021 hits[5]=momentum[2];
1022 hits[6]=gMC->Edep();
1023 hits[7]=gMC->TrackTime();
1024// new(lhits[fNhits++]) AliITShit(fIshunt,gAlice->CurrentTrack(),vol,hits);
1025//
1026// no hits for this coarse symmetric version.
1027//
c6e3abc5 1028*/
69efe7cb 1029}
1030/*
1031//____________________________________________________________________________
1032void AliITSvPPRcoarsesymm::Streamer(TBuffer &R__b){
1033////////////////////////////////////////////////////////////////////////
1034// A dummy Streamer function for this class AliITSvPPRcoarsesymm. By default it
1035// only streams the AliITS class as it is required. Since this class
1036// dosen't contain any "real" data to be saved, it doesn't.
1037////////////////////////////////////////////////////////////////////////
1038
1039 if (R__b.IsReading()) {
1040 Version_t R__v = R__b.ReadVersion(); if (R__v) { }
1041 AliITS::Streamer(R__b);
1042 } else {
1043 R__b.WriteVersion(AliITSvPPRcoarsesymm::IsA());
1044 AliITS::Streamer(R__b);
1045 } // end if R__b.IsReading()
1046}
1047*/