]>
Commit | Line | Data |
---|---|---|
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 | /* $Id$ */ | |
17 | ||
18 | //_________________________________________________________________________ | |
19 | // Base Class for PHOS description: | |
20 | // PHOS consists of a PbWO4 calorimeter (EMCA) and a gazeous charged | |
21 | // particles detector (CPV or PPSD). | |
22 | // The only provided method here is CreateMaterials, | |
23 | // which defines the materials common to all PHOS versions. | |
24 | // | |
25 | //*-- Author: Laurent Aphecetche & Yves Schutz (SUBATECH) | |
26 | ////////////////////////////////////////////////////////////////////////////// | |
27 | ||
28 | // --- ROOT system --- | |
29 | class TFile; | |
30 | #include "TROOT.h" | |
31 | #include "TTree.h" | |
32 | #include "TFolder.h" | |
33 | ||
34 | // --- Standard library --- | |
35 | ||
36 | #include <strstream.h> | |
37 | // --- AliRoot header files --- | |
38 | ||
39 | #include "AliPHOS.h" | |
40 | #include "AliMC.h" | |
41 | #include "AliRun.h" | |
42 | #include "AliMagF.h" | |
43 | #include "AliPHOSGeometry.h" | |
44 | #include "AliPHOSQAChecker.h" | |
45 | ||
46 | ClassImp(AliPHOS) | |
47 | //____________________________________________________________________________ | |
48 | AliPHOS:: AliPHOS() : AliDetector() | |
49 | { | |
50 | // Create folder and task hierarchy | |
51 | fName="PHOS"; | |
52 | CreatePHOSFolders(); | |
53 | } | |
54 | //____________________________________________________________________________ | |
55 | AliPHOS:: AliPHOS(const char* name, const char* title=""): AliDetector(name, title) | |
56 | { | |
57 | // Create folder and task hierarchy | |
58 | CreatePHOSFolders(); | |
59 | } | |
60 | //____________________________________________________________________________ | |
61 | void AliPHOS::CreatePHOSFolders() | |
62 | { | |
63 | // create the ALICE TFolder | |
64 | // create the ALICE TTasks | |
65 | // add the Alice QA TTAsks | |
66 | // create the ALICE main TFolder | |
67 | // add the Alice QA Alarms | |
68 | // this should be done of course by AliRun | |
69 | ||
70 | TFolder * alice = new TFolder(); | |
71 | alice->SetNameTitle("YSAlice", "Alice Folder") ; | |
72 | gROOT->GetListOfBrowsables()->Add(alice) ; | |
73 | ||
74 | TFolder * aliceF = alice->AddFolder("folders", "Alice memory Folder") ; | |
75 | // make it the owner of the objects that it contains | |
76 | aliceF->SetOwner() ; | |
77 | TFolder * alarmsF = aliceF->AddFolder("QAAlarms", "Alarms raised by QA check") ; | |
78 | // make it the owner of the objects that it contains | |
79 | alarmsF->SetOwner() ; | |
80 | TFolder * aliceT = alice->AddFolder("tasks", "Alice tasks Folder") ; | |
81 | // make it the owner of the objects that it contains | |
82 | aliceT->SetOwner() ; | |
83 | ||
84 | TTask * aliceQA = new TTask("QA", "Alice QA tasks") ; | |
85 | aliceT->Add(aliceQA); | |
86 | ||
87 | TTask * aliceDi = new TTask("(S)Digitizer", "Alice SDigitizer & Digitizer") ; | |
88 | aliceT->Add(aliceDi); | |
89 | ||
90 | TTask * aliceRe = new TTask("Reconstructioner", "Alice Reconstructioner") ; | |
91 | aliceT->Add(aliceRe); | |
92 | ||
93 | char * tempo = new char[80] ; | |
94 | ||
95 | // creates the PHOSQA and adds it to alice main QA task | |
96 | sprintf(tempo, "%sCheckers container",GetName() ) ; | |
97 | fQATask = new AliPHOSQAChecker(GetName(), tempo); | |
98 | aliceQA->Add(fQATask) ; | |
99 | ||
100 | // creates the PHOS(S)Digitizer and adds it to alice main (S)Digitizer task | |
101 | sprintf(tempo, "%sDigitizers container",GetName() ) ; | |
102 | fSDTask = new AliPHOSQAChecker(GetName(), tempo); | |
103 | aliceDi->Add(fSDTask) ; | |
104 | // creates the PHOS reconstructioner and adds it to alice main Reconstructioner task | |
105 | sprintf(tempo, "%sReconstructioner container",GetName() ) ; | |
106 | fReTask = new AliPHOSQAChecker(GetName(), tempo); | |
107 | aliceRe->Add(fReTask) ; | |
108 | ||
109 | delete tempo ; | |
110 | ||
111 | // creates the PHOSQA alarm folder | |
112 | alarmsF->AddFolder("PHOS", "QA alarms from PHOS") ; | |
113 | } | |
114 | //____________________________________________________________________________ | |
115 | AliPHOS::~AliPHOS() | |
116 | { | |
117 | // remove the alice folder and alice QA task that PHOS creates instead of AliRun | |
118 | ||
119 | // remove and delete the PHOS QA tasks | |
120 | TFolder * alice = (TFolder*)gROOT->GetListOfBrowsables()->FindObject("YSAlice") ; | |
121 | TTask * aliceQA = (TTask*)alice->FindObject("tasks/QA") ; | |
122 | fQATask->GetListOfTasks()->Delete() ; | |
123 | aliceQA->GetListOfTasks()->Remove(fQATask) ; | |
124 | delete fQATask ; | |
125 | ||
126 | // remove and delete aliceQA (should be done by AliRun) | |
127 | } | |
128 | ||
129 | //____________________________________________________________________________ | |
130 | void AliPHOS::CreateMaterials() | |
131 | { | |
132 | // Definitions of materials to build PHOS and associated tracking media. | |
133 | // media number in idtmed are 699 to 798. | |
134 | ||
135 | // --- The PbWO4 crystals --- | |
136 | Float_t aX[3] = {207.19, 183.85, 16.0} ; | |
137 | Float_t zX[3] = {82.0, 74.0, 8.0} ; | |
138 | Float_t wX[3] = {1.0, 1.0, 4.0} ; | |
139 | Float_t dX = 8.28 ; | |
140 | ||
141 | AliMixture(0, "PbWO4$", aX, zX, dX, -3, wX) ; | |
142 | ||
143 | ||
144 | // --- The polysterene scintillator (CH) --- | |
145 | Float_t aP[2] = {12.011, 1.00794} ; | |
146 | Float_t zP[2] = {6.0, 1.0} ; | |
147 | Float_t wP[2] = {1.0, 1.0} ; | |
148 | Float_t dP = 1.032 ; | |
149 | ||
150 | AliMixture(1, "Polystyrene$", aP, zP, dP, -2, wP) ; | |
151 | ||
152 | // --- Aluminium --- | |
153 | AliMaterial(2, "Al$", 26.98, 13., 2.7, 8.9, 999., 0, 0) ; | |
154 | // --- Absorption length is ignored ^ | |
155 | ||
156 | // --- Tyvek (CnH2n) --- | |
157 | Float_t aT[2] = {12.011, 1.00794} ; | |
158 | Float_t zT[2] = {6.0, 1.0} ; | |
159 | Float_t wT[2] = {1.0, 2.0} ; | |
160 | Float_t dT = 0.331 ; | |
161 | ||
162 | AliMixture(3, "Tyvek$", aT, zT, dT, -2, wT) ; | |
163 | ||
164 | // --- Polystyrene foam --- | |
165 | Float_t aF[2] = {12.011, 1.00794} ; | |
166 | Float_t zF[2] = {6.0, 1.0} ; | |
167 | Float_t wF[2] = {1.0, 1.0} ; | |
168 | Float_t dF = 0.12 ; | |
169 | ||
170 | AliMixture(4, "Foam$", aF, zF, dF, -2, wF) ; | |
171 | ||
172 | // --- Titanium --- | |
173 | Float_t aTIT[3] = {47.88, 26.98, 54.94} ; | |
174 | Float_t zTIT[3] = {22.0, 13.0, 25.0} ; | |
175 | Float_t wTIT[3] = {69.0, 6.0, 1.0} ; | |
176 | Float_t dTIT = 4.5 ; | |
177 | ||
178 | AliMixture(5, "Titanium$", aTIT, zTIT, dTIT, -3, wTIT); | |
179 | ||
180 | // --- Silicon --- | |
181 | AliMaterial(6, "Si$", 28.0855, 14., 2.33, 9.36, 42.3, 0, 0) ; | |
182 | ||
183 | ||
184 | ||
185 | // --- Foam thermo insulation --- | |
186 | Float_t aTI[2] = {12.011, 1.00794} ; | |
187 | Float_t zTI[2] = {6.0, 1.0} ; | |
188 | Float_t wTI[2] = {1.0, 1.0} ; | |
189 | Float_t dTI = 0.1 ; | |
190 | ||
191 | AliMixture(7, "Thermo Insul.$", aTI, zTI, dTI, -2, wTI) ; | |
192 | ||
193 | // --- Textolitn --- | |
194 | Float_t aTX[4] = {16.0, 28.09, 12.011, 1.00794} ; | |
195 | Float_t zTX[4] = {8.0, 14.0, 6.0, 1.0} ; | |
196 | Float_t wTX[4] = {292.0, 68.0, 462.0, 736.0} ; | |
197 | Float_t dTX = 1.75 ; | |
198 | ||
199 | AliMixture(8, "Textolit$", aTX, zTX, dTX, -4, wTX) ; | |
200 | ||
201 | //--- FR4 --- | |
202 | Float_t aFR[3] = {28.0855, 15.9994, 17.749} ; | |
203 | Float_t zFR[3] = {14., 8., 8.875} ; | |
204 | Float_t wFR[3] = {.28, .32, .4} ; | |
205 | Float_t dFR = 1.8 ; | |
206 | ||
207 | AliMixture(9, "FR4$", aFR, zFR, dFR, -3, wFR) ; | |
208 | ||
209 | // --- The Composite Material for micromegas (so far polyetylene) --- | |
210 | Float_t aCM[2] = {12.01, 1.} ; | |
211 | Float_t zCM[2] = {6., 1.} ; | |
212 | Float_t wCM[2] = {1., 2.} ; | |
213 | Float_t dCM = 0.935 ; | |
214 | ||
215 | AliMixture(10, "Compo Mat$", aCM, zCM, dCM, -2, wCM) ; | |
216 | ||
217 | // --- Copper --- | |
218 | AliMaterial(11, "Cu$", 63.546, 29, 8.96, 1.43, 14.8, 0, 0) ; | |
219 | ||
220 | // --- G10 : Printed Circuit material --- | |
221 | Float_t aG10[4] = { 12., 1., 16., 28.} ; | |
222 | Float_t zG10[4] = { 6., 1., 8., 14.} ; | |
223 | Float_t wG10[4] = { .259, .288, .248, .205} ; | |
224 | Float_t dG10 = 1.7 ; | |
225 | ||
226 | AliMixture(12, "G10$", aG10, zG10, dG10, -4, wG10); | |
227 | ||
228 | // --- Lead --- | |
229 | AliMaterial(13, "Pb$", 207.2, 82, 11.35, 0.56, 0., 0, 0) ; | |
230 | ||
231 | // --- The gas mixture --- | |
232 | // Co2 | |
233 | Float_t aCO[2] = {12.0, 16.0} ; | |
234 | Float_t zCO[2] = {6.0, 8.0} ; | |
235 | Float_t wCO[2] = {1.0, 2.0} ; | |
236 | Float_t dCO = 0.001977 ; | |
237 | ||
238 | AliMixture(14, "CO2$", aCO, zCO, dCO, -2, wCO); | |
239 | ||
240 | // Ar | |
241 | Float_t dAr = 0.001782 ; | |
242 | AliMaterial(15, "Ar$", 39.948, 18.0, dAr, 14.0, 0., 0, 0) ; | |
243 | ||
244 | // ArCo2 | |
245 | Char_t namate[21]; | |
246 | Float_t aGM[2] ; | |
247 | Float_t zGM[2] ; | |
248 | Float_t wGM[2] ; | |
249 | Float_t dGM ; | |
250 | ||
251 | Float_t absL, radL, density ; | |
252 | Float_t buf[1] ; | |
253 | Int_t nbuf ; | |
254 | ||
255 | gMC->Gfmate((*fIdmate)[15], namate, aGM[0], zGM[0], density, radL, absL, buf, nbuf) ; // Get properties of Ar | |
256 | gMC->Gfmate((*fIdmate)[14], namate, aGM[1], zGM[1], density, radL, absL, buf, nbuf) ; // Get properties of CO2 | |
257 | ||
258 | ||
259 | // Create gas mixture | |
260 | ||
261 | Float_t arContent = 0.80 ; // Ar-content of the Ar/CO2-mixture (80% / 20%) | |
262 | ||
263 | wGM[0] = arContent; | |
264 | wGM[1] = 1. - arContent ; | |
265 | dGM = wGM[0] * dAr + wGM[1] * dCO; | |
266 | ||
267 | AliMixture(16, "ArCO2$", aGM, zGM, dGM, 2, wGM) ; | |
268 | ||
269 | // --- Stainless steel (let it be pure iron) --- | |
270 | AliMaterial(17, "Steel$", 55.845, 26, 7.87, 1.76, 0., 0, 0) ; | |
271 | ||
272 | // --- Air --- | |
273 | AliMaterial(99, "Air$", 14.61, 7.3, 0.001205, 30420., 67500., 0, 0) ; | |
274 | ||
275 | ||
276 | // DEFINITION OF THE TRACKING MEDIA | |
277 | ||
278 | // for PHOS: idtmed[699->798] equivalent to fIdtmed[0->100] | |
279 | Int_t * idtmed = fIdtmed->GetArray() - 699 ; | |
280 | Int_t isxfld = gAlice->Field()->Integ() ; | |
281 | Float_t sxmgmx = gAlice->Field()->Max() ; | |
282 | ||
283 | // The scintillator of the calorimeter made of PBW04 -> idtmed[699] | |
284 | AliMedium(0, "PHOS Xtal $", 0, 1, | |
285 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
286 | ||
287 | // The scintillator of the CPV made of Polystyrene scintillator -> idtmed[700] | |
288 | AliMedium(1, "CPV scint. $", 1, 1, | |
289 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
290 | ||
291 | // Various Aluminium parts made of Al -> idtmed[701] | |
292 | AliMedium(2, "Al parts $", 2, 0, | |
293 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.001, 0.001, 0, 0) ; | |
294 | ||
295 | // The Tywek which wraps the calorimeter crystals -> idtmed[702] | |
296 | AliMedium(3, "Tyvek wrapper$", 3, 0, | |
297 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.001, 0.001, 0, 0) ; | |
298 | ||
299 | // The Polystyrene foam around the calorimeter module -> idtmed[703] | |
300 | AliMedium(4, "Polyst. foam $", 4, 0, | |
301 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
302 | ||
303 | // The Titanium around the calorimeter crystal -> idtmed[704] | |
304 | AliMedium(5, "Titan. cover $", 5, 0, | |
305 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.0001, 0.0001, 0, 0) ; | |
306 | ||
307 | // The Silicon of the pin diode to read out the calorimeter crystal -> idtmed[705] | |
308 | AliMedium(6, "Si PIN $", 6, 0, | |
309 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.01, 0.01, 0, 0) ; | |
310 | ||
311 | // The thermo insulating material of the box which contains the calorimeter module -> idtmed[706] | |
312 | AliMedium(7, "Thermo Insul.$", 7, 0, | |
313 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
314 | ||
315 | // The Textolit which makes up the box which contains the calorimeter module -> idtmed[707] | |
316 | AliMedium(8, "Textolit $", 8, 0, | |
317 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
318 | ||
319 | // FR4: The Plastic which makes up the frame of micromegas -> idtmed[708] | |
320 | AliMedium(9, "FR4 $", 9, 0, | |
321 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.0001, 0, 0) ; | |
322 | ||
323 | ||
324 | // The Composite Material for micromegas -> idtmed[709] | |
325 | AliMedium(10, "CompoMat $", 10, 0, | |
326 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
327 | ||
328 | // Copper -> idtmed[710] | |
329 | AliMedium(11, "Copper $", 11, 0, | |
330 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.0001, 0, 0) ; | |
331 | ||
332 | // G10: Printed Circuit material -> idtmed[711] | |
333 | ||
334 | AliMedium(12, "G10 $", 12, 0, | |
335 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.01, 0, 0) ; | |
336 | ||
337 | // The Lead -> idtmed[712] | |
338 | ||
339 | AliMedium(13, "Lead $", 13, 0, | |
340 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ; | |
341 | ||
342 | // The gas mixture: ArCo2 -> idtmed[715] | |
343 | ||
344 | AliMedium(16, "ArCo2 $", 16, 1, | |
345 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.01, 0, 0) ; | |
346 | ||
347 | // Stainless steel -> idtmed[716] | |
348 | AliMedium(17, "Steel $", 17, 0, | |
349 | isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.0001, 0, 0) ; | |
350 | ||
351 | // Air -> idtmed[798] | |
352 | AliMedium(99, "Air $", 99, 0, | |
353 | isxfld, sxmgmx, 10.0, 1.0, 0.1, 0.1, 10.0, 0, 0) ; | |
354 | ||
355 | // --- Set decent energy thresholds for gamma and electron tracking | |
356 | ||
357 | // Tracking threshold for photons and electrons in the scintillator crystal | |
358 | gMC->Gstpar(idtmed[699], "CUTGAM",0.5E-4) ; | |
359 | gMC->Gstpar(idtmed[699], "CUTELE",1.0E-4) ; | |
360 | ||
361 | // --- Generate explicitly delta rays in the titan cover --- | |
362 | gMC->Gstpar(idtmed[704], "LOSS",3.) ; | |
363 | gMC->Gstpar(idtmed[704], "DRAY",1.) ; | |
364 | // --- and in aluminium parts --- | |
365 | gMC->Gstpar(idtmed[701], "LOSS",3.) ; | |
366 | gMC->Gstpar(idtmed[701], "DRAY",1.) ; | |
367 | // --- and in PIN diode | |
368 | gMC->Gstpar(idtmed[705], "LOSS",3) ; | |
369 | gMC->Gstpar(idtmed[705], "DRAY",1) ; | |
370 | // --- and in the passive convertor | |
371 | gMC->Gstpar(idtmed[712], "LOSS",3) ; | |
372 | gMC->Gstpar(idtmed[712], "DRAY",1) ; | |
373 | // Tracking threshold for photons and electrons in the gas ArC02 | |
374 | gMC->Gstpar(idtmed[715], "CUTGAM",1.E-5) ; | |
375 | gMC->Gstpar(idtmed[715], "CUTELE",1.E-5) ; | |
376 | gMC->Gstpar(idtmed[715], "CUTNEU",1.E-5) ; | |
377 | gMC->Gstpar(idtmed[715], "CUTHAD",1.E-5) ; | |
378 | gMC->Gstpar(idtmed[715], "CUTMUO",1.E-5) ; | |
379 | gMC->Gstpar(idtmed[715], "BCUTE",1.E-5) ; | |
380 | gMC->Gstpar(idtmed[715], "BCUTM",1.E-5) ; | |
381 | gMC->Gstpar(idtmed[715], "DCUTE",1.E-5) ; | |
382 | gMC->Gstpar(idtmed[715], "DCUTM",1.E-5) ; | |
383 | gMC->Gstpar(idtmed[715], "PPCUTM",1.E-5) ; | |
384 | gMC->Gstpar(idtmed[715], "LOSS",2.) ; | |
385 | gMC->Gstpar(idtmed[715], "DRAY",0.) ; | |
386 | gMC->Gstpar(idtmed[715], "STRA",2.) ; | |
387 | ||
388 | } | |
389 | //____________________________________________________________________________ | |
390 | void AliPHOS::SetTreeAddress() | |
391 | { | |
392 | ||
393 | ||
394 | // TBranch *branch; | |
395 | // AliDetector::SetTreeAddress(); | |
396 | ||
397 | TBranch *branch; | |
398 | char branchname[20]; | |
399 | sprintf(branchname,"%s",GetName()); | |
400 | ||
401 | // Branch address for hit tree | |
402 | TTree *treeH = gAlice->TreeH(); | |
403 | if (treeH && fHits) { | |
404 | branch = treeH->GetBranch(branchname); | |
405 | if (branch) branch->SetAddress(&fHits); | |
406 | } | |
407 | } | |
408 | ||
409 |