ITS/AliITSv1.cxx

   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 1                                           //
  21 //  This class contains the base procedures for the Inner Tracking System    //
  22 //                                                                           //
  23 // Authors: R. Barbera, A. Morsch.
  24 // version 1.
  25 // Created  1998.
  26 //
  27 //  NOTE: THIS IS THE COARSE pre.TDR geometry of the ITS. THIS WILL NOT WORK
  28 // with the geometry or module classes or any analysis classes. You are
  29 // strongly encouraged to uses AliITSv5.
  30 //                                                                           //
  31 ///////////////////////////////////////////////////////////////////////////////
  32
  33 #include <TCanvas.h>
  34 #include <TClonesArray.h>
  35 #include <TFile.h>    // only required for Tracking function?
  36 #include <TGeometry.h>
  37 #include <TMath.h>
  38 #include <TNode.h>
  39 #include <TObjArray.h>
  40 #include <TObjString.h>
  41 #include <TRandom.h>
  42 #include <TTUBE.h>
  43 #include <TVector.h>
  44 #include <TVirtualMC.h>
  45
  46 #include "AliConst.h"
  47 #include "AliITShit.h"
  48 #include "AliITSv1.h"
  49 #include "AliMagF.h"
  50 #include "AliRun.h"
  51
  52 ClassImp(AliITSv1)
  53
  54 //_____________________________________________________________________________
  55 AliITSv1::AliITSv1() {
  56 ////////////////////////////////////////////////////////////////////////
  57 //    Standard default constructor for the ITS version 1.
  58 ////////////////////////////////////////////////////////////////////////
  59
  60   fIdN    = 0;
  61   fIdName = 0;
  62   fIdSens = 0;
  63   fMajorVersion = 1;
  64   fMinorVersion = -1;
  65 }
  66 //_____________________________________________________________________________
  67 AliITSv1::AliITSv1(const char *name, const char *title) : AliITS(name, title){
  68 ////////////////////////////////////////////////////////////////////////
  69 //    Standard constructor for the ITS version 1.
  70 ////////////////////////////////////////////////////////////////////////
  71
  72     fIdN    = 6;
  73 /*
  74 //  TObjArray of TObjStrings
  75     fIdName = new TObjArray(fIdN);
  76     fIdName->AddAt(new TObjString("ITS1"),0);
  77     fIdName->AddAt(new TObjString("ITS2"),1);
  78     fIdName->AddAt(new TObjString("ITS3"),2);
  79     fIdName->AddAt(new TObjString("ITS4"),3);
  80     fIdName->AddAt(new TObjString("ITS5"),4);
  81     fIdName->AddAt(new TObjString("ITS6"),5);
  82 */
  83 //  Array of TStrings.
  84     fIdName    = new TString[fIdN];
  85     fIdName[0] = "ITS1";
  86     fIdName[1] = "ITS2";
  87     fIdName[2] = "ITS3";
  88     fIdName[3] = "ITS4";
  89     fIdName[4] = "ITS5";
  90     fIdName[5] = "ITS6";
  91     fIdSens    = new Int_t[fIdN];
  92     for (Int_t i=0;i<fIdN;i++) fIdSens[i] = 0;
  93     fMajorVersion = 1;
  94     fMinorVersion = 1;
  95
  96 }
  97 //____________________________________________________________________________
  98 AliITSv1::AliITSv1(const AliITSv1 &source){
  99 ////////////////////////////////////////////////////////////////////////
 100 //     Copy Constructor for ITS version 1.
 101 ////////////////////////////////////////////////////////////////////////
 102     if(&source == this) return;
 103     printf("Not allowed to copy AliITSv1\n");
 104     return;
 105 }
 106 //_____________________________________________________________________________
 107 AliITSv1& AliITSv1::operator=(const AliITSv1 &source){
 108 ////////////////////////////////////////////////////////////////////////
 109 //    Assignment operator for the ITS version 1.
 110 ////////////////////////////////////////////////////////////////////////
 111   if(&source == this) return *this;
 112     printf("Not allowed to copy AliITSv1\n");
 113   return *this;
 114 }
 115 //_____________________________________________________________________________
 116 AliITSv1::~AliITSv1() {
 117 ////////////////////////////////////////////////////////////////////////
 118 //    Standard destructor for the ITS version 1.
 119 ////////////////////////////////////////////////////////////////////////
 120 }
 121
 122 //__________________________________________________________________________
 123 void AliITSv1::BuildGeometry(){
 124 ////////////////////////////////////////////////////////////////////////
 125 //    Geometry builder for the ITS version 1.
 126 ////////////////////////////////////////////////////////////////////////
 127     TNode *node, *top;
 128     const int kColorITS=kYellow;
 129     //
 130     top = gAlice->GetGeometry()->GetNode("alice");
 131
 132     new TTUBE("S_layer1","Layer1 of ITS","void",3.9,3.9+0.05475,12.25);
 133     top->cd();
 134     node = new TNode("Layer1","Layer1","S_layer1",0,0,0,"");
 135     node->SetLineColor(kColorITS);
 136     fNodes->Add(node);
 137
 138     new TTUBE("S_layer2","Layer2 of ITS","void",7.6,7.6+0.05475,16.3);
 139     top->cd();
 140     node = new TNode("Layer2","Layer2","S_layer2",0,0,0,"");
 141     node->SetLineColor(kColorITS);
 142     fNodes->Add(node);
 143
 144     new TTUBE("S_layer3","Layer3 of ITS","void",14,14+0.05288,21.1);
 145     top->cd();
 146     node = new TNode("Layer3","Layer3","S_layer3",0,0,0,"");
 147     node->SetLineColor(kColorITS);
 148     fNodes->Add(node);
 149
 150     new TTUBE("S_layer4","Layer4 of ITS","void",24,24+0.05288,29.6);
 151     top->cd();
 152     node = new TNode("Layer4","Layer4","S_layer4",0,0,0,"");
 153     node->SetLineColor(kColorITS);
 154     fNodes->Add(node);
 155
 156     new TTUBE("S_layer5","Layer5 of ITS","void",40,40+0.05382,45.1);
 157     top->cd();
 158     node = new TNode("Layer5","Layer5","S_layer5",0,0,0,"");
 159     node->SetLineColor(kColorITS);
 160     fNodes->Add(node);
 161
 162     new TTUBE("S_layer6","Layer6 of ITS","void",45,45+0.05382,50.4);
 163     top->cd();
 164     node = new TNode("Layer6","Layer6","S_layer6",0,0,0,"");
 165     node->SetLineColor(kColorITS);
 166     fNodes->Add(node);
 167 }
 168 //_____________________________________________________________________________
 169 void AliITSv1::CreateGeometry(){
 170 ////////////////////////////////////////////////////////////////////////
 171 //    This routine defines and Creates the geometry for version 1 of the ITS.
 172 ////////////////////////////////////////////////////////////////////////
 173
 174   Float_t drcer[6] = { 0.,0.,.08,.08,0.,0. };           //CERAMICS THICKNESS
 175   Float_t drepx[6] = { 0.,0.,0.,0.,.5357,.5357 };       //EPOXY THICKNESS
 176   Float_t drpla[6] = { 0.,0.,0.,0.,.1786,.1786 };       //PLASTIC THICKNESS
 177   Float_t dzb[6]   = { 0.,0.,15.,15.,4.,4. };           //LENGTH OF BOXES
 178   Float_t dphi[6]  = { 72.,72.,72.,72.,50.6,45. };      //COVERED PHI-RANGE FOR LAYERS 1-6
 179   Float_t rl[6]    = { 3.9,7.6,14.,24.,40.,45. };       //SILICON LAYERS INNER RADIUS
 180   Float_t drl[6]   = { .755,.755,.809,.809,.7,.7 };     //THICKNESS OF LAYERS (in % radiation length)
 181   Float_t dzl[6]   = { 12.67,16.91,20.85,29.15,45.11,50.975 };//HALF LENGTH OF LAYERS
 182   Float_t drpcb[6] = { 0.,0.,.06,.06,0.,0. };           //PCB THICKNESS
 183   Float_t drcu[6]  = { 0.,0.,.0504,.0504,.0357,.0357 }; //COPPER THICKNESS
 184   Float_t drsi[6]  = { 0.,0.,.006,.006,.3571,.3571 };   //SILICON THICKNESS
 185
 186   Float_t drca, dzfc;
 187   Int_t i, nsec;
 188   Float_t rend, drcatpc, dzco, zend, dits[3], rlim, drsu, zmax;
 189   Float_t zpos, dzco1, dzco2;
 190   Float_t drcac[6], acone, dphii;
 191   Float_t pcits[15], xltpc;
 192   Float_t rzcone, rstep, r0, z0, acable, fp, dz, zi, ri;
 193   Int_t idrotm[399];
 194   Float_t dgh[15];
 195
 196   Int_t *idtmed = fIdtmed->GetArray()-199;
 197
 198   //     CONVERT INTO CM (RL(SI)=9.36 CM)
 199   for (i = 0; i < 6; ++i) {
 200     drl[i] = drl[i] / 100. * 9.36;
 201   }
 202
 203   //     SUPPORT ENDPLANE THICKNESS
 204   drsu = 2.*0.06+1./20;  // 1./20. is 1 cm of honeycomb (1/20 carbon density);
 205
 206   //     CONE BELOW TPC
 207
 208   drcatpc = 1.2/4.;
 209
 210   //     CABLE THICKNESS (CONICAL CABLES CONNECTING THE LAYERS)
 211
 212   drca = 0.2;
 213
 214   //     ITS CONE ANGLE
 215
 216   acone  = 45.;
 217   acone *= kDegrad;
 218
 219   //     CONE RADIUS AT 1ST LAYER
 220
 221   rzcone = 30.;
 222
 223   //     FIELD CAGE HALF LENGTH
 224
 225   dzfc  = 64.5;
 226   rlim  = 48.;
 227   zmax  = 80.;
 228   xltpc = 275.;
 229
 230
 231   //     PARAMETERS FOR SMALL (1/2) ITS
 232 /*
 233   for (i = 0; i < 6; ++i) {
 234     dzl[i] /= 2.;
 235     dzb[i] /= 2.;
 236   }
 237   drca     /= 2.;
 238   acone    /= 2.;
 239   drcatpc /= 2.;
 240   rzcone   /= 2.;
 241   dzfc     /= 2.;
 242   zmax     /= 2.;
 243   xltpc    /= 2.;
 244 */
 245   acable    = 15.;
 246
 247
 248   //     EQUAL DISTRIBUTION INTO THE 6 LAYERS
 249   rstep = drcatpc / 6.;
 250   for (i = 0; i < 6; ++i) {
 251     drcac[i] = (i+1) * rstep;
 252   }
 253
 254   //     NUMBER OF PHI SECTORS
 255
 256   nsec = 5;
 257
 258   //     PACK IN PHI AS MUCH AS POSSIBLE
 259   //     NOW PACK USING THICKNESS
 260
 261   for (i = 0; i < 6; ++i) {
 262
 263 //     PACKING FACTOR
 264     fp = rl[5] / rl[i];
 265
 266     //      PHI-PACKING NOT SUFFICIENT ?
 267
 268     if (dphi[i]/45 < fp) {
 269       drcac[i] = drcac[i] * fp * 45/dphi[i];
 270     }
 271   }
 272
 273
 274   // --- Define ghost volume containing the six layers and fill it with air
 275
 276   dgh[0] = 3.5;
 277   dgh[1] = 50.;
 278   dgh[2] = zmax;
 279   gMC->Gsvolu("ITSV", "TUBE", idtmed[275], dgh, 3);
 280
 281   // --- Place the ghost volume in its mother volume (ALIC) and make it
 282   //     invisible
 283
 284   gMC->Gspos("ITSV", 1, "ALIC", 0., 0., 0., 0, "ONLY");
 285   gMC->Gsatt("ITSV", "SEEN", 0);
 286
 287   //     ITS LAYERS (SILICON)
 288
 289   dits[0] = rl[0];
 290   dits[1] = rl[0] + drl[0];
 291   dits[2] = dzl[0];
 292   gMC->Gsvolu("ITS1", "TUBE", idtmed[199], dits, 3);
 293   gMC->Gspos("ITS1", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 294
 295   dits[0] = rl[1];
 296   dits[1] = rl[1] + drl[1];
 297   dits[2] = dzl[1];
 298   gMC->Gsvolu("ITS2", "TUBE", idtmed[199], dits, 3);
 299   gMC->Gspos("ITS2", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 300
 301   dits[0] = rl[2];
 302   dits[1] = rl[2] + drl[2];
 303   dits[2] = dzl[2];
 304   gMC->Gsvolu("ITS3", "TUBE", idtmed[224], dits, 3);
 305   gMC->Gspos("ITS3", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 306
 307   dits[0] = rl[3];
 308   dits[1] = rl[3] + drl[3];
 309   dits[2] = dzl[3];
 310   gMC->Gsvolu("ITS4", "TUBE", idtmed[224], dits, 3);
 311   gMC->Gspos("ITS4", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 312
 313   dits[0] = rl[4];
 314   dits[1] = rl[4] + drl[4];
 315   dits[2] = dzl[4];
 316   gMC->Gsvolu("ITS5", "TUBE", idtmed[249], dits, 3);
 317   gMC->Gspos("ITS5", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 318
 319   dits[0] = rl[5];
 320   dits[1] = rl[5] + drl[5];
 321   dits[2] = dzl[5];
 322   gMC->Gsvolu("ITS6", "TUBE", idtmed[249], dits, 3);
 323   gMC->Gspos("ITS6", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 324
 325   //    ELECTRONICS BOXES
 326
 327   //     PCB (layer #3 and #4)
 328
 329   gMC->Gsvolu("IPCB", "TUBE", idtmed[233], dits, 0);
 330   for (i = 2; i < 4; ++i) {
 331     dits[0] = rl[i];
 332     dits[1] = dits[0] + drpcb[i];
 333     dits[2] = dzb[i] / 2.;
 334     zpos = dzl[i] + dits[2];
 335     gMC->Gsposp("IPCB", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 336     gMC->Gsposp("IPCB", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 337   }
 338
 339   //     COPPER (layer #3 and #4)
 340
 341   gMC->Gsvolu("ICO2", "TUBE", idtmed[234], dits, 0);
 342   for (i = 2; i < 4; ++i) {
 343     dits[0] = rl[i] + drpcb[i];
 344     dits[1] = dits[0] + drcu[i];
 345     dits[2] = dzb[i] / 2.;
 346     zpos = dzl[i] + dits[2];
 347     gMC->Gsposp("ICO2", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 348     gMC->Gsposp("ICO2", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 349   }
 350
 351   //     CERAMICS (layer #3 and #4)
 352
 353   gMC->Gsvolu("ICER", "TUBE", idtmed[235], dits, 0);
 354   for (i = 2; i < 4; ++i) {
 355     dits[0] = rl[i] + drpcb[i] + drcu[i];
 356     dits[1] = dits[0] + drcer[i];
 357     dits[2] = dzb[i] / 2.;
 358     zpos = dzl[i] + dits[2];
 359     gMC->Gsposp("ICER", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 360     gMC->Gsposp("ICER", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 361   }
 362
 363   //     SILICON (layer #3 and #4)
 364
 365   gMC->Gsvolu("ISI2", "TUBE", idtmed[226], dits, 0);
 366   for (i = 2; i < 4; ++i) {
 367     dits[0] = rl[i] + drpcb[i] + drcu[i] + drcer[i];
 368     dits[1] = dits[0] + drsi[i];
 369     dits[2] = dzb[i] / 2.;
 370     zpos = dzl[i] + dits[2];
 371     gMC->Gsposp("ISI2", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 372     gMC->Gsposp("ISI2", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 373   }
 374
 375   //     PLASTIC (G10FR4) (layer #5 and #6)
 376
 377   gMC->Gsvolu("IPLA", "TUBE", idtmed[262], dits, 0);
 378   for (i = 4; i < 6; ++i) {
 379     dits[0] = rl[i];
 380     dits[1] = dits[0] + drpla[i];
 381     dits[2] = dzb[i] / 2.;
 382     zpos = dzl[i] + dits[2];
 383     gMC->Gsposp("IPLA", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 384     gMC->Gsposp("IPLA", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 385   }
 386
 387   //     COPPER (layer #5 and #6)
 388
 389   gMC->Gsvolu("ICO3", "TUBE", idtmed[259], dits, 0);
 390   for (i = 4; i < 6; ++i) {
 391     dits[0] = rl[i] + drpla[i];
 392     dits[1] = dits[0] + drcu[i];
 393     dits[2] = dzb[i] / 2.;
 394     zpos = dzl[i] + dits[2];
 395     gMC->Gsposp("ICO3", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 396     gMC->Gsposp("ICO3", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 397   }
 398
 399   //     EPOXY (layer #5 and #6)
 400
 401   gMC->Gsvolu("IEPX", "TUBE", idtmed[262], dits, 0);
 402   for (i = 4; i < 6; ++i) {
 403     dits[0] = rl[i] + drpla[i] + drcu[i];
 404     dits[1] = dits[0] + drepx[i];
 405     dits[2] = dzb[i] / 2.;
 406     zpos = dzl[i] + dits[2];
 407     gMC->Gsposp("IEPX", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 408     gMC->Gsposp("IEPX", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 409   }
 410
 411   //     SILICON (layer #5 and #6)
 412
 413   gMC->Gsvolu("ISI3", "TUBE", idtmed[251], dits, 0);
 414   for (i = 4; i < 6; ++i) {
 415     dits[0] = rl[i] + drpla[i] + drcu[i] + drepx[i];
 416     dits[1] = dits[0] + drsi[i];
 417     dits[2] = dzb[i] / 2.;
 418     zpos = dzl[i] + dits[2];
 419     gMC->Gsposp("ISI3", i-1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 420     gMC->Gsposp("ISI3", i+1, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 421   }
 422
 423   //    SUPPORT
 424
 425   gMC->Gsvolu("ISUP", "TUBE", idtmed[274], dits, 0);
 426   for (i = 0; i < 6; ++i) {
 427     dits[0] = rl[i];
 428     if (i < 5) dits[1] = rl[i+1];
 429     else       dits[1] = rlim;
 430     dits[2] = drsu / 2.;
 431     zpos = dzl[i] + dzb[i] + dits[2];
 432     gMC->Gsposp("ISUP", i+1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 433     gMC->Gsposp("ISUP", i+7, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 434   }
 435
 436   // CABLES (HORIZONTAL)
 437
 438   gMC->Gsvolu("ICHO", "TUBE", idtmed[278], dits, 0);
 439   for (i = 0; i < 6; ++i) {
 440     dits[0] = rl[i];
 441     dits[1] = dits[0] + drca;
 442     dits[2] = (rzcone + TMath::Tan(acone) * (rl[i] - rl[0]) - (dzl[i]+ dzb[i] + drsu)) / 2.;
 443     zpos = dzl[i - 1] + dzb[i] + drsu + dits[2];
 444     gMC->Gsposp("ICHO", i+1, "ITSV", 0., 0., zpos, 0, "ONLY", dits, 3);
 445     gMC->Gsposp("ICHO", i+7, "ITSV", 0., 0.,-zpos, 0, "ONLY", dits, 3);
 446   }
 447   //    DEFINE A CONICAL GHOST VOLUME FOR THE PHI SEGMENTATION
 448   pcits[0] = 0.;
 449   pcits[1] = 360.;
 450   pcits[2] = 2.;
 451   pcits[3] = rzcone;
 452   pcits[4] = 3.5;
 453   pcits[5] = rl[0];
 454   pcits[6] = pcits[3] + TMath::Tan(acone) * (rlim - rl[0]);
 455   pcits[7] = rlim - rl[0] + 3.5;
 456   pcits[8] = rlim;
 457   gMC->Gsvolu("ICMO", "PCON", idtmed[275], pcits, 9);
 458   AliMatrix(idrotm[200], 90., 0., 90., 90., 180., 0.);
 459   gMC->Gspos("ICMO", 1, "ITSV", 0., 0., 0., 0, "ONLY");
 460   gMC->Gspos("ICMO", 2, "ITSV", 0., 0., 0., idrotm[200], "ONLY");
 461
 462   //     DIVIDE INTO NSEC PHI-SECTIONS
 463
 464   gMC->Gsdvn("ICMD", "ICMO", nsec, 2);
 465   gMC->Gsatt("ICMO", "SEEN", 0);
 466   gMC->Gsatt("ICMD", "SEEN", 0);
 467
 468   //     CONICAL CABLES
 469
 470   pcits[2] = 2.;
 471   gMC->Gsvolu("ICCO", "PCON", idtmed[278], pcits, 0);
 472   for (i = 1; i < 6; ++i) {
 473     pcits[0] = -dphi[i] / 2.;
 474     pcits[1] = dphi[i];
 475     if (i < 5) {
 476       dzco = TMath::Tan(acone) * (rl[i+1] - rl[i]);
 477     } else {
 478       dzco1 = zmax - (rzcone + TMath::Tan(acone) * (rl[5] - rl[0])) -2.;
 479       dzco2 = (rlim - rl[5]) * TMath::Tan(acone);
 480       if (rl[5] + dzco1 / TMath::Tan(acone) < rlim) {
 481         dzco = dzco1;
 482       } else {
 483         dzco = dzco2;
 484       }
 485     }
 486     pcits[3] = rzcone + TMath::Tan(acone) * (rl[i] - rl[0]);
 487     pcits[4] = rl[i] - drcac[i] / TMath::Sin(acone);
 488     pcits[5] = rl[i];
 489     pcits[6] = pcits[3] + dzco;
 490     pcits[7] = rl[i] + dzco / TMath::Tan(acone) - drcac[i] / TMath::Sin(acone);
 491     pcits[8] = rl[i] + dzco / TMath::Tan(acone);
 492
 493     gMC->Gsposp("ICCO", i, "ICMD", 0., 0., 0., 0, "ONLY", pcits, 9);
 494
 495   }
 496   zend = pcits[6];
 497   rend = pcits[8];
 498
 499   //  CONICAL CABLES BELOW TPC
 500
 501   //    DEFINE A CONICAL GHOST VOLUME FOR THE PHI SEGMENTATION
 502   pcits[0] = 0.;
 503   pcits[1] = 360.;
 504   pcits[2] = 2.;
 505   pcits[3] = zend;
 506   pcits[5] = rend;
 507   pcits[4] = pcits[5] - drcatpc;
 508   pcits[6] = xltpc;
 509   pcits[8] = pcits[4] + (pcits[6] - pcits[3]) * TMath::Tan(acable * kDegrad);
 510   pcits[7] = pcits[8] - drcatpc;
 511   AliMatrix(idrotm[200], 90., 0., 90., 90., 180., 0.);
 512   gMC->Gsvolu("ICCM", "PCON", idtmed[275], pcits, 9);
 513   gMC->Gspos("ICCM", 1, "ALIC", 0., 0., 0., 0, "ONLY");
 514   gMC->Gspos("ICCM", 2, "ALIC", 0., 0., 0., idrotm[200], "ONLY");
 515   gMC->Gsdvn("ITMD", "ICCM", nsec, 2);
 516   gMC->Gsatt("ITMD", "SEEN", 0);
 517   gMC->Gsatt("ICCM", "SEEN", 0);
 518
 519   //     NOW PLACE SEGMENTS WITH DECREASING PHI SEGMENTS INTO THE
 520   //     GHOST-VOLUME
 521
 522   pcits[2] = 2.;
 523   gMC->Gsvolu("ITTT", "PCON", idtmed[278], pcits, 0);
 524   r0 = rend;
 525   z0 = zend;
 526   dz = (xltpc - zend) / 9.;
 527   for (i = 0; i < 9; ++i) {
 528     zi = z0 + i*dz + dz / 2.;
 529     ri = r0 + (zi - z0) * TMath::Tan(acable * kDegrad);
 530     dphii = dphi[5] * r0 / ri;
 531     pcits[0] = -dphii / 2.;
 532     pcits[1] = dphii;
 533     pcits[3] = zi - dz / 2.;
 534     pcits[5] = r0 + (pcits[3] - z0) * TMath::Tan(acable * kDegrad);
 535     pcits[4] = pcits[5] - drcatpc;
 536     pcits[6] = zi + dz / 2.;
 537     pcits[8] = r0 + (pcits[6] - z0) * TMath::Tan(acable * kDegrad);
 538     pcits[7] = pcits[8] - drcatpc;
 539
 540     gMC->Gsposp("ITTT", i+1, "ITMD", 0., 0., 0., 0, "ONLY", pcits, 9);
 541   }
 542
 543   // --- Outputs the geometry tree in the EUCLID/CAD format
 544
 545   if (fEuclidOut) {
 546     gMC->WriteEuclid("ITSgeometry", "ITSV", 1, 5);
 547   }
 548 }
 549 //_____________________________________________________________________________
 550 void AliITSv1::CreateMaterials(){
 551 ////////////////////////////////////////////////////////////////////////
 552   //
 553   // Create ITS materials
 554   //     This function defines the default materials used in the Geant
 555   // Monte Carlo simulations for the geometries AliITSv1 and AliITSv3.
 556   // In general it is automatically replaced by
 557   // the CreatMaterials routine defined in AliITSv?. Should the function
 558   // CreateMaterials not exist for the geometry version you are using this
 559   // one is used. See the definition found in AliITSv5 or the other routine
 560   // for a complete definition.
 561   //
 562   // Water H2O
 563   Float_t awat[2]  = { 1.00794,15.9994 };
 564   Float_t zwat[2]  = { 1.,8. };
 565   Float_t wwat[2]  = { 2.,1. };
 566   Float_t denswat  = 1.;
 567   // Freon
 568   Float_t afre[2]  = { 12.011,18.9984032 };
 569   Float_t zfre[2]  = { 6.,9. };
 570   Float_t wfre[2]  = { 5.,12. };
 571   Float_t densfre  = 1.5;
 572   // Ceramics
 573   //     94.4% Al2O3 , 2.8% SiO2 , 2.3% MnO , 0.5% Cr2O3
 574   Float_t acer[5]  = { 26.981539,15.9994,28.0855,54.93805,51.9961 };
 575   Float_t zcer[5]  = { 13.,8.,14.,25.,      24. };
 576   Float_t wcer[5]  = { .49976,1.01233,.01307,       .01782,.00342 };
 577   Float_t denscer  = 3.6;
 578   //
 579   //     60% SiO2 , 40% G10FR4
 580   // PC board
 581   Float_t apcb[3]  = { 28.0855,15.9994,17.749 };
 582   Float_t zpcb[3]  = { 14.,8.,8.875 };
 583   Float_t wpcb[3]  = { .28,.32,.4 };
 584   Float_t denspcb  = 1.8;
 585   // POLYETHYL
 586   Float_t apoly[2] = { 12.01,1. };
 587   Float_t zpoly[2] = { 6.,1. };
 588   Float_t wpoly[2] = { .33,.67 };
 589   // SERVICES
 590   Float_t zserv[4] = { 1.,6.,26.,29. };
 591   Float_t aserv[4] = { 1.,12.,55.8,63.5 };
 592   Float_t wserv[4] = { .014,.086,.42,.48 };
 593
 594   Int_t  isxfld  = gAlice->Field()->Integ();
 595   Float_t sxmgmx = gAlice->Field()->Max();
 596
 597
 598   // --- Define the various materials for GEANT ---
 599
 600   //  200-224 --> Silicon Pixel Detectors (detectors, chips, buses, cooling,..)
 601
 602   AliMaterial(0, "SPD Si$",      28.0855, 14., 2.33, 9.36, 999);
 603   AliMaterial(1, "SPD Si chip$", 28.0855, 14., 2.33, 9.36, 999);
 604   AliMaterial(2, "SPD Si bus$",  28.0855, 14., 2.33, 9.36, 999);
 605   AliMaterial(3, "SPD C$",       12.011,   6., 2.265,18.8, 999);
 606   // v. dens
 607   AliMaterial(4, "SPD Air$",    14.61, 7.3, .001205, 30423., 999);
 608   AliMaterial(5, "SPD Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
 609   AliMaterial(6, "SPD Al$",     26.981539, 13., 2.6989, 8.9, 999);
 610   AliMixture( 7, "SPD Water $", awat, zwat, denswat, -2, wwat);
 611   AliMixture( 8, "SPD Freon$",  afre, zfre, densfre, -2, wfre);
 612   // **
 613   AliMedium(0, "SPD Si$",      0, 1,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 614   AliMedium(1, "SPD Si chip$", 1, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 615   AliMedium(2, "SPD Si bus$",  2, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 616   AliMedium(3, "SPD C$",       3, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 617   AliMedium(4, "SPD Air$",     4, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 618   AliMedium(5, "SPD Vacuum$",  5, 0,isxfld,sxmgmx, 10.,1.00, .1, .100,10.00);
 619   AliMedium(6, "SPD Al$",      6, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 620   AliMedium(7, "SPD Water $",  7, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 621   AliMedium(8, "SPD Freon$",   8, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 622
 623   //  225-249 --> Silicon Drift Detectors (detectors, chips, buses, cooling,..)
 624
 625   AliMaterial(25, "SDD Si$",      28.0855, 14., 2.33,  9.36, 999);
 626   AliMaterial(26, "SDD Si chip$", 28.0855, 14., 2.33,  9.36, 999);
 627   AliMaterial(27, "SDD Si bus$",  28.0855, 14., 2.33,  9.36, 999);
 628   AliMaterial(28, "SDD C$",       12.011,   6., 2.265,18.8,  999);
 629   // v. dens
 630   AliMaterial(29, "SDD Air$",     14.61, 7.3, .001205, 30423., 999);
 631   AliMaterial(30, "SDD Vacuum$",  1e-16, 1e-16, 1e-16, 1e16,  1e16);
 632   AliMaterial(31, "SDD Al$",      26.981539, 13., 2.6989, 8.9, 999);
 633   // After a call with ratios by number (negative number of elements),
 634   // the ratio array is changed to the ratio by weight, so all successive
 635   // calls with the same array must specify the number of elements as
 636   // positive
 637   AliMixture(32, "SDD Water $", awat, zwat, denswat, 2, wwat);
 638   // After a call with ratios by number (negative number of elements),
 639   // the ratio array is changed to the ratio by weight, so all successive
 640   // calls with the same array must specify the number of elements as
 641   // positive
 642   AliMixture( 33, "SDD Freon$", afre, zfre, densfre, 2, wfre);
 643   AliMixture( 34, "SDD PCB$",   apcb, zpcb, denspcb, 3, wpcb);
 644   AliMaterial(35, "SDD Copper$", 63.546, 29., 8.96, 1.43, 999);
 645   AliMixture( 36, "SDD Ceramics$", acer, zcer, denscer, -5, wcer);
 646   AliMaterial(37, "SDD Kapton$", 12.011, 6., 1.3, 31.27, 999);
 647   // **
 648   // check A and Z
 649   AliMedium(25, "SDD Si$",      25, 1,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 650   AliMedium(26, "SDD Si chip$", 26, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 651   AliMedium(27, "SDD Si bus$",  27, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 652   AliMedium(28, "SDD C$",       28, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 653   AliMedium(29, "SDD Air$",     29, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 654   AliMedium(30, "SDD Vacuum$",  30, 0,isxfld,sxmgmx, 10.,1.00, .1, .100,10.00);
 655   AliMedium(31, "SDD Al$",      31, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 656   AliMedium(32, "SDD Water $",  32, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 657   AliMedium(33, "SDD Freon$",   33, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 658   AliMedium(34, "SDD PCB$",     34, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 659   AliMedium(35, "SDD Copper$",  35, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 660   AliMedium(36, "SDD Ceramics$",36, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 661   AliMedium(37, "SDD Kapton$",  37, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 662
 663   //  250-274 --> Silicon Strip Detectors (detectors, chips, buses, cooling,..)
 664
 665   AliMaterial(50, "SSD Si$",      28.0855, 14., 2.33, 9.36, 999.);
 666   AliMaterial(51, "SSD Si chip$", 28.0855, 14., 2.33, 9.36, 999.);
 667   AliMaterial(52, "SSD Si bus$",  28.0855, 14., 2.33, 9.36, 999.);
 668   AliMaterial(53, "SSD C$",       12.011,   6., 2.265,18.8, 999.);
 669   // v. dens
 670   AliMaterial(54, "SSD Air$",     14.61, 7.3, .001205, 30423., 999);
 671   AliMaterial(55, "SSD Vacuum$",  1e-16, 1e-16, 1e-16, 1e16, 1e16);
 672   AliMaterial(56, "SSD Al$",      26.981539, 13., 2.6989, 8.9, 999);
 673   // After a call with ratios by number (negative number of elements),
 674   // the ratio array is changed to the ratio by weight, so all successive
 675   // calls with the same array must specify the number of elements as
 676   // positive
 677   AliMixture(57, "SSD Water $", awat, zwat, denswat, 2, wwat);
 678   // After a call with ratios by number (negative number of elements),
 679   // the ratio array is changed to the ratio by weight, so all successive
 680   // calls with the same array must specify the number of elements as
 681   // positive
 682   AliMixture(58, "SSD Freon$", afre, zfre, densfre, 2, wfre);
 683   AliMixture(59, "SSD PCB$",   apcb, zpcb, denspcb, 3, wpcb);
 684   AliMaterial(60, "SSD Copper$", 63.546, 29., 8.96, 1.43, 999.);
 685   // After a call with ratios by number (negative number of elements),
 686   // the ratio array is changed to the ratio by weight, so all successive
 687   // calls with the same array must specify the number of elements as
 688   // positive
 689   AliMixture( 61, "SSD Ceramics$", acer, zcer, denscer, 5, wcer);
 690   AliMaterial(62, "SSD Kapton$", 12.011, 6., 1.3, 31.27, 999.);
 691   // check A and Z
 692   AliMaterial(63, "SDD G10FR4$", 17.749, 8.875, 1.8, 21.822, 999.);
 693   // **
 694   AliMedium(50, "SSD Si$",      50, 1,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 695   AliMedium(51, "SSD Si chip$", 51, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 696   AliMedium(52, "SSD Si bus$",  52, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 697   AliMedium(53, "SSD C$",       53, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 698   AliMedium(54, "SSD Air$",     54, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 699   AliMedium(55, "SSD Vacuum$",  55, 0,isxfld,sxmgmx, 10.,1.00, .1, .100,10.00);
 700   AliMedium(56, "SSD Al$",      56, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 701   AliMedium(57, "SSD Water $",  57, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 702   AliMedium(58, "SSD Freon$",   58, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 703   AliMedium(59, "SSD PCB$",     59, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 704   AliMedium(60, "SSD Copper$",  60, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 705   AliMedium(61, "SSD Ceramics$",61, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 706   AliMedium(62, "SSD Kapton$",  62, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 707   AliMedium(63, "SSD G10FR4$",  63, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 708
 709   //     275-299 --> General (end-caps, frames, cooling, cables, etc.)
 710
 711   AliMaterial(75, "GEN C$", 12.011, 6., 2.265, 18.8, 999.);
 712   // verify density
 713   AliMaterial(76, "GEN Air$", 14.61, 7.3, .001205, 30423., 999);
 714   AliMaterial(77, "GEN Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
 715   AliMixture( 78, "GEN POLYETHYL$", apoly, zpoly, .95, -2, wpoly);
 716   AliMixture( 79, "GEN SERVICES$",  aserv, zserv, 4.68, 4, wserv);
 717   AliMaterial(80, "GEN Copper$", 63.546, 29., 8.96, 1.43, 999.);
 718   // After a call with ratios by number (negative number of elements),
 719   // the ratio array is changed to the ratio by weight, so all successive
 720   // calls with the same array must specify the number of elements as
 721   // positive
 722   AliMixture(81, "GEN Water $", awat, zwat, denswat, 2, wwat);
 723   // **
 724   AliMedium(75,"GEN C$",        75, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 725   AliMedium(76,"GEN Air$",      76, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 726   AliMedium(77,"GEN Vacuum$",   77, 0,isxfld,sxmgmx, 10., .10, .1, .100,10.00);
 727   AliMedium(78,"GEN POLYETHYL$",78, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 728   AliMedium(79,"GEN SERVICES$", 79, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 729   AliMedium(80,"GEN Copper$",   80, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 730   AliMedium(81,"GEN Water $",   81, 0,isxfld,sxmgmx, 10., .01, .1, .003, .003);
 731 }
 732 //_____________________________________________________________________________
 733 void AliITSv1::Init(){
 734 ////////////////////////////////////////////////////////////////////////
 735 //     Initialise the ITS after it has been created.
 736 ////////////////////////////////////////////////////////////////////////
 737
 738     //
 739     AliITS::Init();
 740     fMajorVersion = 1;
 741     fMinorVersion = 0;
 742 }
 743
 744 //_____________________________________________________________________________
 745 void AliITSv1::DrawModule(){
 746 ////////////////////////////////////////////////////////////////////////
 747 //     Draw a shaded view of the FMD version 1.
 748 ////////////////////////////////////////////////////////////////////////
 749
 750   // Set everything unseen
 751   gMC->Gsatt("*", "seen", -1);
 752   //
 753   // Set ALIC mother visible
 754   gMC->Gsatt("ALIC","SEEN",0);
 755   //
 756   // Set the volumes visible
 757   gMC->Gsatt("ITSV","SEEN",0);
 758   gMC->Gsatt("ITS1","SEEN",1);
 759   gMC->Gsatt("ITS2","SEEN",1);
 760   gMC->Gsatt("ITS3","SEEN",1);
 761   gMC->Gsatt("ITS4","SEEN",1);
 762   gMC->Gsatt("ITS5","SEEN",1);
 763   gMC->Gsatt("ITS6","SEEN",1);
 764
 765   gMC->Gsatt("IPCB","SEEN",1);
 766   gMC->Gsatt("ICO2","SEEN",1);
 767   gMC->Gsatt("ICER","SEEN",0);
 768   gMC->Gsatt("ISI2","SEEN",0);
 769   gMC->Gsatt("IPLA","SEEN",0);
 770   gMC->Gsatt("ICO3","SEEN",0);
 771   gMC->Gsatt("IEPX","SEEN",0);
 772   gMC->Gsatt("ISI3","SEEN",1);
 773   gMC->Gsatt("ISUP","SEEN",0);
 774   gMC->Gsatt("ICHO","SEEN",0);
 775   gMC->Gsatt("ICMO","SEEN",0);
 776   gMC->Gsatt("ICMD","SEEN",0);
 777   gMC->Gsatt("ICCO","SEEN",1);
 778   gMC->Gsatt("ICCM","SEEN",0);
 779   gMC->Gsatt("ITMD","SEEN",0);
 780   gMC->Gsatt("ITTT","SEEN",1);
 781
 782   //
 783   gMC->Gdopt("hide", "on");
 784   gMC->Gdopt("shad", "on");
 785   gMC->Gsatt("*", "fill", 7);
 786   gMC->SetClipBox(".");
 787   gMC->SetClipBox("*", 0, 300, -300, 300, -300, 300);
 788   gMC->DefaultRange();
 789   gMC->Gdraw("alic", 40, 30, 0, 11, 10, .07, .07);
 790   gMC->Gdhead(1111, "Inner Tracking System Version 1");
 791   gMC->Gdman(17, 6, "MAN");
 792 }
 793 //_____________________________________________________________________________
 794 void AliITSv1::StepManager(){
 795 ////////////////////////////////////////////////////////////////////////
 796 //    Called for every step in the ITS, then calles the AliITShit class
 797 // creator with the information to be recoreded about that hit.
 798 ////////////////////////////////////////////////////////////////////////
 799 /*
 800   Int_t         copy, id;
 801   Float_t       hits[8];
 802   Int_t         vol[4];
 803   TLorentzVector position, momentum;
 804   TClonesArray &lhits = *fHits;
 805   //
 806   // Track status
 807   vol[3] = 0;
 808   if(gMC->IsTrackInside())      vol[3] +=  1;
 809   if(gMC->IsTrackEntering())    vol[3] +=  2;
 810   if(gMC->IsTrackExiting())     vol[3] +=  4;
 811   if(gMC->IsTrackOut())         vol[3] +=  8;
 812   if(gMC->IsTrackDisappeared()) vol[3] += 16;
 813   if(gMC->IsTrackStop())        vol[3] += 32;
 814   if(gMC->IsTrackAlive())       vol[3] += 64;
 815   //
 816   // Fill hit structure.
 817   if( !(gMC->TrackCharge()) ) return;
 818     //
 819     // Only entering charged tracks
 820     if((id=gMC->CurrentVolID(copy))==fIdSens[0]) {
 821       vol[0]=1;
 822       id=gMC->CurrentVolOffID(1,copy);
 823       vol[1]=copy;
 824       id=gMC->CurrentVolOffID(2,copy);
 825       vol[2]=copy;
 826     } else if(id==fIdSens[1]) {
 827       vol[0]=2;
 828       id=gMC->CurrentVolOffID(1,copy);
 829       vol[1]=copy;
 830       id=gMC->CurrentVolOffID(2,copy);
 831       vol[2]=copy;
 832     } else if(id==fIdSens[2]) {
 833       vol[0]=3;
 834       vol[1]=copy;
 835       id=gMC->CurrentVolOffID(1,copy);
 836       vol[2]=copy;
 837     } else if(id==fIdSens[3]) {
 838       vol[0]=4;
 839       vol[1]=copy;
 840       id=gMC->CurrentVolOffID(1,copy);
 841       vol[2]=copy;
 842     } else if(id==fIdSens[4]) {
 843       vol[0]=5;
 844       vol[1]=copy;
 845       id=gMC->CurrentVolOffID(1,copy);
 846       vol[2]=copy;
 847     } else if(id==fIdSens[5]) {
 848       vol[0]=6;
 849       vol[1]=copy;
 850       id=gMC->CurrentVolOffID(1,copy);
 851       vol[2]=copy;
 852     } else return;
 853     gMC->TrackPosition(position);
 854     gMC->TrackMomentum(momentum);
 855     hits[0]=position[0];
 856     hits[1]=position[1];
 857     hits[2]=position[2];
 858     hits[3]=momentum[0];
 859     hits[4]=momentum[1];
 860     hits[5]=momentum[2];
 861     hits[6]=gMC->Edep();
 862     hits[7]=gMC->TrackTime();
 863     new(lhits[fNhits++]) AliITShit(fIshunt,gAlice->CurrentTrack(),vol,hits);
 864 */
 865 }