Base class only
[u/mrichter/AliRoot.git] / STRUCT / AliABSO.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.6  1999/09/29 09:24:29  fca
19 Introduction of the Copyright and cvs Log
20
21 */
22
23 ///////////////////////////////////////////////////////////////////////////////
24 //                                                                           //
25 //  Muon ABSOrber                                                            //
26 //  This class contains the description of the muon absorber geometry        //
27 //                                                                           //
28 //Begin_Html
29 /*
30 <img src="picts/AliABSOClass.gif">
31 </pre>
32 <br clear=left>
33 <font size=+2 color=red>
34 <p>The responsible person for this module is
35 <a href="mailto:andreas.morsch@cern.ch">Andreas Morsch</a>.
36 </font>
37 <pre>
38 */
39 //End_Html
40 //                                                                           //
41 //                                                                           //
42 ///////////////////////////////////////////////////////////////////////////////
43
44 #include "AliABSO.h"
45 #include "AliRun.h"
46 #include "AliConst.h"
47  
48 ClassImp(AliABSO)
49  
50 //_____________________________________________________________________________
51 AliABSO::AliABSO()
52 {
53   //
54   // Default constructor
55   //
56 }
57  
58 //_____________________________________________________________________________
59 AliABSO::AliABSO(const char *name, const char *title)
60        : AliModule(name,title)
61 {
62   //
63   // Standard constructor
64   //
65   SetMarkerColor(7);
66   SetMarkerStyle(2);
67   SetMarkerSize(0.4);
68 }
69  
70 //_____________________________________________________________________________
71 void AliABSO::CreateGeometry()
72 {
73   //
74   // Creation of the geometry of the muon absorber
75   //
76 }
77
78 //_____________________________________________________________________________
79 void AliABSO::DrawModule()
80 {
81   //
82   // Draw a shaded view of the muon absorber
83   //
84 }
85
86
87 //_____________________________________________________________________________
88 void AliABSO::CreateMaterials()
89 {
90   //
91   // Define materials for muon absorber
92   //
93   Int_t   ISXFLD = gAlice->Field()->Integ();
94   Float_t SXMGMX = gAlice->Field()->Max();
95   
96   Float_t apoly[2]  = { 12.01,1. };
97   Float_t zpoly[2]  = { 6.,1. };
98   Float_t wpoly[2]  = { .33,.67 };
99   Float_t aconc[10] = { 1.,12.01,15.994,22.99,24.305,26.98,
100                         28.086,39.1,40.08,55.85 };
101   Float_t zconc[10] = { 1.,6.,8.,11.,12.,13.,14.,19.,20.,26. };
102   Float_t wconc[10] = { .01,.001,.529107,.016,.002,.033872,
103                         .337021,.013,.044,.014 };
104   Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
105   Float_t zsteel[4] = { 26.,24.,28.,14. };
106   Float_t wsteel[4] = { .715,.18,.1,.005 };
107 //
108 //
109 // Ni-Cu-W alloy
110   Float_t aniwcu[3] ={58.6934, 183.84, 63.546};
111   Float_t zniwcu[3] ={28., 74., 29};
112   Float_t wniwcu[3] ={0.015,0.95,0.035};
113 //
114 // Insulation powder
115   Float_t ains[3] ={28.0855, 15.9994};
116   Float_t zins[3] ={14.,      8.};
117   Float_t wins[3] ={1.,       2.};
118 //
119   Float_t epsil, stmin, tmaxfd, deemax, stemax;
120   //
121   //     Carbon 
122   AliMaterial(6,  "CARBON$   ", 12.01, 6., 2.265, 18.8, 49.9);
123   AliMaterial(26, "CARBON$   ", 12.01, 6., 2.265, 18.8, 49.9);
124   AliMaterial(46, "CARBON$   ", 12.01, 6., 2.265, 18.8, 49.9);
125   //
126   //     Aluminum 
127   AliMaterial(9,  "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
128   AliMaterial(29, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
129   AliMaterial(49, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
130   //
131   //     Iron 
132   AliMaterial(10, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
133   AliMaterial(30, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
134   AliMaterial(50, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
135   //
136   //     Tungsten 
137   AliMaterial(12, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
138   AliMaterial(32, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
139   AliMaterial(52, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
140   //
141   //     Ni-W-Cu 
142   AliMixture(21, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
143   AliMixture(41, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
144   AliMixture(61, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
145   //
146   //     Lead 
147   AliMaterial(13, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
148   AliMaterial(33, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
149   AliMaterial(53, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
150   //
151   //     Air 
152   AliMaterial(15, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500.);
153   AliMaterial(35, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500.);
154   AliMaterial(55, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500.);
155   //
156   //     Vacuum 
157   AliMaterial(16, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
158   AliMaterial(36, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
159   AliMaterial(56, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
160   //
161   //     Concrete 
162   AliMixture(17, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
163   AliMixture(37, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
164   AliMixture(57, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
165   //
166   //     Poly CH2 
167   AliMixture(18, "POLYETHYLEN$", apoly, zpoly, .95, -2, wpoly);
168   //
169   // After a call with ratios by number (negative number of elements), 
170   // the ratio array is changed to the ratio by weight, so all successive 
171   // calls with the same array must specify the number of elements as 
172   // positive 
173   //
174   AliMixture(38, "POLYETHYLEN$", apoly, zpoly, .95, 2, wpoly);
175   AliMixture(58, "POLYETHYLEN$", apoly, zpoly, .95, 2, wpoly);
176   //
177   //     stainless Steel 
178   AliMixture(19, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
179   AliMixture(39, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
180   AliMixture(59, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
181   //
182   //     Insulation powder 
183   AliMixture(14, "INSULATION$", ains, zins, 0.41, -2, wins);
184   AliMixture(34, "INSULATION$", ains, zins, 0.41, 2, wins);
185   AliMixture(54, "INSULATION$", ains, zins, 0.41, 2, wins);
186
187   //
188   // **************** 
189   //     Defines tracking media parameters. 
190   //
191   epsil  = .001;    // Tracking precision, 
192   stemax = -0.01;   // Maximum displacement for multiple scat 
193   tmaxfd = -20.;    // Maximum angle due to field deflection 
194   deemax = -.3;     // Maximum fractional energy loss, DLS 
195   stmin  = -.8;
196   // *************** 
197   //
198   //    Carbon 
199   AliMedium(6,  "C_C0             ",  6, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
200   AliMedium(26, "C_C1             ", 26, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
201   AliMedium(46, "C_C2             ", 46, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
202   //
203   //    Aluminum 
204   AliMedium(9,  "ALU_C0          ",  9, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
205   AliMedium(29, "ALU_C1          ", 29, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
206   AliMedium(49, "ALU_C2          ", 49, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
207   //
208   //    Iron 
209   AliMedium(10, "FE_C0           ", 10, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
210   AliMedium(30, "FE_C1           ", 30, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
211   AliMedium(50, "FE_C2           ", 50, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
212   //
213   //    Tungsten 
214   AliMedium(12, "W_C0            ", 12, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
215   AliMedium(32, "W_C1            ", 32, 0, ISXFLD, SXMGMX, tmaxfd, -stemax, deemax, epsil, stmin);
216   AliMedium(52, "W_C2            ", 52, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
217   //    Ni/Tungsten 
218   AliMedium(21, "Ni/W0           ", 21, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
219   AliMedium(41, "Ni/W1           ", 41, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
220   AliMedium(61, "Ni/W3           ", 61, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
221   //
222   //    Lead 
223   AliMedium(13, "PB_C0           ", 13, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
224   AliMedium(33, "PB_C1           ", 33, 0, ISXFLD, SXMGMX, tmaxfd, -stemax, deemax, epsil, stmin);
225   AliMedium(53, "PB_C2           ", 53, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
226   //
227   //    Insulation Powder 
228   AliMedium(14, "INS_C0          ", 14, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
229   AliMedium(34, "INS_C1          ", 34, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
230   AliMedium(54, "INS_C2          ", 54, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
231   //
232   //    Air 
233   AliMedium(15, "AIR_C0          ", 15, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
234   AliMedium(35, "AIR_C1          ", 35, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
235   AliMedium(55, "AIR_C2          ", 55, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
236   //
237   //    Vacuum 
238   AliMedium(16, "VA_C0           ", 16, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
239   AliMedium(36, "VA_C1           ", 36, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
240   AliMedium(56, "VA_C2           ", 56, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
241   //
242   //    Concrete 
243   AliMedium(17, "CC_C0           ", 17, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
244   AliMedium(37, "CC_C1           ", 37, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
245   AliMedium(57, "CC_C2           ", 57, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
246   //
247   //    Polyethilene 
248   AliMedium(18, "CH2_C0          ", 18, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
249   AliMedium(38, "CH2_C1          ", 38, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
250   AliMedium(58, "CH2_C2          ", 58, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
251   //
252   //    Steel 
253   AliMedium(19, "ST_C0           ", 19, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
254   AliMedium(39, "ST_C1           ", 39, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
255   AliMedium(59, "ST_C3           ", 59, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
256 }
257
258 //_____________________________________________________________________________
259 void AliABSO::Init()
260 {
261   //
262   // Initialisation of the muon absorber after it has been built
263   Int_t i;
264   //
265   printf("\n");
266   for(i=0;i<35;i++) printf("*");
267   printf(" ABSO_INIT ");
268   for(i=0;i<35;i++) printf("*");
269   printf("\n");
270   //
271   for(i=0;i<80;i++) printf("*");
272   printf("\n");
273 }
274