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