]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - FMD/AliFMDv1.cxx
added low and high flux parameters to the array
[u/mrichter/AliRoot.git] / FMD / AliFMDv1.cxx
index b9fcd3cf712818079bfa92082853a1a156e99d84..edff2cd49ae714ac43f7775f3a3115f3209e0487 100644 (file)
  * about the suitability of this software for any purpose. It is          *
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
- /////////////////////////////////////////////////////////////////////
-//                                                                 //
-// Forward Multiplicity detector based on Silicon version 0        //
-//
-//Begin Html       
-/*
-<img src="gif/AliFMDv0Class.gif">
+/* $Id$ */
+/** @file    AliFMDv1.cxx
+    @author  Christian Holm Christensen <cholm@nbi.dk>
+    @date    Mon Mar 27 12:48:51 2006
+    @brief   Concrete implementation of FMD detector driver - detailed
+    version 
+    @ingroup FMD_sim
 */
-//End Html
-//                                                                  //
-//                                                                  //
-//////////////////////////////////////////////////////////////////////
-
-#include <TMath.h>
-#include <TGeometry.h>
-#include <TTUBE.h>
-#include <TFile.h>
-#include <TTree.h>
-#include <TNode.h>
-#include <TClonesArray.h>
-#include <TLorentzVector.h>
-#include <TDirectory.h>
-#include "AliFMDv1.h"
-#include "AliFMDv0.h"
-#include "AliRun.h"
-#include <Riostream.h>
-#include "AliMagF.h"
-#include "AliFMDhit.h"
-#include "AliFMDdigit.h"
-#include <stdlib.h>
-//#include "TGeant3.h"
-//class TGeant3;
+//____________________________________________________________________
+//                                                                          
+// Forward Multiplicity Detector based on Silicon wafers. This class
+// contains the base procedures for the Forward Multiplicity detector
+// Detector consists of 3 sub-detectors FMD1, FMD2, and FMD3, each of
+// which has 1 or 2 rings of silicon sensors. 
+// This class contains the detailed version of the FMD - that is, hits
+// are produced during simulation. 
+//                                                                           
+// See also the class AliFMD for a more detailed explanation of the
+// various componets. 
+//
+#include <TVirtualMC.h>                // ROOT_TVirtualMC
+#include <AliRun.h>            // ALIRUN_H
+#include <AliMC.h>             // ALIMC_H
+// #include <AliLog.h>         // ALILOG_H
+#include "AliFMDDebug.h" // Better debug macros
+#include "AliFMDv1.h"          // ALIFMDV1_H
+// #include "AliFMDGeometryBuilder.h"
+#include "AliFMDGeometry.h"
+#include "AliFMDDetector.h"
+#include "AliFMDRing.h"
+#include <TParticlePDG.h>
+#include <TDatabasePDG.h>
+#include "AliFMDHit.h"
+
+//____________________________________________________________________
 ClassImp(AliFMDv1)
+#if 0
+  ; // This is here to keep Emacs for indenting the next line
+#endif
 
-//--------------------------------------------------------------------
-AliFMDv1::AliFMDv1(const char *name, const char *title):
- AliFMD(name,title)
-{
-  //
-  // Standart constructor for Forward Multiplicity Detector version 0
-  //
-  fIdSens1=0;
-  fIdSens2=0;
-  fIdSens3=0;
-  fIdSens4=0;
-  fIdSens5=0;
-//  setBufferSize(128000);
-}
-//-------------------------------------------------------------------------
-void AliFMDv1::CreateGeometry()
-{
- //
-  // Create the geometry of Forward Multiplicity Detector version 0
-  //
-  //Detector consists of 6 volumes: 
-  // 1st covered pseudorapidity interval from 3.3 to 2.0
-  // and placed on 65cm in Z-direction;
-  // 2nd - from 2.0 to 1.6 and Z=85 cm;
-  // 3d  - the same pseudorapidity interval as the 1st 
-  // but on the other side from the interaction point z=-65cm;
-  // 4th - simmetricaly with the 2nd : 
-  // pseudorapidity from 2.0 to 1.6, Z=-85cm   
-  // 5th - from 3.6 to 4.7, Z=-270cm
-  // 6th - from 4.5 to 5.5 , Z=-630cm.
-  // Each part has 400mkm Si (sensetive area, detector itself),
-  // 0.75cm of plastic simulated electronics material,
-  // Al support ring 2cm thickness and 1cm width placed on 
-  // the outer radius of each Si disk;
-  //    
-  // begin Html
-  /*
-   <img src="gif/AliFMDv0.gif">
-   */
-  //
 
+//____________________________________________________________________
+Bool_t
+AliFMDv1::VMC2FMD(TLorentzVector& v, UShort_t& detector,
+                 Char_t& ring, UShort_t& sector, UShort_t& strip) const
+{
+  // Convert VMC coordinates to detector coordinates 
+  TVirtualMC*      mc  = TVirtualMC::GetMC();
+  AliFMDGeometry*  fmd = AliFMDGeometry::Instance();
+
+  // Get track position
+  mc->TrackPosition(v);
+  Int_t moduleno; mc->CurrentVolOffID(fmd->GetModuleOff(), moduleno);
+  Int_t iring;    mc->CurrentVolOffID(fmd->GetRingOff(), iring);   
+  ring = Char_t(iring);
+  Int_t det;      mc->CurrentVolOffID(fmd->GetDetectorOff(), det); 
+  detector = det;
   
-  Int_t *idtmed = fIdtmed->GetArray();
-   
-  Int_t ifmd;
-  Int_t idrotm[999];
-  Float_t zfmd,par[3];
-  char name[5], nameSi[5], nameSector[5], nameRing[5];
-
-  Float_t rin[6], rout[6],zpos;
-
-  Float_t etain[5]= {3.40, 2.29, 3.68, 2.29, 5.09};
-  Float_t etaout[6]={2.01, 1.70, 2.28, 1.70, 3.68};
-  //  Float_t z[6]={64., 85., -64., -85., -270., -630};
-  Float_t z[6]={62.8, 75.2, -83.4, -75.2, -340.};
-  Float_t zDet=0.03;
-  Float_t zElectronic=0.1;
-  Float_t zSupport=1.;
-
-  Float_t zFMD=1.;
-//-------------------------------------------------------------------
- //  FMD 
- //------------------------------------------------------------------
-       cout<<" !!!!!!!!!!!New FMD geometry !!!!!!!!!"<<endl;
-
-  AliMatrix(idrotm[901], 90, 0, 90, 90, 180, 0);
-
-  //  gMC->Gsvolu("GSI","TUBE", idtmed[1], par, 0);
-  gMC->Gsvolu("GEL ","TUBE", idtmed[4], par, 0);
-  gMC->Gsvolu("GSUP","TUBE", idtmed[2], par, 0);
-
-  for (ifmd =0; ifmd < 5; ifmd++){
-
-    sprintf(name,"FMD%d",ifmd+1);
-    sprintf(nameSi,"GSI%d",ifmd+1);
-    sprintf(nameSector,"GSC%d",ifmd+1);
-    sprintf(nameRing,"GRN%d",ifmd+1);
-
-    zfmd=TMath::Abs(z[ifmd]);
 
-    AliFMD::Eta2Radius(etain[ifmd],zfmd,&rin[ifmd]);
-    AliFMD::Eta2Radius(etaout[ifmd],zfmd,&rout[ifmd]);
-    
-    par[0]=rin[ifmd]; // pipe size
-    par[1]=rout[ifmd];
-    par[2]=zFMD/2;
-    gMC->Gsvolu(name,"TUBE", idtmed[3], par, 3);
-    gMC->Gsvolu(nameSi,"TUBE", idtmed[1], par, 0);
-    
-    if (z[ifmd] < 0){  
-      gMC->Gspos(name,1,"ALIC",0,0,z[ifmd],0, "ONLY");}
-    else { 
-      gMC->Gspos(name,1,"ALIC",0,0,z[ifmd],idrotm[901], "ONLY");}
-  //Silicon detector
-    par[2]=zDet/2;
-    zpos=zFMD/2 -par[2];
-    gMC->Gsposp(nameSi,ifmd+1,name,0,0,zpos,0, "ONLY",par,3);
-
-    //Granularity
-    fSectorsSi1=20;
-    fRingsSi1=256;
-    fSectorsSi2=40;
-    fRingsSi2=128;
-   if(ifmd==1||ifmd==3)
-      { 
-       gMC->Gsdvn(nameSector, nameSi , fSectorsSi2, 2);
-       gMC->Gsdvn(nameRing, nameSector, fRingsSi2, 1);
-      }
-    else
-      {
-       gMC->Gsdvn(nameSector, nameSi , fSectorsSi1, 2);
-       gMC->Gsdvn(nameRing, nameSector , fRingsSi1, 1);
-      }
-
-    //Plastic slice for electronics
-    par[2]=zElectronic/2;
-    zpos=zpos-zDet/2-par[2];
-    gMC->Gsposp("GEL ",ifmd+1,name,0,0,zpos,0, "ONLY",par,3);
-
-   //Simple Al support
-   par[1]=rout[ifmd];
-   par[0]=rout[ifmd]-2;
-   par[2]=zSupport/2;
-   zpos=zpos-zElectronic/2-par[2];
-   //   gMC->Gsposp("GSUP",ifmd+1,name,0,0,zpos,0, "ONLY",par,3);
-   
-
-  }  
-
-}    
+  // Get the ring geometry
+  //Int_t     nsec = fmd->GetDetector(detector)->GetRing(ring)->GetNSectors();
+  Int_t     nstr  = fmd->GetDetector(detector)->GetRing(ring)->GetNStrips();
+  Double_t  lowr  = fmd->GetDetector(detector)->GetRing(ring)->GetMinR();
+  Double_t  theta = fmd->GetDetector(detector)->GetRing(ring)->GetTheta();
+  Double_t  pitch = fmd->GetDetector(detector)->GetRing(ring)->GetPitch();
+
+  // Figure out the strip number
+  Double_t r     = TMath::Sqrt(v.X() * v.X() + v.Y() * v.Y());
+  Int_t    str   = Int_t((r - lowr) / pitch);
+  if (str < 0 || str >= nstr) return kFALSE;
+  strip          = str;
+
+  // Figure out the sector number
+  Double_t phi    = TMath::ATan2(v.Y(), v.X()) * 180. / TMath::Pi();
+  if (phi < 0) phi = 360. + phi;
+  Double_t t      = phi - 2 * moduleno * theta;
+  sector          = 2 * moduleno;
+  if (t < 0 || t > 2 * theta) return kFALSE;
+  else if (t > theta)         sector += 1;
+
+  AliFMDDebug(40, ("<1> Inside an active FMD volume FMD%d%c[%2d,%3d] %s",
+                   detector, ring, sector, strip, mc->CurrentVolPath()));
+  return kTRUE;
+}
 
-//------------------------------------------------------------------------
-void AliFMDv1::CreateMaterials()
+//____________________________________________________________________
+Bool_t
+AliFMDv1::VMC2FMD(Int_t copy, TLorentzVector& v,
+                 UShort_t& detector, Char_t& ring,
+                 UShort_t& sector, UShort_t& strip) const
 {
- Int_t isxfld   = gAlice->Field()->Integ();
- Float_t sxmgmx = gAlice->Field()->Max();
-
- // Plastic CH
- Float_t aPlastic[2]={1.01,12.01};
- Float_t zPlastic[2]={1,6};
- Float_t wPlastic[2]={1,1};
- Float_t denPlastic=1.03;
-   //
- //*** Definition Of avaible FMD materials ***
- AliMaterial(0, "Si chip$", 28.0855,14.,2.33,9.36,999);
- AliMaterial(1, "Al supprt$", 26.980,13.,2.70,8.9,999);
- AliMaterial(2, "FMD Air$", 14.61, 7.3, .001205, 30423.,999); 
- AliMixture( 5, "Plastic$",aPlastic,zPlastic,denPlastic,-2,wPlastic);
-
-//**
- AliMedium(1, "Si chip$", 0, 1, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(2, "Al support$", 1, 0, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(3, "FMD air$", 2, 0, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(4, "Plastic$", 5, 0,isxfld, sxmgmx,  10., .01, 1., .003, .003);
-
+  // Convert VMC coordinates to detector coordinates 
+  TVirtualMC*     mc  = TVirtualMC::GetMC();
+  AliFMDGeometry* fmd = AliFMDGeometry::Instance();
+
+  strip = copy - 1;
+  Int_t sectordiv; mc->CurrentVolOffID(fmd->GetSectorOff(), sectordiv);
+  if (fmd->GetModuleOff() >= 0) {
+    Int_t module;    mc->CurrentVolOffID(fmd->GetModuleOff(), module);
+    sector = 2 * module + sectordiv;
+  }
+  else 
+    sector = sectordiv;
+  AliFMDDebug(30, ("Getting ring volume with offset %d -> %s", 
+                   fmd->GetRingOff(), 
+                   mc->CurrentVolOffName(fmd->GetRingOff())));
+  Int_t iring;     mc->CurrentVolOffID(fmd->GetRingOff(), iring); 
+  ring = Char_t(iring);
+  Int_t det;       mc->CurrentVolOffID(fmd->GetDetectorOff(), det); 
+  detector = det;
+
+  //Double_t  rz  = fmd->GetDetector(detector)->GetRingZ(ring);
+  AliFMDDetector* gdet  = fmd->GetDetector(detector);
+  AliFMDRing*     gring = gdet->GetRing(ring);
+  if (!gring) {
+    AliFatal(Form("Ring %c not found (volume was %s at offset %d in path %s)", 
+                 ring, fmd->GetRingOff(), 
+                 mc->CurrentVolOffName(fmd->GetRingOff()),
+                 mc->CurrentVolPath()));
+  }
+  Int_t n = gring->GetNSectors();
+#if 0
+  if (rz < 0) {
+    Int_t s = ((n - sector + n / 2) % n) + 1;
+    AliFMDDebug(1, ("Recalculating sector to %d (=%d-%d+%d/2%%%d+1 z=%f)",
+                    s, n, sector, n, n, rz));
+    sector = s;
+  }
+#endif
+  if (sector < 1 || sector > n) {
+    AliWarning(Form("sector # %d out of range (0-%d)", sector-1, n-1));
+    return kFALSE;
+  }
+  sector--;
+  // Get track position
+  mc->TrackPosition(v);
+  AliFMDDebug(40, ("<2> Inside an active FMD volume FMD%d%c[%2d,%3d] %s",
+                   detector, ring, sector, strip, mc->CurrentVolPath()));
 
+  return kTRUE;
 }
-//---------------------------------------------------------------------
-void AliFMDv1::DrawDetector()
-{
-//
-// Draw a shaded view of the Forward multiplicity detector version 0
-//
 
 
-//Set ALIC mother transparent
-gMC->Gsatt("ALIC","SEEN",0);
-//
-//Set volumes visible
-gMC->Gsatt("FMD1","SEEN",1);
-gMC->Gsatt("FMD2","SEEN",1);
-gMC->Gsatt("FMD3","SEEN",1);
-gMC->Gsatt("FMD4","SEEN",1);
-gMC->Gsatt("FMD5","SEEN",1);
-
-//
-gMC->Gdopt("hide","on");
-gMC->Gdopt("shad","on");
-gMC->SetClipBox(".");
-gMC->SetClipBox("*",0,1000,-1000,1000,-1000,1000);
-gMC->DefaultRange();
-gMC->Gdraw("alic",40,30,0,12,9.5,.2,0.2);
-gMC->Gdhead(1111,"Forward multiplicity detector");
-gMC->Gdopt("hide","off");
-}
-//-------------------------------------------------------------------
-void AliFMDv1::Init()
+//____________________________________________________________________
+Bool_t
+AliFMDv1::CheckHit(Int_t trackno, Int_t pdg, Float_t absQ, 
+                  const TLorentzVector& p, Float_t edep) const
 {
-// Initialises version 0 of the Forward Multiplicity Detector
-//
-AliFMD::Init();
-fIdSens1=gMC->VolId("GRN1");
-fIdSens2=gMC->VolId("GRN2");
-fIdSens3=gMC->VolId("GRN3");
-fIdSens4=gMC->VolId("GRN4");
-fIdSens5=gMC->VolId("GRN5");
-printf("*** FMD version 1 initialized ***\n");
+  // Check that a hit is good 
+  if (AliLog::GetDebugLevel("FMD", "AliFMD") < 5) return kFALSE;
+  TVirtualMC* mc   = TVirtualMC::GetMC();
+  Double_t mass    = mc->TrackMass();
+  Double_t poverm  = (mass == 0 ? 0 : p.P() / mass);
+    
+  // This `if' is to debug abnormal energy depositions.  We trigger on
+  // p/m approx larger than or equal to a MIP, and a large edep - more 
+  // than 1 keV - a MIP is 100 eV. 
+  if (!(edep > absQ * absQ && poverm > 1)) return kFALSE;
+  
+  TArrayI procs;
+  mc->StepProcesses(procs);
+  TString processes;
+  for (Int_t ip = 0; ip < procs.fN; ip++) {
+    if (ip != 0) processes.Append(",");
+    processes.Append(TMCProcessName[procs.fArray[ip]]);
+  }
+  TDatabasePDG* pdgDB        = TDatabasePDG::Instance();
+  TParticlePDG* particleType = pdgDB->GetParticle(pdg);
+  TString pname(particleType ? particleType->GetName() : "???");
+  TString what;
+  if (mc->IsTrackEntering())    what.Append("entering ");
+  if (mc->IsTrackExiting())     what.Append("exiting ");
+  if (mc->IsTrackInside())      what.Append("inside ");
+  if (mc->IsTrackDisappeared()) what.Append("disappeared ");
+  if (mc->IsTrackStop())        what.Append("stopped ");
+  if (mc->IsNewTrack())         what.Append("new ");
+  if (mc->IsTrackAlive())       what.Append("alive ");
+  if (mc->IsTrackOut())         what.Append("out ");
+      
+  Int_t mother = gAlice->GetMCApp()->GetPrimary(trackno);
+  AliFMDDebug(15, ("Track # %5d deposits a lot of energy\n" 
+                   "  Volume:    %s\n" 
+                   "  Momentum:  (%7.4f,%7.4f,%7.4f)\n"
+                   "  PDG:       %d (%s)\n" 
+                   "  Edep:      %-14.7f keV (mother %d)\n"
+                   "  p/m:       %-7.4f/%-7.4f = %-14.7f\n"
+                   "  Processes: %s\n"
+                   "  What:      %s\n",
+                   trackno, mc->CurrentVolPath(), p.X(), p.Y(), p.Z(),
+                   pdg, pname.Data(), edep, mother, p.P(), mass, 
+                   poverm, processes.Data(), what.Data()));
+  return kTRUE;
 }
 
-//-------------------------------------------------------------------
 
-void AliFMDv1::StepManager()
+//____________________________________________________________________
+void 
+AliFMDv1::StepManager()
 {
+  // Member function that is executed each time a hit is made in the
+  // FMD.  None-charged particles are ignored.   Dead tracks  are
+  // ignored. 
   //
-  // Called for every step in the Forward Multiplicity Detector
-  //
-  Int_t id,copy,copy1,copy2;
-  static Float_t hits[9];
-  static Int_t vol[3];
-  static Float_t de;
-  TLorentzVector pos;
-  TLorentzVector mom;
-
-
-  TClonesArray &lhits = *fHits;
-  if(!gMC->IsTrackAlive()) return; // particle has disappeared
-
-  Float_t charge = gMC->TrackCharge();
-  if(TMath::Abs(charge)<=0.) return; //take only charged particles
-
-  //  printf(" in StepManeger \n");
-  id=gMC->CurrentVolID(copy);
-  //((TGeant3*)gMC)->Gpcxyz();
+  // The procedure is as follows: 
+  // 
+  //   - IF NOT track is alive THEN RETURN ENDIF
+  //   - IF NOT particle is charged THEN RETURN ENDIF
+  //   - IF NOT volume name is "STRI" or "STRO" THEN RETURN ENDIF 
+  //   - Get strip number (volume copy # minus 1)
+  //   - Get phi division number (mother volume copy #)
+  //   - Get module number (grand-mother volume copy #)
+  //   - section # = 2 * module # + phi division # - 1
+  //   - Get ring Id from volume name 
+  //   - Get detector # from grand-grand-grand-mother volume name 
+  //   - Get pointer to sub-detector object. 
+  //   - Get track position 
+  //   - IF track is entering volume AND track is inside real shape THEN
+  //   -   Reset energy deposited 
+  //   -   Get track momentum 
+  //   -   Get particle ID # 
+  ///  - ENDIF
+  //   - IF track is inside volume AND inside real shape THEN 
+  ///  -   Update energy deposited 
+  //   - ENDIF 
+  //   - IF track is inside real shape AND (track is leaving volume,
+  //         or it died, or it is stopped  THEN
+  //   -   Create a hit 
+  //   - ENDIF
+  //     
+  TVirtualMC* mc = TVirtualMC::GetMC();
+  if (!mc->IsTrackAlive()) return;
+  Double_t absQ = TMath::Abs(mc->TrackCharge());
+  if (absQ <= 0) return;
   
-// Check the sensetive volume
-   if(id==fIdSens1||id==fIdSens2||id==fIdSens3||id==fIdSens4||id==fIdSens5)
-     {
-       if(gMC->IsTrackEntering())
-        {
-          vol[2]=copy;
-          gMC->CurrentVolOffID(1,copy1);
-          vol[1]=copy1;
-          gMC->CurrentVolOffID(2,copy2);
-          vol[0]=copy2;
-
-          gMC->TrackPosition(pos);
-          hits[0]=pos[0];
-          hits[1]=pos[1];
-          hits[2]=pos[2];
-
-          gMC->TrackMomentum(mom);
-          hits[3]=mom[0];
-          hits[4]=mom[1];
-          hits[5]=mom[2];
-
-          Int_t iPart= gMC->TrackPid();
-          Int_t partId=gMC->IdFromPDG(iPart);
-          hits[7]=partId;
-          hits[8]=1e9*gMC->TrackTime();
-          de=0.;
-        }
-       if(gMC->IsTrackInside()){
-          de=de+1000.*gMC->Edep();
-       }
-       
-       if(gMC->IsTrackExiting()
-         ||gMC->IsTrackDisappeared()||
-         gMC->IsTrackStop())
-        {
-            hits[6]=de+1000.*gMC->Edep();
-      new(lhits[fNhits++]) AliFMDhit(fIshunt,gAlice->CurrentTrack(),vol,hits);
-        } // IsTrackExiting()
-     }
+  Int_t copy;
+  Int_t vol = mc->CurrentVolID(copy);
+  AliFMDGeometry*  fmd = AliFMDGeometry::Instance();
+  if (!fmd->IsActive(vol)) {
+    AliFMDDebug(50, ("Not an FMD volume %d '%s'",vol,mc->CurrentVolName()));
+    return;
   }
-//--------------------------------------------------------------------------
-
-void AliFMDv1::Response( Float_t Edep)
-{
-  Float_t I=1.664*0.04*2.33/22400; // = 0.69e-6;
-  Float_t chargeOnly=Edep/I;
-  //Add noise ~500electrons
-  Int_t charge=500;
-  if (Edep>0)
-     charge=Int_t(gRandom->Gaus(chargeOnly,500));      
- }   
-
-
-
-
-
-
+  TLorentzVector v;
+  UShort_t       detector;
+  Char_t         ring;
+  UShort_t       sector;
+  UShort_t       strip;
+  
+  if (fmd->IsDetailed()) {
+    if (!VMC2FMD(copy, v, detector, ring, sector, strip)) return;
+  } else {
+    if (!VMC2FMD(v, detector, ring, sector, strip)) return;
+  }
+  TLorentzVector p;
+  mc->TrackMomentum(p);
+  Int_t    trackno = gAlice->GetMCApp()->GetCurrentTrackNumber();
+  Int_t    pdg     = mc->TrackPid();
+  Double_t edep    = mc->Edep() * 1000; // keV
+  Bool_t   isBad   = CheckHit(trackno, pdg, absQ, p, edep);
+  
+  // Check that the track is actually within the active area 
+  Bool_t entering = mc->IsTrackEntering();
+  Bool_t inside   = mc->IsTrackInside();
+  Bool_t out      = (mc->IsTrackExiting()|| mc->IsTrackDisappeared()||
+                    mc->IsTrackStop());
+  // Reset the energy deposition for this track, and update some of
+  // our parameters.
+  if (entering) {
+    AliFMDDebug(15, ("Track # %8d entering active FMD volume %s: "
+                     "Edep=%f (%f,%f,%f)", trackno, mc->CurrentVolPath(),
+                     edep, v.X(), v.Y(), v.Z()));
+    fCurrentP      = p;
+    fCurrentV      = v;    
+    fCurrentDeltaE = edep;
+    fCurrentPdg    = pdg; // mc->IdFromPDG(pdg);
+  }
+  // If the track is inside, then update the energy deposition
+  if (inside && fCurrentDeltaE >= 0) {
+    fCurrentDeltaE += edep;
+    AliFMDDebug(15, ("Track # %8d inside active FMD volume %s: Edep=%f, "
+                     "Accumulated Edep=%f  (%f,%f,%f)", trackno, 
+                     mc->CurrentVolPath(), edep, fCurrentDeltaE, 
+                     v.X(), v.Y(), v.Z()));
+  }
+  // The track exits the volume, or it disappeared in the volume, or
+  // the track is stopped because it no longer fulfills the cuts
+  // defined, then we create a hit. 
+  if (out) {
+    if (fCurrentDeltaE >= 0) {
+      fCurrentDeltaE += edep;
+      AliFMDDebug(15, ("Track # %8d exiting active FMD volume %s: Edep=%g, "
+                       "Accumulated Edep=%g (%f,%f,%f)", trackno, 
+                       mc->CurrentVolPath(), edep, fCurrentDeltaE, 
+                       v.X(), v.Y(), v.Z()));
+      TVector3 cur(v.Vect());
+      cur -= fCurrentV.Vect();
+      Double_t len = cur.Mag();
+      AliFMDHit* h = 
+       AddHitByFields(trackno, detector, ring, sector, strip,
+                      fCurrentV.X(),  fCurrentV.Y(), fCurrentV.Z(),
+                      fCurrentP.X(),  fCurrentP.Y(), fCurrentP.Z(), 
+                      fCurrentDeltaE, fCurrentPdg,   fCurrentV.T(), 
+                      len, mc->IsTrackDisappeared()||mc->IsTrackStop());
+      // Add a copy 
+      if (isBad && fBad) { 
+       new ((*fBad)[fBad->GetEntries()]) AliFMDHit(*h);
+      }
+      // Check the geometry that we can get back the coordinates. 
+#ifdef CHECK_TRANS
+      Double_t x, y, z;
+      fmd->Detector2XYZ(detector, ring, sector, strip, x, y ,z);
+      AliFMDDebug(1, ("Hit at (%f,%f,%f), geometry says (%f,%f,%f)", 
+                      fCurrentV.X(), fCurrentV.Y(), fCurrentV.Z(), x, y, z));
+#endif
+    }
+    fCurrentDeltaE = -1;
+  }
+}
+//___________________________________________________________________
+//
+// EOF
+//