[u/mrichter/AliRoot.git] / TRD / Macros / AliTRDComparisonV2.C

/****************************************************************************
 *           Very important, delicate and rather obscure macro.             *
 *                    ("a la" AliTPCComparison.C)                           *
 *                                                                          *
 *               Creates list of "trackable" tracks,                        *
 *             calculates efficiency, resolutions etc.                      *
 *         (To get the list of the "trackable" tracks one should            *
 *             first run the AliTPCComparison.C macro)                      *
 *                                                                          *
 *           Origin: I.Belikov, CERN, Jouri.Belikov@cern.ch                 *
 ****************************************************************************/

#if !defined(__CINT__) || defined(__MAKECINT__)
  #include <TMath.h>
  #include <TError.h>
  #include <Riostream.h>
  #include <TH1F.h>
  #include <TH2F.h>
  #include <TTree.h>
  #include <TParticle.h>
  #include <TCanvas.h>
  #include <TLine.h>
  #include <TText.h>
  #include <TBenchmark.h>
  #include <TStyle.h>
  #include <TFile.h>
  #include <TROOT.h>

  #include "AliHeader.h"
  #include "AliTrackReference.h"
  #include "AliRunLoader.h"
  #include "AliRun.h"
  #include "AliESDEvent.h"
  #include "AliESDtrack.h"
#endif

Int_t GoodTracksTRD(const Char_t *dir=".");

extern AliRun *gAlice;
extern TBenchmark *gBenchmark;
extern TROOT *gROOT;

static Int_t allgood=0;
static Int_t allselected=0;
static Int_t allfound=0;

Int_t AliTRDComparisonV2
(Float_t ptcutl=0.2, Float_t ptcuth=10., const Char_t *dir=".") {
   gBenchmark->Start("AliTRDComparisonV2");

   ::Info("AliTRDComparisonV2.C","Doing comparison...");
   

   TH1F *hp=(TH1F*)gROOT->FindObject("hp");
   if (!hp) {
      hp=new TH1F("hp","PHI resolution",50,-70.,70.); 
      hp->SetFillColor(4);
      hp->SetXTitle("(mrad)"); 
   }
   TH1F *hl=(TH1F*)gROOT->FindObject("hl");
   if (!hl) {
      hl=new TH1F("hl","LAMBDA resolution",50,-70,70);
      hl->SetFillColor(4);
      hl->SetXTitle("(mrad)");
   }
   TH1F *hc=(TH1F*)gROOT->FindObject("hc");
   if (!hc) {
      hc=new TH1F("hc","Number of the assigned clusters",25,110,135);
      hc->SetLineColor(2);
   }
   TH1F *hpt=(TH1F*)gROOT->FindObject("hpt");
   if (!hpt) {
      hpt=new TH1F("hpt","Relative Pt resolution",30,-10.,10.); 
      hpt->SetFillColor(2);
      hpt->SetXTitle("(%)");
   }
   TH1F *hmpt=(TH1F*)gROOT->FindObject("hmpt");
   if (!hmpt) {
      hmpt=new TH1F("hmpt","Y and Z resolution",30,-30,30); 
      hmpt->SetFillColor(6);
      hmpt->SetXTitle("(mm)");
   }
   TH1F *hz=(TH1F*)gROOT->FindObject("hz");
   if (!hz) hz=new TH1F("hz","Z resolution",30,-30,30); 


   TH1F *hgood=(TH1F*)gROOT->FindObject("hgood");
   if (!hgood) hgood=new TH1F("hgood","Good tracks",30,0.2,6.1);
    
   TH1F *hfound=(TH1F*)gROOT->FindObject("hfound");
   if (!hfound) hfound=new TH1F("hfound","Found tracks",30,0.2,6.1);

   TH1F *hfake=(TH1F*)gROOT->FindObject("hfake");
   if (!hfake) hfake=new TH1F("hfake","Fake tracks",30,0.2,6.1);

   TH1F *hg=(TH1F*)gROOT->FindObject("hg");
   if (!hg) hg=new TH1F("hg","Efficiency for good tracks",30,0.2,6.1);
   hg->SetLineColor(4); hg->SetLineWidth(2);

   TH1F *hf=(TH1F*)gROOT->FindObject("hf");
   if (!hf) hf=new TH1F("hf","Efficiency for fake tracks",30,0.2,6.1);
   hf->SetFillColor(1); hf->SetFillStyle(3013); hf->SetLineWidth(2);

   TH1F *he=(TH1F*)gROOT->FindObject("he");
   if (!he) 
      he =new TH1F("he","dE/dX for pions with 0.4<p<0.5 GeV/c",50,0.,1000.);

   TH2F *hep=(TH2F*)gROOT->FindObject("hep");
   if (!hep) hep=new TH2F("hep","dE/dX vs momentum",50,0.,2.,50,0.,2000.);
   hep->SetMarkerStyle(8);
   hep->SetMarkerSize(0.4);


   Char_t fname[100];
   sprintf(fname,"%s/GoodTracksTRD.root",dir);

   TFile *refFile=TFile::Open(fname,"old");
   if (!refFile || !refFile->IsOpen()) {
   ::Info("AliTRDComparisonV2.C","Marking good tracks (will take a while)...");
     if (GoodTracksTRD(dir)) {
        ::Error("AliTRDComparisonV2.C","Can't generate the reference file !");
        return 1;
     }
   }
   refFile=TFile::Open(fname,"old");
   if (!refFile || !refFile->IsOpen()) {
     ::Error("AliTRDComparisonV2.C","Can't open the reference file !");
     return 1;
   }   
  
   TTree *trdTree=(TTree*)refFile->Get("trdTree");
   if (!trdTree) {
     ::Error("AliTRDComparisonV2.C","Can't get the reference tree !");
     return 2;
   }
   TBranch *branch=trdTree->GetBranch("TRD");
   if (!branch) {
     ::Error("AliTRDComparisonV2.C","Can't get the TRD branch !");
     return 3;
   }
   TClonesArray dummy("AliTrackReference",1000), *refs=&dummy;
   branch->SetAddress(&refs);


   sprintf(fname,"%s/AliESDs.root",dir);
   TFile *ef=TFile::Open(fname);
   if ((!ef)||(!ef->IsOpen())) {
      sprintf(fname,"%s/AliESDtrd.root",dir);
      ef=TFile::Open(fname);
      if ((!ef)||(!ef->IsOpen())) {
         ::Error("AliTRDComparisonV2.C","Can't open AliESDtrd.root !");
         return 4;
      }
   }
   AliESDEvent* event = new AliESDEvent();
   TTree* esdTree = (TTree*) ef->Get("esdTree");
   if (!esdTree) {
      ::Error("AliTRDComparisonV2.C", "no ESD tree found");
      return 6;
   }
   event->ReadFromTree(esdTree);


   //******* Loop over events *********
   Int_t e=0;
   while (esdTree->GetEvent(e)) {
     cout<<endl<<endl<<"********* Processing event number: "<<e<<"*******\n";
 
     Int_t nentr=event->GetNumberOfTracks();
     allfound+=nentr;

     if (trdTree->GetEvent(e++)==0) {
        cerr<<"No reconstructable tracks !\n";
        continue;
     }

     Int_t ngood=refs->GetEntriesFast(); 
     allgood+=ngood;

     const Int_t MAX=15000;
     Int_t notf[MAX], nnotf=0;
     Int_t fake[MAX], nfake=0;
     Int_t mult[MAX], numb[MAX], nmult=0;
     Int_t k;
     for (k=0; k<ngood; k++) {
	AliTrackReference *ref=(AliTrackReference*)refs->UncheckedAt(k); 
        Int_t lab=ref->Label(), tlab=-1;
        Float_t ptg=ref->Pt();

        if (ptg<ptcutl) continue;
        if (ptg>ptcuth) continue;

        allselected++;

        hgood->Fill(ptg);

        AliESDtrack *esd=0;
        Int_t cnt=0;
        for (Int_t i=0; i<nentr; i++) {
           AliESDtrack *t=event->GetTrack(i);
	   UInt_t status=t->GetStatus();

           if ((status&AliESDtrack::kTRDout)==0) continue;

           Int_t lbl=t->GetTRDLabel();
           if (lab==TMath::Abs(lbl)) {
	      if (cnt==0) {esd=t; tlab=lbl;}
              cnt++;
           }
        }
        if (cnt==0) {
           notf[nnotf++]=lab;
           continue;
        } else if (cnt>1){
           mult[nmult]=lab;
           numb[nmult]=cnt; nmult++;        
        }

        if (lab==tlab) hfound->Fill(ptg);
        else {
          fake[nfake++]=lab;
          hfake->Fill(ptg); 
        }

        AliExternalTrackParam out(*esd->GetOuterParam());

        Double_t bz=event->GetMagneticField();
        Double_t xg = ref->LocalX();
        out.PropagateTo(xg,bz);

        Float_t phi=TMath::ASin(out.GetSnp()) + out.GetAlpha();
        if (phi < 0) phi+=2*TMath::Pi();
        if (phi >=2*TMath::Pi()) phi-=2*TMath::Pi();
        Float_t phig=ref->Phi();
        hp->Fill((phi - phig)*1000.);

        Float_t lam=TMath::ATan(out.GetTgl()); 
        Float_t lamg=TMath::ATan2(ref->Pz(),ptg);
        hl->Fill((lam - lamg)*1000.);

        hc->Fill(esd->GetTRDclusters(0));

        Float_t pt_1=out.OneOverPt();
        hpt->Fill((pt_1 - 1/ptg)/(1/ptg)*100.);

        Float_t y=out.GetY();
        Float_t yg=ref->LocalY();
        hmpt->Fill(10*(y - yg));

        Float_t z=out.GetZ();
        Float_t zg=ref->Z();
        hz->Fill(10*(z - zg));

        Float_t mom=1./(pt_1*TMath::Cos(lam));
        Float_t dedx=esd->GetTRDsignal();
        hep->Fill(mom,dedx,1.);

        Int_t pdg=(Int_t)ref->GetLength();  //this is particle's PDG !

        if (TMath::Abs(pdg)==211) //pions
           if (mom>0.4 && mom<0.5) he->Fill(dedx,1.);

     }

     cout<<"\nList of Not found tracks :\n";
     for (k=0; k<nnotf; k++){
       cout<<notf[k]<<"\t";
       if ((k%9)==8) cout<<"\n";
     }
     cout<<"\n\nList of fake  tracks :\n";
     for (k=0; k<nfake; k++){
       cout<<fake[k]<<"\t";
       if ((k%9)==8) cout<<"\n";
     }
     cout<<"\n\nList of multiple found tracks :\n";
     for (k=0; k<nmult; k++) {
         cout<<"id.   "<<mult[k]
             <<"     found - "<<numb[k]<<"times\n";
     }
     cout<<endl;

     cout<<"Number of found tracks : "<<nentr<<endl;
     cout<<"Number of \"good\" tracks : "<<ngood<<endl;

     refs->Clear();
   } //***** End of the loop over events

   delete event;
   delete esdTree;
   ef->Close();
   
   delete trdTree;
   refFile->Close();

   Stat_t ng=hgood->GetEntries(), nf=hfound->GetEntries();
   if (ng!=0) cout<<"\n\nIntegral efficiency is about "<<nf/ng*100.<<" %\n";
   cout<<"Total number selected of \"good\" tracks ="<<allselected<<endl<<endl;
   cout<<"Total number of found tracks ="<<allfound<<endl;
   cout<<"Total number of \"good\" tracks ="<<allgood<<endl;
   cout<<endl;

   gStyle->SetOptStat(111110);
   gStyle->SetOptFit(1);

   TCanvas *c1=new TCanvas("c1","",0,0,700,850);

   Int_t minc=33; 

   TPad *p1=new TPad("p1","",0,0.3,.5,.6); p1->Draw();
   p1->cd(); p1->SetFillColor(42); p1->SetFrameFillColor(10); 
   if (hp->GetEntries()<minc) hp->Draw(); else hp->Fit("gaus"); c1->cd();

   TPad *p2=new TPad("p2","",0.5,.3,1,.6); p2->Draw(); 
   p2->cd(); p2->SetFillColor(42); p2->SetFrameFillColor(10);
   if (hl->GetEntries()<minc) hl->Draw(); else hl->Fit("gaus"); c1->cd();

   TPad *p3=new TPad("p3","",0,0,0.5,0.3); p3->Draw();
   p3->cd(); p3->SetFillColor(42); p3->SetFrameFillColor(10); 
   if (hpt->GetEntries()<minc) hpt->Draw(); else hpt->Fit("gaus"); c1->cd();

   TPad *p4=new TPad("p4","",0.5,0,1,0.3); p4->Draw();
   p4->cd(); p4->SetFillColor(42); p4->SetFrameFillColor(10);
   if (hmpt->GetEntries()<minc) hmpt->Draw(); else hmpt->Fit("gaus"); 
   hz->Draw("same"); c1->cd();
   

   TPad *p5=new TPad("p5","",0,0.6,1,1); p5->Draw(); p5->cd(); 
   p5->SetFillColor(41); p5->SetFrameFillColor(10);
   hfound->Sumw2(); hgood->Sumw2(); hfake->Sumw2();
   hg->Divide(hfound,hgood,1,1.,"b");
   hf->Divide(hfake,hgood,1,1.,"b");
   hg->SetMaximum(1.4);
   hg->SetYTitle("Tracking efficiency");
   hg->SetXTitle("Pt (GeV/c)");
   hg->Draw();

   TLine *line1 = new TLine(0.2,1.0,6.1,1.0); line1->SetLineStyle(4);
   line1->Draw("same");
   TLine *line2 = new TLine(0.2,0.9,6.1,0.9); line2->SetLineStyle(4);
   line2->Draw("same");

   hf->SetFillColor(1);
   hf->SetFillStyle(3013);
   hf->SetLineColor(2);
   hf->SetLineWidth(2);
   hf->Draw("histsame");
   TText *text = new TText(0.461176,0.248448,"Fake tracks");
   text->SetTextSize(0.05);
   text->Draw();
   text = new TText(0.453919,1.11408,"Good tracks");
   text->SetTextSize(0.05);
   text->Draw();

   TCanvas *c2=new TCanvas("c2","",320,32,530,590);
   TPad *p6=new TPad("p6","",0.,0.,1.,.5); p6->Draw();
   p6->cd(); p6->SetFillColor(42); p6->SetFrameFillColor(10); 
   he->SetFillColor(2); he->SetFillStyle(3005);  
   he->SetXTitle("Arbitrary Units"); 
   if (he->GetEntries()<minc) he->Draw(); else he->Fit("gaus"); c2->cd();

   TPad *p7=new TPad("p7","",0.,0.5,1.,1.); p7->Draw(); 
   p7->cd(); p7->SetFillColor(42); p7->SetFrameFillColor(10);
   hep->SetXTitle("p (Gev/c)"); hep->SetYTitle("dE/dX (Arb. Units)"); 
   hep->Draw(); c1->cd();

   TFile fc("AliTRDComparisonV2.root","RECREATE");
   c1->Write();
   c2->Write();
   fc.Close();

   gBenchmark->Stop("AliTRDComparisonV2");
   gBenchmark->Show("AliTRDComparisonV2");

   return 0;
}


Int_t GoodTracksTRD(const Char_t *dir) {
   if (gAlice) { 
       delete gAlice->GetRunLoader();
       delete gAlice;//if everything was OK here it is already NULL
       gAlice = 0x0;
   }

   Char_t fname[100];
   sprintf(fname,"%s/galice.root",dir);

   AliRunLoader *rl = AliRunLoader::Open(fname,"COMPARISON");
   if (!rl) {
      ::Error("GoodTracksTRD","Can't start session !");
      return 1;
   }

   rl->LoadgAlice();
   rl->LoadHeader();
   rl->LoadTrackRefs();

   Int_t nev=rl->GetNumberOfEvents();
   ::Info("GoodTracksTRD","Number of events : %d\n",nev);  

   sprintf(fname,"%s/GoodTracksTPC.root",dir);
   TFile *tpcFile=TFile::Open(fname);
   if ((!tpcFile)||(!tpcFile->IsOpen())) {
       ::Error("GoodTracksTRD","Can't open the GoodTracksTPC.root !");
       delete rl;
       return 5; 
   }
   TClonesArray dum("AliTrackReference",1000), *tpcRefs=&dum;
   TTree *tpcTree=(TTree*)tpcFile->Get("tpcTree");
   if (!tpcTree) {
       ::Error("GoodTracksTRD","Can't get the TPC reference tree !");
       delete rl;
       return 6;
   }
   TBranch *tpcBranch=tpcTree->GetBranch("TPC");
   if (!tpcBranch) {
      ::Error("GoodTracksTRD","Can't get the TPC reference branch !");
      delete rl;
      return 7;
   }
   tpcBranch->SetAddress(&tpcRefs);

   sprintf(fname,"%s/GoodTracksTRD.root",dir);
   TFile *trdFile=TFile::Open(fname,"recreate");
   TClonesArray dummy2("AliTrackReference",1000), *trdRefs=&dummy2;
   TTree trdTree("trdTree","Info about the reconstructable TRD tracks");
   trdTree.Branch("TRD",&trdRefs);

   //********  Loop over generated events 
   for (Int_t e=0; e<nev; e++) {
     Int_t k;

     rl->GetEvent(e);  trdFile->cd();

     Int_t np = rl->GetHeader()->GetNtrack();
     cout<<"Event "<<e<<" Number of particles: "<<np<<endl;


     TTree *TR=rl->TreeTR();
     TBranch *branch=TR->GetBranch("TrackReferences");
     if (branch==0) {
        ::Error("GoodTracksTRD","No TRD track references !");
        delete rl;
        return 5;
     }
     TClonesArray dummy("AliTrackReference",1000), *refs=&dummy;
     branch->SetAddress(&refs);
     Int_t nr=TR->GetEntries();

     //Preselect the "good" track candidates (TRD info only)
     Int_t nt=0;
     for (Int_t r=0; r<nr; r++) {
         refs->Clear();
         TR->GetEntry(r);
         Int_t n=refs->GetEntriesFast();
 
         if (n<=1) continue;

	 AliTrackReference *ref0=(AliTrackReference *)refs->UncheckedAt(0);
         if (ref0->LocalX() > 300.) continue;

	 AliTrackReference *refn=0x0;
	 for (Int_t iref=n-1; iref>=0; --iref) {
	   refn = (AliTrackReference *)refs->UncheckedAt(iref);
	   if (refn->LocalX() > 363. &&
	       refn->DetectorId() == AliTrackReference::kTRD) break;
	   refn = 0x0;
	 }
	 if (!refn) continue;
         if (TMath::Abs(ref0->Alpha() - refn->Alpha()) > 1e-5) continue;   

         new((*trdRefs)[nt++]) AliTrackReference(*refn);
     }

     //Check if the candidates are "good" from the TPC point of view
     tpcTree->GetEvent(e);
     Int_t ntpc=tpcRefs->GetEntriesFast();
     for (Int_t t=0; t<nt; t++) {
	 AliTrackReference *ref=(AliTrackReference *)trdRefs->UncheckedAt(t);
         Int_t lab=ref->Label();
         for (k=0; k<ntpc; k++) {
             AliTrackReference 
                *tpcRef=(AliTrackReference *)tpcRefs->UncheckedAt(k);
             if (tpcRef->Label()==lab) {
	        ref->SetLength(tpcRef->GetLength());
                break;
             } 
        }
	if (k==ntpc) delete trdRefs->RemoveAt(t); 
     }
     trdRefs->Compress();
     trdTree.Fill();

     trdRefs->Clear();
     tpcRefs->Clear();

   } //*** end of the loop over generated events

   trdTree.Write();
   trdFile->Close();

   delete tpcTree;
   tpcFile->Close();

   delete rl;
   return 0;
}
Commit	Line	Data
7e24fa8c	1	/****************************************************************************
	2	* Very important, delicate and rather obscure macro. *
	3	* ("a la" AliTPCComparison.C) *
	4	* *
	5	* Creates list of "trackable" tracks, *
	6	* calculates efficiency, resolutions etc. *
	7	* (To get the list of the "trackable" tracks one should *
	8	* first run the AliTPCComparison.C macro) *
	9	* *
	10	* Origin: I.Belikov, CERN, Jouri.Belikov@cern.ch *
	11	****************************************************************************/
	12
	13	#if !defined(__CINT__) \|\| defined(__MAKECINT__)
	14	#include <TMath.h>
	15	#include <TError.h>
	16	#include <Riostream.h>
	17	#include <TH1F.h>
	18	#include <TH2F.h>
	19	#include <TTree.h>
	20	#include <TParticle.h>
	21	#include <TCanvas.h>
	22	#include <TLine.h>
	23	#include <TText.h>
	24	#include <TBenchmark.h>
	25	#include <TStyle.h>
	26	#include <TFile.h>
	27	#include <TROOT.h>
	28
	29	#include "AliHeader.h"
	30	#include "AliTrackReference.h"
	31	#include "AliRunLoader.h"
	32	#include "AliRun.h"
4514157e	33	#include "AliESDEvent.h"
18a2daf2	34	#include "AliESDtrack.h"
7e24fa8c	35	#endif
	36
	37	Int_t GoodTracksTRD(const Char_t *dir=".");
	38
	39	extern AliRun *gAlice;
	40	extern TBenchmark *gBenchmark;
	41	extern TROOT *gROOT;
	42
	43	static Int_t allgood=0;
	44	static Int_t allselected=0;
	45	static Int_t allfound=0;
	46
	47	Int_t AliTRDComparisonV2
	48	(Float_t ptcutl=0.2, Float_t ptcuth=10., const Char_t *dir=".") {
	49	gBenchmark->Start("AliTRDComparisonV2");
	50
	51	::Info("AliTRDComparisonV2.C","Doing comparison...");
	52
	53
	54	TH1F hp=(TH1F)gROOT->FindObject("hp");
	55	if (!hp) {
	56	hp=new TH1F("hp","PHI resolution",50,-70.,70.);
	57	hp->SetFillColor(4);
	58	hp->SetXTitle("(mrad)");
	59	}
	60	TH1F hl=(TH1F)gROOT->FindObject("hl");
	61	if (!hl) {
	62	hl=new TH1F("hl","LAMBDA resolution",50,-70,70);
	63	hl->SetFillColor(4);
	64	hl->SetXTitle("(mrad)");
	65	}
	66	TH1F hc=(TH1F)gROOT->FindObject("hc");
	67	if (!hc) {
	68	hc=new TH1F("hc","Number of the assigned clusters",25,110,135);
	69	hc->SetLineColor(2);
	70	}
	71	TH1F hpt=(TH1F)gROOT->FindObject("hpt");
	72	if (!hpt) {
	73	hpt=new TH1F("hpt","Relative Pt resolution",30,-10.,10.);
	74	hpt->SetFillColor(2);
	75	hpt->SetXTitle("(%)");
	76	}
	77	TH1F hmpt=(TH1F)gROOT->FindObject("hmpt");
	78	if (!hmpt) {
	79	hmpt=new TH1F("hmpt","Y and Z resolution",30,-30,30);
	80	hmpt->SetFillColor(6);
	81	hmpt->SetXTitle("(mm)");
	82	}
	83	TH1F hz=(TH1F)gROOT->FindObject("hz");
	84	if (!hz) hz=new TH1F("hz","Z resolution",30,-30,30);
	85
	86
	87
	88	TH1F hgood=(TH1F)gROOT->FindObject("hgood");
	89	if (!hgood) hgood=new TH1F("hgood","Good tracks",30,0.2,6.1);
	90
	91	TH1F hfound=(TH1F)gROOT->FindObject("hfound");
	92	if (!hfound) hfound=new TH1F("hfound","Found tracks",30,0.2,6.1);
	93
	94	TH1F hfake=(TH1F)gROOT->FindObject("hfake");
	95	if (!hfake) hfake=new TH1F("hfake","Fake tracks",30,0.2,6.1);
	96
	97	TH1F hg=(TH1F)gROOT->FindObject("hg");
	98	if (!hg) hg=new TH1F("hg","Efficiency for good tracks",30,0.2,6.1);
99	hg->SetLineColor(4); hg->SetLineWidth(2);
100
101	TH1F hf=(TH1F)gROOT->FindObject("hf");
102	if (!hf) hf=new TH1F("hf","Efficiency for fake tracks",30,0.2,6.1);
103	hf->SetFillColor(1); hf->SetFillStyle(3013); hf->SetLineWidth(2);
104
105	TH1F he=(TH1F)gROOT->FindObject("he");
106	if (!he)
107	he =new TH1F("he","dE/dX for pions with 0.4<p<0.5 GeV/c",50,0.,1000.);
108
109	TH2F hep=(TH2F)gROOT->FindObject("hep");
110	if (!hep) hep=new TH2F("hep","dE/dX vs momentum",50,0.,2.,50,0.,2000.);
111	hep->SetMarkerStyle(8);
112	hep->SetMarkerSize(0.4);
113
114
115	Char_t fname[100];
116	sprintf(fname,"%s/GoodTracksTRD.root",dir);
117
118	TFile *refFile=TFile::Open(fname,"old");
119	if (!refFile \|\| !refFile->IsOpen()) {
120	::Info("AliTRDComparisonV2.C","Marking good tracks (will take a while)...");
121	if (GoodTracksTRD(dir)) {
122	::Error("AliTRDComparisonV2.C","Can't generate the reference file !");
123	return 1;
124	}
125	}
126	refFile=TFile::Open(fname,"old");
127	if (!refFile \|\| !refFile->IsOpen()) {
128	::Error("AliTRDComparisonV2.C","Can't open the reference file !");
129	return 1;
130	}
131
132	TTree trdTree=(TTree)refFile->Get("trdTree");
133	if (!trdTree) {
134	::Error("AliTRDComparisonV2.C","Can't get the reference tree !");
135	return 2;
136	}
137	TBranch *branch=trdTree->GetBranch("TRD");
138	if (!branch) {
139	::Error("AliTRDComparisonV2.C","Can't get the TRD branch !");
140	return 3;
141	}
142	TClonesArray dummy("AliTrackReference",1000), *refs=&dummy;
143	branch->SetAddress(&refs);
144
145
146	sprintf(fname,"%s/AliESDs.root",dir);
147	TFile *ef=TFile::Open(fname);
148	if ((!ef)\|\|(!ef->IsOpen())) {
149	sprintf(fname,"%s/AliESDtrd.root",dir);
150	ef=TFile::Open(fname);
151	if ((!ef)\|\|(!ef->IsOpen())) {
152	::Error("AliTRDComparisonV2.C","Can't open AliESDtrd.root !");
153	return 4;
154	}
155	}
4514157e	156	AliESDEvent* event = new AliESDEvent();
7e24fa8c	157	TTree* esdTree = (TTree*) ef->Get("esdTree");
	158	if (!esdTree) {
	159	::Error("AliTRDComparisonV2.C", "no ESD tree found");
	160	return 6;
	161	}
4514157e	162	event->ReadFromTree(esdTree);
7e24fa8c	163
	164
	165	//***** Loop over events *******
	166	Int_t e=0;
	167	while (esdTree->GetEvent(e)) {
	168	cout<<endl<<endl<<"******* Processing event number: "<<e<<"*****\n";
	169
	170	Int_t nentr=event->GetNumberOfTracks();
	171	allfound+=nentr;
	172
	173	if (trdTree->GetEvent(e++)==0) {
	174	cerr<<"No reconstructable tracks !\n";
	175	continue;
	176	}
	177
	178	Int_t ngood=refs->GetEntriesFast();
	179	allgood+=ngood;
	180
	181	const Int_t MAX=15000;
	182	Int_t notf[MAX], nnotf=0;
	183	Int_t fake[MAX], nfake=0;
	184	Int_t mult[MAX], numb[MAX], nmult=0;
	185	Int_t k;
	186	for (k=0; k<ngood; k++) {
	187	AliTrackReference ref=(AliTrackReference)refs->UncheckedAt(k);
	188	Int_t lab=ref->Label(), tlab=-1;
	189	Float_t ptg=ref->Pt();
	190
	191	if (ptg<ptcutl) continue;
	192	if (ptg>ptcuth) continue;
	193
	194	allselected++;
	195
	196	hgood->Fill(ptg);
	197
	198	AliESDtrack *esd=0;
	199	Int_t cnt=0;
	200	for (Int_t i=0; i<nentr; i++) {
	201	AliESDtrack *t=event->GetTrack(i);
	202	UInt_t status=t->GetStatus();
	203
	204	if ((status&AliESDtrack::kTRDout)==0) continue;
	205
	206	Int_t lbl=t->GetTRDLabel();
	207	if (lab==TMath::Abs(lbl)) {
	208	if (cnt==0) {esd=t; tlab=lbl;}
	209	cnt++;
	210	}
	211	}
	212	if (cnt==0) {
	213	notf[nnotf++]=lab;
	214	continue;
	215	} else if (cnt>1){
	216	mult[nmult]=lab;
	217	numb[nmult]=cnt; nmult++;
	218	}
	219
	220	if (lab==tlab) hfound->Fill(ptg);
	221	else {
	222	fake[nfake++]=lab;
	223	hfake->Fill(ptg);
	224	}
	225
	226	AliExternalTrackParam out(*esd->GetOuterParam());
227
228	Double_t bz=event->GetMagneticField();
229	Double_t xg = ref->LocalX();
230	out.PropagateTo(xg,bz);
231
232	Float_t phi=TMath::ASin(out.GetSnp()) + out.GetAlpha();
233	if (phi < 0) phi+=2*TMath::Pi();
234	if (phi >=2TMath::Pi()) phi-=2TMath::Pi();
235	Float_t phig=ref->Phi();
236	hp->Fill((phi - phig)*1000.);
237
238	Float_t lam=TMath::ATan(out.GetTgl());
239	Float_t lamg=TMath::ATan2(ref->Pz(),ptg);
240	hl->Fill((lam - lamg)*1000.);
241
242	hc->Fill(esd->GetTRDclusters(0));
243
6c23ffed	244	Float_t pt_1=out.OneOverPt();
7e24fa8c	245	hpt->Fill((pt_1 - 1/ptg)/(1/ptg)*100.);
	246
	247	Float_t y=out.GetY();
	248	Float_t yg=ref->LocalY();
	249	hmpt->Fill(10*(y - yg));
	250
	251	Float_t z=out.GetZ();
	252	Float_t zg=ref->Z();
	253	hz->Fill(10*(z - zg));
	254
	255	Float_t mom=1./(pt_1*TMath::Cos(lam));
	256	Float_t dedx=esd->GetTRDsignal();
	257	hep->Fill(mom,dedx,1.);
	258
	259	Int_t pdg=(Int_t)ref->GetLength(); //this is particle's PDG !
	260
	261	if (TMath::Abs(pdg)==211) //pions
	262	if (mom>0.4 && mom<0.5) he->Fill(dedx,1.);
	263
	264	}
	265
	266	cout<<"\nList of Not found tracks :\n";
	267	for (k=0; k<nnotf; k++){
	268	cout<<notf[k]<<"\t";
	269	if ((k%9)==8) cout<<"\n";
	270	}
	271	cout<<"\n\nList of fake tracks :\n";
	272	for (k=0; k<nfake; k++){
	273	cout<<fake[k]<<"\t";
	274	if ((k%9)==8) cout<<"\n";
	275	}
	276	cout<<"\n\nList of multiple found tracks :\n";
	277	for (k=0; k<nmult; k++) {
	278	cout<<"id. "<<mult[k]
	279	<<" found - "<<numb[k]<<"times\n";
	280	}
	281	cout<<endl;
	282
	283	cout<<"Number of found tracks : "<<nentr<<endl;
	284	cout<<"Number of \"good\" tracks : "<<ngood<<endl;
	285
	286	refs->Clear();
	287	} //***** End of the loop over events
	288
	289	delete event;
4514157e	290	delete esdTree;
7e24fa8c	291	ef->Close();
	292
	293	delete trdTree;
	294	refFile->Close();
	295
	296	Stat_t ng=hgood->GetEntries(), nf=hfound->GetEntries();
	297	if (ng!=0) cout<<"\n\nIntegral efficiency is about "<<nf/ng*100.<<" %\n";
	298	cout<<"Total number selected of \"good\" tracks ="<<allselected<<endl<<endl;
	299	cout<<"Total number of found tracks ="<<allfound<<endl;
	300	cout<<"Total number of \"good\" tracks ="<<allgood<<endl;
	301	cout<<endl;
	302
	303	gStyle->SetOptStat(111110);
	304	gStyle->SetOptFit(1);
	305
	306	TCanvas *c1=new TCanvas("c1","",0,0,700,850);
	307
	308	Int_t minc=33;
	309
	310	TPad *p1=new TPad("p1","",0,0.3,.5,.6); p1->Draw();
	311	p1->cd(); p1->SetFillColor(42); p1->SetFrameFillColor(10);
	312	if (hp->GetEntries()<minc) hp->Draw(); else hp->Fit("gaus"); c1->cd();
	313
	314	TPad *p2=new TPad("p2","",0.5,.3,1,.6); p2->Draw();
	315	p2->cd(); p2->SetFillColor(42); p2->SetFrameFillColor(10);
	316	if (hl->GetEntries()<minc) hl->Draw(); else hl->Fit("gaus"); c1->cd();
	317
	318	TPad *p3=new TPad("p3","",0,0,0.5,0.3); p3->Draw();
	319	p3->cd(); p3->SetFillColor(42); p3->SetFrameFillColor(10);
	320	if (hpt->GetEntries()<minc) hpt->Draw(); else hpt->Fit("gaus"); c1->cd();
	321
	322	TPad *p4=new TPad("p4","",0.5,0,1,0.3); p4->Draw();
	323	p4->cd(); p4->SetFillColor(42); p4->SetFrameFillColor(10);
	324	if (hmpt->GetEntries()<minc) hmpt->Draw(); else hmpt->Fit("gaus");
	325	hz->Draw("same"); c1->cd();
	326
	327
	328	TPad *p5=new TPad("p5","",0,0.6,1,1); p5->Draw(); p5->cd();
	329	p5->SetFillColor(41); p5->SetFrameFillColor(10);
	330	hfound->Sumw2(); hgood->Sumw2(); hfake->Sumw2();
	331	hg->Divide(hfound,hgood,1,1.,"b");
	332	hf->Divide(hfake,hgood,1,1.,"b");
	333	hg->SetMaximum(1.4);
	334	hg->SetYTitle("Tracking efficiency");
	335	hg->SetXTitle("Pt (GeV/c)");
	336	hg->Draw();
	337
	338	TLine *line1 = new TLine(0.2,1.0,6.1,1.0); line1->SetLineStyle(4);
	339	line1->Draw("same");
	340	TLine *line2 = new TLine(0.2,0.9,6.1,0.9); line2->SetLineStyle(4);
	341	line2->Draw("same");
	342
	343	hf->SetFillColor(1);
	344	hf->SetFillStyle(3013);
	345	hf->SetLineColor(2);
	346	hf->SetLineWidth(2);
	347	hf->Draw("histsame");
	348	TText *text = new TText(0.461176,0.248448,"Fake tracks");
	349	text->SetTextSize(0.05);
	350	text->Draw();
	351	text = new TText(0.453919,1.11408,"Good tracks");
	352	text->SetTextSize(0.05);
	353	text->Draw();
	354
355	TCanvas *c2=new TCanvas("c2","",320,32,530,590);
356	TPad *p6=new TPad("p6","",0.,0.,1.,.5); p6->Draw();
357	p6->cd(); p6->SetFillColor(42); p6->SetFrameFillColor(10);
358	he->SetFillColor(2); he->SetFillStyle(3005);
359	he->SetXTitle("Arbitrary Units");
360	if (he->GetEntries()<minc) he->Draw(); else he->Fit("gaus"); c2->cd();
361
362	TPad *p7=new TPad("p7","",0.,0.5,1.,1.); p7->Draw();
363	p7->cd(); p7->SetFillColor(42); p7->SetFrameFillColor(10);
364	hep->SetXTitle("p (Gev/c)"); hep->SetYTitle("dE/dX (Arb. Units)");
365	hep->Draw(); c1->cd();
366
367	TFile fc("AliTRDComparisonV2.root","RECREATE");
368	c1->Write();
369	c2->Write();
370	fc.Close();
371
372	gBenchmark->Stop("AliTRDComparisonV2");
373	gBenchmark->Show("AliTRDComparisonV2");
374
375	return 0;
376	}
377
378
379
380	Int_t GoodTracksTRD(const Char_t *dir) {
381	if (gAlice) {
382	delete gAlice->GetRunLoader();
383	delete gAlice;//if everything was OK here it is already NULL
384	gAlice = 0x0;
385	}
386
387	Char_t fname[100];
388	sprintf(fname,"%s/galice.root",dir);
389
390	AliRunLoader *rl = AliRunLoader::Open(fname,"COMPARISON");
391	if (!rl) {
392	::Error("GoodTracksTRD","Can't start session !");
393	return 1;
394	}
395
396	rl->LoadgAlice();
397	rl->LoadHeader();
398	rl->LoadTrackRefs();
399
400	Int_t nev=rl->GetNumberOfEvents();
401	::Info("GoodTracksTRD","Number of events : %d\n",nev);
402
403	sprintf(fname,"%s/GoodTracksTPC.root",dir);
404	TFile *tpcFile=TFile::Open(fname);
405	if ((!tpcFile)\|\|(!tpcFile->IsOpen())) {
406	::Error("GoodTracksTRD","Can't open the GoodTracksTPC.root !");
407	delete rl;
408	return 5;
409	}
410	TClonesArray dum("AliTrackReference",1000), *tpcRefs=&dum;
411	TTree tpcTree=(TTree)tpcFile->Get("tpcTree");
412	if (!tpcTree) {
413	::Error("GoodTracksTRD","Can't get the TPC reference tree !");
414	delete rl;
415	return 6;
416	}
417	TBranch *tpcBranch=tpcTree->GetBranch("TPC");
418	if (!tpcBranch) {
419	::Error("GoodTracksTRD","Can't get the TPC reference branch !");
420	delete rl;
421	return 7;
422	}
423	tpcBranch->SetAddress(&tpcRefs);
424
425	sprintf(fname,"%s/GoodTracksTRD.root",dir);
426	TFile *trdFile=TFile::Open(fname,"recreate");
427	TClonesArray dummy2("AliTrackReference",1000), *trdRefs=&dummy2;
428	TTree trdTree("trdTree","Info about the reconstructable TRD tracks");
429	trdTree.Branch("TRD",&trdRefs);
430
431	//******** Loop over generated events
432	for (Int_t e=0; e<nev; e++) {
433	Int_t k;
434
435	rl->GetEvent(e); trdFile->cd();
436
437	Int_t np = rl->GetHeader()->GetNtrack();
438	cout<<"Event "<<e<<" Number of particles: "<<np<<endl;
439
440
441	TTree *TR=rl->TreeTR();
18a2daf2	442	TBranch *branch=TR->GetBranch("TrackReferences");
7e24fa8c	443	if (branch==0) {
	444	::Error("GoodTracksTRD","No TRD track references !");
	445	delete rl;
	446	return 5;
	447	}
	448	TClonesArray dummy("AliTrackReference",1000), *refs=&dummy;
	449	branch->SetAddress(&refs);
	450	Int_t nr=TR->GetEntries();
	451
	452	//Preselect the "good" track candidates (TRD info only)
	453	Int_t nt=0;
	454	for (Int_t r=0; r<nr; r++) {
	455	refs->Clear();
	456	TR->GetEntry(r);
	457	Int_t n=refs->GetEntriesFast();
	458
	459	if (n<=1) continue;
	460
	461	AliTrackReference ref0=(AliTrackReference )refs->UncheckedAt(0);
	462	if (ref0->LocalX() > 300.) continue;
	463
18a2daf2	464	AliTrackReference *refn=0x0;
	465	for (Int_t iref=n-1; iref>=0; --iref) {
	466	refn = (AliTrackReference *)refs->UncheckedAt(iref);
	467	if (refn->LocalX() > 363. &&
	468	refn->DetectorId() == AliTrackReference::kTRD) break;
	469	refn = 0x0;
	470	}
	471	if (!refn) continue;
7e24fa8c	472	if (TMath::Abs(ref0->Alpha() - refn->Alpha()) > 1e-5) continue;
	473
	474	new((trdRefs)[nt++]) AliTrackReference(refn);
	475	}
	476
	477	//Check if the candidates are "good" from the TPC point of view
	478	tpcTree->GetEvent(e);
	479	Int_t ntpc=tpcRefs->GetEntriesFast();
	480	for (Int_t t=0; t<nt; t++) {
	481	AliTrackReference ref=(AliTrackReference )trdRefs->UncheckedAt(t);
	482	Int_t lab=ref->Label();
	483	for (k=0; k<ntpc; k++) {
	484	AliTrackReference
	485	tpcRef=(AliTrackReference )tpcRefs->UncheckedAt(k);
	486	if (tpcRef->Label()==lab) {
	487	ref->SetLength(tpcRef->GetLength());
	488	break;
	489	}
	490	}
	491	if (k==ntpc) delete trdRefs->RemoveAt(t);
	492	}
	493	trdRefs->Compress();
	494	trdTree.Fill();
	495
	496	trdRefs->Clear();
	497	tpcRefs->Clear();
	498
	499	} //*** end of the loop over generated events
	500
	501	trdTree.Write();
	502	trdFile->Close();
	503
	504	delete tpcTree;
	505	tpcFile->Close();
	506
	507	delete rl;
	508	return 0;
	509	}
	510
	511