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