Transition to NewIO
[u/mrichter/AliRoot.git] / TOF / AliTOFT0.cxx
1 /**************************************************************************
2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3  *                                                                        *
4  * Author: The ALICE Off-line Project.                                    *
5  * Contributors are mentioned in the code where appropriate.              *
6  *                                                                        *
7  * Permission to use, copy, modify and distribute this software and its   *
8  * documentation strictly for non-commercial purposes is hereby granted   *
9  * without fee, provided that the above copyright notice appears in all   *
10  * copies and that both the copyright notice and this permission notice   *
11  * appear in the supporting documentation. The authors make no claims     *
12  * about the suitability of this software for any purpose. It is          *
13  * provided "as is" without express or implied warranty.                  *
14  **************************************************************************/
15
16 /* $Id$ */
17
18 //_________________________________________________________________________
19 // This is a TTask that made the calculation of the Time zero using TOF.
20 // Description: The algorithm used to calculate the time zero of interaction
21 // using TOF detector is the following.
22 // We select in the MonteCarlo some primary particles - or tracks in the following - 
23 // that strike the TOF detector (the larger part are pions, kaons or protons). 
24 // We choose a set of 10 selected tracks, for each track You have the length
25 // of the track when the TOF is reached (a standard TOF hit does not contain this
26 // additional information, this is the reason why we implemented a new time zero 
27 // dedicated TOF hit class AliTOFhitT0; in order to store this type of hit You 
28 // have to use the AliTOFv4T0 as TOF class in Your Config.C. In AliTOFv4T0 the 
29 // StepManager was modified in order to fill the TOF hit branch with this type 
30 // of hits; in fact the AliTOF::AddT0Hit is called rather that the usual AliTOF::AddHit), 
31 // the momentum at generation (from TreeK) and the time of flight
32 // given by the TOF detector.
33 // (Observe that the ctor of the AliTOF class, when the AliTOFv4T0 class is used, is called
34 // with the "tzero" option: it is in order create the fHits TClonesArray filled with
35 // AliTOFhitT0 objects, rather than with normal AliTOFhit)
36 // Then Momentum and time of flight for each track are smeared according to 
37 // known experimental resolution (all sources of error have been token into account).
38 // Let consider now only one set of 10 tracks (the algorithm is the same for all sets).
39 // Assuming the (mass) hypothesis that each track can be AUT a pion, AUT a kaon, AUT a proton,
40 // we consider all the 3 at 10 possible cases. 
41 // For each track in each (mass) configuration
42 // (a configuration can be e.g. pion/pion/kaon/proton/pion/proton/kaon/kaon/pion/pion)
43 // we calculate the time zero (we know in fact the velocity of the track after 
44 // the assumption about its mass, the time of flight given by the TOF, and the 
45 // corresponding path travelled till the TOF detector). Then for each mass configuration we have
46 // 10 time zero and we can calculate the ChiSquare for the current configuration using the 
47 // weighted mean over all 10 time zero.
48 // We call the best assignment the mass configuration that gives the minimum value of the ChiSquare. 
49 // We plot the weighted mean over all 10 time zero for the best assignment, 
50 // the ChiSquare for the best assignment and the corresponding confidence level.
51 // The strong assumption is the MC selection of primary particles. It will be introduced
52 // in the future also some more realistic simulation about this point. 
53 // Use case:
54 // root [0] AliTOFT0 * tzero = new AliTOFT0("galice.root")
55 // Warning in <TDatabasePDG::TDatabasePDG>: object already instantiated
56 // root [1] tzero->ExecuteTask()
57 // root [2] tzero->ExecuteTask("tim")
58 //             // available parameters:
59 //             tim - print benchmarking information
60 //             all - print usefull informations about the number of misidentified tracks 
61 //                   and a comparison about the true configuration (known from MC) and the best
62 //                   assignment
63 //-- Author: F. Pierella
64 //////////////////////////////////////////////////////////////////////////////
65
66 #include <Riostream.h>
67 #include <stdlib.h>
68
69 #include <TBenchmark.h>
70 #include <TCanvas.h>
71 #include <TClonesArray.h>
72 #include <TFile.h>
73 #include <TFolder.h>
74 #include <TFrame.h>
75 #include <TH1.h>
76 #include <TParticle.h>
77 #include <TROOT.h>
78 #include <TSystem.h>
79 #include <TTask.h>
80 #include <TTree.h>
81 #include <TVirtualMC.h>
82
83 #include "AliDetector.h"
84 #include "AliRun.h"
85 #include "AliTOF.h"
86 #include "AliTOFT0.h"
87 #include "AliTOFhitT0.h"
88 #include "AliTOFv4T0.h"
89
90 ClassImp(AliTOFT0)
91
92 //____________________________________________________________________________ 
93   AliTOFT0::AliTOFT0():TTask("AliTOFT0","") 
94 {
95   // ctor
96   fNevents = 0 ;
97 }
98            
99 //____________________________________________________________________________ 
100   AliTOFT0::AliTOFT0(char* headerFile, Int_t nEvents):TTask("AliTOFT0","") 
101 {
102   fNevents=nEvents ; // Number of events for which calculate the T0, 
103                      // default 0: it means all evens in current file
104   fLowerMomBound=1.5; // [GeV/c] default value
105   fUpperMomBound=2. ; // [GeV/c] default value
106   fTimeResolution   = 1.2e-10; // 120 ps by default     
107   fHeadersFile = headerFile ;
108
109   TFile * file = (TFile*) gROOT->GetFile(fHeadersFile.Data() ) ;
110
111   //File was not opened yet
112   if(file == 0){
113     if(fHeadersFile.Contains("rfio"))
114       file =    TFile::Open(fHeadersFile,"update") ;
115     else
116       file = new TFile(fHeadersFile.Data(),"update") ;
117     gAlice = (AliRun *) file->Get("gAlice") ;
118   }
119
120   // add Task to //root/Tasks folder
121   TTask * roottasks = (TTask*)gROOT->GetRootFolder()->FindObject("Tasks") ; 
122   roottasks->Add(this) ; 
123 }
124
125 //____________________________________________________________________________ 
126   AliTOFT0::~AliTOFT0()
127 {
128   // dtor
129 }
130
131 //____________________________________________________________________________
132 void AliTOFT0::Exec(Option_t *option) 
133
134   //
135   // calculate T0 distribution for all events using chisquare 
136   //
137   Int_t ngood=0;
138   Int_t nmisidentified=0;
139   Int_t nmisidentified0=0;
140   Int_t nmisidentified1=0;
141   Int_t nmisidentified2=0;
142   Int_t nmisidentified3=0;
143   Int_t nmisidentified4=0;
144   Int_t nmisidentified5=0;
145   Int_t nmisidentified6=0;
146   Int_t nmisidentified7=0;
147   Int_t nmisidentified8=0;
148   Int_t nmisidentified9=0;
149   Int_t ipartold = -1;
150   Int_t ipart;
151   Int_t selected=0;
152   Int_t istop=0;
153   Float_t timeresolutioninns=fTimeResolution*(1.e+9); // convert in [ns]
154   const Int_t kUPDATE = 5; // for visual option
155   Int_t itimes=0;
156   TCanvas* c1=0;
157   TCanvas* c2=0;
158   TCanvas* c3=0;
159
160   if(strstr(option,"visual")){
161     // Create a new canvas.
162     //c1 = new TCanvas("c1","Dynamic Visual Filling of time zero histo",10,10,500,500);
163     c1 = new TCanvas("c1","Dynamic Visual Filling of time zero histo",10,10,370,370);
164     c1->SetFillColor(35);
165     c1->GetFrame()->SetFillColor(21);
166     c1->GetFrame()->SetBorderSize(6);
167     c1->GetFrame()->SetBorderMode(-1);
168
169     //c2 = new TCanvas("c2","Dynamic Visual Filling of chisquare histo",550,10,500,500);
170     c2 = new TCanvas("c2","Dynamic Visual Filling of chisquare histo",380,10,370,370);
171     c2->SetFillColor(35);
172     c2->GetFrame()->SetFillColor(21);
173     c2->GetFrame()->SetBorderSize(6);
174     c2->GetFrame()->SetBorderMode(-1);
175
176     //c3 = new TCanvas("c3","Dynamic Visual Filling of confidence level histo",280,550,500,500);
177     c3 = new TCanvas("c3","Dynamic Visual Filling of confidence level histo",760,10,370,370);
178     c3->SetFillColor(35);
179     c3->GetFrame()->SetFillColor(21);
180     c3->GetFrame()->SetBorderSize(6);
181     c3->GetFrame()->SetBorderMode(-1);
182   }
183
184   if(strstr(option,"tim") || strstr(option,"all"))
185     gBenchmark->Start("TOFT0");
186
187   TH1F *htzerobest= new TH1F("htzerobest","T0 for best assignment",200,-1.,1.);
188   TH1F* hchibest  = new TH1F("hchibest","ChiSquare Min Distribution",80,0.,40.);
189   TH1F* hchibestconflevel  = new TH1F("hchibestconflevel","ChiSquare Min Confidence Level",10,0.,1.);
190
191   // setting histo colors
192   if(strstr(option,"visual")){
193     htzerobest->SetFillColor(48);
194     hchibest->SetFillColor(50);
195     hchibestconflevel->SetFillColor(52);
196   }
197
198   Int_t   assparticle[10]={3,3,3,3,3,3,3,3,3,3};
199   Int_t   truparticle[10]={3,3,3,3,3,3,3,3,3,3};
200   Float_t t0best=999.;
201   Float_t timeofflight[10]={0.,0.,0.,0.,0.,0.,0.,0.,0.,0.};
202   Float_t momentum[10]={0.,0.,0.,0.,0.,0.,0.,0.,0.,0.};
203   Float_t timezero[10];
204   Float_t weightedtimezero[10];
205   Float_t beta[10]={0.,0.,0.,0.,0.,0.,0.,0.,0.,0.};
206   Float_t sqMomError[10]={0.,0.,0.,0.,0.,0.,0.,0.,0.,0.};
207   Float_t sqTrackError[10]={0.,0.,0.,0.,0.,0.,0.,0.,0.,0.};
208   Float_t massarray[3]={0.13957,0.493677,0.9382723};
209   Float_t dummychisquare=0.;
210   Float_t chisquare=999.;
211   Float_t tracktoflen[10]={0.,0.,0.,0.,0.,0.,0.,0.,0.,0.};
212
213   AliTOF *TOF = (AliTOF *) gAlice->GetDetector ("TOF");
214
215   if (!TOF) {
216     Error("AliTOFT0","TOF not found");
217     return;
218   }
219
220   if(strstr(option,"all")){
221     cout << "Selecting primary tracks with momentum between " << fLowerMomBound << " GeV/c and " << fUpperMomBound << " GeV/c" << endl;
222     cout << "Memorandum: 0 means PION | 1 means KAON | 2 means PROTON" << endl;
223   }
224
225   if (fNevents == 0) fNevents = (Int_t) gAlice->TreeE()->GetEntries();
226
227   for (Int_t ievent = 0; ievent < fNevents; ievent++) {
228     gAlice->GetEvent(ievent);
229     TTree *TH = TOF->TreeH ();
230     if (!TH)
231       return;
232     TParticle*    particle;
233     AliTOFhitT0*  tofHit;
234     TClonesArray* TOFhits = TOF->Hits();
235
236     Int_t lasttrack=-1;
237     Int_t nset=0;
238
239     TH->SetBranchStatus("*",0); // switch off all branches
240     TH->SetBranchStatus("TOF*",1); // switch on only TOF
241
242     // Start loop on primary tracks in the hits containers
243
244     Int_t ntracks = static_cast<Int_t>(TH->GetEntries());
245     for (Int_t track = 0; track < ntracks; track++)
246     {
247       if(nset>=5) break; // check on the number of set analyzed
248       
249       gAlice->ResetHits();
250       TH->GetEvent(track);
251       particle = gAlice->Particle(track);
252       Int_t nhits = TOFhits->GetEntriesFast();
253
254       for (Int_t hit = 0; hit < nhits; hit++)
255       {
256         tofHit = (AliTOFhitT0 *) TOFhits->UncheckedAt(hit);
257         ipart    = tofHit->GetTrack();
258         // check to discard the case when the same particle is selected more than one
259         // time 
260
261         if (ipart != ipartold){
262           
263           particle = (TParticle*)gAlice->Particle(ipart);
264           
265           Float_t idealtime=tofHit->GetTof();
266           //       Float_t time=idealtime;
267           Float_t time   = gRandom->Gaus(idealtime, fTimeResolution);
268           Float_t toflen=tofHit->GetLen();
269           toflen=toflen/100.; // toflen given in m
270           Int_t pdg   = particle->GetPdgCode();
271           Int_t abspdg   =TMath::Abs(pdg);
272           Float_t idealmom  = particle->P();
273           Float_t momres=idealmom*0.025; // 2.5% res token into account for all momenta
274           Float_t mom =gRandom->Gaus(idealmom,momres);
275
276           Bool_t isgoodpart=(abspdg==211 || abspdg==2212 || abspdg==321);
277
278           time*=1.E+9; // tof given in nanoseconds         
279           if (particle->GetFirstMother() < 0 && isgoodpart && mom<=fUpperMomBound && mom>=fLowerMomBound){
280             selected+=1;
281             istop=selected;
282             if(istop>10) break;
283             Int_t index=selected-1;
284             timeofflight[index]=time;
285             tracktoflen[index]=toflen;
286             momentum[index]=mom;
287             //      cout << timeofflight[index] << " " << tracktoflen[index] << " " << momentum[index] << endl;
288             switch (abspdg) {
289             case 211:
290               truparticle[index]=0;
291               break ;
292             case 321:
293               truparticle[index]=1;
294               break ;
295             case 2212: 
296               truparticle[index]=2;
297               break ;
298             }
299             
300           }
301           ipartold = ipart;
302           
303           if(istop==10){ // start analysis on current set
304             nset+=1;
305             lasttrack=track;
306             istop=0;
307             selected=0;
308             //cout << "starting t0 calculation for current set" << endl;
309             for (Int_t i1=0; i1<3;i1++) {
310               beta[0]=momentum[0]/sqrt(massarray[i1]*massarray[i1]+momentum[0]*momentum[0]);
311               for (Int_t i2=0; i2<3;i2++) { 
312                 beta[1]=momentum[1]/sqrt(massarray[i2]*massarray[i2]+momentum[1]*momentum[1]);
313                 for (Int_t i3=0; i3<3;i3++) {
314                   beta[2]=momentum[2]/sqrt(massarray[i3]*massarray[i3]+momentum[2]*momentum[2]);
315                   for (Int_t i4=0; i4<3;i4++) {
316                     beta[3]=momentum[3]/sqrt(massarray[i4]*massarray[i4]+momentum[3]*momentum[3]);
317                     for (Int_t i5=0; i5<3;i5++) {
318                       beta[4]=momentum[4]/sqrt(massarray[i5]*massarray[i5]+momentum[4]*momentum[4]);
319                       for (Int_t i6=0; i6<3;i6++) {
320                         beta[5]=momentum[5]/sqrt(massarray[i6]*massarray[i6]+momentum[5]*momentum[5]);
321                         for (Int_t i7=0; i7<3;i7++) { 
322                           beta[6]=momentum[6]/sqrt(massarray[i7]*massarray[i7]+momentum[6]*momentum[6]);
323                           for (Int_t i8=0; i8<3;i8++) {
324                             beta[7]=momentum[7]/sqrt(massarray[i8]*massarray[i8]+momentum[7]*momentum[7]);
325                             for (Int_t i9=0; i9<3;i9++) {
326                               beta[8]=momentum[8]/sqrt(massarray[i9]*massarray[i9]+momentum[8]*momentum[8]);
327                               for (Int_t i10=0; i10<3;i10++) {  
328                                 beta[9]=momentum[9]/sqrt(massarray[i10]*massarray[i10]+momentum[9]*momentum[9]);
329                                 
330                                 Float_t meantzero=0.;
331                                 Float_t sumAllweights=0.;
332                                 for (Int_t itz=0; itz<10;itz++) {
333                                   sqMomError[itz]=((1.-beta[itz]*beta[itz])*0.025)*((1.-beta[itz]*beta[itz])*0.025)*(tracktoflen[itz]/(0.299792*beta[itz]))*(tracktoflen[itz]/(0.299792*beta[itz])); // this gives the square of the momentum error in nanoseconds
334                                   sqTrackError[itz]=(timeresolutioninns*timeresolutioninns+sqMomError[itz]); // total error for the current track
335                                   sumAllweights+=1./sqTrackError[itz];
336
337                                   timezero[itz]=(tracktoflen[itz]/(beta[itz]*0.299792))-timeofflight[itz];
338                                   weightedtimezero[itz]=((tracktoflen[itz]/(beta[itz]*0.299792))-timeofflight[itz])/sqTrackError[itz];// weighted time zero for current track
339                                   meantzero+=weightedtimezero[itz];
340                                 } // end loop for (Int_t itz=0; itz<10;itz++)
341                                 meantzero=meantzero/sumAllweights; // it is given in [ns]
342                                 
343                                 dummychisquare=0.;
344                                 // calculate the chisquare for the current assignment
345                                 for (Int_t icsq=0; icsq<10;icsq++) {
346                                   dummychisquare+=(timezero[icsq]-meantzero)*(timezero[icsq]-meantzero)/sqTrackError[icsq];
347                                 } // end loop for (Int_t icsq=0; icsq<10;icsq++) 
348
349                                 if(dummychisquare<=chisquare){
350                                   assparticle[0]=i1;
351                                   assparticle[1]=i2;
352                                   assparticle[2]=i3;
353                                   assparticle[3]=i4;
354                                   assparticle[4]=i5;
355                                   assparticle[5]=i6;
356                                   assparticle[6]=i7;
357                                   assparticle[7]=i8;
358                                   assparticle[8]=i9;
359                                   assparticle[9]=i10;
360                                   chisquare=dummychisquare;
361                                   t0best=meantzero;
362                                 } // close if(dummychisquare<=chisquare)
363                                 
364                               } // end loop on i10
365                             } // end loop on i9
366                           } // end loop on i8
367                         } // end loop on i7
368                       } // end loop on i6
369                     } // end loop on i5
370                   } // end loop on i4
371                 } // end loop on i3
372               } // end loop on i2
373             } // end loop on i1
374
375             if(truparticle[0]==assparticle[0] && truparticle[1]==assparticle[1] && truparticle[2]==assparticle[2]  && truparticle[3]==assparticle[3] && truparticle[4]==assparticle[4]&& truparticle[5]==assparticle[5] && truparticle[6]==assparticle[6] && truparticle[7]==assparticle[7]  && truparticle[8]==assparticle[8] && truparticle[9]==assparticle[9]) ngood+=1;
376             if(truparticle[0]!=assparticle[0]) nmisidentified0+=1;
377             if(truparticle[1]!=assparticle[1]) nmisidentified1+=1;
378             if(truparticle[2]!=assparticle[2]) nmisidentified2+=1;
379             if(truparticle[3]!=assparticle[3]) nmisidentified3+=1;
380             if(truparticle[4]!=assparticle[4]) nmisidentified4+=1;
381             if(truparticle[5]!=assparticle[5]) nmisidentified5+=1;
382             if(truparticle[6]!=assparticle[6]) nmisidentified6+=1;
383             if(truparticle[7]!=assparticle[7]) nmisidentified7+=1;
384             if(truparticle[8]!=assparticle[8]) nmisidentified8+=1;
385             if(truparticle[9]!=assparticle[9]) nmisidentified9+=1;
386             // filling histos
387             htzerobest->Fill(t0best);
388             hchibest->Fill(chisquare);
389             Double_t dblechisquare=(Double_t)chisquare;
390             Float_t confLevel=(Float_t)TMath::Prob(dblechisquare,9); // ndf 10-1=9
391             hchibestconflevel->Fill(confLevel);
392             itimes++;
393             if(strstr(option,"all")){
394               cout << "True Assignment " << truparticle[0] << truparticle[1] << truparticle[2] << truparticle[3] << truparticle[4] << truparticle[5] << truparticle[6] << truparticle[7] << truparticle[8] << truparticle[9] <<endl;
395               cout << "Best Assignment " << assparticle[0] << assparticle[1] << assparticle[2] << assparticle[3] << assparticle[4] << assparticle[5] << assparticle[6] << assparticle[7] << assparticle[8] << assparticle[9] << endl;
396               cout << "Minimum ChiSquare for current set    " << chisquare << endl;
397               cout << "Confidence Level (Minimum ChiSquare) " << confLevel << endl;
398             }
399             if (strstr(option,"visual") && itimes && (itimes%kUPDATE) == 0) {
400               if (itimes == kUPDATE){
401                 c1->cd();
402                 htzerobest->Draw();
403                 c2->cd();
404                 hchibest->Draw();
405                 c3->cd();
406                 hchibestconflevel->Draw();
407               }
408               c1->Modified();
409               c1->Update();
410               c2->Modified();
411               c2->Update();
412               c3->Modified();
413               c3->Update();
414               if (gSystem->ProcessEvents())
415                 break;
416             }
417             chisquare=999.;
418             t0best=999.;
419             
420           } // end for the current set. close if(istop==5)
421         } // end condition on ipartold
422       } // end loop on hits for the current track
423       if(istop>=10) break;
424     } // end loop on ntracks  
425   } //event loop
426   
427   if(strstr(option,"all")){
428     nmisidentified=(nmisidentified0+nmisidentified1+nmisidentified2+nmisidentified3+nmisidentified4+nmisidentified5+nmisidentified6+nmisidentified7+nmisidentified8+nmisidentified9);
429     cout << "total number of tracks token into account  " << 10*5*fNevents << endl;
430     Float_t badPercentage=100.*(Float_t)nmisidentified/(10*5*fNevents);
431     cout << "total misidentified                        " << nmisidentified << "("<< badPercentage << "%)" <<endl;
432     cout << "Total Number of set token into account     " << 5*fNevents << endl;
433     Float_t goodSetPercentage=100.*(Float_t)ngood/(5*fNevents);
434     cout << "Number of set with no misidentified tracks " << ngood << "("<< goodSetPercentage << "%)" <<endl;
435   }
436
437   // free used memory for canvas
438   delete c1; c1=0;
439   delete c2; c2=0;
440   delete c3; c3=0;
441
442   // generating output filename only if not previously specified using SetTZeroFile
443   char outFileName[70];
444   strcpy(outFileName,"ht010tr120ps"); // global time resolution has to be converted from Int_t to char
445                                       // in order to have in the output filename this parameter
446   strcat(outFileName,fHeadersFile);
447
448   if(fT0File.IsNull()) fT0File=outFileName;
449
450   TFile* houtfile = new TFile(fT0File,"recreate");
451   houtfile->cd();
452   htzerobest->Write(0,TObject::kOverwrite);
453   hchibest->Write(0,TObject::kOverwrite);
454   hchibestconflevel->Write(0,TObject::kOverwrite);
455   houtfile->Close();  
456   
457   
458   if(strstr(option,"tim") || strstr(option,"all")){
459     gBenchmark->Stop("TOFT0");
460     cout << "AliTOFT0:" << endl ;
461     cout << "   took " << gBenchmark->GetCpuTime("TOFT0") << " seconds in order to calculate T0 " 
462          <<  gBenchmark->GetCpuTime("TOFT0")/fNevents << " seconds per event " << endl ;
463     cout << endl ;
464   }
465 }
466  
467 //__________________________________________________________________
468 void AliTOFT0::SetTZeroFile(char * file ){
469   cout << "Destination file : " << file << endl ;
470   fT0File=file;
471 }
472 //__________________________________________________________________
473 void AliTOFT0::Print(Option_t* option)const
474 {
475   cout << "------------------- "<< GetName() << " -------------" << endl ;
476   if(!fT0File.IsNull())
477     cout << "  Writing T0 Distribution to file  " << (char*) fT0File.Data() << endl ;
478 }
479
480 //__________________________________________________________________
481 Bool_t AliTOFT0::operator==( AliTOFT0 const &tzero )const
482 {
483   // Equal operator.
484   // 
485
486   if( (fTimeResolution==tzero.fTimeResolution)&&(fLowerMomBound==tzero.fLowerMomBound)&&(fUpperMomBound==tzero.fUpperMomBound))
487     return kTRUE ;
488   else
489     return kFALSE ;
490 }
491