]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - HLT/src/AliL3Evaluate.cxx
Merged HLT tag v1-2 with ALIROOT tag v3-09-Release.
[u/mrichter/AliRoot.git] / HLT / src / AliL3Evaluate.cxx
index 99531b1df073966a16c79f61c41e240252ca076b..a0b053a19b1327d50e0b52c941396a76029150d3 100644 (file)
@@ -1,7 +1,7 @@
-//$Id$
+// @(#) $Id$
 
 // Author: Anders Vestbo <mailto:vestbo@fi.uib.no>
-//*-- Copyright &copy ASV 
+//*-- Copyright &copy ALICE HLT Group
 
 #include "AliL3StandardIncludes.h"
 #include <TFile.h>
 using namespace std;
 #endif
 
+/** \class AliL3Evaluate
+<pre>
 //_____________________________________________________________
 // AliL3Evaluate
 //
 // Evaluation class for tracking. Plots efficiencies etc..
 //
-
+</pre>
+*/
 
 ClassImp(AliL3Evaluate)
 
@@ -61,7 +64,7 @@ AliL3Evaluate::AliL3Evaluate()
 
 AliL3Evaluate::AliL3Evaluate(Char_t *datapath,Int_t min_clusters,Int_t minhits,Double_t minpt,Int_t *slice)
 {
-  
+
   if(slice)
     {
       fMinSlice=slice[0];
@@ -72,21 +75,40 @@ AliL3Evaluate::AliL3Evaluate(Char_t *datapath,Int_t min_clusters,Int_t minhits,D
       fMinSlice=0;
       fMaxSlice=35;
     }
+  sprintf(fPath,"%s",datapath);
   fMaxFalseClusters = 0.1;
   fGoodFound = 0;
   fGoodGen = 0;
   fMinPointsOnTrack = min_clusters;
   fMinHitsFromParticle = minhits;
   fMinGoodPt = minpt;
+  memset(fClusters,0,36*6*sizeof(AliL3SpacePointData*));
+  fTracks=0;
+  fGoodTracks=0;
+}
+
+void AliL3Evaluate::LoadData(Int_t event,Bool_t sp)
+{
   Char_t fname[1024];
   AliL3FileHandler *clusterfile[36][6];
   for(Int_t s=fMinSlice; s<=fMaxSlice; s++)
     {
       for(Int_t p=0; p<AliL3Transform::GetNPatches(); p++)
        {
+         Int_t patch;
+         if(sp==kTRUE)
+           patch=-1;
+         else
+           patch=p;
+         
+         if(fClusters[s][p])
+           delete fClusters[s][p];
          fClusters[s][p] = 0;
          clusterfile[s][p] = new AliL3FileHandler();
-         sprintf(fname,"%s/points_%d_%d.raw",datapath,s,p);
+         if(event<0)
+           sprintf(fname,"%s/points_%d_%d.raw",fPath,s,patch);
+         else
+           sprintf(fname,"%s/points_%d_%d_%d.raw",fPath,event,s,patch);
          if(!clusterfile[s][p]->SetBinaryInput(fname))
            {
              LOG(AliL3Log::kError,"AliL3Evaluation::Setup","File Open")
@@ -98,16 +120,20 @@ AliL3Evaluate::AliL3Evaluate(Char_t *datapath,Int_t min_clusters,Int_t minhits,D
          fClusters[s][p] = (AliL3SpacePointData*)clusterfile[s][p]->Allocate();
          clusterfile[s][p]->Binary2Memory(fNcl[s][p],fClusters[s][p]);
          clusterfile[s][p]->CloseBinaryInput();
+         if(sp==kTRUE)
+           break;
        }
     }
-
-  sprintf(fname,"%s/tracks.raw",datapath);
+  
+  sprintf(fname,"%s/tracks_%d.raw",fPath,event);
   AliL3FileHandler *tfile = new AliL3FileHandler();
   if(!tfile->SetBinaryInput(fname)){
     LOG(AliL3Log::kError,"AliL3Evaluation::Setup","File Open")
       <<"Inputfile "<<fname<<" does not exist"<<ENDLOG; 
     return;
   }
+  if(fTracks)
+    delete fTracks;
   fTracks = new AliL3TrackArray();
   tfile->Binary2TrackArray(fTracks);
   tfile->CloseBinaryInput();
@@ -144,7 +170,7 @@ void AliL3Evaluate::AssignIDs()
   cerr<<"AliL3Evaluate::AssignIDs() : You need to compile with the do_mc flag!"<<endl;
   return;
 #endif
-  
+  fGoodFound=0;
   fTracks->QSort();
   LOG(AliL3Log::kDebug,"AliL3Evaluate::AssignIDs","Track Loop")
     <<"Assigning MC id to the found tracks...."<<ENDLOG;
@@ -158,7 +184,7 @@ void AliL3Evaluate::AssignIDs()
       Int_t tID = GetMCTrackLabel(track);
       track->SetMCid(tID);
     }
-  cout<<"Found "<<fGoodFound<<" good tracks "<<endl;
+  //cout<<"Found "<<fGoodFound<<" good tracks "<<endl;
 }
 
 
@@ -166,7 +192,11 @@ struct S {Int_t lab; Int_t max;};
 Int_t AliL3Evaluate::GetMCTrackLabel(AliL3Track *track){ 
   //Returns the MCtrackID of the belonging clusters.
   //If MCLabel < 0, means that track is fake.
-  //Fake track means that more than 10 percent of clusters are assigned incorrectly.
+  //Definitions are identical to offline.
+  //Fake track means:
+  // - more than 10 percent of clusters are assigned incorrectly
+  // - more than half of the innermost 10% of clusters were assigned incorrectly.
+  
   
 #ifdef do_mc
   Int_t num_of_clusters = track->GetNumberOfPoints();
@@ -195,11 +225,8 @@ Int_t AliL3Evaluate::GetMCTrackLabel(AliL3Track *track){
        }
       
       //Get the label of the cluster:
-      
-      lab=abs(points[pos].fTrackID[0]);
-      if(lab < 0)
-       cout<<"Track had negative id : "<<lab<<" padrow "<<(Int_t)points[pos].fPadRow<<" nhits "<<num_of_clusters<<" pt "<<track->GetPt()<<endl;
-      
+      lab=points[pos].fTrackID[0];
+
       Int_t j;
       for (j=0; j<num_of_clusters; j++)
         if (s[j].lab==lab || s[j].max==0) break;
@@ -211,6 +238,11 @@ Int_t AliL3Evaluate::GetMCTrackLabel(AliL3Track *track){
   for (i=0; i<num_of_clusters; i++) 
     if (s[i].max>max) {max=s[i].max; lab=s[i].lab;}
   
+  if(lab == -1)
+    return -1; //If most clusters is -1, this is a noise track.
+  if(lab < 0)
+    cerr<<"AliL3Evaluate::GetMCTrackLabel : Track label negative :"<<lab<<endl;
+  
   delete[] s;
   
   for (i=0; i<num_of_clusters; i++) 
@@ -233,11 +265,31 @@ Int_t AliL3Evaluate::GetMCTrackLabel(AliL3Track *track){
          abs(points[pos].fTrackID[2]) == lab ) max++;
     }
   
+  
+  //Check if more than 10% of the clusters were assigned incorrectly:
   if (1.-Float_t(max)/num_of_clusters > fMaxFalseClusters) 
     {
       return -lab;
     }
-  
+  else //Check if at least half of the 10% innermost clusters are assigned correctly.
+    {
+      Int_t tail=Int_t(0.10*num_of_clusters);
+      max=0;
+      for (i=1; i<=tail; i++) 
+       {
+         id = hitnum[num_of_clusters - i];
+         Int_t slice = (id>>25) & 0x7f;
+         Int_t patch = (id>>22) & 0x7;
+         UInt_t pos = id&0x3fffff;           
+         
+         AliL3SpacePointData *points = fClusters[slice][patch];
+         if(lab == abs(points[pos].fTrackID[0]) ||
+            lab == abs(points[pos].fTrackID[1]) ||
+            lab == abs(points[pos].fTrackID[2])) max++;
+       }
+      if (max < Int_t(0.5*tail)) return -lab;
+    }
+
   return lab;
 #else //If we are running with mc_ids or not
   return 0;
@@ -294,16 +346,18 @@ void AliL3Evaluate::CreateHistos(Int_t nbin,Float_t xlow,Float_t xup)
 
 }
 
-void AliL3Evaluate::GetGoodParticles(Char_t *path,Bool_t sector)
+void AliL3Evaluate::GetGoodParticles(Char_t *path,Int_t event,Int_t *padrowrange)
 {
   //Read the good particles from file. This file should already have been
   //generated by macro AliTPCComparison.C.
   
   Char_t filename[1024];
-  if(!sector)
+  if(event<0 && !padrowrange)
     sprintf(filename,"%s/good_tracks_tpc",path);
+  else if(event>=0 && !padrowrange)
+    sprintf(filename,"%s/good_tracks_tpc_%d",path,event);
   else
-    sprintf(filename,"%s/good_tracks_tpc_sector",path);//Sectorwise comparison.
+    sprintf(filename,"%s/good_tracks_tpc_%d_%d_%d",path,event,padrowrange[0],padrowrange[1]);
   ifstream in(filename);
   if(!in)
     {
@@ -311,6 +365,9 @@ void AliL3Evaluate::GetGoodParticles(Char_t *path,Bool_t sector)
       return;
     }
   Int_t MaxTracks=20000;
+  if(fGoodTracks)
+    delete [] fGoodTracks;
+  fGoodGen=0;
   fGoodTracks = new GoodTrack[MaxTracks];
   
   while (in>>fGoodTracks[fGoodGen].label>>fGoodTracks[fGoodGen].code>>
@@ -335,7 +392,7 @@ void AliL3Evaluate::FillEffHistos()
       cerr<<"AliL3Evaluate::FillEffHistos : No good tracks"<<endl;
       return;
     }
-  cout<<"Comparing "<<fGoodGen<<" good tracks ..."<<endl;
+  //cout<<"Comparing "<<fGoodGen<<" good tracks ..."<<endl;
   for(Int_t i=0; i<fGoodGen; i++)
     {
       //cout<<"Checking particle "<<i<<endl;
@@ -360,16 +417,26 @@ void AliL3Evaluate::FillEffHistos()
          
          if(TMath::Abs(tracklabel) != fGoodTracks[i].label) continue;
          found=1;
-         if(tracklabel == fGoodTracks[i].label) {fNFoundTracksPt->Fill(ptg); fNFoundTracksEta->Fill(dipangle);}
-         else {fNFakeTracksPt->Fill(ptg); fNFakeTracksEta->Fill(dipangle);}
          Float_t pt=track->GetPt();
-         fPtRes->Fill((pt-ptg)/ptg*100.);
-         fNtuppel->Fill(ptg,pt,nHits);
+         if(tracklabel == fGoodTracks[i].label) 
+           {
+             fNFoundTracksPt->Fill(ptg); 
+             fNFoundTracksEta->Fill(dipangle);
+             fNtuppel->Fill(ptg,pt,nHits);
+             fPtRes->Fill((pt-ptg)/ptg*100.);
+           }
+         else 
+           {
+             fNFakeTracksPt->Fill(ptg); 
+             fNFakeTracksEta->Fill(dipangle);
+           }
+         //fPtRes->Fill((pt-ptg)/ptg*100.);
+         //fNtuppel->Fill(ptg,pt,nHits);
          break;
          
        }
-      if(!found)
-       cout<<"Track "<<fGoodTracks[i].label<<" was not found"<<endl;
+      //if(!found)
+      //       cout<<"Track "<<fGoodTracks[i].label<<" was not found"<<endl;
     }
 }
 
@@ -406,12 +473,13 @@ void AliL3Evaluate::FillEffHistosNAIVE()
     }
 }
 
-void AliL3Evaluate::CalcEffHistos(){  
-  
+void AliL3Evaluate::CalcEffHistos()
+{  
+
   Stat_t ngood=fNGoodTracksPt->GetEntries();
   Stat_t nfound=fNFoundTracksPt->GetEntries();
   Stat_t nfake=fNFakeTracksPt->GetEntries();
-  
+
   LOG(AliL3Log::kInformational,"AliL3Evaluate::FillEffHistos","Efficiency")
     <<AliL3Log::kDec<<"There was "<<ngood<<" generated good tracks"<<ENDLOG;
   LOG(AliL3Log::kInformational,"AliL3Evaluate::FillEffHistos","Efficiency")
@@ -420,11 +488,9 @@ void AliL3Evaluate::CalcEffHistos(){
     <<AliL3Log::kDec<<"Integral efficiency is about "<<nfound/ngood*100<<ENDLOG;
   LOG(AliL3Log::kInformational,"AliL3Evaluate::FillEffHistos","Efficiency")
     <<AliL3Log::kDec<<"Fake tracks relative is about "<<nfake/ngood*100<<ENDLOG;
-  
-  LOG(AliL3Log::kInformational,"AliL3Evaluate::FillEffHistos","Efficiency")
-    <<AliL3Log::kDec<<"Naive efficiency "<<(Double_t)fGoodFound/(Double_t)fGoodGen<<ENDLOG;
+  //LOG(AliL3Log::kInformational,"AliL3Evaluate::FillEffHistos","Efficiency")
+  //<<AliL3Log::kDec<<"Naive efficiency "<<(Double_t)fGoodFound/(Double_t)fGoodGen<<ENDLOG;
 
-  
   fNFoundTracksPt->Sumw2(); fNGoodTracksPt->Sumw2();
   fTrackEffPt->Divide(fNFoundTracksPt,fNGoodTracksPt,1,1.,"b");
   fFakeTrackEffPt->Divide(fNFakeTracksPt,fNGoodTracksPt,1,1.,"b");
@@ -434,7 +500,7 @@ void AliL3Evaluate::CalcEffHistos(){
   fFakeTrackEffPt->SetFillStyle(3013);
   fTrackEffPt->SetLineColor(4);
   fFakeTrackEffPt->SetFillColor(2);
-  
+
   fNFoundTracksEta->Sumw2(); fNGoodTracksEta->Sumw2();
   fTrackEffEta->Divide(fNFoundTracksEta,fNGoodTracksEta,1,1.,"b");
   fFakeTrackEffEta->Divide(fNFakeTracksEta,fNGoodTracksEta,1,1.,"b");
@@ -482,84 +548,89 @@ TNtupleD *AliL3Evaluate::CalculateResiduals(Char_t *datapath)
 
   TNtupleD *ntuppel=new TNtupleD("ntuppel","Residuals","residual_trans:residual_long:zHit:pt:dipangle:beta:padrow:nHits");
   ntuppel->SetDirectory(0);
+  if(fTracks)
+    delete fTracks;
   
-  for(int f=fMinSlice; f<=fMaxSlice; f++)
+  AliL3FileHandler *tfile = new AliL3FileHandler();
+  char fname[256];
+  sprintf(fname,"%s/tracks_0.raw",datapath);
+  if(!tfile->SetBinaryInput(fname)){
+    LOG(AliL3Log::kError,"AliL3Evaluation::Setup","File Open")
+      <<"Inputfile "<<fname<<" does not exist"<<ENDLOG; 
+    return 0;
+  }
+  fTracks = new AliL3TrackArray();
+  tfile->Binary2TrackArray(fTracks);
+  tfile->CloseBinaryInput();
+  delete tfile;
+  
+  for(Int_t i=0; i<fTracks->GetNTracks(); i++)
     {
-      AliL3FileHandler *tfile = new AliL3FileHandler();
-      char fname[256];
-      sprintf(fname,"%s/tracks_tr_%d_0.raw",datapath,f);
-      if(!tfile->SetBinaryInput(fname)){
-       LOG(AliL3Log::kError,"AliL3Evaluation::Setup","File Open")
-         <<"Inputfile "<<fname<<" does not exist"<<ENDLOG; 
-       return 0;
-      }
-      fTracks = new AliL3TrackArray();
-      tfile->Binary2TrackArray(fTracks);
-      tfile->CloseBinaryInput();
-      delete tfile;
-      printf("Looking in slice %d\n",f);
-      for(Int_t i=0; i<fTracks->GetNTracks(); i++)
+      
+      AliL3Track *track = (AliL3Track*)fTracks->GetCheckedTrack(i);
+      if(!track) continue;
+      if(track->GetNHits() < fMinPointsOnTrack) continue;
+      
+      track->CalculateHelix();
+      UInt_t *hitnum = track->GetHitNumbers();
+      UInt_t id;
+      
+      Float_t xyz[3];
+      Int_t padrow;
+      for(Int_t j=0; j<track->GetNumberOfPoints()-1; j++)
        {
+         id = hitnum[j];
+         Int_t slice = (id>>25) & 0x7f;
+         Int_t patch = (id>>22) & 0x7;
+         UInt_t pos = id&0x3fffff;           
          
-         AliL3Track *track = (AliL3Track*)fTracks->GetCheckedTrack(i);
-         if(!track) continue;
-         if(track->GetNHits() < fMinPointsOnTrack) continue;
+         //if(slice!=1) continue;
          
-         track->CalculateHelix();
-         UInt_t *hitnum = track->GetHitNumbers();
-         UInt_t id;
+         AliL3SpacePointData *points = fClusters[slice][patch];
          
-         Float_t xyz[3];
-         Int_t padrow;
-         for(Int_t j=0; j<track->GetNumberOfPoints()-1; j++)
+         if(!points) 
            {
-             id = hitnum[j];
-             Int_t slice = (id>>25) & 0x7f;
-             Int_t patch = (id>>22) & 0x7;
-             UInt_t pos = id&0x3fffff;       
-             
-             //if(slice!=1) continue;
-             
-             AliL3SpacePointData *points = fClusters[slice][patch];
-             
-             if(!points) 
-               {
-                 LOG(AliL3Log::kError,"AliL3Evaluate::CalculateResiduals","Clusterarray")
-                   <<"No points at slice "<<slice<<" patch "<<patch<<" pos "<<pos<<ENDLOG;
-                 continue;
-               }
-             if(pos>=fNcl[slice][patch]) 
-               {
-                 LOG(AliL3Log::kError,"AliL3Evaluate::CalculateResiduals","Clusterarray")
-                   <<AliL3Log::kDec<<"ERROR"<<ENDLOG;
-                 continue;
-               }
-             
-             xyz[0] = points[pos].fX;
-             xyz[1] = points[pos].fY;
-             xyz[2] = points[pos].fZ;
-             padrow = points[pos].fPadRow;
-             AliL3Transform::Global2Local(xyz,slice);
-             
-             Float_t xyz_cross[3];
-             track->GetCrossingPoint(padrow,xyz_cross);
-             Double_t beta = track->GetCrossingAngle(padrow);
-             
-             Double_t yres = xyz_cross[1] - xyz[1];
-             Double_t zres = xyz_cross[2] - xyz[2];
-             
-             Double_t dipangle = atan(track->GetTgl());
-             ntuppel->Fill(yres,zres,xyz_cross[2],track->GetPt(),dipangle,beta,padrow,track->GetNumberOfPoints());
-             
+             LOG(AliL3Log::kError,"AliL3Evaluate::CalculateResiduals","Clusterarray")
+               <<"No points at slice "<<slice<<" patch "<<patch<<" pos "<<pos<<ENDLOG;
+             continue;
            }
+         if(pos>=fNcl[slice][patch]) 
+           {
+             LOG(AliL3Log::kError,"AliL3Evaluate::CalculateResiduals","Clusterarray")
+               <<AliL3Log::kDec<<"ERROR"<<ENDLOG;
+             continue;
+           }
+         
+         xyz[0] = points[pos].fX;
+         xyz[1] = points[pos].fY;
+         xyz[2] = points[pos].fZ;
+         padrow = points[pos].fPadRow;
+         AliL3Transform::Global2Local(xyz,slice,kTRUE);
+         
+         Float_t angle = 0;
+         AliL3Transform::Local2GlobalAngle(&angle,slice);
+         track->CalculateReferencePoint(angle,AliL3Transform::Row2X(padrow));
+         Float_t xyz_cross[3] = {track->GetPointX(),track->GetPointY(),track->GetPointZ()};
+         AliL3Transform::Global2Local(xyz_cross,slice,kTRUE);
+         
+         Double_t beta = track->GetCrossingAngle(padrow,slice);
+         
+         Double_t yres = xyz_cross[1] - xyz[1];
+         Double_t zres = xyz_cross[2] - xyz[2];
+         
+         Double_t dipangle = atan(track->GetTgl());
+         ntuppel->Fill(yres,zres,xyz_cross[2],track->GetPt(),dipangle,beta,padrow,track->GetNumberOfPoints());
+         
        }
-      if(fTracks)
-       delete fTracks;
     }
+  if(fTracks)
+    delete fTracks;
+  
   return ntuppel;
 }
 
-TNtuple *AliL3Evaluate::EvaluatePoints(Char_t *path)
+enum tagprimary {kPrimaryCharged = 0x4000};
+void AliL3Evaluate::EvaluatePoints(Char_t *rootfile,Char_t *exactfile,Char_t *tofile,Int_t nevent,Bool_t offline,Bool_t sp)
 {
   //Compare points to the exact crossing points of track and padrows.
   //The input file to this function, contains the exact clusters calculated
@@ -567,182 +638,360 @@ TNtuple *AliL3Evaluate::EvaluatePoints(Char_t *path)
   
 #ifndef do_mc
   cerr<<"AliL3Evaluate::EvaluatePoints : Compile with do_mc flag!"<<endl;
-  return 0;
+  return;
 #else
   cout<<"Evaluating points"<<endl;
-  TNtuple *ntuppel = new TNtuple("ntuppel","residuals","slice:padrow:resy:resz:zHit:pt");
+  TNtuple *ntuppel = new TNtuple("ntuppel_res","Cluster properties",
+                                "slice:padrow:charge:resy:resz:zHit:pt:beta:sigmaY2:sigmaZ2:psigmaY2:psigmaZ2");
   ntuppel->SetDirectory(0);
   
-  Char_t filename[1024];
-  sprintf(filename,"%s/alirunfile.root",path);
-  TFile *exfile = TFile::Open(filename);
+  TNtuple *ntuppel2 = new TNtuple("ntuppel_eff","Efficiency","slice:padrow:nfound:ngen");
+  ntuppel2->SetDirectory(0);
+
+  TFile *exfile = TFile::Open(rootfile);
   if(!exfile)
     {
-      cerr<<"Error opening rootfile "<<filename<<endl;
-      return 0;
+      cerr<<"Error opening rootfile "<<rootfile<<endl;
+      return;
     }
   gAlice = (AliRun*)exfile->Get("gAlice");
   if (!gAlice) 
     {
       LOG(AliL3Log::kError,"AliL3Evaluate::InitMC","gAlice")
        <<"AliRun object non existing on file"<<ENDLOG;
-      return false;
+      return;
     }
-  
-  gAlice->GetEvent(0);
+
   AliTPCParam *param = (AliTPCParam*)exfile->Get(AliL3Transform::GetParamName());
   
-  //Get the exact clusters from file:
-  AliTPCClustersArray *arr = new AliTPCClustersArray;
-  arr->Setup(param);
-  arr->SetClusterType("AliComplexCluster");
-  char treeName[500];
-  sprintf(treeName,"TreeCExact_%s",param->GetTitle());
-  Bool_t clusterok = arr->ConnectTree(treeName);//Segment Tree (for offline clusters)
-  if(!clusterok) {printf("AliL3Evaluate::EvaluatePoints : Error in clusterloading\n"); return 0;}
-  
-  cout<<"Entering loop with "<<(Int_t)arr->GetTree()->GetEntries()<<endl;
-  for(Int_t i=0; i<arr->GetTree()->GetEntries(); i++)
+  TFile *exact = TFile::Open(exactfile);
+  if(!exact)
     {
-      //Get the exact clusters for this row:
-      Int_t cursec,currow;
-      AliSegmentID *s = arr->LoadEntry(i);
-      param->AdjustSectorRow(s->GetID(),cursec,currow);
+      cerr<<"AliL3Evaluate::EvaluatePoints : Problems opening file :"<<exactfile<<endl;
+      return;
+    }
+  
+  AliTPCClustersArray *arr=0;
+  for(Int_t event=0; event<nevent; event++)
+    {
+      LoadData(event,sp);   
+      exfile->cd();
+      if(arr)
+       delete arr;
+      Int_t nparticles = gAlice->GetEvent(event);
+      Int_t nprimaries = 0;//FindPrimaries(nparticles);
+      cout<<"Event "<<event<<" had "<<nparticles<<" particles and "<<nprimaries<<" primaries"<<endl;
+      exact->cd();
       
-      AliTPCClustersRow *ro = (AliTPCClustersRow *)arr->GetRow(cursec,currow);
-      TClonesArray *clusters = ro->GetArray();
-      int num_of_offline=clusters->GetEntriesFast();
+      //Get the exact clusters from file:
+      AliTPCClustersArray *arr = new AliTPCClustersArray;
+      arr->Setup(param);
+      arr->SetClusterType("AliComplexCluster");
+      char treeName[500];
+      sprintf(treeName,"TreeCExact_%s_%d",param->GetTitle(),event);
+      Bool_t clusterok = arr->ConnectTree(treeName);//Segment Tree (for offline clusters)
+      if(!clusterok) {printf("AliL3Evaluate::EvaluatePoints : Error in clusterloading\n"); return;}
       
-      //Get the found clusters:
-      Int_t slice,padrow;
-      AliL3Transform::Sector2Slice(slice,padrow,cursec,currow);
-      if(slice<fMinSlice || slice>fMaxSlice) continue;
-      AliL3SpacePointData *points = fClusters[slice][0];
-      if(!points)
+      //cout<<"Entering loop with "<<(Int_t)arr->GetTree()->GetEntries()<<endl;
+      for(Int_t i=0; i<arr->GetTree()->GetEntries(); i++)
        {
-         cerr<<"AliL3Evaluate::EvalutePoints : Error getting clusters "<<endl;
-         return 0;
-       }
-      printf("Checking slice %d padrow %d with %d clusters\n",slice,padrow,num_of_offline);
-      cout<<"There are "<<fNcl[slice][0]<<" clusters here"<<endl;
-      for(UInt_t c=0; c<fNcl[slice][0]; c++)
-       {
-         if((Int_t)points[c].fPadRow!=padrow) continue;
-         Float_t xyz_cl[3] = {points[c].fX,points[c].fY,points[c].fZ};
-         Float_t xyz_ex[3];
-         AliL3Transform::Global2Local(xyz_cl,cursec);
-
+         //Get the exact clusters for this row:
+         Int_t cursec,currow;
+         AliSegmentID *s = arr->LoadEntry(i);
+         param->AdjustSectorRow(s->GetID(),cursec,currow);
+         
+         AliTPCClustersRow *ro = (AliTPCClustersRow *)arr->GetRow(cursec,currow);
+         TClonesArray *clusters = ro->GetArray();
+         int num_of_offline=clusters->GetEntriesFast();
+         
+         //Get the found clusters:
+         Int_t slice,padrow;
+         AliL3Transform::Sector2Slice(slice,padrow,cursec,currow);
+         if(slice < fMinSlice) continue;
+         if(slice > fMaxSlice) break;
+         
+         Int_t patch = AliL3Transform::GetPatch(padrow);
+         if(sp)
+           patch=0;
+         AliL3SpacePointData *points = fClusters[slice][patch];
+         if(!points)
+           continue;
+         
+         //cout<<"Slice "<<slice<<" padrow "<<padrow<<" has "<<num_of_offline<<" clusters "<<endl;
+         Int_t clustercount=0;
+         Int_t crosscount=0;
          for(Int_t m=0; m<num_of_offline; m++)
            {
              AliComplexCluster *cluster = (AliComplexCluster *)clusters->UncheckedAt(m);
              Int_t mcId = cluster->fTracks[0];
-
+             
              if(mcId <0) continue;
-             TParticle *part = gAlice->Particle(mcId);
-             if(points[c].fTrackID[0]!=mcId &&
-                points[c].fTrackID[1]!=mcId &&
-                points[c].fTrackID[2]!=mcId)
+             
+             if(cluster->fY < 1 || cluster->fY > AliL3Transform::GetNPads(padrow) - 2 ||
+                cluster->fX < 1 || cluster->fX > AliL3Transform::GetNTimeBins() - 2)
                continue;
-
+             
+             Float_t xyz_ex[3];
+             
              AliL3Transform::Raw2Local(xyz_ex,cursec,currow,cluster->fY,cluster->fX);
              
              //In function AliTPC::Hits2ExactClusters the time offset is not included,
              //so we have to substract it again here.
-             xyz_ex[2]-=AliL3Transform::GetZOffset();
+             if(slice<18)
+               xyz_ex[2]-=AliL3Transform::GetZOffset();
+             else
+               xyz_ex[2]+=AliL3Transform::GetZOffset();
              
-             Float_t resy = xyz_cl[1] - xyz_ex[1];//cluster->GetY()
-             Float_t resz = xyz_cl[2] - xyz_ex[2];//cluster->GetZ()
-
-             ntuppel->Fill(slice,padrow,resy,resz,xyz_ex[2],part->Pt());
+             //Outside our cone:
+             if(param->GetPadRowRadii(cursec,currow)<230./250.*fabs(xyz_ex[2]))
+               continue;
+             
+             TParticle *part = gAlice->Particle(mcId);
+             crosscount++;
+             
+             if(part->Pt() < fMinGoodPt) continue;
+             
+             //Dont take secondaries, because in width calculation we assume primaries:
+             //if(!(part->TestBit(kPrimaryCharged))) continue;
+             if(part->GetFirstMother()>=0) continue;
+             
+             Int_t tempcount=0;
+             for(UInt_t c=0; c<fNcl[slice][patch]; c++)
+               {
+                 if((Int_t)points[c].fPadRow!=padrow) continue;
+                 Float_t xyz_cl[3] = {points[c].fX,points[c].fY,points[c].fZ};
+                 
+                 if(!offline)
+                   AliL3Transform::Global2Local(xyz_cl,cursec);
+                 tempcount++;
+                 
+                 if(points[c].fTrackID[0] != mcId &&
+                    points[c].fTrackID[1] != mcId &&
+                    points[c].fTrackID[2] != mcId)
+                   continue;
+                 
+                 //Residuals:
+                 Float_t resy = xyz_cl[1] - xyz_ex[1];
+                 Float_t resz = xyz_cl[2] - xyz_ex[2];
+                 
+                 //Cluster shape
+                 Int_t charge = (Int_t)points[c].fCharge;
+                 Float_t beta = GetCrossingAngle(part,slice,padrow,xyz_ex);
+                 Double_t tanl = xyz_ex[2]/sqrt(xyz_ex[0]*xyz_ex[0]+xyz_ex[1]*xyz_ex[1]);
+                 Float_t psigmaY2 = AliL3Transform::GetParSigmaY2(padrow,xyz_ex[2],beta);
+                 Float_t psigmaZ2 = AliL3Transform::GetParSigmaZ2(padrow,xyz_ex[2],tanl);
+                 Float_t sigmaY2 = points[c].fSigmaY2;
+                 Float_t sigmaZ2 = points[c].fSigmaZ2;
+                 ntuppel->Fill(slice,padrow,charge,resy,resz,xyz_ex[2],part->Pt(),beta,sigmaY2,sigmaZ2,psigmaY2,psigmaZ2);
+               }
+             clustercount=tempcount;
            }
-       }      
-      arr->ClearRow(cursec,currow);
+         ntuppel2->Fill(slice,padrow,clustercount,crosscount);
+         arr->ClearRow(cursec,currow);
+       }
     }
+  exfile->Close();
+  exact->Close();
 
-  return ntuppel;
+  TFile *ofile = TFile::Open(tofile,"RECREATE");
+  ntuppel->Write();
+  ntuppel2->Write();
+  ofile->Close();
+  
 #endif
 }
 
-void AliL3Evaluate::GetCFeff(Char_t *outfile)
+void AliL3Evaluate::GetCFeff(Char_t *path,Char_t *outfile,Int_t nevent,Bool_t sp)
 {
+  //Evaluate the cluster finder efficiency.
   
-  TNtuple *ntuppel = new TNtuple("ntuppel","Cluster finder efficiency","row:ncrossings:nclusters");
-  
-  AliTPC *TPC = (AliTPC*)gAlice->GetDetector("TPC");
-  
-  TPC->SetParam(fParam);
-  
-  Int_t ver = TPC->IsVersion();
-  LOG(AliL3Log::kInformational,"AliL3Evaluate::GetCFeff","TPC version")
-    <<"TPC version "<<ver<<" found on file"<<ENDLOG;
+#ifndef do_mc
+  cerr<<"AliL3Evaluate::GetCFeff : Compile with do_mc flag"<<endl;
+  return;
+#else
+  TNtuple *ntuppel = new TNtuple("ntuppel","Cluster finder efficiency","slice:row:ncrossings:nclusters");
+  ntuppel->SetDirectory(0);
   
-  Int_t zero=TPC->GetParam()->GetZeroSup();
+  Char_t filename[1024];
+  sprintf(filename,"%s/alirunfile.root",path);
+  TFile *rfile = TFile::Open(filename);
+  gAlice = (AliRun*)rfile->Get("gAlice");
   
-  Int_t np = gAlice->GetNtrack();
+  AliTPCParam *param = (AliTPCParam*)rfile->Get(AliL3Transform::GetParamName());
+      
+  Int_t zero=param->GetZeroSup();
+
+  sprintf(filename,"%s/digitfile.root",path);
+  TFile *dfile = TFile::Open(filename);
   
-  Int_t crossed,recs;
-  Int_t *count = new Int_t[np]; //np number of particles.
-  Int_t i;
-  Float_t xyz[3];
-  for (i=0; i<np; i++) count[i]=0;
-  for(Int_t sl=fMinSlice; sl<=fMaxSlice; sl++)
+  for(Int_t event=0; event<nevent; event++)
     {
-      for (i=0; i<=175; i++) 
+      LoadData(event,sp);
+      rfile->cd();
+      gAlice->GetEvent(event);
+      Int_t np = gAlice->GetNtrack();
+      cout<<"Processing event "<<event<<" with "<<np<<" particles "<<endl;
+      dfile->cd();
+      sprintf(filename,"TreeD_75x40_100x60_150x60_%d",event);
+      TTree *TD=(TTree*)gDirectory->Get(filename);
+      AliSimDigits da, *digits=&da;
+      TD->GetBranch("Segment")->SetAddress(&digits);
+      
+      Int_t crossed=0,recs=0;
+      Int_t *count = new Int_t[np]; //np number of particles.
+      Int_t i;
+      Float_t xyz[3];
+      for (i=0; i<np; i++) count[i]=0;
+      
+      
+      Int_t sec,row,sl,sr;
+      for(Int_t i=0; i<(Int_t)TD->GetEntries(); i++)
        {
-         crossed=0;
-         recs=0;
-         Int_t index = fRowid[sl][i];
-         if (!fDigitsTree->GetEvent(index)) continue;
-         Int_t sec,row;
-         fParam->AdjustSectorRow(fDigits->GetID(),sec,row);
-         fDigits->First();
+         crossed=recs=0;
+         if (!TD->GetEvent(i)) continue;
+         param->AdjustSectorRow(digits->GetID(),sec,row);
+         AliL3Transform::Sector2Slice(sl,sr,sec,row);
+         if(sl < fMinSlice) continue;
+         if(sl > fMaxSlice) break;
+         cout<<"Processing slice "<<sl<<" row "<<sr<<endl;
+         digits->First();
          do {
-           Int_t it=fDigits->CurrentRow(), ip=fDigits->CurrentColumn();
-           Short_t dig = fDigits->GetDigit(it,ip);
-           
-           if(dig<=fParam->GetZeroSup()) continue;
-           if(it < fParam->GetMaxTBin()-1 && it > 0)
-             if(fDigits->GetDigit(it+1,ip) <= fParam->GetZeroSup()
-                && fDigits->GetDigit(it-1,ip) <= fParam->GetZeroSup())
-               continue;
+           Int_t it=digits->CurrentRow(), ip=digits->CurrentColumn();
+           Short_t dig = digits->GetDigit(it,ip);
            
+           if(dig<=param->GetZeroSup()) continue;
            AliL3Transform::Raw2Local(xyz,sec,row,ip,it);
-           if(fParam->GetPadRowRadii(sec,row)<230./250.*fabs(xyz[2]))
+           if(param->GetPadRowRadii(sec,row)<230./250.*fabs(xyz[2]))
              continue;
            
-           
-           Int_t idx0=fDigits->GetTrackID(it,ip,0); 
-           Int_t idx1=fDigits->GetTrackID(it,ip,1);
-           Int_t idx2=fDigits->GetTrackID(it,ip,2);
+           Int_t idx0=digits->GetTrackID(it,ip,0); 
+           Int_t idx1=digits->GetTrackID(it,ip,1);
+           Int_t idx2=digits->GetTrackID(it,ip,2);
            
            if (idx0>=0 && dig>=zero) count[idx0]+=1;
            if (idx1>=0 && dig>=zero) count[idx1]+=1;
            if (idx2>=0 && dig>=zero) count[idx2]+=1;
-         } while (fDigits->Next());
-         
+         } while (digits->Next());
          for (Int_t j=0; j<np; j++) 
            {
+             TParticle *part = gAlice->Particle(j);
+             if(part->Pt() < fMinGoodPt) continue;
+             if(part->GetFirstMother() >= 0) continue;
              if (count[j]>1) //at least two digits at this padrow 
                {
                  crossed++;
                  count[j]=0;
                }
            }
-         AliL3SpacePointData *points = fClusters[sl][0];
-         for(UInt_t k=0; k<fNcl[sl][0]; k++)
+
+         Int_t patch = AliL3Transform::GetPatch(sr);
+         if(sp==kTRUE)
+           patch=0;
+         AliL3SpacePointData *points = fClusters[sl][patch];
+         if(!points)
+           continue;
+         for(UInt_t k=0; k<fNcl[sl][patch]; k++)
            {
-             if(points[k].fPadRow!=i) continue;
+             if(points[k].fPadRow!=sr) continue;
              recs++;
            }
-         ntuppel->Fill(i,crossed,recs);
+         ntuppel->Fill(sl,sr,crossed,recs);
        }
       
+      TD->Delete();
+      delete[] count;
     }
-  delete[] count;
-  
   TFile *file = TFile::Open(outfile,"RECREATE");
   ntuppel->Write();
   file->Close();
   
+  rfile->Close();
+  dfile->Close();
+#endif
+}
+
+Float_t AliL3Evaluate::GetCrossingAngle(TParticle *part,Int_t slice,Int_t padrow,Float_t *xyz)
+{
+  //Calculate the padrow crossing angle of the particle
+  
+  Double_t kappa = AliL3Transform::GetBField()*AliL3Transform::GetBFact()/part->Pt();
+  
+  Double_t radius = 1/fabs(kappa);
+  if(part->GetPdgCode() > 0) kappa = -kappa;
+
+  Float_t angl[1] = {part->Phi()};
+  
+  AliL3Transform::Global2LocalAngle(angl,slice);
+  
+  Double_t charge = -1.*kappa;
+
+  Double_t trackPhi0 = angl[0] + charge*0.5*AliL3Transform::Pi()/fabs(charge);
+  
+  Double_t x0=0;
+  Double_t y0=0;
+  Double_t xc = x0 - radius * cos(trackPhi0);
+  Double_t yc = y0 - radius * sin(trackPhi0);
+
+  Double_t tangent[2];
+  tangent[0] = -1.*(xyz[1] - yc)/radius;
+  tangent[1] = (xyz[0] - xc)/radius;
+  
+  Double_t perp_padrow[2] = {1,0}; //locally in slice
+  
+  Double_t cos_beta = fabs(tangent[0]*perp_padrow[0] + tangent[1]*perp_padrow[1]);
+  if(cos_beta > 1) cos_beta=1;
+  return acos(cos_beta);
 }
 
+Int_t AliL3Evaluate::FindPrimaries(Int_t nparticles)
+{
+  // cuts:
+  Double_t vertcut = 0.001;
+  Double_t decacut = 3.;
+  Double_t timecut = 0.;
+  Int_t nprch1=0;
+  TParticle * part = gAlice->Particle(0);
+  Double_t xori = part->Vx();
+  Double_t yori = part->Vy();
+  Double_t zori = part->Vz();
+  for(Int_t iprim = 0; iprim<nparticles; iprim++){   //loop on  tracks
+    
+    part = gAlice->Particle(iprim);
+    char *xxx=strstr(part->GetName(),"XXX");
+    if(xxx)continue;
+    
+    TParticlePDG *ppdg = part->GetPDG();
+    if(TMath::Abs(ppdg->Charge())!=3)continue;  // only charged (no quarks)
+    
+    Double_t dist=TMath::Sqrt((part->Vx()-xori)*(part->Vx()-xori)+(part->Vy()-yori)*(part->Vy()-yori)+(part->Vz()-zori)*(part->Vz()-zori));
+    if(dist>vertcut)continue;  // cut on the vertex
+    
+    if(part->T()>timecut)continue;
+    
+    Double_t ptot=TMath::Sqrt(part->Px()*part->Px()+part->Py()*part->Py()+part->Pz()*part->Pz());
+    if(ptot==(TMath::Abs(part->Pz())))continue; // no beam particles
+    
+    Bool_t prmch = kTRUE;   // candidate primary track
+    Int_t fidau=part->GetFirstDaughter();  // cut on daughters
+    Int_t lasdau=0;
+    Int_t ndau=0;
+    if(fidau>=0){
+      lasdau=part->GetLastDaughter();
+      ndau=lasdau-fidau+1;
+    }
+    if(ndau>0){
+      for(Int_t j=fidau;j<=lasdau;j++){
+        TParticle *dau=gAlice->Particle(j);
+        Double_t distd=TMath::Sqrt((dau->Vx()-xori)*(dau->Vx()-xori)+(dau->Vy()-yori)*(dau->Vy()-yori)+(dau->Vz()-zori)*(dau->Vz()-zori));
+        if(distd<decacut)prmch=kFALSE;  // eliminate if the decay is near the vertex
+      }
+    }
+    
+    if(prmch){
+      nprch1++;
+      part->SetBit(kPrimaryCharged);
+    }
+  }
+
+  return nprch1;
+}