prevent running if CDB snapshot setting failed
[u/mrichter/AliRoot.git] / STEER / STEER / AliMC.cxx
CommitLineData
5d12ce38 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
d0d4a6b3 18// This class is extracted from the AliRun class
19// and contains all the MC-related functionality
20// The number of dependencies has to be reduced...
21// Author: F.Carminati
22// Federico.Carminati@cern.ch
23
01a0f5d0 24#include <string.h>
25
c75cfb51 26#include <RVersion.h>
3e2e3ece 27#include <TArrayI.h>
7ca4655f 28#include <TClonesArray.h>
3e2e3ece 29#include <TFile.h>
f7a1cc68 30#include <TGeoGlobalMagField.h>
7ca4655f 31#include <TGeoManager.h>
3e2e3ece 32#include <TParticle.h>
33#include <TROOT.h>
5d12ce38 34#include <TStopwatch.h>
35#include <TSystem.h>
36#include <TVirtualMC.h>
81333cca 37#include <TMCVerbose.h>
c93255fe 38#include <TTree.h>
b60e0f5e 39
3e2e3ece 40#include "AliCDBEntry.h"
41#include "AliCDBManager.h"
42#include "AliCDBStorage.h"
5d12ce38 43#include "AliDetector.h"
44#include "AliGenerator.h"
3e2e3ece 45#include "AliGeomManager.h"
5d12ce38 46#include "AliHeader.h"
3e2e3ece 47#include "AliHit.h"
5d12ce38 48#include "AliLego.h"
3e2e3ece 49#include "AliLog.h"
5d12ce38 50#include "AliMC.h"
3e2e3ece 51#include "AliMagF.h"
5d12ce38 52#include "AliRun.h"
3e2e3ece 53#include "AliSimulation.h"
5d12ce38 54#include "AliStack.h"
55#include "AliTrackReference.h"
a5fe2c41 56#include "AliTransportMonitor.h"
5d12ce38 57
66b0310c 58using std::endl;
59using std::cout;
5d12ce38 60ClassImp(AliMC)
61
62//_______________________________________________________________________
63AliMC::AliMC() :
64 fGenerator(0),
9d188d33 65 fSaveRndmStatus(kFALSE),
66 fSaveRndmEventStatus(kFALSE),
67 fReadRndmStatus(kFALSE),
a5fe2c41 68 fUseMonitoring(kFALSE),
9d188d33 69 fRndmFileName("random.root"),
5d12ce38 70 fEventEnergy(0),
71 fSummEnergy(0),
72 fSum2Energy(0),
73 fTrRmax(1.e10),
74 fTrZmax(1.e10),
90e48c0c 75 fRDecayMax(1.e10),
38ca2ad6 76 fRDecayMin(-1.),
90e48c0c 77 fDecayPdg(0),
5d12ce38 78 fImedia(0),
79 fTransParName("\0"),
a5fe2c41 80 fMonitor(0),
5d12ce38 81 fHitLists(0),
3cac0921 82 fTmpTreeTR(0),
83 fTmpFileTR(0),
fd650020 84 fTrackReferences(),
85 fTmpTrackReferences()
5d12ce38 86
87{
d0d4a6b3 88 //default constructor
0561efeb 89 DecayLimits();
5d12ce38 90}
91
92//_______________________________________________________________________
93AliMC::AliMC(const char *name, const char *title) :
94 TVirtualMCApplication(name, title),
95 fGenerator(0),
9d188d33 96 fSaveRndmStatus(kFALSE),
97 fSaveRndmEventStatus(kFALSE),
98 fReadRndmStatus(kFALSE),
a5fe2c41 99 fUseMonitoring(kFALSE),
9d188d33 100 fRndmFileName("random.root"),
5d12ce38 101 fEventEnergy(0),
102 fSummEnergy(0),
103 fSum2Energy(0),
104 fTrRmax(1.e10),
105 fTrZmax(1.e10),
90e48c0c 106 fRDecayMax(1.e10),
38ca2ad6 107 fRDecayMin(-1.),
90e48c0c 108 fDecayPdg(0),
5d12ce38 109 fImedia(new TArrayI(1000)),
110 fTransParName("\0"),
a5fe2c41 111 fMonitor(0),
5d12ce38 112 fHitLists(new TList()),
3cac0921 113 fTmpTreeTR(0),
114 fTmpFileTR(0),
fd650020 115 fTrackReferences("AliTrackReference", 100),
116 fTmpTrackReferences("AliTrackReference", 100)
5d12ce38 117{
d0d4a6b3 118 //constructor
5d12ce38 119 // Set transport parameters
120 SetTransPar();
0561efeb 121 DecayLimits();
5d12ce38 122 // Prepare the tracking medium lists
123 for(Int_t i=0;i<1000;i++) (*fImedia)[i]=-99;
5d12ce38 124}
125
126//_______________________________________________________________________
5d12ce38 127AliMC::~AliMC()
128{
d0d4a6b3 129 //destructor
5d12ce38 130 delete fGenerator;
131 delete fImedia;
5d12ce38 132 delete fHitLists;
a5fe2c41 133 delete fMonitor;
5d12ce38 134 // Delete track references
5d12ce38 135}
136
137//_______________________________________________________________________
5d12ce38 138void AliMC::ConstructGeometry()
139{
140 //
4a9de4af 141 // Either load geometry from file or create it through usual
142 // loop on detectors. In the first case the method
143 // AliModule::CreateMaterials() only builds fIdtmed and is postponed
144 // at InitGeometry().
5d12ce38 145 //
146
d97f1dbe 147 if(AliSimulation::Instance()->IsGeometryFromFile()){ //load geometry either from CDB or from file
148 if(IsGeometryFromCDB()){
ced249e6 149 AliInfo("Loading geometry from CDB default storage");
150 AliCDBPath path("GRP","Geometry","Data");
151 AliCDBEntry *entry=AliCDBManager::Instance()->Get(path.GetPath());
152 if(!entry) AliFatal("Unable to load geometry from CDB!");
153 entry->SetOwner(0);
154 gGeoManager = (TGeoManager*) entry->GetObject();
155 if (!gGeoManager) AliFatal("TGeoManager object not found in the specified CDB entry!");
4a9de4af 156 }else{
ced249e6 157 // Load geometry
d97f1dbe 158 const char *geomfilename = AliSimulation::Instance()->GetGeometryFile();
ced249e6 159 if(gSystem->ExpandPathName(geomfilename)){
160 AliInfo(Form("Loading geometry from file:\n %40s",geomfilename));
161 TGeoManager::Import(geomfilename);
162 }else{
163 AliInfo(Form("Geometry file %40s not found!\n",geomfilename));
164 return;
165 }
4a9de4af 166 }
2942f542 167 TVirtualMC::GetMC()->SetRootGeometry();
4a9de4af 168 }else{
169 // Create modules, materials, geometry
e8bfa5e3 170 if (!gGeoManager) new TGeoManager("ALICE", "ALICE geometry");
5d12ce38 171 TStopwatch stw;
172 TIter next(gAlice->Modules());
173 AliModule *detector;
21bf7095 174 AliDebug(1, "Geometry creation:");
5d12ce38 175 while((detector = dynamic_cast<AliModule*>(next()))) {
176 stw.Start();
177 // Initialise detector materials and geometry
178 detector->CreateMaterials();
179 detector->CreateGeometry();
21bf7095 180 AliInfo(Form("%10s R:%.2fs C:%.2fs",
181 detector->GetName(),stw.RealTime(),stw.CpuTime()));
5d12ce38 182 }
4a9de4af 183 }
184
5d12ce38 185}
186
187//_______________________________________________________________________
39b3f8ba 188Bool_t AliMC::MisalignGeometry()
189{
d97f1dbe 190 // Call misalignment code if AliSimulation object was defined.
191
192 if(!AliSimulation::Instance()->IsGeometryFromFile()){
193 //Set alignable volumes for the whole geometry
194 SetAllAlignableVolumes();
195 }
196 // Misalign geometry via AliSimulation instance
197 if (!AliSimulation::Instance()) return kFALSE;
198 AliGeomManager::SetGeometry(gGeoManager);
199 if(!AliGeomManager::CheckSymNamesLUT("ALL"))
0bf7aade 200 AliFatal("Current loaded geometry differs in the definition of symbolic names!");
d97f1dbe 201
202 return AliSimulation::Instance()->MisalignGeometry(AliRunLoader::Instance());
39b3f8ba 203}
204
205//_______________________________________________________________________
661663fa 206void AliMC::ConstructOpGeometry()
207{
208 //
209 // Loop all detector modules and call DefineOpticalProperties() method
210 //
211
212 TIter next(gAlice->Modules());
213 AliModule *detector;
214 AliInfo("Optical properties definition");
215 while((detector = dynamic_cast<AliModule*>(next()))) {
dde0a601 216 // Initialise detector geometry
d97f1dbe 217 if(AliSimulation::Instance()->IsGeometryFromFile()) detector->CreateMaterials();
661663fa 218 // Initialise detector optical properties
219 detector->DefineOpticalProperties();
220 }
221}
222
81333cca 223#include <TPDGCode.h>
224//_______________________________________________________________________
225void AliMC::AddParticles()
226{
227 //
228 // Add particles (not present in Geant3 or Geant4)
229 //
230
81333cca 231 cout << "########## AliMC::AddParticles" << endl;
232
233 //Hypertriton
2942f542 234 TVirtualMC::GetMC()->DefineParticle(1010010030, "HyperTriton", kPTHadron, 2.99131 , 1.0, 2.632e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 3, kFALSE);
81333cca 235 //Anti-Hypertriton
2942f542 236 TVirtualMC::GetMC()->DefineParticle(-1010010030, "AntiHyperTriton", kPTHadron, 2.99131 , 1.0, 2.632e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 3, kFALSE);
81333cca 237
154fdac9 238 //Hyper hydrogen 4
2942f542 239 TVirtualMC::GetMC()->DefineParticle(1010010040, "Hyperhydrog4", kPTHadron, 3.931 , 1.0, 2.632e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 4, kFALSE);
c05d75f7 240 //Anti-Hyper hydrogen 4
2942f542 241 TVirtualMC::GetMC()->DefineParticle(-1010010040, "AntiHyperhydrog4", kPTHadron, 3.931 , 1.0, 2.632e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 4, kFALSE);
c05d75f7 242
154fdac9 243 //Hyper helium 4
2942f542 244 TVirtualMC::GetMC()->DefineParticle(1010020040, "Hyperhelium4", kPTHadron, 3.929 , 2.0, 2.632e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 4, kFALSE);
c05d75f7 245 //Anti-Hyper helium 4
2942f542 246 TVirtualMC::GetMC()->DefineParticle(-1010020040, "AntiHyperhelium4", kPTHadron, 3.929 , 2.0, 2.632e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 4, kFALSE);
c05d75f7 247
81333cca 248 //Lambda-Neutron
2942f542 249 TVirtualMC::GetMC()->DefineParticle(1010000020, "LambdaNeutron", kPTNeutron, 2.054 , 0.0, 2.632e-10,"Hadron", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
81333cca 250
251 //Anti-Lambda-Neutron
2942f542 252 TVirtualMC::GetMC()->DefineParticle(-1010000020, "AntiLambdaNeutron", kPTNeutron, 2.054 , 0.0, 2.632e-10,"Hadron", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
81333cca 253
254 //H-Dibaryon
154fdac9 255 TVirtualMC::GetMC()->DefineParticle(1020000020, "Hdibaryon", kPTNeutron, 2.23, 0.0, 2.632e-10,"Hadron", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
81333cca 256 //Anti-H-Dibaryon
154fdac9 257 TVirtualMC::GetMC()->DefineParticle(-1020000020, "AntiHdibaryon", kPTNeutron, 2.23, 0.0, 2.632e-10,"Hadron", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
81333cca 258
851a3884 259 //Xi-Proton
2942f542 260 TVirtualMC::GetMC()->DefineParticle(1030000020, "Xi0Proton", kPTHadron, 2.248 , 1.0, 1.333e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
851a3884 261
262 //Anti-Xi-Proton
2942f542 263 TVirtualMC::GetMC()->DefineParticle(-1030000020, "AntiXi0Proton", kPTHadron, 2.248 , 1.0, 1.333e-10,"Ion", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
851a3884 264
265 //Lambda-Neutron-Neutron
2942f542 266 TVirtualMC::GetMC()->DefineParticle(1010000030, "LambdaNeutronNeutron", kPTNeutron, 2.982 , 0.0, 2.632e-10,"Hadron", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
851a3884 267
268 //Anti-Lambda-Neutron-Neutron
2942f542 269 TVirtualMC::GetMC()->DefineParticle(-1010000030, "AntiLambdaNeutronNeutron", kPTNeutron, 2.982 , 0.0, 2.632e-10,"Hadron", 0.0, 0, 1, 0, 0, 0, 0, 0, 2, kFALSE);
851a3884 270
154fdac9 271 //Resonances not in Generators
272 // f0(980) assume 70 MeV as width (PDG: 40 to 100 MeV)
273 TVirtualMC::GetMC()->DefineParticle(9010221, "f0_980", kPTNeutron, 0.98 , 0.0, 9.403e-24,"Hadron", 7e-2, 0, 0, 0, 0, 0, 0, 0, 0, kTRUE);
274
275 // f2(1270) (PDG: width = 185 MeV)
276 TVirtualMC::GetMC()->DefineParticle(225, "f2_1270", kPTNeutron, 1.275 , 0.0, 3.558e-24,"Hadron", 0.185, 0, 0, 0, 0, 0, 0, 0, 0, kTRUE);
277
81333cca 278 // Define the 2- and 3-body phase space decay for the Hyper-Triton
279 Int_t mode[6][3];
280 Float_t bratio[6];
281
282 for (Int_t kz = 0; kz < 6; kz++) {
283 bratio[kz] = 0.;
284 mode[kz][0] = 0;
285 mode[kz][1] = 0;
286 mode[kz][2] = 0;
287 }
288 bratio[0] = 50.;
289 mode[0][0] = 1000020030; // Helium3
290 mode[0][1] = -211; // negative pion
c05d75f7 291
81333cca 292 bratio[1] = 50.;
293 mode[1][0] = 1000010020; // deuteron
294 mode[1][1] = 2212; // proton
295 mode[1][2] = -211; // negative pion
296
2942f542 297 TVirtualMC::GetMC()->SetDecayMode(1010010030,bratio,mode);
81333cca 298
299
300
301 // Define the 2- and 3-body phase space decay for the Anti-Hyper-Triton
302 Int_t amode[6][3];
303 Float_t abratio[6];
304
305 for (Int_t kz = 0; kz < 6; kz++) {
306 abratio[kz] = 0.;
307 amode[kz][0] = 0;
308 amode[kz][1] = 0;
309 amode[kz][2] = 0;
310 }
311 abratio[0] = 50.;
312 amode[0][0] = -1000020030; // anti- Helium3
313 amode[0][1] = 211; // positive pion
314 abratio[1] = 50.;
315 amode[1][0] = -1000010020; // anti-deuteron
316 amode[1][1] = -2212; // anti-proton
317 amode[1][2] = 211; // positive pion
318
2942f542 319 TVirtualMC::GetMC()->SetDecayMode(-1010010030,abratio,amode);
81333cca 320
c05d75f7 321 ////// ----------Hypernuclei with Mass=4 ----------- //////////
322
323 // Define the 2- and 3-body phase space decay for the Hyper Hydrogen 4
324
325 Int_t mode3[6][3];
326 Float_t bratio3[6];
327
328 for (Int_t kz = 0; kz < 6; kz++) {
329 bratio3[kz] = 0.;
330 mode3[kz][0] = 0;
331 mode3[kz][1] = 0;
332 mode3[kz][2] = 0;
333 }
334 bratio3[0] = 50.;
335 mode3[0][0] = 1000020040; // Helium4
336 mode3[0][1] = -211; // negative pion
337
338 bratio3[1] = 50.;
339 mode3[1][0] = 1000010030; // tritium
340 mode3[1][1] = 2212; // proton
341 mode3[1][2] = -211; // negative pion
342
2942f542 343 TVirtualMC::GetMC()->SetDecayMode(1010010040,bratio3,mode3);
c05d75f7 344
345
346 // Define the 2- and 3-body phase space decay for the Hyper Hydrogen 4
347 Int_t amode3[6][3];
348 Float_t abratio3[6];
349
350 for (Int_t kz = 0; kz < 6; kz++) {
351 abratio3[kz] = 0.;
352 amode3[kz][0] = 0;
353 amode3[kz][1] = 0;
354 amode3[kz][2] = 0;
355 }
356 abratio3[0] = 50.;
357 amode3[0][0] = -1000020040; // anti- Helium4
358 amode3[0][1] = 211; // positive pion
359 abratio3[1] = 50.;
360 amode3[1][0] = -1000010030; // anti-tritium
361 amode3[1][1] = -2212; // anti-proton
362 amode3[1][2] = 211; // positive pion
363
2942f542 364 TVirtualMC::GetMC()->SetDecayMode(-1010010040,abratio3,amode3);
c05d75f7 365
366
367 // Define the 3-body phase space decay for the Hyper Helium 4
368 Int_t mode4[6][3];
369 Float_t bratio4[6];
370
371 for (Int_t kz = 0; kz < 6; kz++) {
372 bratio4[kz] = 0.;
373 mode4[kz][0] = 0;
374 mode4[kz][1] = 0;
375 mode4[kz][2] = 0;
376 }
377 bratio4[0] = 100.;
378 mode4[0][0] = 1000020030; // Helium3
379 mode4[0][1] = -211; // negative pion
380 mode4[0][2] = 2212; // proton
381
2942f542 382 TVirtualMC::GetMC()->SetDecayMode(1010020040,bratio4,mode4);
c05d75f7 383
384
385 // Define the 2-body phase space decay for the Anti-Hyper Helium 4
386 Int_t amode4[6][3];
387 Float_t abratio4[6];
388
389 for (Int_t kz = 0; kz < 6; kz++) {
390 abratio4[kz] = 0.;
391 amode4[kz][0] = 0;
392 amode4[kz][1] = 0;
393 amode4[kz][2] = 0;
394 }
395 abratio4[0] = 100.;
396 amode4[0][0] = -1000020030; // anti-Helium 3
397 amode4[0][1] = 211; // positive pion
398 amode4[0][2] = -2212; // anti proton
399
2942f542 400 TVirtualMC::GetMC()->SetDecayMode(-1010020040,abratio4,amode4);
c05d75f7 401
402
81333cca 403 // Define the 2-body phase space decay for the Lambda-neutron boundstate
404 Int_t mode1[6][3];
405 Float_t bratio1[6];
406
407 for (Int_t kz = 0; kz < 6; kz++) {
408 bratio1[kz] = 0.;
409 mode1[kz][0] = 0;
410 mode1[kz][1] = 0;
411 mode1[kz][2] = 0;
412 }
413 bratio1[0] = 100.;
414 mode1[0][0] = 1000010020; // deuteron
415 mode1[0][1] = -211; // negative pion
416
2942f542 417 TVirtualMC::GetMC()->SetDecayMode(1010000020,bratio1,mode1);
81333cca 418
419
420 // Define the 2-body phase space decay for the Anti-Lambda-neutron boundstate
421 Int_t amode1[6][3];
422 Float_t abratio1[6];
423
424 for (Int_t kz = 0; kz < 6; kz++) {
425 abratio1[kz] = 0.;
426 amode1[kz][0] = 0;
427 amode1[kz][1] = 0;
428 amode1[kz][2] = 0;
429 }
430 abratio1[0] = 100.;
431 amode1[0][0] = -1000010020; // anti-deuteron
432 amode1[0][1] = 211; // positive pion
433
2942f542 434 TVirtualMC::GetMC()->SetDecayMode(-1010000020,abratio1,amode1);
81333cca 435
436 // Define the 2-body phase space decay for the H-Dibaryon
437 Int_t mode2[6][3];
438 Float_t bratio2[6];
439
440 for (Int_t kz = 0; kz < 6; kz++) {
441 bratio2[kz] = 0.;
442 mode2[kz][0] = 0;
443 mode2[kz][1] = 0;
444 mode2[kz][2] = 0;
445 }
446 bratio2[0] = 100.;
447 mode2[0][0] = 3122; // Lambda
448 mode2[0][1] = 2212; // proton
449 mode2[0][2] = -211; // negative pion
450
2942f542 451 TVirtualMC::GetMC()->SetDecayMode(1020000020,bratio2,mode2);
81333cca 452
453 // Define the 2-body phase space decay for the Anti-H-Dibaryon
454 Int_t amode2[6][3];
455 Float_t abratio2[6];
456
457 for (Int_t kz = 0; kz < 6; kz++) {
458 abratio2[kz] = 0.;
459 amode2[kz][0] = 0;
460 amode2[kz][1] = 0;
461 amode2[kz][2] = 0;
462 }
463 abratio2[0] = 100.;
464 amode2[0][0] = -3122; // anti-deuteron
465 amode2[0][1] = -2212; // anti-proton
466 amode2[0][2] = 211; // positive pion
467
2942f542 468 TVirtualMC::GetMC()->SetDecayMode(-1020000020,abratio2,amode2);
81333cca 469
851a3884 470 // Define the 2-body phase space decay for the Xi0P
471 Int_t mode5[6][3];
472 Float_t bratio5[6];
473
474 for (Int_t kz = 0; kz < 6; kz++) {
475 bratio5[kz] = 0.;
476 mode5[kz][0] = 0;
477 mode5[kz][1] = 0;
478 mode5[kz][2] = 0;
479 }
480 bratio5[0] = 100.;
481 mode5[0][0] = 3122; // Lambda
482 mode5[0][1] = 2212; // proton
483
2942f542 484 TVirtualMC::GetMC()->SetDecayMode(1030000020,bratio5,mode5);
851a3884 485
486 // Define the 2-body phase space decay for the Anti-Xi0P
487 Int_t amode5[6][3];
488 Float_t abratio5[6];
489
490 for (Int_t kz = 0; kz < 6; kz++) {
491 abratio5[kz] = 0.;
492 amode5[kz][0] = 0;
493 amode5[kz][1] = 0;
494 amode5[kz][2] = 0;
495 }
496 abratio5[0] = 100.;
497 amode5[0][0] = -3122; // anti-Lambda
498 amode5[0][1] = -2212; // anti-proton
499
2942f542 500 TVirtualMC::GetMC()->SetDecayMode(-1030000020,abratio5,amode5);
851a3884 501
502 // Define the 2-body phase space decay for the Lambda-Neutron-Neutron
503 Int_t mode6[6][3];
504 Float_t bratio6[6];
505
506 for (Int_t kz = 0; kz < 6; kz++) {
507 bratio6[kz] = 0.;
508 mode6[kz][0] = 0;
509 mode6[kz][1] = 0;
510 mode6[kz][2] = 0;
511 }
512 bratio6[0] = 100.;
513 mode6[0][0] = 1000010030; // triton
514 mode6[0][1] = -211; // pion
515
2942f542 516 TVirtualMC::GetMC()->SetDecayMode(1010000030,bratio6,mode6);
851a3884 517
518 // Define the 2-body phase space decay for the Anti-Lambda-Neutron-Neutron
519 Int_t amode6[6][3];
520 Float_t abratio6[6];
521
522 for (Int_t kz = 0; kz < 6; kz++) {
523 abratio6[kz] = 0.;
524 amode6[kz][0] = 0;
525 amode6[kz][1] = 0;
526 amode6[kz][2] = 0;
527 }
528 abratio6[0] = 100.;
529 amode6[0][0] = -1000010030; // anti-triton
530 amode6[0][1] = 211; // pion
531
2942f542 532 TVirtualMC::GetMC()->SetDecayMode(-1010000030,abratio6,amode6);
851a3884 533
154fdac9 534 ///////////////////////////////////////////////////////////////////
535
536 // Define the 2-body phase space decay for the f0(980)
537// Int_t mode[6][3];
538// Float_t bratio[6];
539
540 for (Int_t kz = 0; kz < 6; kz++) {
541 bratio[kz] = 0.;
542 mode[kz][0] = 0;
543 mode[kz][1] = 0;
544 mode[kz][2] = 0;
545 }
546 bratio[0] = 100.;
547 mode[0][0] = 211; // pion
548 mode[0][1] = -211; // pion
549
550 TVirtualMC::GetMC()->SetDecayMode(9010221,bratio,mode);
551
552 // Define the 2-body phase space decay for the f2(1270)
553// Int_t mode[6][3];
554// Float_t bratio[6];
555
556 for (Int_t kz = 0; kz < 6; kz++) {
557 bratio[kz] = 0.;
558 mode[kz][0] = 0;
559 mode[kz][1] = 0;
560 mode[kz][2] = 0;
561 }
562 bratio[0] = 100.;
563 mode[0][0] = 211; // pion
564 mode[0][1] = -211; // pion
565
566 TVirtualMC::GetMC()->SetDecayMode(225,bratio,mode);
567
62283a99 568 // Lambda1520/Lambda1520bar
569
570 TVirtualMC::GetMC()->DefineParticle(3124, "Lambda1520", kPTNeutron, 1.5195 , 0.0, 4.22e-23,"Hadron", 0.0156, 3, -1, 0, 0, 0, 0, 3, 0, kTRUE);
571 TVirtualMC::GetMC()->DefineParticle(-3124, "Lambda1520bar", kPTNeutron, 1.5195 , 0.0, 4.22e-23,"Hadron", 0.0156, 3, -1, 0, 0, 0, 0, 3, 0, kTRUE);
572
573 // Lambda1520 decay modes
574
575 // L(1520) -> p K-
576 bratio[0] = 0.223547;
577 mode[0][0] = 2212;
578 mode[0][1] = -321;
579
580 // L(1520) -> n K0
581 bratio[1] = 0.223547;
582 mode[1][0] = 2112;
583 mode[1][1] = -311;
584
585 // L(1520) -> Sigma+ pi-
586 bratio[2] = 0.139096;
587 mode[2][0] = 3222;
588 mode[2][1] = -211;
589
590 // L(1520) -> Sigma0 pi0
591 bratio[3] = 0.139096;
592 mode[3][0] = 3212;
593 mode[3][1] = 111;
594
595 // L(1520) -> Sigma- pi+
596 bratio[4] = 0.139096;
597 mode[4][0] = 3112;
598 mode[4][1] = 211;
599
600 // The other decay modes are neglected
601 bratio[5] = 0.;
602 mode[5][0] = 0;
603 mode[5][1] = 0;
604
605 TVirtualMC::GetMC()->SetDecayMode(3124,bratio,mode);
606
607 // Lambda1520bar decay modes
608
609 // L(1520)bar -> p- K+
610 bratio[0] = 0.223547;
611 mode[0][0] = -2212;
612 mode[0][1] = 321;
613
614 // L(1520)bar -> nbar K0bar
615 bratio[1] = 0.223547;
616 mode[1][0] = -2112;
617 mode[1][1] = 311;
618
619 // L(1520)bar -> Sigmabar- pi+
620 bratio[2] = 0.139096;
621 mode[2][0] = -3222;
622 mode[2][1] = 211;
623
624 // L(1520)bar -> Sigma0bar pi0
625 bratio[3] = 0.139096;
626 mode[3][0] = -3212;
627 mode[3][1] = 111;
628
629 // L(1520)bar -> Sigmabar+ pi-
630 bratio[4] = 0.139096;
631 mode[4][0] = -3112;
632 mode[4][1] = -211;
633
634 // The other decay modes are neglected
635 bratio[5] = 0.;
636 mode[5][0] = 0;
637 mode[5][1] = 0;
638
639 TVirtualMC::GetMC()->SetDecayMode(-3124,bratio,mode);
154fdac9 640
81333cca 641 // --------------------------------------------------------------------
642}
643
661663fa 644//_______________________________________________________________________
5d12ce38 645void AliMC::InitGeometry()
646{
647 //
27cf3cdc 648 // Initialize detectors
5d12ce38 649 //
650
4a9de4af 651 AliInfo("Initialisation:");
652 TStopwatch stw;
653 TIter next(gAlice->Modules());
654 AliModule *detector;
655 while((detector = dynamic_cast<AliModule*>(next()))) {
656 stw.Start();
4a9de4af 657 detector->Init();
4a9de4af 658 AliInfo(Form("%10s R:%.2fs C:%.2fs",
659 detector->GetName(),stw.RealTime(),stw.CpuTime()));
660 }
4787b401 661}
662
663//_______________________________________________________________________
d97f1dbe 664void AliMC::SetGeometryFromCDB()
665{
666 // Set the loading of geometry from cdb instead of creating it
667 // A default CDB storage needs to be set before this method is called
668 if(AliCDBManager::Instance()->IsDefaultStorageSet() &&
669 AliCDBManager::Instance()->GetRun() >= 0)
670 AliSimulation::Instance()->SetGeometryFile("*OCDB*");
671 else
672 AliError("Loading of geometry from CDB ignored. First set a default CDB storage!");
673}
674
675//_______________________________________________________________________
676Bool_t AliMC::IsGeometryFromCDB() const
677{
678 return (strcmp(AliSimulation::Instance()->GetGeometryFile(),"*OCDB*")==0);
679}
680
681//_______________________________________________________________________
4787b401 682void AliMC::SetAllAlignableVolumes()
683{
684 //
685 // Add alignable volumes (TGeoPNEntries) looping on all
686 // active modules
687 //
688
689 AliInfo(Form("Setting entries for all alignable volumes of active detectors"));
690 AliModule *detector;
691 TIter next(gAlice->Modules());
692 while((detector = dynamic_cast<AliModule*>(next()))) {
693 detector->AddAlignableVolumes();
694 }
5d12ce38 695}
696
697//_______________________________________________________________________
2057aecb 698void AliMC::GeneratePrimaries()
5d12ce38 699{
700 //
701 // Generate primary particles and fill them in the stack.
702 //
703
704 Generator()->Generate();
705}
706
707//_______________________________________________________________________
708void AliMC::SetGenerator(AliGenerator *generator)
709{
710 //
711 // Load the event generator
712 //
713 if(!fGenerator) fGenerator = generator;
714}
715
716//_______________________________________________________________________
717void AliMC::ResetGenerator(AliGenerator *generator)
718{
719 //
720 // Load the event generator
721 //
9a213abc 722 if(fGenerator) {
723 if(generator) {
21bf7095 724 AliWarning(Form("Replacing generator %s with %s",
9a213abc 725 fGenerator->GetName(),generator->GetName()));
726 }
727 else {
21bf7095 728 AliWarning(Form("Replacing generator %s with NULL",
729 fGenerator->GetName()));
9a213abc 730 }
731 }
5d12ce38 732 fGenerator = generator;
733}
734
735//_______________________________________________________________________
736void AliMC::FinishRun()
737{
738 // Clean generator information
21bf7095 739 AliDebug(1, "fGenerator->FinishRun()");
5d12ce38 740 fGenerator->FinishRun();
a5fe2c41 741
742 // Monitoring information
743 if (fMonitor) {
744 fMonitor->Print();
745 fMonitor->Export("timing.root");
746 }
5d12ce38 747
748 //Output energy summary tables
21bf7095 749 AliDebug(1, "EnergySummary()");
750 ToAliDebug(1, EnergySummary());
5d12ce38 751}
752
753//_______________________________________________________________________
754void AliMC::BeginPrimary()
755{
756 //
757 // Called at the beginning of each primary track
758 //
759
760 // Reset Hits info
761 ResetHits();
762 ResetTrackReferences();
5d12ce38 763}
764
765//_______________________________________________________________________
766void AliMC::PreTrack()
767{
d0d4a6b3 768 // Actions before the track's transport
dde0a601 769
81333cca 770 //verbose.PreTrack();
771
5d12ce38 772 TObjArray &dets = *gAlice->Modules();
773 AliModule *module;
774
775 for(Int_t i=0; i<=gAlice->GetNdets(); i++)
776 if((module = dynamic_cast<AliModule*>(dets[i])))
777 module->PreTrack();
5d12ce38 778}
779
780//_______________________________________________________________________
781void AliMC::Stepping()
782{
783 //
784 // Called at every step during transport
785 //
81333cca 786 //verbose.Stepping();
787
2942f542 788 Int_t id = DetFromMate(TVirtualMC::GetMC()->CurrentMedium());
5d12ce38 789 if (id < 0) return;
790
0561efeb 791
2942f542 792 if ( TVirtualMC::GetMC()->IsNewTrack() &&
793 TVirtualMC::GetMC()->TrackTime() == 0. &&
38ca2ad6 794 fRDecayMin >= 0. &&
0561efeb 795 fRDecayMax > fRDecayMin &&
2942f542 796 TVirtualMC::GetMC()->TrackPid() == fDecayPdg )
0561efeb 797 {
798 FixParticleDecaytime();
799 }
800
a5fe2c41 801 // --- If monitoring timing was requested, monitor the step
802 if (fUseMonitoring) {
803 if (!fMonitor) {
2942f542 804 fMonitor = new AliTransportMonitor(TVirtualMC::GetMC()->NofVolumes()+1);
a5fe2c41 805 fMonitor->Start();
806 }
2942f542 807 if (TVirtualMC::GetMC()->IsNewTrack() || TVirtualMC::GetMC()->TrackTime() == 0. || TVirtualMC::GetMC()->TrackStep()<1.1E-10) {
a5fe2c41 808 fMonitor->DummyStep();
809 } else {
810 // Normal stepping
811 Int_t copy;
2942f542 812 Int_t volId = TVirtualMC::GetMC()->CurrentVolID(copy);
813 Int_t pdg = TVirtualMC::GetMC()->TrackPid();
a5fe2c41 814 TLorentzVector xyz, pxpypz;
2942f542 815 TVirtualMC::GetMC()->TrackPosition(xyz);
816 TVirtualMC::GetMC()->TrackMomentum(pxpypz);
a5fe2c41 817 fMonitor->StepInfo(volId, pdg, pxpypz.E(), xyz.X(), xyz.Y(), xyz.Z());
818 }
819 }
5d12ce38 820 //
821 // --- If lego option, do it and leave
3e2e3ece 822 if (AliSimulation::Instance()->Lego())
823 AliSimulation::Instance()->Lego()->StepManager();
5d12ce38 824 else {
825 Int_t copy;
826 //Update energy deposition tables
2942f542 827 AddEnergyDeposit(TVirtualMC::GetMC()->CurrentVolID(copy),TVirtualMC::GetMC()->Edep());
ab03c084 828 //
829 // write tracke reference for track which is dissapearing - MI
faad98df 830
2942f542 831 if (TVirtualMC::GetMC()->IsTrackDisappeared() && !(TVirtualMC::GetMC()->IsTrackAlive())) {
832 if (TVirtualMC::GetMC()->Etot() > 0.05) AddTrackReference(GetCurrentTrackNumber(),
9ac3aec9 833 AliTrackReference::kDisappeared);
faad98df 834
835
b60e0f5e 836 }
faad98df 837
5d12ce38 838 //Call the appropriate stepping routine;
839 AliModule *det = dynamic_cast<AliModule*>(gAlice->Modules()->At(id));
840 if(det && det->StepManagerIsEnabled()) {
5d12ce38 841 det->StepManager();
842 }
843 }
844}
845
846//_______________________________________________________________________
847void AliMC::EnergySummary()
848{
9ac3aec9 849 //e
5d12ce38 850 // Print summary of deposited energy
851 //
852
853 Int_t ndep=0;
854 Float_t edtot=0;
855 Float_t ed, ed2;
856 Int_t kn, i, left, j, id;
857 const Float_t kzero=0;
33c3c91a 858 Int_t ievent=AliRunLoader::Instance()->GetHeader()->GetEvent()+1;
5d12ce38 859 //
860 // Energy loss information
861 if(ievent) {
862 printf("***************** Energy Loss Information per event (GEV) *****************\n");
863 for(kn=1;kn<fEventEnergy.GetSize();kn++) {
864 ed=fSummEnergy[kn];
865 if(ed>0) {
866 fEventEnergy[ndep]=kn;
867 if(ievent>1) {
868 ed=ed/ievent;
869 ed2=fSum2Energy[kn];
870 ed2=ed2/ievent;
871 ed2=100*TMath::Sqrt(TMath::Max(ed2-ed*ed,kzero))/ed;
872 } else
873 ed2=99;
874 fSummEnergy[ndep]=ed;
875 fSum2Energy[ndep]=TMath::Min(static_cast<Float_t>(99.),TMath::Max(ed2,kzero));
876 edtot+=ed;
877 ndep++;
878 }
879 }
880 for(kn=0;kn<(ndep-1)/3+1;kn++) {
881 left=ndep-kn*3;
882 for(i=0;i<(3<left?3:left);i++) {
883 j=kn*3+i;
884 id=Int_t (fEventEnergy[j]+0.1);
2942f542 885 printf(" %s %10.3f +- %10.3f%%;",TVirtualMC::GetMC()->VolName(id),fSummEnergy[j],fSum2Energy[j]);
5d12ce38 886 }
887 printf("\n");
888 }
889 //
890 // Relative energy loss in different detectors
891 printf("******************** Relative Energy Loss per event ********************\n");
892 printf("Total energy loss per event %10.3f GeV\n",edtot);
893 for(kn=0;kn<(ndep-1)/5+1;kn++) {
894 left=ndep-kn*5;
895 for(i=0;i<(5<left?5:left);i++) {
896 j=kn*5+i;
897 id=Int_t (fEventEnergy[j]+0.1);
2942f542 898 printf(" %s %10.3f%%;",TVirtualMC::GetMC()->VolName(id),100*fSummEnergy[j]/edtot);
5d12ce38 899 }
900 printf("\n");
901 }
902 for(kn=0;kn<75;kn++) printf("*");
903 printf("\n");
904 }
905 //
906 // Reset the TArray's
907 // fEventEnergy.Set(0);
908 // fSummEnergy.Set(0);
909 // fSum2Energy.Set(0);
910}
9d188d33 911#include <TFile.h>
5d12ce38 912//_____________________________________________________________________________
913void AliMC::BeginEvent()
914{
915 //
916 // Clean-up previous event
917 // Energy scores
21bf7095 918 AliDebug(1, ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
919 AliDebug(1, ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
920 AliDebug(1, ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
921 AliDebug(1, " BEGINNING EVENT ");
922 AliDebug(1, ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
923 AliDebug(1, ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
924 AliDebug(1, ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
9d188d33 925
33c3c91a 926 AliRunLoader *runloader=AliRunLoader::Instance();
5d12ce38 927
928 /*******************************/
929 /* Clean after eventual */
930 /* previous event */
931 /*******************************/
932
933
934 //Set the next event in Run Loader -> Cleans trees (TreeK and all trees in detectors),
935 gAlice->SetEventNrInRun(gAlice->GetEventNrInRun()+1);
936 runloader->SetEventNumber(gAlice->GetEventNrInRun());// sets new files, cleans the previous event stuff, if necessary, etc.,
21bf7095 937 AliDebug(1, Form("EventNr is %d",gAlice->GetEventNrInRun()));
5d12ce38 938
939 fEventEnergy.Reset();
940 // Clean detector information
941
942 if (runloader->Stack())
3cac0921 943 runloader->Stack()->Reset();//clean stack -> tree is unloaded
5d12ce38 944 else
3cac0921 945 runloader->MakeStack();//or make a new one
504b172d 946
9d188d33 947 // Random engine status
948 //
9ac3aec9 949
9d188d33 950 if ( fSaveRndmStatus || fSaveRndmEventStatus) {
951 TString fileName="random";
952 if ( fSaveRndmEventStatus ) {
953 fileName += "Evt";
954 fileName += gAlice->GetEventNrInRun();
955 }
956 fileName += ".root";
957
958 // write ROOT random engine status
959 cout << "Saving random engine status in " << fileName.Data() << endl;
960 TFile f(fileName.Data(),"RECREATE");
961 gRandom->Write(fileName.Data());
962 }
963
964 if ( fReadRndmStatus ) {
965 //read ROOT random engine status
966 cout << "Reading random engine status from " << fRndmFileName.Data() << endl;
967 TFile f(fRndmFileName.Data());
968 gRandom->Read(fRndmFileName.Data());
969 }
970
3e2e3ece 971 if(AliSimulation::Instance()->Lego() == 0x0)
3cac0921 972 {
973 AliDebug(1, "fRunLoader->MakeTree(K)");
974 runloader->MakeTree("K");
975 }
976
2942f542 977 AliDebug(1, "TVirtualMC::GetMC()->SetStack(fRunLoader->Stack())");
978 TVirtualMC::GetMC()->SetStack(runloader->Stack());//Was in InitMC - but was moved here
5d12ce38 979 //because we don't have guarantee that
980 //stack pointer is not going to change from event to event
981 //since it bellobgs to header and is obtained via RunLoader
982 //
983 // Reset all Detectors & kinematics & make/reset trees
984 //
985
8c8fbdcd 986 runloader->GetHeader()->Reset(AliCDBManager::Instance()->GetRun(),gAlice->GetEvNumber(),
3cac0921 987 gAlice->GetEventNrInRun());
5d12ce38 988// fRunLoader->WriteKinematics("OVERWRITE"); is there any reason to rewrite here since MakeTree does so
989
3e2e3ece 990 if(AliSimulation::Instance()->Lego())
3cac0921 991 {
3e2e3ece 992 AliSimulation::Instance()->Lego()->BeginEvent();
3cac0921 993 return;
994 }
504b172d 995
5d12ce38 996
21bf7095 997 AliDebug(1, "ResetHits()");
5d12ce38 998 ResetHits();
504b172d 999
21bf7095 1000 AliDebug(1, "fRunLoader->MakeTree(H)");
5d12ce38 1001 runloader->MakeTree("H");
504b172d 1002
5d12ce38 1003
5d12ce38 1004
3cac0921 1005 MakeTmpTrackRefsTree();
5d12ce38 1006 //create new branches and SetAdresses
1007 TIter next(gAlice->Modules());
1008 AliModule *detector;
1009 while((detector = (AliModule*)next()))
1010 {
3cac0921 1011 AliDebug(2, Form("%s->MakeBranch(H)",detector->GetName()));
1012 detector->MakeBranch("H");
5d12ce38 1013 }
1014}
1015
1016//_______________________________________________________________________
1017void AliMC::ResetHits()
1018{
1019 //
1020 // Reset all Detectors hits
1021 //
1022 TIter next(gAlice->Modules());
1023 AliModule *detector;
1024 while((detector = dynamic_cast<AliModule*>(next()))) {
1025 detector->ResetHits();
1026 }
1027}
1028
1029//_______________________________________________________________________
3e2e3ece 1030void AliMC::ResetDigits()
1031{
1032 //
1033 // Reset all Detectors digits
1034 //
1035 TIter next(gAlice->Modules());
1036 AliModule *detector;
1037 while((detector = dynamic_cast<AliModule*>(next()))) {
1038 detector->ResetDigits();
1039 }
1040}
1041
1042//_______________________________________________________________________
1043void AliMC::ResetSDigits()
1044{
1045 //
1046 // Reset all Detectors digits
1047 //
1048 TIter next(gAlice->Modules());
1049 AliModule *detector;
1050 while((detector = dynamic_cast<AliModule*>(next()))) {
1051 detector->ResetSDigits();
1052 }
1053}
1054
1055//_______________________________________________________________________
5d12ce38 1056void AliMC::PostTrack()
1057{
d0d4a6b3 1058 // Posts tracks for each module
dde0a601 1059
4a9de4af 1060 TObjArray &dets = *gAlice->Modules();
1061 AliModule *module;
1062
1063 for(Int_t i=0; i<=gAlice->GetNdets(); i++)
1064 if((module = dynamic_cast<AliModule*>(dets[i])))
1065 module->PostTrack();
5d12ce38 1066}
1067
1068//_______________________________________________________________________
1069void AliMC::FinishPrimary()
1070{
1071 //
1072 // Called at the end of each primary track
1073 //
dde0a601 1074
33c3c91a 1075 AliRunLoader *runloader=AliRunLoader::Instance();
5d12ce38 1076 // static Int_t count=0;
1077 // const Int_t times=10;
1078 // This primary is finished, purify stack
c75cfb51 1079#if ROOT_VERSION_CODE > 262152
2942f542 1080 if (!(TVirtualMC::GetMC()->SecondariesAreOrdered())) {
77db8cbf 1081 if (runloader->Stack()->ReorderKine()) RemapHits();
942a9039 1082 }
c75cfb51 1083#endif
77db8cbf 1084 if (runloader->Stack()->PurifyKine()) RemapHits();
504b172d 1085
5d12ce38 1086 TIter next(gAlice->Modules());
1087 AliModule *detector;
1088 while((detector = dynamic_cast<AliModule*>(next()))) {
1089 detector->FinishPrimary();
504b172d 1090 AliLoader* loader = detector->GetLoader();
1091 if(loader)
1092 {
1093 TTree* treeH = loader->TreeH();
1094 if (treeH) treeH->Fill(); //can be Lego run and treeH can not exist
1095 }
5d12ce38 1096 }
1097
1098 // Write out track references if any
3cac0921 1099 if (fTmpTreeTR) fTmpTreeTR->Fill();
5d12ce38 1100}
1101
942a9039 1102void AliMC::RemapHits()
1103{
1104//
1105// Remaps the track labels of the hits
33c3c91a 1106 AliRunLoader *runloader=AliRunLoader::Instance();
942a9039 1107 AliStack* stack = runloader->Stack();
1108 TList* hitLists = GetHitLists();
1109 TIter next(hitLists);
1110 TCollection *hitList;
1111
1112 while((hitList = dynamic_cast<TCollection*>(next()))) {
1113 TIter nexthit(hitList);
1114 AliHit *hit;
1115 while((hit = dynamic_cast<AliHit*>(nexthit()))) {
1116 hit->SetTrack(stack->TrackLabel(hit->GetTrack()));
1117 }
1118 }
1119
1120 //
1121 // This for detectors which have a special mapping mechanism
1122 // for hits, such as TPC and TRD
1123 //
ac2b85c0 1124
942a9039 1125
1126 TObjArray* modules = gAlice->Modules();
1127 TIter nextmod(modules);
ac2b85c0 1128 AliModule *module;
1129 while((module = (AliModule*) nextmod())) {
1130 AliDetector* det = dynamic_cast<AliDetector*> (module);
1131 if (det) det->RemapTrackHitIDs(stack->TrackLabelMap());
942a9039 1132 }
1133 //
1134 RemapTrackReferencesIDs(stack->TrackLabelMap());
1135}
1136
5d12ce38 1137//_______________________________________________________________________
1138void AliMC::FinishEvent()
1139{
1140 //
1141 // Called at the end of the event.
1142 //
38ca2ad6 1143
3e2e3ece 1144 if(AliSimulation::Instance()->Lego()) AliSimulation::Instance()->Lego()->FinishEvent();
5d12ce38 1145
1146 TIter next(gAlice->Modules());
1147 AliModule *detector;
1148 while((detector = dynamic_cast<AliModule*>(next()))) {
1149 detector->FinishEvent();
1150 }
1151
1152 //Update the energy deposit tables
1153 Int_t i;
1154 for(i=0;i<fEventEnergy.GetSize();i++)
1155 {
1156 fSummEnergy[i]+=fEventEnergy[i];
1157 fSum2Energy[i]+=fEventEnergy[i]*fEventEnergy[i];
1158 }
1159
33c3c91a 1160 AliRunLoader *runloader=AliRunLoader::Instance();
5d12ce38 1161
1162 AliHeader* header = runloader->GetHeader();
1163 AliStack* stack = runloader->Stack();
1164 if ( (header == 0x0) || (stack == 0x0) )
1165 {//check if we got header and stack. If not cry and exit aliroot
21bf7095 1166 AliFatal("Can not get the stack or header from LOADER");
5d12ce38 1167 return;//never reached
1168 }
1169 // Update Header information
1170 header->SetNprimary(stack->GetNprimary());
1171 header->SetNtrack(stack->GetNtrack());
475baf89 1172 header->SetTimeStamp(AliSimulation::Instance()->GenerateTimeStamp());
5d12ce38 1173
5d12ce38 1174 // Write out the kinematics
3e2e3ece 1175 if (!AliSimulation::Instance()->Lego()) stack->FinishEvent();
3cac0921 1176
1177 // Synchronize the TreeTR with TreeK
172bc1fb 1178 if (fTmpTreeTR) ReorderAndExpandTreeTR();
5d12ce38 1179
1180 // Write out the event Header information
1181 TTree* treeE = runloader->TreeE();
1182 if (treeE)
1183 {
1184 header->SetStack(stack);
1185 treeE->Fill();
1186 }
1187 else
1188 {
21bf7095 1189 AliError("Can not get TreeE from RL");
5d12ce38 1190 }
1191
3e2e3ece 1192 if(AliSimulation::Instance()->Lego() == 0x0)
504b172d 1193 {
1194 runloader->WriteKinematics("OVERWRITE");
1195 runloader->WriteTrackRefs("OVERWRITE");
1196 runloader->WriteHits("OVERWRITE");
1197 }
1198
21bf7095 1199 AliDebug(1, "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
1200 AliDebug(1, "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
1201 AliDebug(1, "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
1202 AliDebug(1, " FINISHING EVENT ");
1203 AliDebug(1, "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
1204 AliDebug(1, "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
1205 AliDebug(1, "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
5d12ce38 1206}
1207
1208//_______________________________________________________________________
5d12ce38 1209void AliMC::Init()
1210{
d0d4a6b3 1211 // MC initialization
5d12ce38 1212
9d188d33 1213
5d12ce38 1214 //=================Create Materials and geometry
2942f542 1215 TVirtualMC::GetMC()->Init();
4e889ff4 1216 // Set alignable volumes for the whole geometry (with old root)
1217#if ROOT_VERSION_CODE < 331527
1218 SetAllAlignableVolumes();
1219#endif
5d12ce38 1220 //Read the cuts for all materials
1221 ReadTransPar();
1222 //Build the special IMEDIA table
1223 MediaTable();
1224
1225 //Compute cross-sections
2942f542 1226 TVirtualMC::GetMC()->BuildPhysics();
5d12ce38 1227
5d12ce38 1228 //Initialise geometry deposition table
2942f542 1229 fEventEnergy.Set(TVirtualMC::GetMC()->NofVolumes()+1);
1230 fSummEnergy.Set(TVirtualMC::GetMC()->NofVolumes()+1);
1231 fSum2Energy.Set(TVirtualMC::GetMC()->NofVolumes()+1);
5d12ce38 1232
5d12ce38 1233 // Register MC in configuration
2942f542 1234 AliConfig::Instance()->Add(TVirtualMC::GetMC());
5d12ce38 1235}
1236
1237//_______________________________________________________________________
1238void AliMC::MediaTable()
1239{
1240 //
1241 // Built media table to get from the media number to
1242 // the detector id
1243 //
1244
1245 Int_t kz, nz, idt, lz, i, k, ind;
1246 // Int_t ibeg;
1247 TObjArray &dets = *gAlice->Detectors();
1248 AliModule *det;
1249 Int_t ndets=gAlice->GetNdets();
1250 //
1251 // For all detectors
1252 for (kz=0;kz<ndets;kz++) {
1253 // If detector is defined
1254 if((det=dynamic_cast<AliModule*>(dets[kz]))) {
1255 TArrayI &idtmed = *(det->GetIdtmed());
1256 for(nz=0;nz<100;nz++) {
0561efeb 1257
5d12ce38 1258 // Find max and min material number
1259 if((idt=idtmed[nz])) {
1260 det->LoMedium() = det->LoMedium() < idt ? det->LoMedium() : idt;
1261 det->HiMedium() = det->HiMedium() > idt ? det->HiMedium() : idt;
1262 }
1263 }
1264 if(det->LoMedium() > det->HiMedium()) {
1265 det->LoMedium() = 0;
1266 det->HiMedium() = 0;
1267 } else {
1268 if(det->HiMedium() > fImedia->GetSize()) {
21bf7095 1269 AliError(Form("Increase fImedia from %d to %d",
1270 fImedia->GetSize(),det->HiMedium()));
5d12ce38 1271 return;
1272 }
1273 // Tag all materials in rage as belonging to detector kz
1274 for(lz=det->LoMedium(); lz<= det->HiMedium(); lz++) {
1275 (*fImedia)[lz]=kz;
1276 }
1277 }
1278 }
1279 }
1280 //
1281 // Print summary table
21bf7095 1282 AliInfo("Tracking media ranges:");
1283 ToAliInfo(
5d12ce38 1284 for(i=0;i<(ndets-1)/6+1;i++) {
1285 for(k=0;k< (6<ndets-i*6?6:ndets-i*6);k++) {
1286 ind=i*6+k;
1287 det=dynamic_cast<AliModule*>(dets[ind]);
1288 if(det)
1289 printf(" %6s: %3d -> %3d;",det->GetName(),det->LoMedium(),
1290 det->HiMedium());
1291 else
1292 printf(" %6s: %3d -> %3d;","NULL",0,0);
1293 }
1294 printf("\n");
1295 }
13242232 1296 );
5d12ce38 1297}
1298
1299//_______________________________________________________________________
1300void AliMC::ReadTransPar()
1301{
1302 //
1303 // Read filename to set the transport parameters
1304 //
1305
1306
1307 const Int_t kncuts=10;
61721f6c 1308 const Int_t knflags=12;
5d12ce38 1309 const Int_t knpars=kncuts+knflags;
1310 const char kpars[knpars][7] = {"CUTGAM" ,"CUTELE","CUTNEU","CUTHAD","CUTMUO",
1311 "BCUTE","BCUTM","DCUTE","DCUTM","PPCUTM","ANNI",
1312 "BREM","COMP","DCAY","DRAY","HADR","LOSS",
61721f6c 1313 "MULS","PAIR","PHOT","RAYL","STRA"};
5d12ce38 1314 char line[256];
1315 char detName[7];
1316 char* filtmp;
1317 Float_t cut[kncuts];
1318 Int_t flag[knflags];
a5a7da11 1319 Int_t i, itmed, iret, jret, ktmed, kz;
5d12ce38 1320 FILE *lun;
1321 //
1322 // See whether the file is there
1323 filtmp=gSystem->ExpandPathName(fTransParName.Data());
1324 lun=fopen(filtmp,"r");
1325 delete [] filtmp;
1326 if(!lun) {
21bf7095 1327 AliWarning(Form("File %s does not exist!",fTransParName.Data()));
5d12ce38 1328 return;
1329 }
1330 //
5d12ce38 1331 while(1) {
1332 // Initialise cuts and flags
1333 for(i=0;i<kncuts;i++) cut[i]=-99;
1334 for(i=0;i<knflags;i++) flag[i]=-99;
1335 itmed=0;
01a0f5d0 1336 memset(line,0,256);
5d12ce38 1337 // Read up to the end of line excluded
01a0f5d0 1338 iret=fscanf(lun,"%255[^\n]",line);
5d12ce38 1339 if(iret<0) {
1340 //End of file
1341 fclose(lun);
5d12ce38 1342 return;
1343 }
1344 // Read the end of line
a5a7da11 1345 jret = fscanf(lun,"%*c");
5d12ce38 1346 if(!iret) continue;
1347 if(line[0]=='*') continue;
1348 // Read the numbers
e6585570 1349 iret=sscanf(line,"%6s %d %f %f %f %f %f %f %f %f %f %f %d %d %d %d %d %d %d %d %d %d %d %d",
5d12ce38 1350 detName,&itmed,&cut[0],&cut[1],&cut[2],&cut[3],&cut[4],&cut[5],&cut[6],&cut[7],&cut[8],
1351 &cut[9],&flag[0],&flag[1],&flag[2],&flag[3],&flag[4],&flag[5],&flag[6],&flag[7],
61721f6c 1352 &flag[8],&flag[9],&flag[10],&flag[11]);
5d12ce38 1353 if(!iret) continue;
1354 if(iret<0) {
1355 //reading error
21bf7095 1356 AliWarning(Form("Error reading file %s",fTransParName.Data()));
5d12ce38 1357 continue;
1358 }
1359 // Check that the module exist
1360 AliModule *mod = gAlice->GetModule(detName);
1361 if(mod) {
1362 // Get the array of media numbers
1363 TArrayI &idtmed = *mod->GetIdtmed();
1364 // Check that the tracking medium code is valid
1365 if(0<=itmed && itmed < 100) {
1366 ktmed=idtmed[itmed];
1367 if(!ktmed) {
21bf7095 1368 AliWarning(Form("Invalid tracking medium code %d for %s",itmed,mod->GetName()));
5d12ce38 1369 continue;
1370 }
1371 // Set energy thresholds
1372 for(kz=0;kz<kncuts;kz++) {
1373 if(cut[kz]>=0) {
21bf7095 1374 AliDebug(2, Form("%-6s set to %10.3E for tracking medium code %4d for %s",
1375 kpars[kz],cut[kz],itmed,mod->GetName()));
2942f542 1376 TVirtualMC::GetMC()->Gstpar(ktmed,kpars[kz],cut[kz]);
5d12ce38 1377 }
1378 }
1379 // Set transport mechanisms
1380 for(kz=0;kz<knflags;kz++) {
1381 if(flag[kz]>=0) {
21bf7095 1382 AliDebug(2, Form("%-6s set to %10d for tracking medium code %4d for %s",
1383 kpars[kncuts+kz],flag[kz],itmed,mod->GetName()));
2942f542 1384 TVirtualMC::GetMC()->Gstpar(ktmed,kpars[kncuts+kz],Float_t(flag[kz]));
5d12ce38 1385 }
1386 }
1387 } else {
21bf7095 1388 AliWarning(Form("Invalid medium code %d",itmed));
5d12ce38 1389 continue;
1390 }
1391 } else {
21bf7095 1392 AliDebug(1, Form("%s not present",detName));
5d12ce38 1393 continue;
1394 }
1395 }
1396}
1397
1398//_______________________________________________________________________
1399void AliMC::SetTransPar(const char *filename)
1400{
1401 //
1402 // Sets the file name for transport parameters
1403 //
1404 fTransParName = filename;
1405}
1406
1407//_______________________________________________________________________
5d12ce38 1408void AliMC::AddHit(Int_t id, Int_t track, Int_t *vol, Float_t *hits) const
1409{
1410 //
1411 // Add a hit to detector id
1412 //
1413 TObjArray &dets = *gAlice->Modules();
1c9a8216 1414 if(dets[id]) static_cast<AliModule*>(dets[id])->AddHit(track,vol,hits);
5d12ce38 1415}
1416
1417//_______________________________________________________________________
1418void AliMC::AddDigit(Int_t id, Int_t *tracks, Int_t *digits) const
1419{
1420 //
1421 // Add digit to detector id
1422 //
1423 TObjArray &dets = *gAlice->Modules();
1c9a8216 1424 if(dets[id]) static_cast<AliModule*>(dets[id])->AddDigit(tracks,digits);
5d12ce38 1425}
1426
1427//_______________________________________________________________________
1428Int_t AliMC::GetCurrentTrackNumber() const {
1429 //
1430 // Returns current track
1431 //
33c3c91a 1432 return AliRunLoader::Instance()->Stack()->GetCurrentTrackNumber();
5d12ce38 1433}
1434
1435//_______________________________________________________________________
1436void AliMC::DumpPart (Int_t i) const
1437{
1438 //
1439 // Dumps particle i in the stack
1440 //
33c3c91a 1441 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1442 if (runloader->Stack())
1443 runloader->Stack()->DumpPart(i);
1444}
1445
1446//_______________________________________________________________________
1447void AliMC::DumpPStack () const
1448{
1449 //
1450 // Dumps the particle stack
1451 //
33c3c91a 1452 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1453 if (runloader->Stack())
1454 runloader->Stack()->DumpPStack();
1455}
1456
1457//_______________________________________________________________________
1458Int_t AliMC::GetNtrack() const {
1459 //
1460 // Returns number of tracks in stack
1461 //
1462 Int_t ntracks = -1;
33c3c91a 1463 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1464 if (runloader->Stack())
1465 ntracks = runloader->Stack()->GetNtrack();
1466 return ntracks;
1467}
1468
1469//_______________________________________________________________________
1470Int_t AliMC::GetPrimary(Int_t track) const
1471{
1472 //
1473 // return number of primary that has generated track
1474 //
1475 Int_t nprimary = -999;
33c3c91a 1476 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1477 if (runloader->Stack())
1478 nprimary = runloader->Stack()->GetPrimary(track);
1479 return nprimary;
1480}
1481
1482//_______________________________________________________________________
1483TParticle* AliMC::Particle(Int_t i) const
1484{
d0d4a6b3 1485 // Returns the i-th particle from the stack taking into account
1486 // the remaping done by PurifyKine
33c3c91a 1487 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1488 if (runloader)
1489 if (runloader->Stack())
1490 return runloader->Stack()->Particle(i);
1491 return 0x0;
1492}
1493
1494//_______________________________________________________________________
6c753956 1495const TObjArray* AliMC::Particles() const {
5d12ce38 1496 //
1497 // Returns pointer to Particles array
1498 //
33c3c91a 1499 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1500 if (runloader)
1501 if (runloader->Stack())
1502 return runloader->Stack()->Particles();
1503 return 0x0;
1504}
1505
1506//_______________________________________________________________________
3e2e3ece 1507void AliMC::PushTrack(Int_t done, Int_t parent, Int_t pdg, const Float_t *pmom,
1508 const Float_t *vpos, const Float_t *polar, Float_t tof,
2057aecb 1509 TMCProcess mech, Int_t &ntr, Float_t weight, Int_t is) const
5d12ce38 1510{
1511// Delegate to stack
1512//
33c3c91a 1513 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1514 if (runloader)
1515 if (runloader->Stack())
1516 runloader->Stack()->PushTrack(done, parent, pdg, pmom, vpos, polar, tof,
1517 mech, ntr, weight, is);
1518}
1519
1520//_______________________________________________________________________
1521void AliMC::PushTrack(Int_t done, Int_t parent, Int_t pdg,
1522 Double_t px, Double_t py, Double_t pz, Double_t e,
1523 Double_t vx, Double_t vy, Double_t vz, Double_t tof,
1524 Double_t polx, Double_t poly, Double_t polz,
2057aecb 1525 TMCProcess mech, Int_t &ntr, Float_t weight, Int_t is) const
5d12ce38 1526{
1527 // Delegate to stack
1528 //
33c3c91a 1529 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1530 if (runloader)
1531 if (runloader->Stack())
1532 runloader->Stack()->PushTrack(done, parent, pdg, px, py, pz, e, vx, vy, vz, tof,
1533 polx, poly, polz, mech, ntr, weight, is);
1534}
1535
1536//_______________________________________________________________________
2057aecb 1537void AliMC::SetHighWaterMark(Int_t nt) const
5d12ce38 1538{
1539 //
1540 // Set high water mark for last track in event
33c3c91a 1541 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1542 if (runloader)
1543 if (runloader->Stack())
1544 runloader->Stack()->SetHighWaterMark(nt);
1545}
1546
1547//_______________________________________________________________________
2057aecb 1548void AliMC::KeepTrack(Int_t track) const
5d12ce38 1549{
1550 //
1551 // Delegate to stack
1552 //
33c3c91a 1553 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1554 if (runloader)
1555 if (runloader->Stack())
1556 runloader->Stack()->KeepTrack(track);
1557}
1558
1559//_______________________________________________________________________
2057aecb 1560void AliMC::FlagTrack(Int_t track) const
5d12ce38 1561{
1562 // Delegate to stack
1563 //
33c3c91a 1564 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1565 if (runloader)
1566 if (runloader->Stack())
1567 runloader->Stack()->FlagTrack(track);
1568}
1569
1570//_______________________________________________________________________
2057aecb 1571void AliMC::SetCurrentTrack(Int_t track) const
5d12ce38 1572{
1573 //
1574 // Set current track number
1575 //
33c3c91a 1576 AliRunLoader * runloader = AliRunLoader::Instance();
5d12ce38 1577 if (runloader)
1578 if (runloader->Stack())
1579 runloader->Stack()->SetCurrentTrack(track);
1580}
1581
1582//_______________________________________________________________________
9ac3aec9 1583AliTrackReference* AliMC::AddTrackReference(Int_t label, Int_t id)
1584{
5d12ce38 1585 //
1586 // add a trackrefernce to the list
9ac3aec9 1587 Int_t primary = GetPrimary(label);
1588 Particle(primary)->SetBit(kKeepBit);
1589
fd650020 1590 Int_t nref = fTmpTrackReferences.GetEntriesFast();
1591 return new(fTmpTrackReferences[nref]) AliTrackReference(label, id);
5d12ce38 1592}
1593
1594
1595
1596//_______________________________________________________________________
1597void AliMC::ResetTrackReferences()
1598{
1599 //
1600 // Reset all references
1601 //
fd650020 1602 fTmpTrackReferences.Clear();
5d12ce38 1603}
1604
dde0a601 1605//_______________________________________________________________________
6da30991 1606void AliMC::RemapTrackReferencesIDs(const Int_t *map)
5d12ce38 1607{
1608 //
1609 // Remapping track reference
1610 // Called at finish primary
1611 //
fd650020 1612
1613 Int_t nEntries = fTmpTrackReferences.GetEntries();
4e490a96 1614 for (Int_t i=0; i < nEntries; i++){
fd650020 1615 AliTrackReference * ref = dynamic_cast<AliTrackReference*>(fTmpTrackReferences.UncheckedAt(i));
4e490a96 1616 if (ref) {
1617 Int_t newID = map[ref->GetTrack()];
1618 if (newID>=0) ref->SetTrack(newID);
1619 else {
1620 ref->SetBit(kNotDeleted,kFALSE);
fd650020 1621 fTmpTrackReferences.RemoveAt(i);
4e490a96 1622 }
1623 } // if ref
5d12ce38 1624 }
fd650020 1625 fTmpTrackReferences.Compress();
5d12ce38 1626}
0561efeb 1627
dde0a601 1628//_______________________________________________________________________
0561efeb 1629void AliMC::FixParticleDecaytime()
1630{
1631 //
1632 // Fix the particle decay time according to rmin and rmax for decays
1633 //
1634
1635 TLorentzVector p;
2942f542 1636 TVirtualMC::GetMC()->TrackMomentum(p);
0561efeb 1637 Double_t tmin, tmax;
1638 Double_t b;
1639
1640 // Transverse velocity
1641 Double_t vt = p.Pt() / p.E();
1642
f7a1cc68 1643 if ((b = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->SolenoidField()) > 0.) { // [kG]
0561efeb 1644
1645 // Radius of helix
1646
1647 Double_t rho = p.Pt() / 0.0003 / b; // [cm]
1648
1649 // Revolution frequency
1650
1651 Double_t omega = vt / rho;
1652
1653 // Maximum and minimum decay time
1654 //
1655 // Check for curlers first
bfd20868 1656 const Double_t kOvRhoSqr2 = 1./(rho*TMath::Sqrt(2.));
1657 if (fRDecayMax * kOvRhoSqr2 > 1.) return;
0561efeb 1658
1659 //
1660
bfd20868 1661 tmax = TMath::ACos((1.-fRDecayMax*kOvRhoSqr2)*(1.+fRDecayMax*kOvRhoSqr2)) / omega; // [ct]
ec29d701 1662 tmin = TMath::ACos((1.-fRDecayMin*kOvRhoSqr2)*(1.+fRDecayMin*kOvRhoSqr2)) / omega; // [ct]
0561efeb 1663 } else {
1664 tmax = fRDecayMax / vt; // [ct]
1665 tmin = fRDecayMin / vt; // [ct]
1666 }
1667
1668 //
1669 // Dial t using the two limits
1670 Double_t t = tmin + (tmax - tmin) * gRandom->Rndm(); // [ct]
1671 //
1672 //
1673 // Force decay time in transport code
1674 //
2942f542 1675 TVirtualMC::GetMC()->ForceDecayTime(t / 2.99792458e10);
0561efeb 1676}
3cac0921 1677
1678void AliMC::MakeTmpTrackRefsTree()
1679{
1680 // Make the temporary track reference tree
1681 fTmpFileTR = new TFile("TrackRefsTmp.root", "recreate");
1682 fTmpTreeTR = new TTree("TreeTR", "Track References");
fd650020 1683 TClonesArray* pRef = &fTmpTrackReferences;
fda9d714 1684 fTmpTreeTR->Branch("TrackReferences", &pRef, 4000);
3cac0921 1685}
1686
dde0a601 1687//_______________________________________________________________________
3cac0921 1688void AliMC::ReorderAndExpandTreeTR()
1689{
1690//
1691// Reorder and expand the temporary track reference tree in order to match the kinematics tree
1692//
1693
33c3c91a 1694 AliRunLoader *rl = AliRunLoader::Instance();
3cac0921 1695//
1696// TreeTR
1697 AliDebug(1, "fRunLoader->MakeTrackRefsContainer()");
1698 rl->MakeTrackRefsContainer();
1699 TTree * treeTR = rl->TreeTR();
3cac0921 1700 // make branch for central track references
fd650020 1701 TClonesArray* pRef = &fTrackReferences;
7275b148 1702 treeTR->Branch("TrackReferences", &pRef);
3cac0921 1703
1704 AliStack* stack = rl->Stack();
1705 Int_t np = stack->GetNprimary();
1706 Int_t nt = fTmpTreeTR->GetEntries();
3cac0921 1707 //
1708 // Loop over tracks and find the secondaries with the help of the kine tree
5ce21fc4 1709 Int_t ifills = 0;
1710 Int_t it = 0;
1711 for (Int_t ip = np - 1; ip > -1; ip--) {
1712 TParticle *part = stack->Particle(ip);
5a9cf418 1713 //printf("Particle %5d %5d %5d %5d %5d \n", ip, part->GetPdgCode(), part->GetFirstMother(), part->GetFirstDaughter(), part->GetLastDaughter());
2c4e7c77 1714
5ce21fc4 1715 // Skip primaries that have not been transported
3cac0921 1716 Int_t dau1 = part->GetFirstDaughter();
1717 Int_t dau2 = -1;
f4414561 1718 if (!part->TestBit(kTransportBit)) continue;
5ce21fc4 1719 //
1720 fTmpTreeTR->GetEntry(it++);
fd650020 1721 Int_t nh = fTmpTrackReferences.GetEntries();
5ce21fc4 1722 // Determine range of secondaries produced by this primary
3cac0921 1723 if (dau1 > -1) {
5ce21fc4 1724 Int_t inext = ip - 1;
3cac0921 1725 while (dau2 < 0) {
1726 if (inext >= 0) {
1727 part = stack->Particle(inext);
5ce21fc4 1728 dau2 = part->GetFirstDaughter();
5a9cf418 1729 if (!(part->TestBit(kTransportBit)) || dau2 == -1 || dau2 < np) {
1730// if (dau2 == -1 || dau2 < np) {
5ce21fc4 1731 dau2 = -1;
1732 } else {
1733 dau2--;
1734 }
3cac0921 1735 } else {
1736 dau2 = stack->GetNtrack() - 1;
1737 }
1738 inext--;
5ce21fc4 1739 } // find upper bound
1740 } // dau2 < 0
2c4e7c77 1741// printf("Check (1) %5d %5d %5d %5d %5d \n", ip, np, it, dau1, dau2);
3cac0921 1742 //
1743 // Loop over reference hits and find secondary label
1744 for (Int_t id = dau1; (id <= dau2) && (dau1 > -1); id++) {
1745 for (Int_t ih = 0; ih < nh; ih++) {
fd650020 1746 AliTrackReference* tr = (AliTrackReference*) fTmpTrackReferences.At(ih);
3cac0921 1747 Int_t label = tr->Label();
5ce21fc4 1748 // Skip primaries
1749 if (label == ip) continue;
2c4e7c77 1750 if (label > dau2 || label < dau1)
1751 AliWarning(Form("Track Reference Label out of range !: %5d %5d %5d \n", label, dau1, dau2));
3cac0921 1752 if (label == id) {
1753 // secondary found
fd650020 1754 Int_t nref = fTrackReferences.GetEntriesFast();
1755 new(fTrackReferences[nref]) AliTrackReference(*tr);
3cac0921 1756 }
1757 } // hits
1758 treeTR->Fill();
fd650020 1759 fTrackReferences.Clear();
5ce21fc4 1760 ifills++;
3cac0921 1761 } // daughters
1762 } // tracks
3cac0921 1763 //
1764 // Now loop again and write the primaries
5ce21fc4 1765 it = nt - 1;
1766 for (Int_t ip = 0; ip < np; ip++) {
1767 TParticle* part = stack->Particle(ip);
f4414561 1768// if ((part->GetFirstDaughter() == -1 && part->GetStatusCode() <= 1) || part->GetFirstDaughter() >= np)
c226988d 1769 if (part->TestBit(kTransportBit))
f4414561 1770 {
5ce21fc4 1771 // Skip particles that have not been transported
1772 fTmpTreeTR->GetEntry(it--);
fd650020 1773 Int_t nh = fTmpTrackReferences.GetEntries();
5ce21fc4 1774 //
1775 // Loop over reference hits and find primary labels
1776 for (Int_t ih = 0; ih < nh; ih++) {
fd650020 1777 AliTrackReference* tr = (AliTrackReference*) fTmpTrackReferences.At(ih);
5ce21fc4 1778 Int_t label = tr->Label();
1779 if (label == ip) {
fd650020 1780 Int_t nref = fTrackReferences.GetEntriesFast();
1781 new(fTrackReferences[nref]) AliTrackReference(*tr);
5ce21fc4 1782 }
1783 }
3cac0921 1784 }
1785 treeTR->Fill();
fd650020 1786 fTrackReferences.Clear();
5ce21fc4 1787 ifills++;
3cac0921 1788 } // tracks
5ce21fc4 1789 // Check
1790 if (ifills != stack->GetNtrack())
1791 AliWarning(Form("Number of entries in TreeTR (%5d) unequal to TreeK (%5d) \n", ifills, stack->GetNtrack()));
3cac0921 1792//
1793// Clean-up
1794 delete fTmpTreeTR;
1795 fTmpFileTR->Close();
1796 delete fTmpFileTR;
fd650020 1797 fTmpTrackReferences.Clear();
3cac0921 1798 gSystem->Exec("rm -rf TrackRefsTmp.root");
1799}
1800