New TRD files from C.Blume.
[u/mrichter/AliRoot.git] / TRD / AliTRD.cxx
index 8c65d29..64e2c0a 100644 (file)
 #include <TVector.h>
 #include <TGeometry.h>
 #include <TNode.h>
-#include <TObjectTable.h>
 #include <TBRIK.h>
 #include <TPGON.h> 
 
-#include "GParticle.h"
 #include "AliTRD.h"
 #include "AliRun.h"
-#include <iostream.h>
-#include <fstream.h>
 
-#include "TGeant3.h"
+#include "AliMC.h"
+#include "AliConst.h"
  
 ClassImp(AliTRD)
  
@@ -39,7 +36,12 @@ AliTRD::AliTRD()
   //
   // Default constructor
   //
-  fIshunt   = 0;
+  fIshunt      = 0;
+  fGasMix      = 0;
+  fSensSelect  = 0;
+  fSensPlane   = 0;
+  fSensChamber = 0;
+  fSensSector  = 0;
 }
  
 //_____________________________________________________________________________
@@ -55,7 +57,12 @@ AliTRD::AliTRD(const char *name, const char *title)
  
   fHits   = new TClonesArray("AliTRDhit",  405);
   
-  fIshunt = 0;
+  fIshunt      = 0;
+  fGasMix      = 0;
+  fSensSelect  = 0;
+  fSensPlane   = 0;
+  fSensChamber = 0;
+  fSensSector  = 0;
   
   SetMarkerColor(kWhite);   
 }
@@ -79,22 +86,29 @@ void AliTRD::BuildGeometry()
   TNode *Node, *Top;
   TPGON *pgon;
   const Int_t kColorTRD = 46;
-  //
+  
   // Find the top node alice
   Top=gAlice->GetGeometry()->GetNode("alice");
-  //
-  pgon = new TPGON("S_TRD","TRD","void",0,360,18,2);
-  pgon->DefineSection(0,-351.2,285.335,355.686);
-  pgon->DefineSection(1, 351.2,285.335,355.686);
+  
+  pgon = new TPGON("S_TRD","TRD","void",0,360,nsect,4);
+  Float_t ff    = TMath::Cos(kDegrad * 180 / nsect);
+  Float_t rrmin = rmin / ff;
+  Float_t rrmax = rmax / ff;
+  pgon->DefineSection(0,-zmax1,rrmax,rrmax);
+  pgon->DefineSection(1,-zmax2,rrmin,rrmax);
+  pgon->DefineSection(2, zmax2,rrmin,rrmax);
+  pgon->DefineSection(3, zmax1,rrmax,rrmax);
   Top->cd();
   Node = new TNode("TRD","TRD","S_TRD",0,0,0,"");
   Node->SetLineColor(kColorTRD);
   fNodes->Add(Node);
+
 }
  
 //_____________________________________________________________________________
 void AliTRD::CreateMaterials()
 {
+
   //
   // Create the materials for the TRD
   // Origin Y.Foka
@@ -105,88 +119,149 @@ void AliTRD::CreateMaterials()
   Int_t   ISXFLD = gAlice->Field()->Integ();
   Float_t SXMGMX = gAlice->Field()->Max();
   
-  // --- For polyethilene (CH2) 
-  Float_t ape[2] = { 12.,1. };
-  Float_t zpe[2] = { 6.,1. };
-  Float_t wpe[2] = { .33,.67 };
-  Float_t dpe    = .95;
-  // --- For mylar (C5H4O2) 
-  Float_t amy[3] = { 12.,1.,16. };
-  Float_t zmy[3] = { 6.,1.,8. };
-  Float_t wmy[3] = { 5.,4.,2. };
+  // For polyethilene (CH2) 
+  Float_t ape[2] = { 12., 1. };
+  Float_t zpe[2] = {  6., 1. };
+  Float_t wpe[2] = {  1., 2. };
+  Float_t dpe    = 0.95;
+
+  // For mylar (C5H4O2) 
+  Float_t amy[3] = { 12., 1., 16. };
+  Float_t zmy[3] = {  6., 1.,  8. };
+  Float_t wmy[3] = {  5., 4.,  2. };
   Float_t dmy    = 1.39;
-  // --- For CO2 
-  Float_t aco[2] = { 12.,16. };
-  Float_t zco[2] = { 6.,8. };
-  Float_t wco[2] = { 1.,2. };
-  Float_t dco    = .001977;
-  // --- For Xe/CO2-gas-mixture 
-  // --- Xe-content of the gas-mixture (90% / 10%) 
-  Float_t fxe    = .9;
+
+  // For CO2 
+  Float_t aco[2] = { 12., 16. };
+  Float_t zco[2] = {  6.,  8. };
+  Float_t wco[2] = {  1.,  2. };
+  Float_t dco    = 0.001977;
+
+  // For water
+  Float_t awa[2] = {  1., 16. };
+  Float_t zwa[2] = {  1.,  8. };
+  Float_t wwa[2] = {  2.,  1. };
+  Float_t dwa    = 1.0;
+
+  // For isobutane (C4H10)
+  Float_t ais[2] = { 12.,  1. };
+  Float_t zis[2] = {  6.,  1. };
+  Float_t wis[2] = {  4., 10. };
+  Float_t dis    = 0.00267;
+
+  // For Xe/CO2-gas-mixture 
+  // Xe-content of the Xe/CO2-mixture (90% / 10%) 
+  Float_t fxc    = .90;
+  // Xe-content of the Xe/Isobutane-mixture (97% / 3%) 
+  Float_t fxi    = .97;
   Float_t dxe    = .005858;
   
-  // --- General tracking parameter
+  // General tracking parameter
   Float_t tmaxfd = -10.;
   Float_t stemax = -1e10;
-  Float_t deemax = -.1;
-  Float_t epsil  = 1e-4;
-  Float_t stmin  = -.001;
+  Float_t deemax = -0.1;
+  Float_t epsil  =  1e-4;
+  Float_t stmin  = -0.001;
   
   Float_t absl, radl, d, buf[1];
   Float_t agm[2], dgm, zgm[2], wgm[2];
-  Int_t nbuf;
+  Int_t   nbuf;
   
+  //////////////////////////////////////////////////////////////////////////
   //     Define Materials 
-  
-  // ***********************************************************************
-  AliMaterial(1, "Al $", 26.98, 13., 2.7, 8.9, 37.2);
-  AliMaterial(2, "Air$", 14.61, 7.3, .001205, 30420., 67500);
-  AliMaterial(4, "Xe $", 131.29, 54., dxe, 1447.59, 0);
-  AliMaterial(5, "Cu $", 63.54, 29., 8.96, 1.43, 14.8);
-  AliMaterial(6, "C  $", 12.01, 6., 2.265, 18.8, 74.4);
-  // --- Mixtures 
-  AliMixture(3, "Polyethilene$", ape, zpe, dpe, -2, wpe);
-  AliMixture(7, "Mylar$",        amy, zmy, dmy, -3, wmy);
-  AliMixture(8, "CO2$",          aco, zco, dco, -2, wco);
+  //////////////////////////////////////////////////////////////////////////
+
+  AliMaterial( 1, "Al $",  26.98, 13.0, 2.7     ,     8.9 ,    37.2);
+  AliMaterial( 2, "Air$",  14.61,  7.3, 0.001205, 30420.0 , 67500.0);
+  AliMaterial( 4, "Xe $", 131.29, 54.0, dxe     ,  1447.59,     0.0);
+  AliMaterial( 5, "Cu $",  63.54, 29.0, 8.96    ,     1.43,    14.8);
+  AliMaterial( 6, "C  $",  12.01,  6.0, 2.265   ,    18.8 ,    74.4);
+  AliMaterial(12, "G10$",  20.00, 10.0, 1.7     ,    19.4 ,   999.0);
+
+  // Mixtures 
+  AliMixture(3, "Polyethilene$",   ape, zpe, dpe, -2, wpe);
+  AliMixture(7, "Mylar$",          amy, zmy, dmy, -3, wmy);
+  AliMixture(8, "CO2$",            aco, zco, dco, -2, wco);
+  AliMixture(9, "Isobutane$",      ais, zis, dis, -2, wis);
+  AliMixture(13, "Water$"        , awa, zwa, dwa, -2, wwa);
+
+  // Gas mixtures
   char namate[21];
-  // --- Get properties of Xe 
+  // Xe/CO2-mixture
+  // Get properties of Xe 
   pMC->Gfmate((*fIdmate)[4], namate, agm[0], zgm[0], d, radl, absl, buf, nbuf);
-  // --- Get properties of CO2 
+  // Get properties of CO2 
   pMC->Gfmate((*fIdmate)[8], namate, agm[1], zgm[1], d, radl, absl, buf, nbuf);
-  // --- Create gas mixture 
-  wgm[0] = fxe;
-  wgm[1] = 1. - fxe;
+  // Create gas mixture 
+  wgm[0] = fxc;
+  wgm[1] = 1. - fxc;
   dgm    = wgm[0] * dxe + wgm[1] * dco;
-  AliMixture(9, "Gas mixture$", agm, zgm, dgm, 2, wgm);
-  // ***********************************************************************
-  
+  AliMixture(10, "Gas mixture 1$", agm, zgm, dgm,  2, wgm);
+  // Xe/Isobutane-mixture
+  // Get properties of Xe 
+  pMC->Gfmate((*fIdmate)[4], namate, agm[0], zgm[0], d, radl, absl, buf, nbuf);
+  // Get properties of Isobutane
+  pMC->Gfmate((*fIdmate)[9], namate, agm[1], zgm[1], d, radl, absl, buf, nbuf);
+  // Create gas mixture 
+  wgm[0] = fxi;
+  wgm[1] = 1. - fxi;
+  dgm    = wgm[0] * dxe + wgm[1] * dis;
+  AliMixture(11, "Gas mixture 2$", agm, zgm, dgm,  2, wgm);
+  //////////////////////////////////////////////////////////////////////////
   //     Tracking Media Parameters 
-  
-  // ***********************************************************************
-  // --- Al Frame 
-  AliMedium(1301, "Al Frame$", 1, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Air 
-  AliMedium(1302, "Air$",      2, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Polyethilene 
-  AliMedium(1303, "Radiator$", 3, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Xe 
-  AliMedium(1304, "Xe$",       4, 1, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Cu pads 
-  AliMedium(1305, "Padplane$", 5, 1, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Fee + cables 
-  AliMedium(1306, "Readout$",  1, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- C frame 
-  AliMedium(1307, "C Frame$",  6, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Mylar foils 
-  AliMedium(1308, "Mylar$",    7, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Gas-mixture 
-  AliMedium(1309, "Gas-mix$",  9, 1, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Nomex-honeycomb (use carbon for the time being) 
-  AliMedium(1310, "Nomex$",    6, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Kapton foils (use Mylar for the time being) 
-  AliMedium(1311, "Kapton$",   7, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
-  // --- Gas-filling of the radiator 
-  AliMedium(1312, "CO2$",      8, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
+  //////////////////////////////////////////////////////////////////////////
+
+  // Al Frame 
+  AliMedium(1301, "Al Frame$",   1, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Air 
+  AliMedium(1302, "Air$",        2, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Polyethilene 
+  AliMedium(1303, "Radiator$",   3, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Xe 
+  AliMedium(1304, "Xe$",         4, 1, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Cu pads 
+  AliMedium(1305, "Padplane$",   5, 1, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Fee + cables 
+  AliMedium(1306, "Readout$",    1, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // C frame 
+  AliMedium(1307, "C Frame$",    6, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Mylar foils 
+  AliMedium(1308, "Mylar$",      7, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  if (fGasMix == 1) {
+    // Gas-mixture (Xe/CO2) 
+    AliMedium(1309, "Gas-mix$",   10, 1, ISXFLD, SXMGMX
+                  , tmaxfd, stemax, deemax, epsil, stmin);
+  }
+  else {
+    // Gas-mixture (Xe/Isobutane) 
+    AliMedium(1309, "Gas-mix$",   11, 1, ISXFLD, SXMGMX
+                  , tmaxfd, stemax, deemax, epsil, stmin);
+  }
+  // Nomex-honeycomb (use carbon for the time being) 
+  AliMedium(1310, "Nomex$",      6, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Kapton foils (use Mylar for the time being) 
+  AliMedium(1311, "Kapton$",     7, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Gas-filling of the radiator 
+  AliMedium(1312, "CO2$",        8, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // G10-plates
+  AliMedium(1313, "G10-plates$",12, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+  // Cooling water
+  AliMedium(1314, "Water$",     13, 0, ISXFLD, SXMGMX
+                , tmaxfd, stemax, deemax, epsil, stmin);
+
 }
 
 //_____________________________________________________________________________
@@ -212,12 +287,89 @@ void AliTRD::Init()
   printf(" TRD_INIT ");
   for(i=0;i<35;i++) printf("*");
   printf("\n");
-  //
+  
   // Here the TRD initialisation code (if any!)
+  if (fGasMix == 1) 
+    printf("          Gas Mixture: 90%% Xe + 10%% CO2\n");
+  else
+    printf("          Gas Mixture: 97%% Xe + 3%% Isobutane\n");
+  if (fSensPlane)
+    printf("          Only plane %d is sensitive\n",fSensPlane);
+  if (fSensChamber)   
+    printf("          Only chamber %d is sensitive\n",fSensChamber);
+  if (fSensSector)
+    printf("          Only sector %d is sensitive\n",fSensSector);
+
   for(i=0;i<80;i++) printf("*");
   printf("\n");
 }
 
+//_____________________________________________________________________________
+void AliTRD::SetGasMix(Int_t imix = 0)
+{
+
+  if ((imix < 0) || (imix > 1)) {
+    printf("Wrong input value: %d\n",imix);
+    printf("Use standard setting\n");
+    fGasMix = 0;
+    return;
+  }
+
+  fGasMix = imix;
+
+}
+
+//_____________________________________________________________________________
+void AliTRD::SetSensPlane(Int_t iplane = 0)
+{
+
+  if ((iplane < 0) || (iplane > 6)) {
+    printf("Wrong input value: %d\n",iplane);
+    printf("Use standard setting\n");
+    fSensPlane  = 0;
+    fSensSelect = 0;
+    return;
+  }
+
+  fSensSelect = 1;
+  fSensPlane  = iplane;
+
+}
+
+//_____________________________________________________________________________
+void AliTRD::SetSensChamber(Int_t ichamber = 0)
+{
+
+  if ((ichamber < 0) || (ichamber > 5)) {
+    printf("Wrong input value: %d\n",ichamber);
+    printf("Use standard setting\n");
+    fSensChamber = 0;
+    fSensSelect  = 0;
+    return;
+  }
+
+  fSensSelect  = 1;
+  fSensChamber = ichamber;
+
+}
+
+//_____________________________________________________________________________
+void AliTRD::SetSensSector(Int_t isector = 0)
+{
+
+  if ((isector < 0) || (isector > 18)) {
+    printf("Wrong input value: %d\n",isector);
+    printf("Use standard setting\n");
+    fSensSector = 0;
+    fSensSelect = 0;
+    return;
+  }
+
+  fSensSelect = 1;
+  fSensSector = isector;
+
+}
+
 ClassImp(AliTRDhit)
  
 //_____________________________________________________________________________