#include <TStopwatch.h>
#include <TSystem.h>
#include <TVirtualMC.h>
+#include "TGeant3.h"
+
#include "AliLog.h"
#include "AliDetector.h"
#include "AliMCQA.h"
#include "AliRun.h"
#include "AliStack.h"
+#include "AliMagF.h"
#include "AliTrackReference.h"
{
//default constructor
+ DecayLimits();
}
//_______________________________________________________________________
//constructor
// Set transport parameters
SetTransPar();
-
+ DecayLimits();
// Prepare the tracking medium lists
for(Int_t i=0;i<1000;i++) (*fImedia)[i]=-99;
-
}
//_______________________________________________________________________
//
// Called at every step during transport
//
-
+
Int_t id = DetFromMate(gMC->GetMedium());
if (id < 0) return;
+
+ if ( gMC->IsNewTrack() &&
+ gMC->TrackTime() == 0. &&
+ fRDecayMin > 0. &&
+ fRDecayMax > fRDecayMin &&
+ gMC->TrackPid() == fDecayPdg )
+ {
+ FixParticleDecaytime();
+ }
+
+
+
//
// --- If lego option, do it and leave
if (gAlice->Lego())
if((det=dynamic_cast<AliModule*>(dets[kz]))) {
TArrayI &idtmed = *(det->GetIdtmed());
for(nz=0;nz<100;nz++) {
+
// Find max and min material number
if((idt=idtmed[nz])) {
det->LoMedium() = det->LoMedium() < idt ? det->LoMedium() : idt;
}
fTrackReferences->Compress();
}
+
+void AliMC::FixParticleDecaytime()
+{
+ //
+ // Fix the particle decay time according to rmin and rmax for decays
+ //
+
+ TLorentzVector p;
+ gMC->TrackMomentum(p);
+ Double_t tmin, tmax;
+ Double_t b;
+
+ // Transverse velocity
+ Double_t vt = p.Pt() / p.E();
+
+ if ((b = gAlice->Field()->SolenoidField()) > 0.) { // [kG]
+
+ // Radius of helix
+
+ Double_t rho = p.Pt() / 0.0003 / b; // [cm]
+
+ // Revolution frequency
+
+ Double_t omega = vt / rho;
+
+ // Maximum and minimum decay time
+ //
+ // Check for curlers first
+ if (fRDecayMax * fRDecayMax / rho / rho / 2. > 1.) return;
+
+ //
+
+ tmax = TMath::ACos(1. - fRDecayMax * fRDecayMax / rho / rho / 2.) / omega; // [ct]
+ tmin = TMath::ACos(1. - fRDecayMin * fRDecayMin / rho / rho / 2.) / omega; // [ct]
+ } else {
+ tmax = fRDecayMax / vt; // [ct]
+ tmin = fRDecayMin / vt; // [ct]
+ }
+
+ //
+ // Dial t using the two limits
+ Double_t t = tmin + (tmax - tmin) * gRandom->Rndm(); // [ct]
+ //
+ //
+ // Force decay time in transport code
+ //
+ TGeant3 * geant = (TGeant3*) gMC;
+ geant->Gcphys()->sumlif = t / p.Beta() / p.Gamma();
+}
{fEventEnergy[id]+=edep;}
virtual void ResetHits();
virtual void TrackingLimits( Float_t rmax=1.e10, Float_t zmax=1.e10)
- {fTrRmax=rmax; fTrZmax=zmax;}
+ {fTrRmax=rmax; fTrZmax=zmax;}
+ virtual void DecayLimits( Float_t rmin = -1., Float_t rmax = -1., Int_t pdg = 0)
+ {fRDecayMin = rmin; fRDecayMax = rmax; fDecayPdg = pdg;}
+
virtual void Init();
virtual void SetTransPar(const char *filename="$(ALICE_ROOT)/data/galice.cuts");
virtual void Browse(TBrowser *b);
TClonesArray *TrackReferences() const {return fTrackReferences;}
virtual void RemapTrackReferencesIDs(Int_t *map); //remaping track references MI
virtual void ResetTrackReferences();
-
-
+ virtual void FixParticleDecaytime();
private:
void Copy (TObject &mc) const;
TArrayF fSum2Energy; //! Energy squared per event in each volume
Float_t fTrRmax; // Maximum radius for tracking
Float_t fTrZmax; // Maximu z for tracking
+ Float_t fRDecayMax; // Maximum radius for decay
+ Float_t fRDecayMin; // Minimum radius for decay
+ Int_t fDecayPdg; // PDG code of particle with forced decay length
TArrayI *fImedia; //! Array of correspondence between media and detectors
TString fTransParName; // Name of the transport parameters file
AliMCQA *fMCQA; // Pointer to MC Quality assurance class