]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TOF/AliTOFtracker.cxx
Coding convention: RN13 rule violation -> suppression
[u/mrichter/AliRoot.git] / TOF / AliTOFtracker.cxx
index c54deb1177744363703158617d2c1fd35e202e65..3aadf762de032556bdc91f05e6f8cc34d263d3cd 100644 (file)
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
 
-/* $Id$ */
+//--------------------------------------------------------------------//
+//                                                                    //
+// AliTOFtracker Class                                                //
+// Task: Perform association of the ESD tracks to TOF Clusters        //
+// and Update ESD track with associated TOF Cluster parameters        //
+//                                                                    //
+// -- Authors : S. Arcelli, C. Zampolli (Bologna University and INFN) //
+// -- Contacts: Annalisa.De.Caro@cern.ch                              //
+// --         : Chiara.Zampolli@bo.infn.it                            //
+// --         : Silvia.Arcelli@bo.infn.it                             //
+//                                                                    //
+//--------------------------------------------------------------------//
 
+#include <Rtypes.h>
+#include <TROOT.h>
+
+#include <TClonesArray.h>
+#include <TGeoManager.h>
+#include <TTree.h>
+#include <TFile.h>
+#include <TH2F.h>
+
+#include "AliAlignObj.h"
+#include "AliESDtrack.h"
+#include "AliESD.h"
+#include "AliLog.h"
+#include "AliTrackPointArray.h"
+
+#include "AliTOFcalib.h"
+#include "AliTOFcluster.h"
+#include "AliTOFGeometry.h"
 #include "AliTOFtracker.h"
+#include "AliTOFtrack.h"
 
+extern TGeoManager *gGeoManager;
+extern TROOT *gROOT;
 
 ClassImp(AliTOFtracker)
 
+//_____________________________________________________________________________
+AliTOFtracker::AliTOFtracker(AliTOFGeometry * geom, Double_t parPID[2]):
+  fGeom(geom),
+  fTOFpid(new AliTOFpidESD(parPID)),
+  fHoles(kFALSE),
+  fN(0),
+  fNseeds(0),
+  fNseedsTOF(0),
+  fngoodmatch(0),
+  fnbadmatch(0),
+  fnunmatch(0),
+  fnmatch(0),
+  fR(378.), 
+  fTOFHeigth(15.3),  
+  fdCut(3.), 
+  fDx(1.5), 
+  fDy(0), 
+  fDz(0), 
+  fDzMax(35.), 
+  fDyMax(50.), 
+  fTracks(0x0),
+  fSeeds(0x0),
+  fHDigClusMap(0x0),
+  fHDigNClus(0x0),
+  fHDigClusTime(0x0),
+  fHDigClusToT(0x0),
+  fHRecNClus(0x0),
+  fHRecDist(0x0),
+  fHRecSigYVsP(0x0),
+  fHRecSigZVsP(0x0),
+  fHRecSigYVsPWin(0x0),
+  fHRecSigZVsPWin(0x0),
+  fCalTree(0x0),
+  fIch(-1),
+  fToT(-1.),
+  fTime(-1.),
+  fExpTimePi(-1.),
+  fExpTimeKa(-1.),
+  fExpTimePr(-1.)
+ { 
+  //AliTOFtracker main Ctor
+
+  fDy=AliTOFGeometry::XPad(); 
+  fDz=AliTOFGeometry::ZPad(); 
+  InitCheckHists();
+}
+//_____________________________________________________________________________
+AliTOFtracker::AliTOFtracker(const AliTOFtracker &t):
+  AliTracker(),
+  fGeom(0x0),
+  fTOFpid(0x0),
+  fHoles(kFALSE),
+  fN(0),
+  fNseeds(0),
+  fNseedsTOF(0),
+  fngoodmatch(0),
+  fnbadmatch(0),
+  fnunmatch(0),
+  fnmatch(0),
+  fR(378.), 
+  fTOFHeigth(15.3),  
+  fdCut(3.), 
+  fDx(1.5), 
+  fDy(0), 
+  fDz(0), 
+  fDzMax(35.), 
+  fDyMax(50.), 
+  fTracks(0x0),
+  fSeeds(0x0),
+  fHDigClusMap(0x0),
+  fHDigNClus(0x0),
+  fHDigClusTime(0x0),
+  fHDigClusToT(0x0),
+  fHRecNClus(0x0),
+  fHRecDist(0x0),
+  fHRecSigYVsP(0x0),
+  fHRecSigZVsP(0x0),
+  fHRecSigYVsPWin(0x0),
+  fHRecSigZVsPWin(0x0),
+  fCalTree(0x0),
+  fIch(-1),
+  fToT(-1.),
+  fTime(-1.),
+  fExpTimePi(-1.),
+  fExpTimeKa(-1.),
+  fExpTimePr(-1.)
+ { 
+  //AliTOFtracker copy Ctor
+
+  fHoles=t.fHoles;
+  fNseeds=t.fNseeds;
+  fNseedsTOF=t.fNseedsTOF;
+  fngoodmatch=t.fngoodmatch;
+  fnbadmatch=t.fnbadmatch;
+  fnunmatch=t.fnunmatch;
+  fnmatch=t.fnmatch;
+  fGeom = t.fGeom;
+  fTOFpid = t.fTOFpid;
+  fR=t.fR; 
+  fTOFHeigth=t.fTOFHeigth;  
+  fdCut=t.fdCut; 
+  fDy=t.fDy; 
+  fDz=t.fDz; 
+  fDx=t.fDx; 
+  fDzMax=t.fDzMax; 
+  fDyMax=t.fDyMax; 
+  fSeeds=t.fSeeds;
+  fTracks=t.fTracks;
+  fN=t.fN;
+}
+
+//_____________________________________________________________________________
+AliTOFtracker& AliTOFtracker::operator=(const AliTOFtracker &t)
+{ 
+  //AliTOFtracker assignment operator
+
+  this->fHoles=t.fHoles;
+  this->fNseeds=t.fNseeds;
+  this->fNseedsTOF=t.fNseedsTOF;
+  this->fngoodmatch=t.fngoodmatch;
+  this->fnbadmatch=t.fnbadmatch;
+  this->fnunmatch=t.fnunmatch;
+  this->fnmatch=t.fnmatch;
+  this->fGeom = t.fGeom;
+  this->fTOFpid = t.fTOFpid;
+  this->fR=t.fR; 
+  this->fTOFHeigth=t.fTOFHeigth;  
+  this->fdCut=t.fdCut; 
+  this->fDy=t.fDy; 
+  this->fDz=t.fDz; 
+  this->fDx=t.fDx; 
+  this->fDzMax=t.fDzMax; 
+  this->fDyMax=t.fDyMax; 
+  this->fSeeds=t.fSeeds;
+  this->fTracks=t.fTracks;
+  this->fN=t.fN;
+  return *this;
+
+}
+//_____________________________________________________________________________
+AliTOFtracker::~AliTOFtracker() {
+  //
+  // Dtor
+  //
+  SaveCheckHists();
+  delete fTOFpid; 
+  delete fHDigClusMap;
+  delete fHDigNClus;
+  delete fHDigClusTime;
+  delete fHDigClusToT;
+  delete fHRecNClus;
+  delete fHRecDist;
+  delete fHRecSigYVsP;
+  delete fHRecSigZVsP;
+  delete fHRecSigYVsPWin;
+  delete fHRecSigZVsPWin;
+  delete fCalTree;
+}
+//_____________________________________________________________________________
+Int_t AliTOFtracker::PropagateBack(AliESD* event) {
+  //
+  // Gets seeds from ESD event and Match with TOF Clusters
+  //
+
+
+  //Initialise some counters
+
+  fNseeds=0;
+  fNseedsTOF=0;
+  fngoodmatch=0;
+  fnbadmatch=0;
+  fnunmatch=0;
+  fnmatch=0;
+
+  Int_t ntrk=event->GetNumberOfTracks();
+  fNseeds = ntrk;
+  fSeeds= new TClonesArray("AliESDtrack",ntrk);
+  TClonesArray &aESDTrack = *fSeeds;
+
+
+  //Load ESD tracks into a local Array of ESD Seeds
+
+  for (Int_t i=0; i<fNseeds; i++) {
+    AliESDtrack *t=event->GetTrack(i);
+    new(aESDTrack[i]) AliESDtrack(*t);
+  }
+
+  //Prepare ESD tracks candidates for TOF Matching
+  CollectESD();
+
+  //First Step with Strict Matching Criterion
+  MatchTracks(kFALSE);
+  /*
+  for (Int_t ijk=0; ijk<fN; ijk++) {
+    AliInfo(Form("%4i %4i  %f %f %f  %f %f   %2i %1i %2i %1i %2i",ijk, fClusters[ijk]->GetIndex(),fClusters[ijk]->GetZ(),fClusters[ijk]->GetR(),fClusters[ijk]->GetPhi(), fClusters[ijk]->GetTDC(),fClusters[ijk]->GetADC(),fClusters[ijk]->GetDetInd(0),fClusters[ijk]->GetDetInd(1),fClusters[ijk]->GetDetInd(2),fClusters[ijk]->GetDetInd(3),fClusters[ijk]->GetDetInd(4)));
+  }
+  */
+
+  //Second Step with Looser Matching Criterion
+  MatchTracks(kTRUE);
+
+  AliInfo(Form("Number of matched tracks: %d",fnmatch));
+  AliInfo(Form("Number of good matched tracks: %d",fngoodmatch));
+  AliInfo(Form("Number of bad  matched tracks: %d",fnbadmatch));
+
+  //Update the matched ESD tracks
+
+  for (Int_t i=0; i<ntrk; i++) {
+    AliESDtrack *t=event->GetTrack(i);
+    AliESDtrack *seed =(AliESDtrack*)fSeeds->UncheckedAt(i);
+    if(seed->GetTOFsignal()>0){
+      t->SetTOFsignal(seed->GetTOFsignal());
+      t->SetTOFcluster(seed->GetTOFcluster());
+      t->SetTOFsignalToT(seed->GetTOFsignalToT());
+      t->SetTOFCalChannel(seed->GetTOFCalChannel());
+      Int_t tlab[3]; seed->GetTOFLabel(tlab);    
+      t->SetTOFLabel(tlab);
+      AliTOFtrack *track = new AliTOFtrack(*seed); 
+      t->UpdateTrackParams(track,AliESDtrack::kTOFout);   
+      delete track;
+    }
+  }
+
+
+  //Make TOF PID
+  fTOFpid->MakePID(event);
+
+  if (fSeeds) {
+    fSeeds->Delete();
+    delete fSeeds;
+    fSeeds = 0x0;
+  }
+  if (fTracks) {
+    fTracks->Delete();
+    delete fTracks;
+    fTracks = 0x0;
+  }
+  return 0;
+  
+}
+//_________________________________________________________________________
+void AliTOFtracker::CollectESD() {
+   //prepare the set of ESD tracks to be matched to clusters in TOF
+  fTracks= new TClonesArray("AliTOFtrack");
+  TClonesArray &aTOFTrack = *fTracks;
+  for (Int_t i=0; i<fNseeds; i++) {
+
+    AliESDtrack *t =(AliESDtrack*)fSeeds->UncheckedAt(i);
+    if ((t->GetStatus()&AliESDtrack::kTPCout)==0)continue;
+
+    // TRD good tracks, already propagated at 371 cm
+
+    AliTOFtrack *track = new AliTOFtrack(*t); // New
+    Double_t x = track->GetX(); //New
+
+    if (((t->GetStatus()&AliESDtrack::kTRDout)!=0 ) && 
+        ( x >= fGeom->RinTOF()) ){
+      track->SetSeedIndex(i);
+      t->UpdateTrackParams(track,AliESDtrack::kTOFout);    
+      new(aTOFTrack[fNseedsTOF]) AliTOFtrack(*track);
+      fNseedsTOF++;
+      delete track;
+    }
+
+    // Propagate the rest of TPCbp  
+
+    else {
+      if(track->PropagateToInnerTOF(fHoles)){ // temporary solution
+       //      if(track->PropagateToInnerTOF(fGeom->GetHoles())){
+       track->SetSeedIndex(i);
+       t->UpdateTrackParams(track,AliESDtrack::kTOFout);    
+       new(aTOFTrack[fNseedsTOF]) AliTOFtrack(*track);
+       fNseedsTOF++;
+      }
+      delete track;
+    }
+  }
+
+  AliInfo(Form("Number of TOF seedds %i",fNseedsTOF));
+
+  // Sort according uncertainties on track position 
+  fTracks->Sort();
+
+}
+//_________________________________________________________________________
+void AliTOFtracker::MatchTracks( Bool_t mLastStep){
+
+  //Match ESD tracks to clusters in TOF
+
+
+  Int_t nSteps=(Int_t)(fTOFHeigth/0.1);
+
+  AliTOFcalib *calib = new AliTOFcalib(fGeom);
+  //PH Arrays (moved outside of the loop)
+  Float_t * trackPos[4];
+  for (Int_t ii=0; ii<4; ii++) trackPos[ii] = new Float_t[nSteps];
+  Int_t * clind[6];
+  for (Int_t ii=0;ii<6;ii++) clind[ii] = new Int_t[fN];
+  
+  for (Int_t iseed=0; iseed<fNseedsTOF; iseed++) {
+
+    AliTOFtrack *track =(AliTOFtrack*)fTracks->UncheckedAt(iseed);
+    AliESDtrack *t =(AliESDtrack*)fSeeds->UncheckedAt(track->GetSeedIndex());
+    if(t->GetTOFsignal()>0. ) continue;
+    AliTOFtrack *trackTOFin =new AliTOFtrack(*track);
+
+    // Some init
+
+    Int_t         index[10000];
+    Float_t        dist[10000];
+    Float_t       cxpos[10000];
+    Float_t       crecL[10000];
+    TGeoHMatrix   global[1000];
+     
+    // Determine a window around the track
+
+    Double_t x,par[5]; 
+    trackTOFin->GetExternalParameters(x,par);
+    Double_t cov[15]; 
+    trackTOFin->GetExternalCovariance(cov);
+
+    Float_t scalefact=3.;    
+    Double_t dphi=
+      scalefact*
+      ((5*TMath::Sqrt(cov[0]) + 0.5*fDy + 2.5*TMath::Abs(par[2]))/fR); 
+    Double_t dz=
+      scalefact*
+      (5*TMath::Sqrt(cov[2]) + 0.5*fDz + 2.5*TMath::Abs(par[3]));
+
+    Double_t phi=TMath::ATan2(par[0],x) + trackTOFin->GetAlpha();
+    if (phi<-TMath::Pi())phi+=2*TMath::Pi();
+    if (phi>=TMath::Pi())phi-=2*TMath::Pi();
+    Double_t z=par[1];   
+
+    //upper limit on window's size.
+
+    if(dz> fDzMax) dz=fDzMax;
+    if(dphi*fR>fDyMax) dphi=fDyMax/fR;
+
+
+    Int_t nc=0;
+
+    // find the clusters in the window of the track
+
+    for (Int_t k=FindClusterIndex(z-dz); k<fN; k++) {
+
+      AliTOFcluster *c=fClusters[k];
+      if (c->GetZ() > z+dz) break;
+      if (c->IsUsed()) continue;
+
+      if (!c->GetStatus()) continue; // skip bad channels as declared in OCDB
+      
+      //AliInfo(Form(" fClusters[k]->GetZ() (%f) z-dz (%f)   %4i ", fClusters[k]->GetZ(), z-dz, k));
+
+      Double_t dph=TMath::Abs(c->GetPhi()-phi);
+      if (dph>TMath::Pi()) dph-=2.*TMath::Pi();
+      if (TMath::Abs(dph)>dphi) continue;
+
+      {
+       //Double_t maxChi2=150.; // "calibration constant". Needs to be tuned.
+      Double_t yc=(c->GetPhi() - trackTOFin->GetAlpha())*c->GetR();
+      Double_t p[2]={yc, c->GetZ()};
+      Double_t cov[3]={fDy*fDy/12., 0., fDz*fDz/12.};
+      if (trackTOFin->AliExternalTrackParam::GetPredictedChi2(p,cov) > 150.) 
+         continue;
+      }
+
+      clind[0][nc] = c->GetDetInd(0);
+      clind[1][nc] = c->GetDetInd(1);
+      clind[2][nc] = c->GetDetInd(2);
+      clind[3][nc] = c->GetDetInd(3);
+      clind[4][nc] = c->GetDetInd(4);
+      clind[5][nc] = k;      
+      Char_t path[100];
+      Int_t ind[5];
+      ind[0]=clind[0][nc];
+      ind[1]=clind[1][nc];
+      ind[2]=clind[2][nc];
+      ind[3]=clind[3][nc];
+      ind[4]=clind[4][nc];
+      fGeom->GetVolumePath(ind,path);
+      gGeoManager->cd(path);
+      global[nc] = *gGeoManager->GetCurrentMatrix();
+      nc++;
+    }
+
+    //if (nc) AliInfo(Form("seed for TOF %4i and number of clusters in the track window %4i (cluster index %4i)     %4i",i,nc, clind[5][0], fN));
+
+    //start fine propagation 
+
+    Int_t nStepsDone = 0;
+    for( Int_t istep=0; istep<nSteps; istep++){ 
+
+      Float_t xs=fGeom->RinTOF()+istep*0.1;
+      Double_t ymax=xs*TMath::Tan(0.5*AliTOFGeometry::GetAlpha());
+
+      Bool_t skip=kFALSE;
+      Double_t ysect=trackTOFin->GetYat(xs,skip);
+      if (skip) break;
+      if (ysect > ymax) {
+       if (!trackTOFin->Rotate(AliTOFGeometry::GetAlpha())) {
+         break;
+       }
+      } else if (ysect <-ymax) {
+       if (!trackTOFin->Rotate(-AliTOFGeometry::GetAlpha())) {
+         break;
+       }
+      }
+
+      if(!trackTOFin->PropagateTo(xs)) {
+       break;
+      }
+
+      nStepsDone++;
+
+      // store the running point (Globalrf) - fine propagation     
+
+      Double_t r[3];
+      trackTOFin->GetXYZ(r);
+      trackPos[0][istep]= (Float_t) r[0];
+      trackPos[1][istep]= (Float_t) r[1];
+      trackPos[2][istep]= (Float_t) r[2];   
+      trackPos[3][istep]= trackTOFin->GetIntegratedLength();
+    }
+
+
+    Int_t nfound = 0;
+    for (Int_t istep=0; istep<nStepsDone; istep++) {
+
+      Bool_t isInside =kFALSE;
+      Float_t ctrackPos[3];    
+
+      ctrackPos[0]= trackPos[0][istep];
+      ctrackPos[1]= trackPos[1][istep];
+      ctrackPos[2]= trackPos[2][istep];
+
+      //now see whether the track matches any of the TOF clusters            
+
+      for (Int_t i=0; i<nc; i++){
+       Int_t cind[5];
+       cind[0]= clind[0][i];
+       cind[1]= clind[1][i];
+       cind[2]= clind[2][i];
+       cind[3]= clind[3][i];
+       cind[4]= clind[4][i];
+        Bool_t accept = kFALSE;
+       if( mLastStep)accept = (fGeom->DistanceToPad(cind,global[i],ctrackPos)<fdCut);
+       if(!mLastStep)accept = (fGeom->IsInsideThePad(cind,global[i],ctrackPos));
+       if(accept){
+         if(!mLastStep)isInside=kTRUE;
+         dist[nfound]=fGeom->DistanceToPad(cind,global[i],ctrackPos);
+         crecL[nfound]=trackPos[3][istep];
+         index[nfound]=clind[5][i]; // store cluster id            
+         cxpos[nfound]=fGeom->RinTOF()+istep*0.1; //store prop.radius
+         nfound++;
+         if(isInside)break;
+       }//end if accept
+      } //end for on the clusters
+
+
+      if(isInside)break;
+    } //end for on the steps     
+
+
+
+    if (nfound == 0 ) {
+      fnunmatch++;
+      delete trackTOFin;
+      continue;
+    }
+    
+    fnmatch++;
+
+    // now choose the cluster to be matched with the track.
+
+    Int_t idclus=0;
+    Float_t  recL = 0.;
+    Float_t  xpos=0.;
+    Float_t  mindist=1000.;
+    for (Int_t iclus= 0; iclus<nfound;iclus++){
+      if (dist[iclus]< mindist){
+       mindist = dist[iclus];
+       xpos = cxpos[iclus];
+        idclus =index[iclus]; 
+        recL=crecL[iclus]+fDx*0.5;
+      }
+    }
+
+    AliTOFcluster *c=fClusters[idclus];
+    c->Use(); //AliInfo(Form("I am using the cluster"));
+
+    // Track length correction for matching Step 2 
+
+    if(mLastStep){
+      Float_t rc=TMath::Sqrt(c->GetR()*c->GetR() + c->GetZ()*c->GetZ());
+      Float_t rt=TMath::Sqrt(trackPos[0][70]*trackPos[0][70]
+                            +trackPos[1][70]*trackPos[1][70]
+                            +trackPos[2][70]*trackPos[2][70]);
+      Float_t dlt=rc-rt;      
+      recL=trackPos[3][70]+dlt;
+    }    
+
+    if (
+       (c->GetLabel(0)==TMath::Abs(trackTOFin->GetLabel()))
+       ||
+       (c->GetLabel(1)==TMath::Abs(trackTOFin->GetLabel()))
+       ||
+       (c->GetLabel(2)==TMath::Abs(trackTOFin->GetLabel()))
+       ) {
+      fngoodmatch++;
+
+      //AliInfo(Form(" track label good %5i",trackTOFin->GetLabel()));
+
+    }
+    else{
+      fnbadmatch++;
+
+      //AliInfo(Form(" track label  bad %5i",trackTOFin->GetLabel()));
+
+    }
+
+    delete trackTOFin;
+
+    //  Store quantities to be used in the TOF Calibration
+    Float_t tToT=AliTOFGeometry::TdcBinWidth()*c->GetToT()*1E-3; // in ns
+    t->SetTOFsignalToT(tToT);
+    Int_t ind[5];
+    ind[0]=c->GetDetInd(0);
+    ind[1]=c->GetDetInd(1);
+    ind[2]=c->GetDetInd(2);
+    ind[3]=c->GetDetInd(3);
+    ind[4]=c->GetDetInd(4);
+    Int_t calindex = calib->GetIndex(ind);
+    t->SetTOFCalChannel(calindex);
+
+    // keep track of the track labels in the matched cluster
+    Int_t tlab[3];
+    tlab[0]=c->GetLabel(0);
+    tlab[1]=c->GetLabel(1);
+    tlab[2]=c->GetLabel(2);
+    
+    Double_t tof=AliTOFGeometry::TdcBinWidth()*c->GetTDC()+32; // in ps
+    t->SetTOFsignal(tof);
+    //t->SetTOFcluster(c->GetIndex()); // pointing to the digits tree
+    t->SetTOFcluster(idclus); // pointing to the recPoints tree
+    Double_t time[10]; t->GetIntegratedTimes(time);
+    Double_t mom=t->GetP();
+    for(Int_t j=0;j<=AliPID::kSPECIES;j++){
+      Double_t mass=AliPID::ParticleMass(j);
+      time[j]+=(recL-trackPos[3][0])/3e-2*TMath::Sqrt(mom*mom+mass*mass)/mom;
+    }
+
+    AliTOFtrack *trackTOFout = new AliTOFtrack(*t); 
+    trackTOFout->PropagateTo(xpos);
+    t->UpdateTrackParams(trackTOFout,AliESDtrack::kTOFout);    
+    t->SetIntegratedLength(recL);
+    t->SetIntegratedTimes(time);
+    t->SetTOFLabel(tlab);
+    // Fill Reco-QA histos for Reconstruction
+    fHRecNClus->Fill(nc);
+    fHRecDist->Fill(mindist);
+    fHRecSigYVsP->Fill(mom,TMath::Sqrt(cov[0]));
+    fHRecSigZVsP->Fill(mom,TMath::Sqrt(cov[2]));
+    fHRecSigYVsPWin->Fill(mom,dphi*fR);
+    fHRecSigZVsPWin->Fill(mom,dz);
+
+    // Fill Tree for on-the-fly offline Calibration
+
+    if ( !((t->GetStatus() & AliESDtrack::kTIME)==0 )){    
+      Float_t rawtime=AliTOFGeometry::TdcBinWidth()*c->GetTDCRAW()+32; // RAW time,in ps
+      fIch=calindex;
+      fToT=tToT;
+      fTime=rawtime;
+      fExpTimePi=time[2];
+      fExpTimeKa=time[3];
+      fExpTimePr=time[4];
+      fCalTree->Fill();
+    }
+    delete trackTOFout;
+  }
+  for (Int_t ii=0; ii<4; ii++) delete [] trackPos[ii];
+  for (Int_t ii=0;ii<6;ii++) delete [] clind[ii];
+  delete calib;
+}
+//_________________________________________________________________________
+Int_t AliTOFtracker::LoadClusters(TTree *cTree) {
+  //--------------------------------------------------------------------
+  //This function loads the TOF clusters
+  //--------------------------------------------------------------------
+
+  Int_t npadX = fGeom->NpadX();
+  Int_t npadZ = fGeom->NpadZ();
+  Int_t nStripA = fGeom->NStripA();
+  Int_t nStripB = fGeom->NStripB();
+  Int_t nStripC = fGeom->NStripC();
+
+  TBranch *branch=cTree->GetBranch("TOF");
+  if (!branch) { 
+    AliError("can't get the branch with the TOF clusters !");
+    return 1;
+  }
+
+  TClonesArray dummy("AliTOFcluster",10000), *clusters=&dummy;
+  branch->SetAddress(&clusters);
+
+  cTree->GetEvent(0);
+  Int_t nc=clusters->GetEntriesFast();
+  fHDigNClus->Fill(nc);
+
+  AliInfo(Form("Number of clusters: %d",nc));
+
+  for (Int_t i=0; i<nc; i++) {
+    AliTOFcluster *c=(AliTOFcluster*)clusters->UncheckedAt(i);
+    fClusters[i]=new AliTOFcluster(*c); fN++;
+
+  // Fill Digits QA histos
+    Int_t isector = c->GetDetInd(0);
+    Int_t iplate = c->GetDetInd(1);
+    Int_t istrip = c->GetDetInd(2);
+    Int_t ipadX = c->GetDetInd(4);
+    Int_t ipadZ = c->GetDetInd(3);
+
+    Float_t time = (AliTOFGeometry::TdcBinWidth()*c->GetTDC())*1E-3; // in ns
+    Float_t tot = (AliTOFGeometry::TdcBinWidth()*c->GetToT())*1E-3;//in ns
+    Int_t stripOffset = 0;
+    switch (iplate) {
+    case 0:
+      stripOffset = 0;
+      break;
+    case 1:
+      stripOffset = nStripC;
+      break;
+    case 2:
+      stripOffset = nStripC+nStripB;
+      break;
+    case 3:
+      stripOffset = nStripC+nStripB+nStripA;
+      break;
+    case 4:
+      stripOffset = nStripC+nStripB+nStripA+nStripB;
+      break;
+    default:
+      AliError(Form("Wrong plate number in TOF (%d) !",iplate));
+      break;
+    };
+    Int_t zindex=npadZ*(istrip+stripOffset)+(ipadZ+1);
+    Int_t phiindex=npadX*isector+ipadX+1;
+    fHDigClusMap->Fill(zindex,phiindex);
+    fHDigClusTime->Fill(time);
+    fHDigClusToT->Fill(tot);
+
+    //AliInfo(Form("%4i %4i  %f %f %f  %f %f   %2i %1i %2i %1i %2i",i, fClusters[i]->GetIndex(),fClusters[i]->GetZ(),fClusters[i]->GetR(),fClusters[i]->GetPhi(), fClusters[i]->GetTDC(),fClusters[i]->GetADC(),fClusters[i]->GetDetInd(0),fClusters[i]->GetDetInd(1),fClusters[i]->GetDetInd(2),fClusters[i]->GetDetInd(3),fClusters[i]->GetDetInd(4)));
+    //AliInfo(Form("%i %f",i, fClusters[i]->GetZ()));
+  }
+
+  //AliInfo(Form("Number of clusters: %d",fN));
+
+  return 0;
+}
+//_________________________________________________________________________
+void AliTOFtracker::UnloadClusters() {
+  //--------------------------------------------------------------------
+  //This function unloads TOF clusters
+  //--------------------------------------------------------------------
+  for (Int_t i=0; i<fN; i++) {
+    delete fClusters[i];
+    fClusters[i] = 0x0;
+  }
+  fN=0;
+}
+
+//_________________________________________________________________________
+Int_t AliTOFtracker::FindClusterIndex(Double_t z) const {
+  //--------------------------------------------------------------------
+  // This function returns the index of the nearest cluster 
+  //--------------------------------------------------------------------
+  if (fN==0) return 0;
+  if (z <= fClusters[0]->GetZ()) return 0;
+  if (z > fClusters[fN-1]->GetZ()) return fN;
+  Int_t b=0, e=fN-1, m=(b+e)/2;
+  for (; b<e; m=(b+e)/2) {
+    if (z > fClusters[m]->GetZ()) b=m+1;
+    else e=m; 
+  }
+  return m;
+}
+
+//_________________________________________________________________________
+Bool_t AliTOFtracker::GetTrackPoint(Int_t index, AliTrackPoint& p) const
+{
+  // Get track space point with index i
+  // Coordinates are in the global system
+  AliTOFcluster *cl = fClusters[index];
+  Float_t xyz[3];
+  xyz[0] = cl->GetR()*TMath::Cos(cl->GetPhi());
+  xyz[1] = cl->GetR()*TMath::Sin(cl->GetPhi());
+  xyz[2] = cl->GetZ();
+  Float_t phiangle = (Int_t(cl->GetPhi()*TMath::RadToDeg()/20.)+0.5)*20.*TMath::DegToRad();
+  Float_t sinphi = TMath::Sin(phiangle), cosphi = TMath::Cos(phiangle);
+  Float_t tiltangle = fGeom->GetAngles(cl->GetDetInd(1),cl->GetDetInd(2))*TMath::DegToRad();
+  Float_t sinth = TMath::Sin(tiltangle), costh = TMath::Cos(tiltangle);
+  Float_t sigmay2 = fGeom->XPad()*fGeom->XPad()/12.;
+  Float_t sigmaz2 = fGeom->ZPad()*fGeom->ZPad()/12.;
+  Float_t cov[6];
+  cov[0] = sinphi*sinphi*sigmay2 + cosphi*cosphi*sinth*sinth*sigmaz2;
+  cov[1] = -sinphi*cosphi*sigmay2 + sinphi*cosphi*sinth*sinth*sigmaz2;
+  cov[2] = -cosphi*sinth*costh*sigmaz2;
+  cov[3] = cosphi*cosphi*sigmay2 + sinphi*sinphi*sinth*sinth*sigmaz2;
+  cov[4] = -sinphi*sinth*costh*sigmaz2;
+  cov[5] = costh*costh*sigmaz2;
+  p.SetXYZ(xyz[0],xyz[1],xyz[2],cov);
+
+  // Detector numbering scheme
+  Int_t nSector = fGeom->NSectors();
+  Int_t nPlate  = fGeom->NPlates();
+  Int_t nStripA = fGeom->NStripA();
+  Int_t nStripB = fGeom->NStripB();
+  Int_t nStripC = fGeom->NStripC();
+
+  Int_t isector = cl->GetDetInd(0);
+  if (isector >= nSector)
+    AliError(Form("Wrong sector number in TOF (%d) !",isector));
+  Int_t iplate = cl->GetDetInd(1);
+  if (iplate >= nPlate)
+    AliError(Form("Wrong plate number in TOF (%d) !",iplate));
+  Int_t istrip = cl->GetDetInd(2);
+
+  Int_t stripOffset = 0;
+  switch (iplate) {
+  case 0:
+    stripOffset = 0;
+    break;
+  case 1:
+    stripOffset = nStripC;
+    break;
+  case 2:
+    stripOffset = nStripC+nStripB;
+    break;
+  case 3:
+    stripOffset = nStripC+nStripB+nStripA;
+    break;
+  case 4:
+    stripOffset = nStripC+nStripB+nStripA+nStripB;
+    break;
+  default:
+    AliError(Form("Wrong plate number in TOF (%d) !",iplate));
+    break;
+  };
+
+  Int_t idet = (2*(nStripC+nStripB)+nStripA)*isector +
+               stripOffset +
+               istrip;
+  UShort_t volid = AliAlignObj::LayerToVolUID(AliAlignObj::kTOF,idet);
+  p.SetVolumeID((UShort_t)volid);
+  return kTRUE;
+}
+//_________________________________________________________________________
+void AliTOFtracker::InitCheckHists() {
+
+  //Init histos for Digits/Reco QA and Calibration
+
+
+  fCalTree = new TTree("CalTree", "Tree for TOF calibration");
+  fCalTree->Branch("TOFchannelindex",&fIch,"iTOFch/I");
+  fCalTree->Branch("ToT",&fToT,"TOFToT/F");
+  fCalTree->Branch("TOFtime",&fTime,"TOFtime/F");
+  fCalTree->Branch("PionExpTime",&fExpTimePi,"PiExpTime/F");
+  fCalTree->Branch("KaonExpTime",&fExpTimeKa,"KaExpTime/F");
+  fCalTree->Branch("ProtonExpTime",&fExpTimePr,"PrExpTime/F");
+
+  //Digits "QA" 
+  fHDigClusMap = new TH2F("TOFDig_ClusMap", "",182,0.5,182.5,864, 0.5,864.5);  
+  fHDigNClus = new TH1F("TOFDig_NClus", "",200,0.5,200.5);  
+  fHDigClusTime = new TH1F("TOFDig_ClusTime", "",2000,0.,200.);  
+  fHDigClusToT = new TH1F("TOFDig_ClusToT", "",500,0.,100);  
+
+  //Reco "QA"
+  fHRecNClus =new TH1F("TOFRec_NClusW", "",50,0.5,50.5);
+  fHRecDist=new TH1F("TOFRec_Dist", "",50,0.5,10.5);
+  fHRecSigYVsP=new TH2F("TOFDig_SigYVsP", "",40,0.,4.,100, 0.,5.);
+  fHRecSigZVsP=new TH2F("TOFDig_SigZVsP", "",40,0.,4.,100, 0.,5.);
+  fHRecSigYVsPWin=new TH2F("TOFDig_SigYVsPWin", "",40,0.,4.,100, 0.,50.);
+  fHRecSigZVsPWin=new TH2F("TOFDig_SigZVsPWin", "",40,0.,4.,100, 0.,50.);
+}
+
+//_________________________________________________________________________
+void AliTOFtracker::SaveCheckHists() {
+
+  //write histos for Digits/Reco QA and Calibration
+
+  TDirectory *dir = gDirectory;
+  TFile *logFile = 0;
+  TFile *logFileTOF = 0;
+
+  TSeqCollection *list = gROOT->GetListOfFiles();
+  int n = list->GetEntries();
+  for(int i=0; i<n; i++) {
+    logFile = (TFile*)list->At(i);
+    if (strstr(logFile->GetName(), "AliESDs.root")) break;
+  }
+
+  Bool_t isThere=kFALSE;
+  for(int i=0; i<n; i++) {
+    logFileTOF = (TFile*)list->At(i);
+    if (strstr(logFileTOF->GetName(), "TOFQA.root")){
+      isThere=kTRUE;
+      break;
+    } 
+  }
+   
+  logFile->cd();
+  fHDigClusMap->Write(fHDigClusMap->GetName(), TObject::kOverwrite);
+  fHDigNClus->Write(fHDigNClus->GetName(), TObject::kOverwrite);
+  fHDigClusTime->Write(fHDigClusTime->GetName(), TObject::kOverwrite);
+  fHDigClusToT->Write(fHDigClusToT->GetName(), TObject::kOverwrite);
+  fHRecNClus->Write(fHRecNClus->GetName(), TObject::kOverwrite);
+  fHRecDist->Write(fHRecDist->GetName(), TObject::kOverwrite);
+  fHRecSigYVsP->Write(fHRecSigYVsP->GetName(), TObject::kOverwrite);
+  fHRecSigZVsP->Write(fHRecSigZVsP->GetName(), TObject::kOverwrite);
+  fHRecSigYVsPWin->Write(fHRecSigYVsPWin->GetName(), TObject::kOverwrite);
+  fHRecSigZVsPWin->Write(fHRecSigZVsPWin->GetName(), TObject::kOverwrite);
+  fCalTree->Write(fCalTree->GetName(),TObject::kOverwrite);
+  logFile->Flush();  
+
+  if(!isThere)logFileTOF = new TFile( "TOFQA.root","RECREATE");
+  logFileTOF->cd(); 
+  fHDigClusMap->Write(fHDigClusMap->GetName(), TObject::kOverwrite);
+  fHDigNClus->Write(fHDigNClus->GetName(), TObject::kOverwrite);
+  fHDigClusTime->Write(fHDigClusTime->GetName(), TObject::kOverwrite);
+  fHDigClusToT->Write(fHDigClusToT->GetName(), TObject::kOverwrite);
+  fHRecNClus->Write(fHRecNClus->GetName(), TObject::kOverwrite);
+  fHRecDist->Write(fHRecDist->GetName(), TObject::kOverwrite);
+  fHRecSigYVsP->Write(fHRecSigYVsP->GetName(), TObject::kOverwrite);
+  fHRecSigZVsP->Write(fHRecSigZVsP->GetName(), TObject::kOverwrite);
+  fHRecSigYVsPWin->Write(fHRecSigYVsPWin->GetName(), TObject::kOverwrite);
+  fHRecSigZVsPWin->Write(fHRecSigZVsPWin->GetName(), TObject::kOverwrite);
+  fCalTree->Write(fCalTree->GetName(),TObject::kOverwrite);
+  logFileTOF->Flush();  
+
+  dir->cd();
+  }