1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
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 **************************************************************************/
18 ///////////////////////////////////////////////////////////////////////////////
24 <img src="picts/AliMAGClass.gif">
27 <font size=+2 color=red>
28 <p>The responsible person for this module is
29 <a href="mailto:andreas.morsch@cern.ch">Andreas Morsch</a>.
35 ///////////////////////////////////////////////////////////////////////////////
43 //_____________________________________________________________________________
47 // Default constructor for L3 magnet
51 //_____________________________________________________________________________
52 AliMAG::AliMAG(const char *name, const char *title)
53 : AliModule(name,title)
56 // Standard constructor for L3 magnet
60 <img src="picts/aliMAG.gif">
69 //_____________________________________________________________________________
70 void AliMAG::CreateGeometry()
73 // Create geometry for L3 magnet
77 <img src="picts/mag.gif">
82 <img src="picts/tree_mag.gif">
86 Int_t *idtmed = fIdtmed->GetArray()-299;
92 // ANGLE POLAIRE MAXIMUM
106 gMC->Gsvolu("L3MO", "PGON", idtmed[334], par, 10);
107 gMC->Gspos("L3MO", 1, "ALIC", 0., -30., 0., 0, "ONLY");
115 gMC->Gsvolu("L3CO", "PGON", idtmed[328], par, 10);
116 gMC->Gspos("L3CO", 1, "L3MO", 0., 0., 0., 0, "ONLY");
122 gMC->Gsvolu("L3C1", "PGON", idtmed[308], par, 10);
123 gMC->Gspos("L3C1", 1, "L3MO", 0., 0., 0., 0, "ONLY");
131 gMC->Gsvolu("L3YO", "PGON", idtmed[329], par, 10);
132 gMC->Gspos("L3YO", 1, "L3MO", 0., 0., 0., 0, "ONLY");
134 // Define the return yoke of L3 (DOOR)
142 gMC->Gsvolu("L3DO", "PGON", idtmed[334], par, 10);
143 gMC->Gsvolu("L3DX", "PGON", idtmed[334], par, 10);
151 gMC->Gsvolu("L3FR", "PGON", idtmed[329], par, 10);
152 gMC->Gsvolu("L3FX", "PGON", idtmed[329], par, 10);
158 gMC->Gsvolu("L3IR", "PGON", idtmed[309], par, 10);
159 gMC->Gsvolu("L3IX", "PGON", idtmed[309], par, 10);
175 dpar[12] = dpar[6] + 50.;
176 gMC->Gsvolu("L3O1", "PGON", idtmed[314], dpar, 13);
177 gMC->Gsvolu("L3O3", "PGON", idtmed[314], dpar, 13);
184 gMC->Gsvolu("L3O2", "PGON", idtmed[314], par, 10);
185 gMC->Gsvolu("L3O4", "PGON", idtmed[314], par, 10);
187 // THE DOOR OPENING HAS TO BE PLACED WITH 'MANY' SINCE THE REGION
188 // WILL CONTAIN A MUON CHAMBER, BEAM PIPE AND BEAM SHIELD
189 // PLACED WITH 'ONLY'.
191 AliMatrix(idrotm[300], 90., 0., 90., 90., 180., 0.);
193 gMC->Gspos("L3DO", 1, "ALIC", 0., -30., 0., 0, "MANY");
194 gMC->Gspos("L3FR", 1, "L3DO", 0., 0., 0., 0, "MANY");
195 gMC->Gspos("L3IR", 1, "L3DO", 0., 0., 0., 0, "MANY");
197 gMC->Gspos("L3DX", 1, "ALIC", 0., -30., 0., idrotm[300], "MANY");
198 gMC->Gspos("L3FX", 1, "L3DX", 0., 0., 0., 0, "MANY");
199 gMC->Gspos("L3IX", 1, "L3DX", 0., 0., 0., 0, "MANY");
201 if(!strcmp(gMC->GetName(),"TGeant3")) {
203 gMC->Gspos("L3O1", 1, "L3FR", 0., 30., 0., 0, "MANY");
204 gMC->Gspos("L3O2", 1, "L3IR", 0., 30., 0., 0, "MANY");
205 gMC->Gspos("L3O3", 1, "L3FX", 0., 30., 0., 0, "MANY");
206 gMC->Gspos("L3O4", 1, "L3IX", 0., 30., 0., 0, "MANY");
210 gMC->Gspos("L3O1", 1, "ALIC", 0., 0., 0., 0, "MANY");
211 gMC->Gspos("L3O2", 1, "ALIC", 0., 0., 0., 0, "MANY");
212 gMC->Gsbool("L3O1", "L3DO");
213 gMC->Gsbool("L3O2", "L3DO");
215 gMC->Gspos("L3O3", 1, "ALIC", 0., 0., 0., idrotm[300], "MANY");
216 gMC->Gspos("L3O4", 1, "ALIC", 0., 0., 0., idrotm[300], "MANY");
217 gMC->Gsbool("L3O3", "L3DX");
218 gMC->Gsbool("L3O4", "L3DX");
222 //_____________________________________________________________________________
223 void AliMAG::CreateMaterials()
226 // Create materials for L3 magnet
229 Int_t isxfld = gAlice->Field()->Integ();
230 Float_t sxmgmx = gAlice->Field()->Max();
232 Float_t epsil, stmin, deemax, tmaxfd, stemax;
233 // --- Define the various materials for GEANT ---
236 AliMaterial(9, "Al$", 26.98, 13., 2.7, 8.9, 37.2);
237 AliMaterial(29, "Al$", 26.98, 13., 2.7, 8.9, 37.2);
240 AliMaterial(10, "Fe$", 55.85, 26., 7.87, 1.76, 17.1);
241 AliMaterial(30, "Fe$", 55.85, 26., 7.87, 1.76, 17.1);
244 AliMaterial(15, "Air$", 14.61, 7.3, .001205, 30420., 67500);
245 AliMaterial(35, "Air$", 14.61, 7.3, .001205, 30420., 67500);
248 // Defines tracking media parameters.
249 // Les valeurs sont commentees pour laisser le defaut
250 // a GEANT (version 3-21, page CONS200), f.m.
251 epsil = .001; // Tracking precision,
252 stemax = -1.; // Maximum displacement for multiple scat
253 tmaxfd = -20.; // Maximum angle due to field deflection
254 deemax = -.3; // Maximum fractional energy loss, DLS
260 AliMedium(10, "FE_C0 ", 10, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
261 AliMedium(30, "FE_C1 ", 30, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
265 AliMedium(9, "ALU_C0 ", 9, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
266 AliMedium(29, "ALU_C1 ", 29, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
270 AliMedium(15, "AIR_C0 ", 15, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
271 AliMedium(35, "AIR_C1 ", 35, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
274 //_____________________________________________________________________________
275 void AliMAG::DrawModule()
278 // Draw a shaded view of the L3 magnet
282 //_____________________________________________________________________________
286 // Initialise L3 magnet after it has been built
290 printf("\n%s: ",ClassName());
291 for(i=0;i<35;i++) printf("*");
292 printf(" MAG_INIT ");
293 for(i=0;i<35;i++) printf("*");
294 printf("\n%s: ",ClassName());
296 // Here the MAG initialisation code (if any!)
297 for(i=0;i<80;i++) printf("*");