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