]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TRD/AliTRDv1.cxx
changes from fzhou
[u/mrichter/AliRoot.git] / TRD / AliTRDv1.cxx
index 50b80358c24a4fe545f75a5136566fcbe0003a65..3669e67034a2d8a24bf43193d73b48ce48ff5137 100644 (file)
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
 
-/*
-$Log$
-Revision 1.16.4.1  2000/02/28 18:04:35  cblume
-Change to new hit version, introduce geometry class, and move digitization and clustering to AliTRDdigitizer/AliTRDclusterizerV1
+/* $Id$ */
 
-Revision 1.16  1999/11/05 22:50:28  fca
-Do not use Atan, removed from ROOT too
-
-Revision 1.15  1999/11/02 17:20:19  fca
-initialise nbytes before using it
-
-Revision 1.14  1999/11/02 17:15:54  fca
-Correct ansi scoping not accepted by HP compilers
-
-Revision 1.13  1999/11/02 17:14:51  fca
-Correct ansi scoping not accepted by HP compilers
-
-Revision 1.12  1999/11/02 16:35:56  fca
-New version of TRD introduced
-
-Revision 1.11  1999/11/01 20:41:51  fca
-Added protections against using the wrong version of FRAME
-
-Revision 1.10  1999/09/29 09:24:35  fca
-Introduction of the Copyright and cvs Log
-
-*/
-
-///////////////////////////////////////////////////////////////////////////////
-//                                                                           //
-//  Transition Radiation Detector version 2 -- slow simulator                //
-//                                                                           //
-//Begin_Html
-/*
-<img src="picts/AliTRDfullClass.gif">
-*/
-//End_Html
-//                                                                           //
-//                                                                           //
-///////////////////////////////////////////////////////////////////////////////
+////////////////////////////////////////////////////////////////////////////
+//                                                                        //
+//  Transition Radiation Detector version 1 -- slow simulator             //
+//                                                                        //
+////////////////////////////////////////////////////////////////////////////
 
+#include <TLorentzVector.h>
 #include <TMath.h>
-#include <TVector.h>
 #include <TRandom.h>
+#include <TVirtualMC.h>
+#include <TGeoManager.h>
+#include <TGeoMatrix.h>
+#include <TGeoPhysicalNode.h>
 
-#include "AliRun.h"
+#include "AliTrackReference.h"
 #include "AliMC.h"
-#include "AliConst.h"
+#include "AliRun.h"
+#include "AliGeomManager.h"
 
-#include "AliTRDv1.h"
-#include "AliTRDmatrix.h"
 #include "AliTRDgeometry.h"
+#include "AliTRDCommonParam.h"
+#include "AliTRDsimTR.h"
+#include "AliTRDv1.h"
 
 ClassImp(AliTRDv1)
+//_____________________________________________________________________________
+AliTRDv1::AliTRDv1()
+  :AliTRD()
+  ,fTRon(kTRUE)
+  ,fTR(NULL)
+  ,fStepSize(0)
+  ,fWion(0)
+{
+  //
+  // Default constructor
+  //
+
+}
 
 //_____________________________________________________________________________
 AliTRDv1::AliTRDv1(const char *name, const char *title) 
-         :AliTRD(name, title) 
+  :AliTRD(name,title) 
+  ,fTRon(kTRUE)
+  ,fTR(NULL)
+  ,fStepSize(0.1)
+  ,fWion(0)
 {
   //
   // Standard constructor for Transition Radiation Detector version 1
   //
 
-  fIdSens        =  0;
-
-  fIdChamber1    =  0;
-  fIdChamber2    =  0;
-  fIdChamber3    =  0;
-
-  fSensSelect    =  0;
-  fSensPlane     = -1;
-  fSensChamber   = -1;
-  fSensSector    = -1;
-
-  fDeltaE        = NULL;
-
   SetBufferSize(128000);
 
+  if      (AliTRDCommonParam::Instance()->IsXenon()) {
+    fWion = 23.53; // Ionization energy XeCO2 (85/15)
+  }
+  else if (AliTRDCommonParam::Instance()->IsArgon()) {
+    fWion = 27.21; // Ionization energy ArCO2 (82/18)
+  }
+  else {
+    AliFatal("Wrong gas mixture");
+    exit(1);
+  }
+
 }
 
 //_____________________________________________________________________________
 AliTRDv1::~AliTRDv1()
 {
+  //
+  // AliTRDv1 destructor
+  //
 
-  if (fDeltaE) delete fDeltaE;
+  if (fTR) {
+    delete fTR;
+    fTR     = 0;
+  }
 
 }
  
+//_____________________________________________________________________________
+void AliTRDv1::AddAlignableVolumes() const
+{
+  //
+  // Create entries for alignable volumes associating the symbolic volume
+  // name with the corresponding volume path. Needs to be syncronized with
+  // eventual changes in the geometry.
+  //
+
+  TString volPath;
+  TString symName;
+
+  TString vpStr   = "ALIC_1/B077_1/BSEGMO";
+  TString vpApp1  = "_1/BTRD";
+  TString vpApp2  = "_1";
+  TString vpApp3a = "/UTR1_1/UTS1_1/UTI1_1/UT";
+  TString vpApp3b = "/UTR2_1/UTS2_1/UTI2_1/UT";
+  TString vpApp3c = "/UTR3_1/UTS3_1/UTI3_1/UT";
+
+  TString snStr   = "TRD/sm";
+  TString snApp1  = "/st";
+  TString snApp2  = "/pl";
+
+  //
+  // The super modules
+  // The symbolic names are: TRD/sm00
+  //                           ...
+  //                         TRD/sm17
+  //
+  for (Int_t isector = 0; isector < AliTRDgeometry::Nsector(); isector++) {
+
+    volPath  = vpStr;
+    volPath += isector;
+    volPath += vpApp1;
+    volPath += isector;
+    volPath += vpApp2;
+
+    symName  = snStr;
+    symName += Form("%02d",isector);
+
+    gGeoManager->SetAlignableEntry(symName.Data(),volPath.Data());
+
+  }
+
+  //
+  // The readout chambers
+  // The symbolic names are: TRD/sm00/st0/pl0
+  //                           ...
+  //                         TRD/sm17/st4/pl5
+  //
+  AliGeomManager::ELayerID idTRD1 = AliGeomManager::kTRD1;
+  Int_t layer, modUID;
+  
+  for (Int_t isector = 0; isector < AliTRDgeometry::Nsector(); isector++) {
+
+    if (fGeometry->GetSMstatus(isector) == 0) continue;
+
+    for (Int_t istack = 0; istack < AliTRDgeometry::Nstack(); istack++) {
+      for (Int_t ilayer = 0; ilayer < AliTRDgeometry::Nlayer(); ilayer++) {
+
+       layer = idTRD1 + ilayer;
+       modUID = AliGeomManager::LayerToVolUIDSafe(layer,isector*5+istack);
+
+        Int_t idet = AliTRDgeometry::GetDetectorSec(ilayer,istack);
+
+        volPath  = vpStr;
+        volPath += isector;
+        volPath += vpApp1;
+        volPath += isector;
+        volPath += vpApp2;
+        switch (isector) {
+        case 13:
+        case 14:
+        case 15:
+          if (istack == 2) {
+            continue;
+         }
+          volPath += vpApp3c;
+          break;
+        case 11:
+        case 12:
+          volPath += vpApp3b;
+          break;
+        default:
+          volPath += vpApp3a;
+       };
+        volPath += Form("%02d",idet);
+        volPath += vpApp2;
+
+        symName  = snStr;
+        symName += Form("%02d",isector);
+        symName += snApp1;
+        symName += istack;
+        symName += snApp2;
+        symName += ilayer;
+
+        TGeoPNEntry *alignableEntry = 
+         gGeoManager->SetAlignableEntry(symName.Data(),volPath.Data(),modUID);
+
+       // Add the tracking to local matrix following the TPC example
+       if (alignableEntry) {
+         TGeoHMatrix *globMatrix = alignableEntry->GetGlobalOrig();
+         Double_t sectorAngle = 20.0 * (isector % 18) + 10.0;
+         TGeoHMatrix *t2lMatrix  = new TGeoHMatrix();
+         t2lMatrix->RotateZ(sectorAngle);
+         t2lMatrix->MultiplyLeft(&(globMatrix->Inverse()));
+         alignableEntry->SetMatrix(t2lMatrix);
+       }
+       else {
+         AliError(Form("Alignable entry %s is not valid!",symName.Data()));
+       }
+
+      }
+    }
+  }
+
+}
+
 //_____________________________________________________________________________
 void AliTRDv1::CreateGeometry()
 {
@@ -110,8 +223,11 @@ void AliTRDv1::CreateGeometry()
   //
 
   // Check that FRAME is there otherwise we have no place where to put the TRD
-  AliModule* FRAME = gAlice->GetModule("FRAME");
-  if (!FRAME) return;
+  AliModule* frame = gAlice->GetModule("FRAME");
+  if (!frame) {
+    AliError("TRD needs FRAME to be present\n");
+    return;
+  }
 
   // Define the chambers
   AliTRD::CreateGeometry();
@@ -130,350 +246,272 @@ void AliTRDv1::CreateMaterials()
 }
 
 //_____________________________________________________________________________
-void AliTRDv1::Init() 
+void AliTRDv1::CreateTRhit(Int_t det)
 {
   //
-  // Initialise Transition Radiation Detector after geometry has been built.
+  // Creates an electron cluster from a TR photon.
+  // The photon is assumed to be created a the end of the radiator. The 
+  // distance after which it deposits its energy takes into account the 
+  // absorbtion of the entrance window and of the gas mixture in drift
+  // volume.
   //
 
-  AliTRD::Init();
+  // Maximum number of TR photons per track
+  const Int_t   kNTR         = 50;
+
+  TLorentzVector mom;
+  TLorentzVector pos;
+
+  Float_t eTR[kNTR];
+  Int_t   nTR;
 
-  printf("          Slow simulator\n\n");
-  if (fSensSelect) {
-    if (fSensPlane   >= 0)
-      printf("          Only plane %d is sensitive\n",fSensPlane);
-    if (fSensChamber >= 0)   
-      printf("          Only chamber %d is sensitive\n",fSensChamber);
-    if (fSensSector  >= 0)
-      printf("          Only sector %d is sensitive\n",fSensSector);
+  // Create TR photons
+  gMC->TrackMomentum(mom);
+  Float_t pTot = mom.Rho();
+  fTR->CreatePhotons(11,pTot,nTR,eTR);
+  if (nTR > kNTR) {
+    AliFatal(Form("Boundary error: nTR = %d, kNTR = %d",nTR,kNTR));
   }
-  printf("\n");
 
-  // First ionization potential (eV) for the gas mixture (90% Xe + 10% CO2)
-  const Float_t kPoti = 12.1;
-  // Maximum energy (50 keV);
-  const Float_t kEend = 50000.0;
-  // Ermilova distribution for the delta-ray spectrum
-  Float_t Poti = TMath::Log(kPoti);
-  Float_t Eend = TMath::Log(kEend);
-  fDeltaE  = new TF1("deltae",Ermilova,Poti,Eend,0);
+  // Loop through the TR photons
+  for (Int_t iTR = 0; iTR < nTR; iTR++) {
+
+    Float_t energyMeV = eTR[iTR] * 0.001;
+    Float_t energyeV  = eTR[iTR] * 1000.0;
+    Float_t absLength = 0.0;
+    Float_t sigma     = 0.0;
+
+    // Take the absorbtion in the entrance window into account
+    Double_t muMy = fTR->GetMuMy(energyMeV);
+    sigma         = muMy * fFoilDensity;
+    if (sigma > 0.0) {
+      absLength = gRandom->Exp(1.0/sigma);
+      if (absLength < AliTRDgeometry::MyThick()) {
+        continue;
+      }
+    }
+    else {
+      continue;
+    }
 
-  // Identifier of the sensitive volume (drift region)
-  fIdSens     = gMC->VolId("UL05");
+    // The absorbtion cross sections in the drift gas
+    // Gas-mixture (Xe/CO2)
+    Double_t muNo = 0.0;
+    if      (AliTRDCommonParam::Instance()->IsXenon()) {
+      muNo = fTR->GetMuXe(energyMeV);
+    }
+    else if (AliTRDCommonParam::Instance()->IsArgon()) {
+      muNo = fTR->GetMuAr(energyMeV);
+    }
+    Double_t muCO = fTR->GetMuCO(energyMeV);
+    sigma = (fGasNobleFraction * muNo + (1.0 - fGasNobleFraction) * muCO) 
+          * fGasDensity 
+          * fTR->GetTemp();
+
+    // The distance after which the energy of the TR photon
+    // is deposited.
+    if (sigma > 0.0) {
+      absLength = gRandom->Exp(1.0/sigma);
+      if (absLength > (AliTRDgeometry::DrThick()
+                     + AliTRDgeometry::AmThick())) {
+        continue;
+      }
+    }
+    else {
+      continue;
+    }
 
-  // Identifier of the TRD-driftchambers
-  fIdChamber1 = gMC->VolId("UCIO");
-  fIdChamber2 = gMC->VolId("UCIM");
-  fIdChamber3 = gMC->VolId("UCII");
+    // The position of the absorbtion
+    Float_t posHit[3];
+    gMC->TrackPosition(pos);
+    posHit[0] = pos[0] + mom[0] / pTot * absLength;
+    posHit[1] = pos[1] + mom[1] / pTot * absLength;
+    posHit[2] = pos[2] + mom[2] / pTot * absLength;
+
+    // Create the charge 
+    Int_t q = ((Int_t) (energyeV / fWion));
+
+    // Add the hit to the array. TR photon hits are marked 
+    // by negative charge
+    AddHit(gAlice->GetMCApp()->GetCurrentTrackNumber()
+          ,det
+          ,posHit
+          ,-q
+          ,gMC->TrackTime()*1.0e06
+          ,kTRUE);
 
-  for (Int_t i = 0; i < 80; i++) printf("*");
-  printf("\n");
+  }
 
 }
 
 //_____________________________________________________________________________
-void AliTRDv1::SetSensPlane(Int_t iplane)
+void AliTRDv1::Init() 
 {
   //
-  // Defines the hit-sensitive plane (0-5)
+  // Initialise Transition Radiation Detector after geometry has been built.
   //
 
-  if ((iplane < 0) || (iplane > 5)) {
-    printf("Wrong input value: %d\n",iplane);
-    printf("Use standard setting\n");
-    fSensPlane  = -1;
-    fSensSelect =  0;
-    return;
+  AliTRD::Init();
+
+  AliDebug(1,"Slow simulator\n");
+
+  // Switch on TR simulation as default
+  if (!fTRon) {
+    AliInfo("TR simulation off");
+  }
+  else {
+    fTR = new AliTRDsimTR();
   }
 
-  fSensSelect = 1;
-  fSensPlane  = iplane;
+  AliDebug(1,"+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++");
 
 }
 
 //_____________________________________________________________________________
-void AliTRDv1::SetSensChamber(Int_t ichamber)
+void AliTRDv1::StepManager()
 {
   //
-  // Defines the hit-sensitive chamber (0-4)
+  // Slow simulator. Every charged track produces electron cluster as hits 
+  // along its path across the drift volume. The step size is fixed in
+  // this version of the step manager.
+  //
+  // Works for Xe/CO2 as well as Ar/CO2
   //
 
-  if ((ichamber < 0) || (ichamber > 4)) {
-    printf("Wrong input value: %d\n",ichamber);
-    printf("Use standard setting\n");
-    fSensChamber = -1;
-    fSensSelect  =  0;
-    return;
-  }
-
-  fSensSelect  = 1;
-  fSensChamber = ichamber;
+  // PDG code electron
+  const Int_t   kPdgElectron = 11;
 
-}
+  Int_t    layer  = 0;
+  Int_t    stack  = 0;
+  Int_t    sector = 0;
+  Int_t    det    = 0;
+  Int_t    qTot;
 
-//_____________________________________________________________________________
-void AliTRDv1::SetSensSector(Int_t isector)
-{
-  //
-  // Defines the hit-sensitive sector (0-17)
-  //
+  Float_t  hits[3];
+  Double_t eDep;
 
-  if ((isector < 0) || (isector > 17)) {
-    printf("Wrong input value: %d\n",isector);
-    printf("Use standard setting\n");
-    fSensSector = -1;
-    fSensSelect =  0;
-    return;
-  }
+  Bool_t   drRegion = kFALSE;
+  Bool_t   amRegion = kFALSE;
 
-  fSensSelect = 1;
-  fSensSector = isector;
+  TString  cIdPath;
+  Char_t   cIdSector[3];
+           cIdSector[2]  = 0;
 
-}
+  TString  cIdCurrent;
+  TString  cIdSensDr = "J";
+  TString  cIdSensAm = "K";
+  Char_t   cIdChamber[3];
+           cIdChamber[2] = 0;
 
-//_____________________________________________________________________________
-void AliTRDv1::StepManager()
-{
-  //
-  // Slow simulator. Every charged track produces electron cluster as hits 
-  // along its path across the drift volume. The step size is set acording
-  // to Bethe-Bloch. The energy distribution of the delta electrons follows
-  // a spectrum taken from Ermilova et al.
-  //
+  TLorentzVector pos;
+  TLorentzVector mom;
 
-  Int_t    iIdSens, icSens;
-  Int_t    iIdSpace, icSpace;
-  Int_t    iIdChamber, icChamber;
-  Int_t    pla = 0;
-  Int_t    cha = 0;
-  Int_t    sec = 0;
-  Int_t    iPdg;
-
-  Float_t  hits[4];
-  Float_t  random[1];
-  Float_t  charge;
-  Float_t  aMass;
-
-  Double_t pTot;
-  Double_t qTot;
-  Double_t eDelta;
-  Double_t betaGamma, pp;
-
-  TLorentzVector pos, mom;
-  TClonesArray  &lhits = *fHits;
-
-  const Double_t kBig     = 1.0E+12;
-
-  // Ionization energy
-  const Float_t  kWion    = 22.04;
-  // Maximum energy for e+ e- g for the step-size calculation
-  const Float_t  kPTotMax = 0.002;
-  // Plateau value of the energy-loss for electron in xenon
-  // taken from: Allison + Comb, Ann. Rev. Nucl. Sci. (1980), 30, 253
-  //const Double_t kPlateau = 1.70;
-  // the averaged value (26/3/99)
-  const Float_t  kPlateau = 1.55;
-  // dN1/dx|min for the gas mixture (90% Xe + 10% CO2)
-  const Float_t  kPrim    = 48.0;
-  // First ionization potential (eV) for the gas mixture (90% Xe + 10% CO2)
-  const Float_t  kPoti    = 12.1;
+  const Int_t    kNlayer      = AliTRDgeometry::Nlayer();
+  const Int_t    kNstack      = AliTRDgeometry::Nstack();
+  const Int_t    kNdetsec     = kNlayer * kNstack;
 
-  // PDG code electron
-  const Int_t    pdgElectron = 11;
+  const Double_t kBig         = 1.0e+12;
+  const Float_t  kEkinMinStep = 1.0e-5;  // Minimum energy for the step size adjustment
 
   // Set the maximum step size to a very large number for all 
   // neutral particles and those outside the driftvolume
-  gMC->SetMaxStep(kBig); 
-
-  // Use only charged tracks 
-  if (( gMC->TrackCharge()       ) &&
-      (!gMC->IsTrackStop()       ) && 
-      (!gMC->IsTrackDisappeared())) {
-
-    // Inside a sensitive volume?
-    iIdSens = gMC->CurrentVolID(icSens);
-    if (iIdSens == fIdSens) { 
-
-      iIdSpace   = gMC->CurrentVolOffID(4,icSpace  );
-      iIdChamber = gMC->CurrentVolOffID(1,icChamber);
-
-      // Calculate the energy of the delta-electrons
-      eDelta = TMath::Exp(fDeltaE->GetRandom()) - kPoti;
-      eDelta = TMath::Max(eDelta,0.0);
-
-      // The number of secondary electrons created
-      qTot = (Double_t) ((Int_t) (eDelta / kWion) + 1);
-
-      // The hit coordinates and charge
-      gMC->TrackPosition(pos);
-      hits[0] = pos[0];
-      hits[1] = pos[1];
-      hits[2] = pos[2];
-      hits[3] = qTot;
-
-      // The sector number (0 - 17)
-      // The numbering goes clockwise and starts at y = 0
-      Float_t phi = kRaddeg*TMath::ATan2(pos[0],pos[1]);
-      if (phi < 90.) 
-        phi = phi + 270.;
-      else
-        phi = phi -  90.;
-      sec = ((Int_t) (phi / 20));
-
-      // The chamber number 
-      //   0: outer left
-      //   1: middle left
-      //   2: inner
-      //   3: middle right
-      //   4: outer right
-      if      (iIdChamber == fIdChamber1)
-        cha = (hits[2] < 0 ? 0 : 4);
-      else if (iIdChamber == fIdChamber2)       
-        cha = (hits[2] < 0 ? 1 : 3);
-      else if (iIdChamber == fIdChamber3)       
-        cha = 2;
-
-      // The plane number
-      // The numbering starts at the innermost plane
-      pla = icChamber - TMath::Nint((Float_t) (icChamber / 7)) * 6 - 1;
-
-      // Check on selected volumes
-      Int_t addthishit = 1;
-      if (fSensSelect) {
-        if ((fSensPlane)   && (pla != fSensPlane  )) addthishit = 0;
-        if ((fSensChamber) && (cha != fSensChamber)) addthishit = 0;
-        if ((fSensSector)  && (sec != fSensSector )) addthishit = 0;
-      }
-
-      // Add this hit
-      if (addthishit) {
-
-        new(lhits[fNhits++]) AliTRDhit(fIshunt
-                                      ,gAlice->CurrentTrack()
-                                      ,fGeometry->GetDetector(pla,cha,sec)
-                                      ,hits);
-
-        // The energy loss according to Bethe Bloch
-        gMC->TrackMomentum(mom);
-        pTot = mom.Rho();
-        iPdg = TMath::Abs(gMC->TrackPid());
-        if ( (iPdg != pdgElectron) ||
-           ((iPdg == pdgElectron) && (pTot < kPTotMax))) {
-          aMass     = gMC->TrackMass();
-          betaGamma = pTot / aMass;
-          pp        = kPrim * BetheBloch(betaGamma);
-         // Take charge > 1 into account
-          charge = gMC->TrackCharge();
-          if (TMath::Abs(charge) > 1) pp = pp * charge*charge;
-        }
-        // Electrons above 20 Mev/c are at the plateau
-        else {
-          pp = kPrim * kPlateau;
-        }
-      
-        // Calculate the maximum step size for the next tracking step
-        if (pp > 0) {
-          do 
-            gMC->Rndm(random,1);
-          while ((random[0] == 1.) || (random[0] == 0.));
-          gMC->SetMaxStep( - TMath::Log(random[0]) / pp);
-       }
+  if (!fPrimaryIonisation) gMC->SetMaxStep(kBig); 
 
-      }
-      else {
-        // set step size to maximal value
-        gMC->SetMaxStep(kBig); 
-      }
+  // If not charged track or already stopped or disappeared, just return.
+  if ((!gMC->TrackCharge()) || 
+        gMC->IsTrackDisappeared()) {
+    return;
+  }
 
-    }
+  // Inside a sensitive volume?
+  cIdCurrent = gMC->CurrentVolName();
 
+  if (cIdSensDr == cIdCurrent[1]) {
+    drRegion = kTRUE;
+  }
+  if (cIdSensAm == cIdCurrent[1]) {
+    amRegion = kTRUE;
   }
 
-}
+  if ((!drRegion) && 
+      (!amRegion)) {
+    return;
+  }
 
-//_____________________________________________________________________________
-Double_t AliTRDv1::BetheBloch(Double_t bg) 
-{
-  //
-  // Parametrization of the Bethe-Bloch-curve
-  // The parametrization is the same as for the TPC and is taken from Lehrhaus.
-  //
+  // The hit coordinates and charge
+  gMC->TrackPosition(pos);
+  hits[0] = pos[0];
+  hits[1] = pos[1];
+  hits[2] = pos[2];
+
+  // The sector number (0 - 17), according to standard coordinate system
+  cIdPath      = gGeoManager->GetPath();
+  cIdSector[0] = cIdPath[21];
+  cIdSector[1] = cIdPath[22];
+  sector = atoi(cIdSector);
+
+  // The plane and chamber number
+  cIdChamber[0]   = cIdCurrent[2];
+  cIdChamber[1]   = cIdCurrent[3];
+  Int_t idChamber = (atoi(cIdChamber) % kNdetsec);
+  stack = ((Int_t) idChamber / kNlayer);
+  layer = ((Int_t) idChamber % kNlayer);
+
+  // The detector number
+  det = fGeometry->GetDetector(layer,stack,sector);
+
+  // 0: InFlight 1:Entering 2:Exiting
+  Int_t trkStat = 0;
+
+  // Special hits only in the drift region
+  if      ((drRegion) &&
+           (gMC->IsTrackEntering())) {
+
+    // Create a track reference at the entrance of each
+    // chamber that contains the momentum components of the particle
+    gMC->TrackMomentum(mom);
+    AddTrackReference(gAlice->GetMCApp()->GetCurrentTrackNumber(), AliTrackReference::kTRD);
+    trkStat = 1;
+
+    // Create the hits from TR photons if electron/positron is
+    // entering the drift volume
+    if ((fTR)   &&
+        (fTRon) &&
+        (TMath::Abs(gMC->TrackPid()) == kPdgElectron)) {
+      CreateTRhit(det);
+    }
 
-  // This parameters have been adjusted to averaged values from GEANT
-  const Double_t kP1 = 7.17960e-02;
-  const Double_t kP2 = 8.54196;
-  const Double_t kP3 = 1.38065e-06;
-  const Double_t kP4 = 5.30972;
-  const Double_t kP5 = 2.83798;
-
-  // This parameters have been adjusted to Xe-data found in:
-  // Allison & Cobb, Ann. Rev. Nucl. Sci. (1980), 30, 253
-  //const Double_t kP1 = 0.76176E-1;
-  //const Double_t kP2 = 10.632;
-  //const Double_t kP3 = 3.17983E-6;
-  //const Double_t kP4 = 1.8631;
-  //const Double_t kP5 = 1.9479;
-
-  if (bg > 0) {
-    Double_t yy = bg / TMath::Sqrt(1. + bg*bg);
-    Double_t aa = TMath::Power(yy,kP4);
-    Double_t bb = TMath::Power((1./bg),kP5);
-             bb = TMath::Log(kP3 + bb);
-    return ((kP2 - aa - bb)*kP1 / aa);
   }
-  else
-    return 0;
+  else if ((amRegion) && 
+           (gMC->IsTrackExiting())) {
 
-}
+    // Create a track reference at the exit of each
+    // chamber that contains the momentum components of the particle
+    gMC->TrackMomentum(mom);
+    AddTrackReference(gAlice->GetMCApp()->GetCurrentTrackNumber(), AliTrackReference::kTRD);
+    trkStat = 2;
 
-//_____________________________________________________________________________
-Double_t Ermilova(Double_t *x, Double_t *)
-{
-  //
-  // Calculates the delta-ray energy distribution according to Ermilova.
-  // Logarithmic scale !
-  //
+  }
+  
+  // Calculate the charge according to GEANT Edep
+  // Create a new dEdx hit
+  eDep = TMath::Max(gMC->Edep(),0.0) * 1.0e+09;
+  qTot = (Int_t) (eDep / fWion);
+  if ((qTot) ||
+      (trkStat)) {
+    AddHit(gAlice->GetMCApp()->GetCurrentTrackNumber()
+          ,det
+          ,hits
+          ,qTot
+          ,gMC->TrackTime()*1.0e06
+          ,drRegion);
+  }
 
-  Double_t energy;
-  Double_t dpos;
-  Double_t dnde;
-
-  Int_t    pos1, pos2;
-
-  const Int_t nV = 31;
-
-  Float_t vxe[nV] = { 2.3026, 2.9957, 3.4012, 3.6889, 3.9120  
-                    , 4.0943, 4.2485, 4.3820, 4.4998, 4.6052
-                    , 4.7005, 5.0752, 5.2983, 5.7038, 5.9915
-                    , 6.2146, 6.5221, 6.9078, 7.3132, 7.6009
-                    , 8.0064, 8.5172, 8.6995, 8.9872, 9.2103
-                    , 9.4727, 9.9035,10.3735,10.5966,10.8198
-                    ,11.5129 };
-
-  Float_t vye[nV] = { 80.0  , 31.0  , 23.3  , 21.1  , 21.0
-                    , 20.9  , 20.8  , 20.0  , 16.0  , 11.0
-                    ,  8.0  ,  6.0  ,  5.2  ,  4.6  ,  4.0
-                    ,  3.5  ,  3.0  ,  1.4  ,  0.67 ,  0.44
-                    ,  0.3  ,  0.18 ,  0.12 ,  0.08 ,  0.056
-                    ,  0.04 ,  0.023,  0.015,  0.011,  0.01
-                   ,  0.004 };
-
-  energy = x[0];
-
-  // Find the position 
-  pos1 = pos2 = 0;
-  dpos = 0;
-  do {
-    dpos = energy - vxe[pos2++];
-  } 
-  while (dpos > 0);
-  pos2--; 
-  if (pos2 > nV) pos2 = nV;
-  pos1 = pos2 - 1;
-
-  // Differentiate between the sampling points
-  dnde = (vye[pos1] - vye[pos2]) / (vxe[pos2] - vxe[pos1]);
-
-  return dnde;
+  // Set Maximum Step Size
+  // Produce only one hit if Ekin is below cutoff
+  if ((gMC->Etot() - gMC->TrackMass()) < kEkinMinStep) {
+    return;
+  }
+  if (!fPrimaryIonisation) gMC->SetMaxStep(fStepSize);
 
 }