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