]> git.uio.no Git - u/mrichter/AliRoot.git/blame - STRUCT/AliABSO.cxx
correct for omission
[u/mrichter/AliRoot.git] / STRUCT / AliABSO.cxx
CommitLineData
4c039060 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
eeacf08b 16/* $Id$ */
4c039060 17
fe4da5cc 18///////////////////////////////////////////////////////////////////////////////
19// //
20// Muon ABSOrber //
21// This class contains the description of the muon absorber geometry //
22// //
23//Begin_Html
24/*
1439f98e 25<img src="picts/AliABSOClass.gif">
fe4da5cc 26</pre>
27<br clear=left>
28<font size=+2 color=red>
29<p>The responsible person for this module is
30<a href="mailto:andreas.morsch@cern.ch">Andreas Morsch</a>.
31</font>
32<pre>
33*/
34//End_Html
35// //
36// //
37///////////////////////////////////////////////////////////////////////////////
38
f7a1cc68 39#include <TGeoGlobalMagField.h>
40
fe4da5cc 41#include "AliABSO.h"
42#include "AliRun.h"
94de3818 43#include "AliMagF.h"
fe4da5cc 44#include "AliConst.h"
45
46ClassImp(AliABSO)
47
48//_____________________________________________________________________________
49AliABSO::AliABSO()
50{
51 //
52 // Default constructor
53 //
24049212 54 for (Int_t i = 0; i < 2; i++)
55 {
56 fNLayers[i] = 0;
57 for (Int_t j = 0; j < 15; j++)
58 {
59 fZLayers[i][j] = 0.;
60 fMLayers[i][j] = 0;
61 }
62 }
fe4da5cc 63}
64
65//_____________________________________________________________________________
66AliABSO::AliABSO(const char *name, const char *title)
b8032157 67 : AliModule(name,title)
fe4da5cc 68{
69 //
70 // Standard constructor
71 //
24049212 72 for (Int_t i = 0; i < 2; i++)
73 {
74 fNLayers[i] = 0;
75 for (Int_t j = 0; j < 15; j++)
76 {
77 fZLayers[i][j] = 0.;
78 fMLayers[i][j] = 0;
79 }
80 }
fe4da5cc 81}
82
fe4da5cc 83//_____________________________________________________________________________
84void AliABSO::CreateGeometry()
85{
86 //
87 // Creation of the geometry of the muon absorber
88 //
fe4da5cc 89}
90
fe4da5cc 91//_____________________________________________________________________________
92void AliABSO::CreateMaterials()
93{
94 //
95 // Define materials for muon absorber
96 //
f7a1cc68 97 Int_t isxfld = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Integ();
98 Float_t sxmgmx = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Max();
002b3738 99//
100// Air
101//
102 Float_t aAir[4]={12.0107,14.0067,15.9994,39.948};
103 Float_t zAir[4]={6.,7.,8.,18.};
104 Float_t wAir[4]={0.000124,0.755267,0.231781,0.012827};
105 Float_t dAir = 1.20479E-3;
6a894888 106 Float_t dAir1 = 1.20479E-10;
002b3738 107//
108// Polyethylene
109//
fe4da5cc 110 Float_t apoly[2] = { 12.01,1. };
111 Float_t zpoly[2] = { 6.,1. };
112 Float_t wpoly[2] = { .33,.67 };
002b3738 113//
114// Concrete
115//
f2410b49 116 Float_t aconc[10] = { 1.,12.01,15.994,22.99,24.305,26.98,28.086,39.1,40.08,55.85 };
fe4da5cc 117 Float_t zconc[10] = { 1.,6.,8.,11.,12.,13.,14.,19.,20.,26. };
f2410b49 118 Float_t wconc[10] = { .01,.001,.529107,.016,.002,.033872, .337021,.013,.044,.014 };
002b3738 119//
120// Steel
121//
fe4da5cc 122 Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
123 Float_t zsteel[4] = { 26.,24.,28.,14. };
124 Float_t wsteel[4] = { .715,.18,.1,.005 };
3f4d1718 125//
3f4d1718 126// Ni-Cu-W alloy
f2410b49 127//
3f4d1718 128 Float_t aniwcu[3] ={58.6934, 183.84, 63.546};
129 Float_t zniwcu[3] ={28., 74., 29};
130 Float_t wniwcu[3] ={0.015,0.95,0.035};
f2410b49 131//
f19077cf 132// Poly Concrete
133// H Li F C Al Si Ca Pb O
134 Float_t aPolyCc[9] = {1. , 6.941, 18.998, 12.01, 26.98, 28.086, 40.078, 207.2, 15.999};
135 Float_t zPolyCc[9] = {1. , 3. , 9. , 6. , 13. , 14. , 20. , 82. , 8. };
136 Float_t wPolyCc[9] = {4.9, 1.2 , 1.3 , 1.1 , 0.15, 0.02 , 0.06 , 0.7, 1.1 };
137 Float_t wtot=0;
138 Int_t i=0;
139
140 for (i=0; i<9; i++) wtot+=wPolyCc[i];
141 for (i=0; i<9; i++) wPolyCc[i]/=wtot;
142
3f4d1718 143//
144// Insulation powder
9af0a493 145// Si O Ti Al
146 Float_t ains[4] ={28.0855, 15.9994, 47.867, 26.982};
147 Float_t zins[4] ={14., 8. , 22. , 13. };
148 Float_t wins[4] ={ 0.3019, 0.4887, 0.1914, 0.018};
6a894888 149
3f4d1718 150//
fe4da5cc 151 Float_t epsil, stmin, tmaxfd, deemax, stemax;
152 //
153 // Carbon
4a9de4af 154 AliMaterial( 6, "CARBON0$ ", 12.01, 6., 1.75, 24.4, 49.9);
155 AliMaterial(26, "CARBON1$ ", 12.01, 6., 1.75, 24.4, 49.9);
156 AliMaterial(46, "CARBON2$ ", 12.01, 6., 1.75, 24.4, 49.9);
fe4da5cc 157 //
f2410b49 158 // Magnesium
159 AliMaterial( 7, "MAGNESIUM$ ", 24.31, 12., 1.74, 25.3, 46.0);
160 //
fe4da5cc 161 // Aluminum
4a9de4af 162 AliMaterial(9, "ALUMINIUM0$", 26.98, 13., 2.7, 8.9, 37.2);
163 AliMaterial(29, "ALUMINIUM1$", 26.98, 13., 2.7, 8.9, 37.2);
164 AliMaterial(49, "ALUMINIUM2$", 26.98, 13., 2.7, 8.9, 37.2);
fe4da5cc 165 //
166 // Iron
4a9de4af 167 AliMaterial(10, "IRON0$ ", 55.85, 26., 7.87, 1.76, 17.1);
168 AliMaterial(30, "IRON1$ ", 55.85, 26., 7.87, 1.76, 17.1);
169 AliMaterial(50, "IRON2$ ", 55.85, 26., 7.87, 1.76, 17.1);
fe4da5cc 170 //
9af0a493 171 // Copper
4a9de4af 172 AliMaterial(11, "COPPER0$ ", 63.55, 29., 8.96, 1.43, 15.1);
173 AliMaterial(31, "COPPER1$ ", 63.55, 29., 8.96, 1.43, 15.1);
174 AliMaterial(51, "COPPER2$ ", 63.55, 29., 8.96, 1.43, 15.1);
9af0a493 175 //
fe4da5cc 176 // Tungsten
4a9de4af 177 AliMaterial(12, "TUNGSTEN0$ ", 183.85, 74., 19.3, .35, 10.3);
178 AliMaterial(32, "TUNGSTEN1$ ", 183.85, 74., 19.3, .35, 10.3);
179 AliMaterial(52, "TUNGSTEN2$ ", 183.85, 74., 19.3, .35, 10.3);
fe4da5cc 180 //
3f4d1718 181 // Ni-W-Cu
4a9de4af 182 AliMixture(21, "Ni-W-Cu0$", aniwcu, zniwcu, 18.78, 3, wniwcu);
183 AliMixture(41, "Ni-W-Cu1$", aniwcu, zniwcu, 18.78, 3, wniwcu);
184 AliMixture(61, "Ni-W-Cu2$", aniwcu, zniwcu, 18.78, 3, wniwcu);
3f4d1718 185 //
fe4da5cc 186 // Lead
4a9de4af 187 AliMaterial(13, "LEAD0$ ", 207.19, 82., 11.35, .56, 18.5);
188 AliMaterial(33, "LEAD1$ ", 207.19, 82., 11.35, .56, 18.5);
189 AliMaterial(53, "LEAD2$ ", 207.19, 82., 11.35, .56, 18.5);
fe4da5cc 190 //
191 // Air
4a9de4af 192 AliMixture(15, "AIR0$ ", aAir, zAir, dAir, 4, wAir);
193 AliMixture(35, "AIR1$ ", aAir, zAir, dAir, 4, wAir);
194 AliMixture(55, "AIR2$ ", aAir, zAir, dAir, 4, wAir);
fe4da5cc 195 //
196 // Vacuum
4a9de4af 197 AliMixture(16, "VACUUM0$ ", aAir, zAir, dAir1, 4, wAir);
198 AliMixture(36, "VACUUM1$ ", aAir, zAir, dAir1, 4, wAir);
199 AliMixture(56, "VACUUM2$ ", aAir, zAir, dAir1, 4, wAir);
fe4da5cc 200 //
201 // Concrete
4a9de4af 202 AliMixture(17, "CONCRETE0$", aconc, zconc, 2.35, 10, wconc);
203 AliMixture(37, "CONCRETE1$", aconc, zconc, 2.35, 10, wconc);
204 AliMixture(57, "CONCRETE2$", aconc, zconc, 2.35, 10, wconc);
fe4da5cc 205 //
206 // Poly CH2
4a9de4af 207 AliMixture(18, "POLYETHYLEN0$", apoly, zpoly, .95, -2, wpoly);
fe4da5cc 208 //
209 // After a call with ratios by number (negative number of elements),
210 // the ratio array is changed to the ratio by weight, so all successive
211 // calls with the same array must specify the number of elements as
212 // positive
213 //
4a9de4af 214 AliMixture(38, "POLYETHYLEN1$", apoly, zpoly, .95, 2, wpoly);
215 AliMixture(58, "POLYETHYLEN2$", apoly, zpoly, .95, 2, wpoly);
fe4da5cc 216 //
217 // stainless Steel
4a9de4af 218 AliMixture(19, "STAINLESS STEEL0$", asteel, zsteel, 7.88, 4, wsteel);
219 AliMixture(39, "STAINLESS STEEL1$", asteel, zsteel, 7.88, 4, wsteel);
220 AliMixture(59, "STAINLESS STEEL2$", asteel, zsteel, 7.88, 4, wsteel);
3f4d1718 221 //
222 // Insulation powder
4a9de4af 223 AliMixture(14, "INSULATION0$", ains, zins, 0.41, 4, wins);
224 AliMixture(34, "INSULATION1$", ains, zins, 0.41, 4, wins);
225 AliMixture(54, "INSULATION2$", ains, zins, 0.41, 4, wins);
f19077cf 226 // Polymere Concrete
4a9de4af 227 AliMixture(20, "Poly Concrete0$", aPolyCc, zPolyCc, 3.53, -9, wPolyCc);
228 AliMixture(40, "Poly Concrete1$", aPolyCc, zPolyCc, 3.53, 9, wPolyCc);
229 AliMixture(60, "Poly Concrete2$", aPolyCc, zPolyCc, 3.53, 9, wPolyCc);
3f4d1718 230
fe4da5cc 231 //
232 // ****************
233 // Defines tracking media parameters.
234 //
3f4d1718 235 epsil = .001; // Tracking precision,
236 stemax = -0.01; // Maximum displacement for multiple scat
237 tmaxfd = -20.; // Maximum angle due to field deflection
238 deemax = -.3; // Maximum fractional energy loss, DLS
fe4da5cc 239 stmin = -.8;
240 // ***************
241 //
242 // Carbon
b43eb0dc 243 AliMedium(6, "C_C0 ", 6, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
244 AliMedium(26, "C_C1 ", 26, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
245 AliMedium(46, "C_C2 ", 46, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 246 //
247 // Aluminum
b43eb0dc 248 AliMedium(9, "ALU_C0 ", 9, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
249 AliMedium(29, "ALU_C1 ", 29, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
250 AliMedium(49, "ALU_C2 ", 49, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 251 //
f2410b49 252 // Magnesium
253 AliMedium(7, "MG_C0 ", 7, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
254 //
fe4da5cc 255 // Iron
b43eb0dc 256 AliMedium(10, "FE_C0 ", 10, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
257 AliMedium(30, "FE_C1 ", 30, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
258 AliMedium(50, "FE_C2 ", 50, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 259 //
9af0a493 260 // Copper
b43eb0dc 261 AliMedium(11, "Cu_C0 ", 11, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
262 AliMedium(31, "Cu_C1 ", 31, 0, isxfld, sxmgmx, tmaxfd, -stemax, deemax, epsil, stmin);
263 AliMedium(51, "Cu_C2 ", 51, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
9af0a493 264 //
fe4da5cc 265 // Tungsten
b43eb0dc 266 AliMedium(12, "W_C0 ", 12, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
267 AliMedium(32, "W_C1 ", 32, 0, isxfld, sxmgmx, tmaxfd, -stemax, deemax, epsil, stmin);
268 AliMedium(52, "W_C2 ", 52, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
f2410b49 269 //
3f4d1718 270 // Ni/Tungsten
b43eb0dc 271 AliMedium(21, "Ni/W0 ", 21, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
272 AliMedium(41, "Ni/W1 ", 41, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
273 AliMedium(61, "Ni/W3 ", 61, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 274 //
275 // Lead
b43eb0dc 276 AliMedium(13, "PB_C0 ", 13, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
277 AliMedium(33, "PB_C1 ", 33, 0, isxfld, sxmgmx, tmaxfd, -stemax, deemax, epsil, stmin);
278 AliMedium(53, "PB_C2 ", 53, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 279 //
3f4d1718 280 // Insulation Powder
b43eb0dc 281 AliMedium(14, "INS_C0 ", 14, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
282 AliMedium(34, "INS_C1 ", 34, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
283 AliMedium(54, "INS_C2 ", 54, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
3f4d1718 284 //
fe4da5cc 285 // Air
b43eb0dc 286 AliMedium(15, "AIR_C0 ", 15, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
287 AliMedium(35, "AIR_C1 ", 35, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
288 AliMedium(55, "AIR_C2 ", 55, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 289 //
290 // Vacuum
b43eb0dc 291 AliMedium(16, "VA_C0 ", 16, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
292 AliMedium(36, "VA_C1 ", 36, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
293 AliMedium(56, "VA_C2 ", 56, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 294 //
295 // Concrete
b43eb0dc 296 AliMedium(17, "CC_C0 ", 17, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
297 AliMedium(37, "CC_C1 ", 37, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
298 AliMedium(57, "CC_C2 ", 57, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 299 //
300 // Polyethilene
b43eb0dc 301 AliMedium(18, "CH2_C0 ", 18, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
302 AliMedium(38, "CH2_C1 ", 38, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
303 AliMedium(58, "CH2_C2 ", 58, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 304 //
305 // Steel
b43eb0dc 306 AliMedium(19, "ST_C0 ", 19, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
307 AliMedium(39, "ST_C1 ", 39, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
308 AliMedium(59, "ST_C3 ", 59, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
f19077cf 309 //
310 // Polymer Concrete
311 AliMedium(20, "PCc_C0 ", 20, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
312 AliMedium(40, "PCc_C1 ", 40, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
313 AliMedium(60, "PCc_C3 ", 60, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc 314}
315
316//_____________________________________________________________________________
317void AliABSO::Init()
318{
319 //
320 // Initialisation of the muon absorber after it has been built
321 Int_t i;
322 //
323 printf("\n");
324 for(i=0;i<35;i++) printf("*");
325 printf(" ABSO_INIT ");
326 for(i=0;i<35;i++) printf("*");
327 printf("\n");
328 //
329 for(i=0;i<80;i++) printf("*");
330 printf("\n");
331}
332
eeacf08b 333Int_t AliABSO::GetMatId(Int_t imat) const
f19077cf 334{
335// Get geant material number
336 Int_t kmat=(*fIdmate)[imat];
337 return kmat;
338}