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 /////////////////////////////////////////////////////////////////////
20 // T0 ( T-zero) detector version 0 //
24 <img src="gif/AliT0v2Class.gif">
29 //////////////////////////////////////////////////////////////////////
34 #include <Riostream.h>
37 #include <TLorentzVector.h>
39 #include <TVirtualMC.h>
50 //////////////////////////////////////////////////////////////////////
51 // Standart constructor for T0 Detector version 2
52 //////////////////////////////////////////////////////////////////////
53 AliT0v2::AliT0v2(const char *name, const char *title):
57 // setBufferSize(128000);
61 //////////////////////////////////////////////////////////////////////
62 // Create the geometry of T0 Detector version 2
63 //////////////////////////////////////////////////////////////////////
64 void AliT0v2::CreateGeometry()
67 <img src="gif/AliT0v2.gif">
80 Float_t pstart[3] = {4.5, 10.7, 5.3};
81 Float_t pinstart[3] = {0., 1.31, 5.25};
82 Float_t ppmt[3] = {0., 1.31, 3.5};
83 Float_t ptop[3] = {0., 1.3, 1.5};
84 // Float_t preg[3] = {0., 1.3, 0.005};
85 Float_t preg[3] = {0., 0.875, 0.005};
86 Float_t pdes[3] = {0.875, 1.3, 0.005};
91 theta = (180 / TMath::Pi()) * TMath::ATan(6.5 / zRight);
92 angel = 2 * TMath::Pi() / 12;
93 idtmed = fIdtmed->GetArray();
96 AliMatrix (idrotm[901], 90., 0., 90., 90., 180., 0.);
98 TVirtualMC::GetMC()->Gsvolu ("0RST", "TUBE", idtmed[3], pstart, 3);
99 TVirtualMC::GetMC()->Gsvolu ("0LST", "TUBE", idtmed[3], pstart, 3);
100 TVirtualMC::GetMC()->Gspos ("0RST", 1, "ALIC", 0., 0., -zRight, 0, "ONLY");
101 TVirtualMC::GetMC()->Gspos ("0LST", 1, "ALIC", 0., 0., zLeft, idrotm[901], "ONLY");
103 // 12 unit: PMT + divider
104 TVirtualMC::GetMC()->Gsvolu("0INS", "TUBE", idtmed[3], pinstart, 3);
106 for (i = 0; i < 12; i++)
108 x = 6.5 * TMath::Sin(i * angel);
109 y = 6.5 * TMath::Cos(i * angel);
112 phi[1] = 90 - i * 30;
113 phi[2] = 90 - i * 30;
114 for (j = 0; j < 3; j++)
115 if (phi[j] < 0) phi[j] += 360;
117 AliMatrix (idrotm[902 + i], 90., phi[0],
121 TVirtualMC::GetMC()->Gspos ("0INS", i + 1, "0RST", x, y, z, idrotm[902 + i], "ONLY");
122 TVirtualMC::GetMC()->Gspos ("0INS", i + 13, "0LST", x, y, z, 0, "ONLY");
125 TVirtualMC::GetMC()->Gsvolu ("0PMT", "TUBE", idtmed[1], ppmt, 3);
127 z = -pinstart[2] + ppmt[2];
128 TVirtualMC::GetMC()->Gspos ("0PMT", 1, "0INS", x, y, z, 0, "ONLY");
131 // Entry window (glass)
132 TVirtualMC::GetMC()->Gsvolu ("0TOP", "TUBE", idtmed[6], ptop, 3);
133 z = -ppmt[2] + ptop[2];
134 TVirtualMC::GetMC()->Gspos ("0TOP", 1, "0PMT", 0, 0, z, 0, "ONLY");
136 TVirtualMC::GetMC()->Gsvolu ("0REG", "TUBE", idtmed[6], preg, 3);
137 z = -ppmt[2] + 2 * ptop[2] + preg[2];
138 TVirtualMC::GetMC()->Gspos ("0REG", 1, "0PMT", 0, 0, z, 0, "ONLY");
140 TVirtualMC::GetMC()->Gsvolu ("0DES", "TUBE", idtmed[6], pdes, 3);
141 z = -ppmt[2] + 2 * ptop[2] + preg[2];
142 TVirtualMC::GetMC()->Gspos ("0DES", 1, "0PMT", 0, 0, z, 0, "ONLY");
146 //////////////////////////////////////////////////////////////////////
147 // Definition of avaible T0 materials
148 //////////////////////////////////////////////////////////////////////
149 void AliT0v2::CreateMaterials()
151 Int_t isxfld = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Integ();
152 Float_t sxmgmx = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Max();
154 Double_t a, z, d, radl, absl;
159 Float_t ascin[2] = {1.01, 12.01};
160 Float_t zscin[2] = {1., 6.};
161 Float_t wscin[2] = {1., 1.};
162 Float_t denscin = 1.03;
165 Float_t aglass[2] = {28.0855, 15.9994};
166 Float_t zglass[2] = {14., 8.};
167 Float_t wglass[2] = { 1., 2.};
168 Float_t dglass = 2.65;
170 // Ceramic 97.2% Al2O3 , 2.8% SiO2
171 Float_t acer[2], zcer[2];
172 Float_t wcer[2] = { 0.972, 0.028};
173 Float_t aal2o3[2] = {26.981539, 15.9994 };
174 Float_t zal2o3[2] = {13., 8.};
175 Float_t wal2o3[2] = { 2., 3.};
176 Float_t denscer = 3.6;
178 // Brass 80% Cu, 20% Zn
179 Float_t abrass[2] = {63.546, 65.39};
180 Float_t zbrass[2] = {29., 30.};
181 Float_t wbrass[2] = { 0.8, 0.2};
182 Float_t denbrass = 8.96;
185 Float_t aribber[3] = {12., 1., 32.};
186 Float_t zribber[3] = { 6., 1., 16.};
187 Float_t wribber[3] = { 6., 12., 1.};
188 Float_t denribber = 0.8;
191 AliMaterial (0, "T0 Steel$", 55.850, 26., 7.87, 1.76, 999);
192 AliMaterial (1, "T0 Vacuum$", 1.e-16, 1.e-16, 1.e-16, 1.e16, 999);
193 AliMaterial (2, "T0 Air$", 14.61, 7.3, .001205, 30423., 999);
195 AliMixture (3, "Al2O3 $", aal2o3, zal2o3, denscer, -2, wal2o3);
196 AliMixture (4, "PMT glass $", aglass, zglass, dglass, -2, wglass);
198 TVirtualMC::GetMC()->GetMaterial((*fIdmate)[3], namate, a, z, d, radl, absl, par);
201 TVirtualMC::GetMC()->GetMaterial((*fIdmate)[4], namate, a, z, d, radl, absl, par);
205 AliMixture (5, "Scintillator$",ascin,zscin,denscin,-2,wscin);
206 AliMixture (6, "Brass $", abrass, zbrass, denbrass, 2, wbrass);
207 AliMixture (7, "Ribber $",aribber,zribber,denribber,-3,wribber);
208 AliMixture (9, "Ceramic $", acer, zcer, denscer, 2, wcer);
210 AliMedium (1, "T0 Air$", 2, 0, isxfld, sxmgmx, 10., .1, 1., .003, .003);
211 AliMedium (2, "Scintillator$", 5, 1, isxfld, sxmgmx, 10., .01, 1., .003, .003);
212 AliMedium (3, "Vacuum$", 1, 0, isxfld, sxmgmx, 10., .01, .1, .003, .003);
213 AliMedium (4, "Ceramic$", 9, 0, isxfld, sxmgmx, 10., .01, .1, .003, .003);
214 AliMedium (6, "Glass$", 4, 0, isxfld, sxmgmx, 10., .01, .1, .003, .003);
215 AliMedium (8, "Steel$", 0, 0, isxfld, sxmgmx, 1., .001, 1., .001, .001);
216 AliMedium (9, "Ribber $", 7, 0, isxfld, sxmgmx, 10., .01, .1, .003, .003);
217 AliMedium(11, "Brass $", 6, 0, isxfld, sxmgmx, 10., .01, .1, .003, .003);
222 //////////////////////////////////////////////////////////////////////
223 // Definition of optical properties for the Forward Multiplicity Detector
224 //////////////////////////////////////////////////////////////////////
225 void AliT0v2::DefineOpticalProperties()
227 // Optical properties definition.
228 // Definition Cherenkov parameters
229 const Int_t NUMENTRIES = 32;
231 Float_t ppckov[NUMENTRIES] =
232 { 2.034E-9, 2.068E-9, 2.103E-9, 2.139E-9,
233 2.177E-9, 2.216E-9, 2.256E-9, 2.298E-9,
234 2.341E-9, 2.386E-9, 2.433E-9, 2.481E-9,
235 2.532E-9, 2.585E-9, 2.640E-9, 2.697E-9,
236 2.757E-9, 2.820E-9, 2.885E-9, 2.954E-9,
237 3.026E-9, 3.102E-9, 3.181E-9, 3.265E-9,
238 3.353E-9, 3.446E-9, 3.545E-9, 3.649E-9,
239 3.760E-9, 3.877E-9, 4.002E-9, 4.136E-9 };
241 Float_t rindex_qwarz[NUMENTRIES] =
242 { 1.458, 1.458, 1.458, 1.458, 1.458, 1.458, 1.458,
243 1.458, 1.458, 1.458, 1.458, 1.458, 1.458, 1.458,
244 1.458, 1.458, 1.458, 1.458, 1.458, 1.458, 1.458,
245 1.458, 1.458, 1.458, 1.458, 1.458, 1.458, 1.458,
246 1.458, 1.458, 1.458, 1.458 };
248 Float_t rindex_air[NUMENTRIES] =
249 { 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1.,
250 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1.,
253 Float_t effic_all[NUMENTRIES] =
254 { 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1.,
255 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1., 1.,
258 Float_t absor_qwarz[NUMENTRIES] =
259 { 2000., 2000., 2000., 2000., 2000., 2000., 2000.,
260 2000., 2000., 2000., 2000., 2000., 2000., 2000.,
261 2000., 2000., 2000., 2000., 2000., 2000., 2000.,
262 2000., 2000., 2000., 2000., 2000., 2000., 2000.,
263 2000., 2000., 2000., 2000. };
265 Float_t absor_air[NUMENTRIES] =
266 { 200., 200., 200., 200., 200., 200., 200.,
267 200., 200., 200., 200., 200., 200., 200.,
268 200., 200., 200., 200., 200., 200., 200.,
269 200., 200., 200., 200., 200., 200., 200.,
270 200., 200., 200., 200. };
272 Int_t *idtmed = fIdtmed->GetArray();
274 TVirtualMC::GetMC()->SetCerenkov (idtmed[6], NUMENTRIES, ppckov, absor_qwarz, effic_all, rindex_qwarz);
275 TVirtualMC::GetMC()->SetCerenkov (idtmed[1], NUMENTRIES, ppckov, absor_air, effic_all, rindex_air);
278 //////////////////////////////////////////////////////////////////////
279 // Initialises version 2 of the Forward Multiplicity Detector
280 //////////////////////////////////////////////////////////////////////
284 fIdSens1 = TVirtualMC::GetMC()->VolId ("0REG");
285 printf ("*** T0 version 2 initialized ***\n");
289 //////////////////////////////////////////////////////////////////////
290 // Called for every step in the T0 Detector
291 //////////////////////////////////////////////////////////////////////
292 void AliT0v2::StepManager()
299 Float_t hitPhoton[6];
300 static Float_t hits[7];
307 if(!TVirtualMC::GetMC()->IsTrackAlive()) return; // particle has disappeared
309 // TGeant3 *g3 = (TGeant3*) TVirtualMC::GetMC();
312 TClonesArray &lhits = *fHits;
315 ///////////////////////////////////////////////
316 // If particles is photon then ...
318 if (TVirtualMC::GetMC()->TrackPid() == 50000050)
320 id = TVirtualMC::GetMC()->CurrentVolID(copy);
322 // Check the sensetive volume
325 if (TVirtualMC::GetMC()->IsTrackEntering())
327 TVirtualMC::GetMC()->CurrentVolOffID(2,copy);
330 vol[0] = RIGHT_ARRAY;
339 TVirtualMC::GetMC()->TrackPosition(pos);
340 TVirtualMC::GetMC()->TrackMomentum(mom);
344 TVirtualMC::GetMC()->Gmtod (XYZ, xyz, 1);
346 hitPhoton[0] = sqrt (xyz[0] * xyz[0] + xyz[1] * xyz[1]);
347 hitPhoton[1] = mom[0];
348 hitPhoton[2] = mom[1];
349 hitPhoton[3] = mom[2];
350 hitPhoton[4] = 1e9 * TVirtualMC::GetMC()->TrackTime();
351 hitPhoton[5] = 1e9 * TVirtualMC::GetMC()->Etot();
353 AddHitPhoton (gAlice->GetMCApp()->GetCurrentTrackNumber(), vol, hitPhoton);
355 TVirtualMC::GetMC()->StopTrack();
358 if (id == TVirtualMC::GetMC()->VolId ("0DES")) TVirtualMC::GetMC()->StopTrack();
361 // end photon particalary
362 ///////////////////////////////////////////////
365 ///////////////////////////////////////////////
366 // If particles is charge then ...
368 // Float_t charge = TVirtualMC::GetMC()->TrackCharge();
369 // if(TMath::Abs(charge) <= 0.) return;
370 id = TVirtualMC::GetMC()->CurrentVolID(copy);
373 // printf("TVirtualMC::GetMC()->ckine->ipart %d",TVirtualMC::GetMC()->ckine->ipart);
374 // Check the sensetive volume
375 if(id==TVirtualMC::GetMC()->VolId("0TOP") ) {
376 if(TVirtualMC::GetMC()->IsTrackEntering()) {
377 TVirtualMC::GetMC()->CurrentVolOffID(2,copy);
380 vol[0] = RIGHT_ARRAY;
389 TVirtualMC::GetMC()->TrackPosition(pos);
393 Float_t etot = TVirtualMC::GetMC()->Etot();
395 Int_t part = TVirtualMC::GetMC()->TrackPid();
397 Float_t ttime = TVirtualMC::GetMC()->TrackTime();
401 if(TVirtualMC::GetMC()->IsTrackInside()) {
402 Float_t de = TVirtualMC::GetMC()->Edep();
404 // printf ("E deposition %f\n",edep);
405 // for (i=0; i<=6; i++){
406 // printf(" HITS on T0 inside %f\n",hits[i]); }
408 if(TVirtualMC::GetMC()->IsTrackExiting()) {
409 Float_t de = TVirtualMC::GetMC()->Edep();
411 hits[3] = edep * 1e3;
413 // for (i=0; i<=6; i++){
414 // printf(" HITS on T0 Exit %f\n",hits[i]); }
415 //for (i=0; i<=1; i++) { printf("T0 vol %d\n",vol[i]);}
417 new(lhits[fNhits++]) AliT0hit(fIshunt,gAlice->GetMCApp()->GetCurrentTrackNumber(),vol,hits);
421 // end charge particles particalary
422 ///////////////////////////////////////////////