STRUCT/AliSHIL.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 /*
  17 $Log$
  18 Revision 1.7  2000/01/12 15:37:57  morsch
  19 Base class only
  20
  21 Revision 1.6  1999/09/29 09:24:30  fca
  22 Introduction of the Copyright and cvs Log
  23
  24 */
  25
  26 ///////////////////////////////////////////////////////////////////////////////
  27 //                                                                           //
  28 //  Muon Shield Class                                                        //
  29 //  This class contains a description of the muon shield                     //
  30 //                                                                           //
  31 //Begin_Html
  32 /*
  33 <img src="picts/AliSHILClass.gif">
  34 */
  35 //End_Html
  36 //                                                                           //
  37 //                                                                           //
  38 ///////////////////////////////////////////////////////////////////////////////
  39
  40 #include "AliSHIL.h"
  41 #include "AliRun.h"
  42 #include "AliConst.h"
  43
  44 ClassImp(AliSHIL)
  45
  46 //_____________________________________________________________________________
  47 AliSHIL::AliSHIL()
  48 {
  49   //
  50   // Default constructor for muon shield
  51   //
  52 }
  53
  54 //_____________________________________________________________________________
  55 AliSHIL::AliSHIL(const char *name, const char *title)
  56   : AliModule(name,title)
  57 {
  58   //
  59   // Standard constructor for muon shield
  60   //
  61   SetMarkerColor(7);
  62   SetMarkerStyle(2);
  63   SetMarkerSize(0.4);
  64 }
  65
  66 //_____________________________________________________________________________
  67 void AliSHIL::CreateGeometry()
  68 {
  69   //
  70   // Build muon shield geometry
  71   //
  72 }
  73
  74 //_____________________________________________________________________________
  75 void AliSHIL::CreateMaterials()
  76 {
  77   //
  78   // Defines materials for the muon shield
  79   //
  80   Int_t   ISXFLD = gAlice->Field()->Integ();
  81   Float_t SXMGMX = gAlice->Field()->Max();
  82 // Steel
  83   Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
  84   Float_t zsteel[4] = { 26.,24.,28.,14. };
  85   Float_t wsteel[4] = { .715,.18,.1,.005 };
  86 // PbW
  87   Float_t apbw[2]   = { 207.2,183.85 };
  88   Float_t zpbw[2]   = { 82.,74. };
  89   Float_t wpbw[2]   = { .5,.5 };
  90 // Concrete
  91   Float_t aconc[10] = { 1.,12.01,15.994,22.99,24.305,26.98,
  92                         28.086,39.1,40.08,55.85 };
  93   Float_t zconc[10] = { 1.,6.,8.,11.,12.,13.,14.,19.,20.,26. };
  94   Float_t wconc[10] = { .01,.001,.529107,.016,.002,.033872,
  95                         .337021,.013,.044,.014 };
  96 // Ni-Cu-W alloy
  97   Float_t aniwcu[3] ={58.6934, 183.84, 63.546};
  98   Float_t zniwcu[3] ={28., 74., 29};
  99   Float_t wniwcu[3] ={0.015,0.95,0.035};
 100 //
 101 // Insulation powder
 102 //                    Si         O       Ti     Al
 103   Float_t ains[4] ={28.0855, 15.9994, 47.867,  26.982};
 104   Float_t zins[4] ={14.,      8.    , 22.   ,  13.   };
 105   Float_t wins[4] ={ 0.3019,  0.4887,  0.1914,  0.018};
 106
 107   Float_t epsil, stmin, tmaxfd, deemax, stemax;
 108
 109   //     STEEL
 110
 111
 112   //     LEAD/TUNGSTEN MIXTURE
 113
 114
 115   // --- Define the various materials for GEANT ---
 116   //     Aluminum
 117   AliMaterial(9,  "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
 118   AliMaterial(29, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
 119   AliMaterial(49, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
 120
 121   //     Iron
 122   AliMaterial(10, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
 123   AliMaterial(30, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
 124   AliMaterial(50, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
 125
 126   //
 127   //     Copper
 128   AliMaterial(11, "COPPER$   ", 63.55, 29., 8.96, 1.43, 15.1);
 129   AliMaterial(31, "COPPER$   ", 63.55, 29., 8.96, 1.43, 15.1);
 130   AliMaterial(51, "COPPER$   ", 63.55, 29., 8.96, 1.43, 15.1);
 131
 132   //     Tungsten
 133   AliMaterial(12, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
 134   AliMaterial(32, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
 135   AliMaterial(52, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
 136
 137   //     Lead
 138   AliMaterial(13, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
 139   AliMaterial(33, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
 140   AliMaterial(53, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
 141
 142   //     Air
 143   AliMaterial(15, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500);
 144   AliMaterial(35, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500);
 145   AliMaterial(55, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500);
 146
 147   //     Vacuum
 148   AliMaterial(16, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
 149   AliMaterial(36, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
 150   AliMaterial(56, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
 151
 152   //     Stainless Steel
 153   AliMixture(19, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
 154   AliMixture(39, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
 155   AliMixture(59, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
 156
 157   //     Lead/Tungsten
 158   AliMixture(20, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
 159   AliMixture(40, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
 160   AliMixture(60, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
 161
 162   //     Ni-W-Cu
 163   AliMixture(21, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
 164   AliMixture(41, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
 165   AliMixture(61, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
 166
 167   //     Concrete
 168   AliMixture(17, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
 169   AliMixture(37, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
 170   AliMixture(57, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
 171
 172   //     Insulation powder
 173   AliMixture(14, "INSULATION$", ains, zins, 0.41, 4, wins);
 174   AliMixture(34, "INSULATION$", ains, zins, 0.41, 4, wins);
 175   AliMixture(54, "INSULATION$", ains, zins, 0.41, 4, wins);
 176
 177   // ****************
 178   //     Defines tracking media parameters.
 179   //     Les valeurs sont commentees pour laisser le defaut
 180   //     a GEANT (version 3-21, page CONS200), f.m.
 181   epsil  = .001;  // Tracking precision,
 182   stemax = -1.;   // Maximum displacement for multiple scat
 183   tmaxfd = -20.;  // Maximum angle due to field deflection
 184   deemax = -.3;   // Maximum fractional energy loss, DLS
 185   stmin  = -.8;
 186   // ***************
 187
 188   //    Aluminum
 189   AliMedium(9,  "ALU_C0          ", 9, 0,  ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 190   AliMedium(29, "ALU_C1          ", 29, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 191   AliMedium(49, "ALU_C2          ", 49, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 192
 193   //    Iron
 194   AliMedium(10, "FE_C0           ", 10, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 195   AliMedium(30, "FE_C1           ", 30, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 196   AliMedium(50, "FE_C2           ", 50, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 197
 198   //    Iron
 199   AliMedium(11, "Cu_C0           ", 11, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 200   AliMedium(31, "Cu_C1           ", 31, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 201   AliMedium(51, "Cu_C2           ", 51, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 202
 203   //    Tungsten
 204   AliMedium(12, "W_C0            ", 12, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 205   AliMedium(32, "W_C1            ", 32, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 206   AliMedium(52, "W_C2            ", 52, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 207
 208   //    Lead
 209   AliMedium(13, "PB_C0           ", 13, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 210   AliMedium(33, "PB_C1           ", 33, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 211   AliMedium(53, "PB_C2           ", 53, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 212
 213   //    Insulation Powder
 214   AliMedium(14, "INS_C0          ", 14, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 215   AliMedium(34, "INS_C1          ", 34, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 216   AliMedium(54, "INS_C2          ", 54, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 217
 218   //    Air
 219   AliMedium(15, "AIR_C0          ", 15, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 220   AliMedium(35, "AIR_C1          ", 35, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 221   AliMedium(55, "AIR_C2          ", 55, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 222
 223   //    Vacuum
 224   AliMedium(16, "VA_C0           ", 16, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 225   AliMedium(36, "VA_C1           ", 36, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 226   AliMedium(56, "VA_C2           ", 56, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 227
 228   //    Steel
 229   AliMedium(19, "ST_C0           ", 19, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 230   AliMedium(39, "ST_C1           ", 39, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 231   AliMedium(59, "ST_C3           ", 59, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 232
 233   //    Lead/Tungsten
 234   AliMedium(20, "PB/W0           ", 20, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 235   AliMedium(40, "PB/W1           ", 40, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 236   AliMedium(60, "PB/W3           ", 60, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 237
 238   //    Ni/Tungsten
 239   AliMedium(21, "Ni/W0           ", 21, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 240   AliMedium(41, "Ni/W1           ", 41, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 241   AliMedium(61, "Ni/W3           ", 61, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 242
 243 //    Concrete
 244   AliMedium(17, "CC_C0           ", 17, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 245   AliMedium(37, "CC_C1           ", 37, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 246   AliMedium(57, "CC_C2           ", 57, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
 247
 248 }
 249
 250 //_____________________________________________________________________________
 251 void AliSHIL::DrawModule ()
 252 {
 253
 254 }
 255
 256 //_____________________________________________________________________________
 257 void AliSHIL::Init()
 258 {
 259   //
 260   // Initialise the muon shield after it has been built
 261   //
 262   Int_t i;
 263   //
 264   printf("\n");
 265   for(i=0;i<35;i++) printf("*");
 266   printf(" SHIL_INIT ");
 267   for(i=0;i<35;i++) printf("*");
 268   printf("\n");
 269   //
 270   // Here the SHIL initialisation code (if any!)
 271   for(i=0;i<80;i++) printf("*");
 272   printf("\n");
 273 }
 274
 275