]> git.uio.no Git - u/mrichter/AliRoot.git/blob - STEER/STEERBase/AliPIDResponse.cxx
https://savannah.cern.ch/bugs/?102386
[u/mrichter/AliRoot.git] / STEER / STEERBase / AliPIDResponse.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: AliPIDResponse.cxx 46193 2010-12-21 09:00:14Z wiechula $ */
17
18 //-----------------------------------------------------------------
19 //        Base class for handling the pid response               //
20 //        functions of all detectors                             //
21 //        and give access to the nsigmas                         //
22 //                                                               //
23 //   Origin: Jens Wiechula, Uni Tuebingen, jens.wiechula@cern.ch //
24 //-----------------------------------------------------------------
25
26 #include <TList.h>
27 #include <TObjArray.h>
28 #include <TPRegexp.h>
29 #include <TF1.h>
30 #include <TH2D.h>
31 #include <TSpline.h>
32 #include <TFile.h>
33 #include <TArrayI.h>
34 #include <TArrayF.h>
35 #include <TLinearFitter.h>
36 #include <TSystem.h>
37 #include <TMD5.h>
38
39 #include <AliVEvent.h>
40 #include <AliVTrack.h>
41 #include <AliLog.h>
42 #include <AliPID.h>
43 #include <AliOADBContainer.h>
44 #include <AliTRDPIDResponseObject.h>
45 #include <AliTOFPIDParams.h>
46 #include <AliHMPIDPIDParams.h>
47
48 #include "AliPIDResponse.h"
49 #include "AliDetectorPID.h"
50
51 #include "AliCentrality.h"
52
53 ClassImp(AliPIDResponse);
54
55 AliPIDResponse::AliPIDResponse(Bool_t isMC/*=kFALSE*/) :
56 TNamed("PIDResponse","PIDResponse"),
57 fITSResponse(isMC),
58 fTPCResponse(),
59 fTRDResponse(),
60 fTOFResponse(),
61 fHMPIDResponse(),
62 fEMCALResponse(),
63 fRange(5.),
64 fITSPIDmethod(kITSTruncMean),
65 fTuneMConData(kFALSE),
66 fTuneMConDataMask(kDetTOF|kDetTPC),
67 fIsMC(isMC),
68 fCachePID(kTRUE),
69 fOADBPath(),
70 fCustomTPCpidResponse(),
71 fBeamType("PP"),
72 fLHCperiod(),
73 fMCperiodTPC(),
74 fMCperiodUser(),
75 fCurrentFile(),
76 fCurrentAliRootRev(-1),
77 fRecoPass(0),
78 fRecoPassUser(-1),
79 fRun(-1),
80 fOldRun(-1),
81 fResT0A(75.),
82 fResT0C(65.),
83 fResT0AC(55.),
84 fArrPidResponseMaster(NULL),
85 fResolutionCorrection(NULL),
86 fOADBvoltageMaps(NULL),
87 fUseTPCEtaCorrection(kFALSE),
88 fUseTPCMultiplicityCorrection(kFALSE),
89 fTRDPIDResponseObject(NULL),
90 fTOFtail(0.9),
91 fTOFPIDParams(NULL),
92 fHMPIDPIDParams(NULL),
93 fEMCALPIDParams(NULL),
94 fCurrentEvent(NULL),
95 fCurrCentrality(0.0)
96 {
97   //
98   // default ctor
99   //
100   AliLog::SetClassDebugLevel("AliPIDResponse",0);
101   AliLog::SetClassDebugLevel("AliESDpid",0);
102   AliLog::SetClassDebugLevel("AliAODpidUtil",0);
103
104 }
105
106 //______________________________________________________________________________
107 AliPIDResponse::~AliPIDResponse()
108 {
109   //
110   // dtor
111   //
112   delete fArrPidResponseMaster;
113   delete fTRDPIDResponseObject;
114   delete fTOFPIDParams;
115 }
116
117 //______________________________________________________________________________
118 AliPIDResponse::AliPIDResponse(const AliPIDResponse &other) :
119 TNamed(other),
120 fITSResponse(other.fITSResponse),
121 fTPCResponse(other.fTPCResponse),
122 fTRDResponse(other.fTRDResponse),
123 fTOFResponse(other.fTOFResponse),
124 fHMPIDResponse(other.fHMPIDResponse),
125 fEMCALResponse(other.fEMCALResponse),
126 fRange(other.fRange),
127 fITSPIDmethod(other.fITSPIDmethod),
128 fTuneMConData(other.fTuneMConData),
129 fTuneMConDataMask(other.fTuneMConDataMask),
130 fIsMC(other.fIsMC),
131 fCachePID(other.fCachePID),
132 fOADBPath(other.fOADBPath),
133 fCustomTPCpidResponse(other.fCustomTPCpidResponse),
134 fBeamType("PP"),
135 fLHCperiod(),
136 fMCperiodTPC(),
137 fMCperiodUser(other.fMCperiodUser),
138 fCurrentFile(),
139 fCurrentAliRootRev(other.fCurrentAliRootRev),
140 fRecoPass(0),
141 fRecoPassUser(other.fRecoPassUser),
142 fRun(-1),
143 fOldRun(-1),
144 fResT0A(75.),
145 fResT0C(65.),
146 fResT0AC(55.),
147 fArrPidResponseMaster(NULL),
148 fResolutionCorrection(NULL),
149 fOADBvoltageMaps(NULL),
150 fUseTPCEtaCorrection(other.fUseTPCEtaCorrection),
151 fUseTPCMultiplicityCorrection(other.fUseTPCMultiplicityCorrection),
152 fTRDPIDResponseObject(NULL),
153 fTOFtail(0.9),
154 fTOFPIDParams(NULL),
155 fHMPIDPIDParams(NULL),
156 fEMCALPIDParams(NULL),
157 fCurrentEvent(NULL),
158 fCurrCentrality(0.0)
159 {
160   //
161   // copy ctor
162   //
163 }
164
165 //______________________________________________________________________________
166 AliPIDResponse& AliPIDResponse::operator=(const AliPIDResponse &other)
167 {
168   //
169   // copy ctor
170   //
171   if(this!=&other) {
172     delete fArrPidResponseMaster;
173     TNamed::operator=(other);
174     fITSResponse=other.fITSResponse;
175     fTPCResponse=other.fTPCResponse;
176     fTRDResponse=other.fTRDResponse;
177     fTOFResponse=other.fTOFResponse;
178     fHMPIDResponse=other.fHMPIDResponse;
179     fEMCALResponse=other.fEMCALResponse;
180     fRange=other.fRange;
181     fITSPIDmethod=other.fITSPIDmethod;
182     fOADBPath=other.fOADBPath;
183     fCustomTPCpidResponse=other.fCustomTPCpidResponse;
184     fTuneMConData=other.fTuneMConData;
185     fTuneMConDataMask=other.fTuneMConDataMask;
186     fIsMC=other.fIsMC;
187     fCachePID=other.fCachePID;
188     fBeamType="PP";
189     fLHCperiod="";
190     fMCperiodTPC="";
191     fMCperiodUser=other.fMCperiodUser;
192     fCurrentFile="";
193     fCurrentAliRootRev=other.fCurrentAliRootRev;
194     fRecoPass=0;
195     fRecoPassUser=other.fRecoPassUser;
196     fRun=-1;
197     fOldRun=-1;
198     fResT0A=75.;
199     fResT0C=65.;
200     fResT0AC=55.;
201     fArrPidResponseMaster=NULL;
202     fResolutionCorrection=NULL;
203     fOADBvoltageMaps=NULL;
204     fUseTPCEtaCorrection=other.fUseTPCEtaCorrection;
205     fUseTPCMultiplicityCorrection=other.fUseTPCMultiplicityCorrection;
206     fTRDPIDResponseObject=NULL;
207     fEMCALPIDParams=NULL;
208     fTOFtail=0.9;
209     fTOFPIDParams=NULL;
210     fHMPIDPIDParams=NULL;
211     fCurrentEvent=other.fCurrentEvent;
212
213   }
214   return *this;
215 }
216
217 //______________________________________________________________________________
218 Float_t AliPIDResponse::NumberOfSigmas(EDetector detector, const AliVParticle *vtrack, AliPID::EParticleType type) const
219 {
220   //
221   // NumberOfSigmas for 'detCode'
222   //
223   
224   const AliVTrack *track=static_cast<const AliVTrack*>(vtrack);
225   // look for cached value first
226   const AliDetectorPID *detPID=track->GetDetectorPID();
227   
228   if ( detPID && detPID->HasNumberOfSigmas(detector)){
229     return detPID->GetNumberOfSigmas(detector, type);
230   } else if (fCachePID) {
231     FillTrackDetectorPID(track, detector);
232     detPID=track->GetDetectorPID();
233     return detPID->GetNumberOfSigmas(detector, type);
234   }
235   
236   return GetNumberOfSigmas(detector, track, type);
237 }
238
239 //______________________________________________________________________________
240 AliPIDResponse::EDetPidStatus AliPIDResponse::NumberOfSigmas(EDetector detCode, const AliVParticle *track,
241                                                              AliPID::EParticleType type, Double_t &val) const
242 {
243   //
244   // NumberOfSigmas with detector status as return value
245   //
246   
247   val=NumberOfSigmas(detCode, track, type);
248   return CheckPIDStatus(detCode, (AliVTrack*)track);
249 }
250
251 //______________________________________________________________________________
252 // public buffered versions of the PID calculation
253 //
254
255 //______________________________________________________________________________
256 Float_t AliPIDResponse::NumberOfSigmasITS(const AliVParticle *vtrack, AliPID::EParticleType type) const
257 {
258   //
259   // Calculate the number of sigmas in the ITS
260   //
261   
262   return NumberOfSigmas(kITS, vtrack, type);
263 }
264
265 //______________________________________________________________________________
266 Float_t AliPIDResponse::NumberOfSigmasTPC(const AliVParticle *vtrack, AliPID::EParticleType type) const
267 {
268   //
269   // Calculate the number of sigmas in the TPC
270   //
271   
272   return NumberOfSigmas(kTPC, vtrack, type);
273 }
274
275 //______________________________________________________________________________
276 Float_t AliPIDResponse::NumberOfSigmasTPC( const AliVParticle *vtrack, 
277                                            AliPID::EParticleType type,
278                                            AliTPCPIDResponse::ETPCdEdxSource dedxSource) const
279 {
280   //get number of sigmas according the selected TPC gain configuration scenario
281   const AliVTrack *track=static_cast<const AliVTrack*>(vtrack);
282
283   Float_t nSigma=fTPCResponse.GetNumberOfSigmas(track, type, dedxSource, fUseTPCEtaCorrection, fUseTPCMultiplicityCorrection);
284
285   return nSigma;
286 }
287
288 //______________________________________________________________________________
289 Float_t AliPIDResponse::NumberOfSigmasTOF(const AliVParticle *vtrack, AliPID::EParticleType type) const
290 {
291   //
292   // Calculate the number of sigmas in the TOF
293   //
294   
295   return NumberOfSigmas(kTOF, vtrack, type);
296 }
297
298 //______________________________________________________________________________
299 Float_t AliPIDResponse::NumberOfSigmasHMPID(const AliVParticle *vtrack, AliPID::EParticleType type) const
300 {
301   //
302   // Calculate the number of sigmas in the EMCAL
303   //
304   
305   return NumberOfSigmas(kHMPID, vtrack, type);
306 }
307
308 //______________________________________________________________________________
309 Float_t AliPIDResponse::NumberOfSigmasEMCAL(const AliVParticle *vtrack, AliPID::EParticleType type) const
310 {
311   //
312   // Calculate the number of sigmas in the EMCAL
313   //
314   
315   return NumberOfSigmas(kEMCAL, vtrack, type);
316 }
317
318 //______________________________________________________________________________
319 Float_t  AliPIDResponse::NumberOfSigmasEMCAL(const AliVParticle *vtrack, AliPID::EParticleType type, Double_t &eop, Double_t showershape[4])  const
320 {
321   //
322   // emcal nsigma with eop and showershape
323   //
324   AliVTrack *track=(AliVTrack*)vtrack;
325   
326   AliVCluster *matchedClus = NULL;
327
328   Double_t mom     = -1.; 
329   Double_t pt      = -1.; 
330   Double_t EovP    = -1.;
331   Double_t fClsE   = -1.;
332
333   // initialize eop and shower shape parameters
334   eop = -1.;
335   for(Int_t i = 0; i < 4; i++){
336     showershape[i] = -1.;
337   }
338   
339   Int_t nMatchClus = -1;
340   Int_t charge     = 0;
341   
342   // Track matching
343   nMatchClus = track->GetEMCALcluster();
344   if(nMatchClus > -1){
345
346     mom    = track->P();
347     pt     = track->Pt();
348     charge = track->Charge();
349     
350     matchedClus = (AliVCluster*)fCurrentEvent->GetCaloCluster(nMatchClus);
351     
352     if(matchedClus){
353       
354       // matched cluster is EMCAL
355       if(matchedClus->IsEMCAL()){
356         
357         fClsE       = matchedClus->E();
358         EovP        = fClsE/mom;
359         
360         // fill used EMCAL variables here
361         eop            = EovP; // E/p
362         showershape[0] = matchedClus->GetNCells(); // number of cells in cluster
363         showershape[1] = matchedClus->GetM02(); // long axis
364         showershape[2] = matchedClus->GetM20(); // short axis
365         showershape[3] = matchedClus->GetDispersion(); // dispersion
366
367         // look for cached value first
368         const AliDetectorPID *detPID=track->GetDetectorPID();
369         const EDetector detector=kEMCAL;
370         
371         if ( detPID && detPID->HasNumberOfSigmas(detector)){
372           return detPID->GetNumberOfSigmas(detector, type);
373         } else if (fCachePID) {
374           FillTrackDetectorPID(track, detector);
375           detPID=track->GetDetectorPID();
376           return detPID->GetNumberOfSigmas(detector, type);
377         }
378         
379         // NSigma value really meaningful only for electrons!
380         return fEMCALResponse.GetNumberOfSigmas(pt,EovP,type,charge);
381       }
382     }
383   }
384   return -999;
385 }
386
387 //______________________________________________________________________________
388 AliPIDResponse::EDetPidStatus AliPIDResponse::GetSignalDelta(EDetector detector, const AliVParticle *track, AliPID::EParticleType type, Double_t &val, Bool_t ratio/*=kFALSE*/) const
389 {
390   //
391   //
392   //
393   val=-9999.;
394   switch (detector){
395     case kITS:   return GetSignalDeltaITS(track,type,val,ratio); break;
396     case kTPC:   return GetSignalDeltaTPC(track,type,val,ratio); break;
397     case kTOF:   return GetSignalDeltaTOF(track,type,val,ratio); break;
398     case kHMPID: return GetSignalDeltaHMPID(track,type,val,ratio); break;
399     default: return kDetNoSignal;
400   }
401   return kDetNoSignal;
402 }
403
404 //______________________________________________________________________________
405 Double_t AliPIDResponse::GetSignalDelta(EDetector detCode, const AliVParticle *track, AliPID::EParticleType type, Bool_t ratio/*=kFALSE*/) const
406 {
407   //
408   //
409   //
410   Double_t val=-9999.;
411   EDetPidStatus stat=GetSignalDelta(detCode, track, type, val, ratio);
412   if ( stat==kDetNoSignal ) val=-9999.;
413   return val;
414 }
415
416 //______________________________________________________________________________
417 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputePIDProbability  (EDetCode  detCode, const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
418 {
419   // Compute PID response of 'detCode'
420   
421   // find detector code from detector bit mask
422   Int_t detector=-1;
423   for (Int_t idet=0; idet<kNdetectors; ++idet) if ( (detCode&(1<<idet)) ) { detector=idet; break; }
424   if (detector==-1) return kDetNoSignal;
425
426   return ComputePIDProbability((EDetector)detector, track, nSpecies, p);
427 }
428
429 //______________________________________________________________________________
430 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputePIDProbability  (EDetector detector,  const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
431 {
432   //
433   // Compute PID response of 'detector'
434   //
435
436   const AliDetectorPID *detPID=track->GetDetectorPID();
437
438   if ( detPID && detPID->HasRawProbability(detector)){
439     return detPID->GetRawProbability(detector, p, nSpecies);
440   } else if (fCachePID) {
441     FillTrackDetectorPID(track, detector);
442     detPID=track->GetDetectorPID();
443     return detPID->GetRawProbability(detector, p, nSpecies);
444   }
445   
446   //if no caching return values calculated from scratch
447   return GetComputePIDProbability(detector, track, nSpecies, p);
448 }
449
450 //______________________________________________________________________________
451 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeITSProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
452 {
453   // Compute PID response for the ITS
454   return ComputePIDProbability(kITS, track, nSpecies, p);
455 }
456
457 //______________________________________________________________________________
458 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeTPCProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
459 {
460   // Compute PID response for the TPC
461   return ComputePIDProbability(kTPC, track, nSpecies, p);
462 }
463
464 //______________________________________________________________________________
465 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeTOFProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
466 {
467   // Compute PID response for the
468   return ComputePIDProbability(kTOF, track, nSpecies, p);
469 }
470
471 //______________________________________________________________________________
472 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeTRDProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
473 {
474   // Compute PID response for the
475   return ComputePIDProbability(kTRD, track, nSpecies, p);
476 }
477
478 //______________________________________________________________________________
479 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeEMCALProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
480 {
481   // Compute PID response for the EMCAL
482   return ComputePIDProbability(kEMCAL, track, nSpecies, p);
483 }
484 //______________________________________________________________________________
485 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputePHOSProbability (const AliVTrack */*track*/, Int_t nSpecies, Double_t p[]) const
486 {
487   // Compute PID response for the PHOS
488   
489   // set flat distribution (no decision)
490   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
491   return kDetNoSignal;
492 }
493
494 //______________________________________________________________________________
495 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeHMPIDProbability(const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
496 {
497   // Compute PID response for the HMPID
498   return ComputePIDProbability(kHMPID, track, nSpecies, p);
499 }
500
501 //______________________________________________________________________________
502 AliPIDResponse::EDetPidStatus AliPIDResponse::ComputeTRDProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[],AliTRDPIDResponse::ETRDPIDMethod PIDmethod) const
503 {
504   // Compute PID response for the
505   return GetComputeTRDProbability(track, nSpecies, p, PIDmethod);
506 }
507
508 //______________________________________________________________________________
509 AliPIDResponse::EDetPidStatus AliPIDResponse::CheckPIDStatus(EDetector detector, const AliVTrack *track) const
510 {
511   // calculate detector pid status
512   
513   const Int_t iDetCode=(Int_t)detector;
514   if (iDetCode<0||iDetCode>=kNdetectors) return kDetNoSignal;
515   const AliDetectorPID *detPID=track->GetDetectorPID();
516   
517   if ( detPID ){
518     return detPID->GetPIDStatus(detector);
519   } else if (fCachePID) {
520     FillTrackDetectorPID(track, detector);
521     detPID=track->GetDetectorPID();
522     return detPID->GetPIDStatus(detector);
523   }
524   
525   // if not buffered and no buffering is requested
526   return GetPIDStatus(detector, track);
527 }
528
529 //______________________________________________________________________________
530 void AliPIDResponse::InitialiseEvent(AliVEvent *event, Int_t pass, Int_t run)
531 {
532   //
533   // Apply settings for the current event
534   //
535   fRecoPass=pass;
536   
537
538   fCurrentEvent=NULL;
539   if (!event) return;
540   fCurrentEvent=event;
541   if (run>0) fRun=run;
542   else fRun=event->GetRunNumber();
543   
544   if (fRun!=fOldRun){
545     ExecNewRun();
546     fOldRun=fRun;
547   }
548   
549   //TPC resolution parametrisation PbPb
550   if ( fResolutionCorrection ){
551     Double_t corrSigma=fResolutionCorrection->Eval(GetTPCMultiplicityBin(event));
552     fTPCResponse.SetSigma(3.79301e-03*corrSigma, 2.21280e+04);
553   }
554   
555   // Set up TPC multiplicity for PbPb
556   //TODO Will NOT give the desired number for AODs -> Needs new variable/function in future.
557   // Fatal, if AOD event and correction enabled
558   //printf("DETECTED class: %s (%d)\n\n\n\n", event->IsA()->GetName(), fUseTPCMultiplicityCorrection);//TODO
559   if (fUseTPCMultiplicityCorrection && strcmp(event->IsA()->GetName(), "AliESDEvent") != 0) {
560     AliFatal("TPC multiplicity correction is enabled, but will NOT work for AOD events, only for ESD => Disabled multiplicity correction!");
561     fUseTPCMultiplicityCorrection = kFALSE;
562   }
563   
564   if (fUseTPCMultiplicityCorrection)
565     fTPCResponse.SetCurrentEventMultiplicity(event->GetNumberOfTracks());
566   else
567     fTPCResponse.SetCurrentEventMultiplicity(0);
568   
569   //TOF resolution
570   SetTOFResponse(event, (AliPIDResponse::EStartTimeType_t)fTOFPIDParams->GetStartTimeMethod());
571
572
573   // Get and set centrality
574   AliCentrality *centrality = event->GetCentrality();
575   if(centrality){
576     fCurrCentrality = centrality->GetCentralityPercentile("V0M");
577   }
578   else{
579     fCurrCentrality = -1;
580   }
581
582   // Set centrality percentile for EMCAL
583   fEMCALResponse.SetCentrality(fCurrCentrality);
584
585   // switch off some TOF channel according to OADB to match data TOF matching eff 
586   if (fTuneMConData && ((fTuneMConDataMask & kDetTOF) == kDetTOF) && fTOFPIDParams->GetTOFmatchingLossMC() > 0.01){
587     Int_t ntrk = event->GetNumberOfTracks();
588     for(Int_t i=0;i < ntrk;i++){
589       AliVParticle *trk = event->GetTrack(i);
590       Int_t channel = GetTOFResponse().GetTOFchannel(trk);
591       Int_t swoffEachOfThem = Int_t(100./fTOFPIDParams->GetTOFmatchingLossMC() + 0.5);
592       if(!(channel%swoffEachOfThem)) ((AliVTrack *) trk)->ResetStatus(AliVTrack::kTOFout);
593     }
594   }
595
596 }
597
598 //______________________________________________________________________________
599 void AliPIDResponse::ExecNewRun()
600 {
601   //
602   // Things to Execute upon a new run
603   //
604   SetRecoInfo();
605   
606   SetITSParametrisation();
607   
608   SetTPCPidResponseMaster();
609   SetTPCParametrisation();
610   SetTPCEtaMaps();
611
612   SetTRDPidResponseMaster(); 
613   InitializeTRDResponse();
614
615   SetEMCALPidResponseMaster(); 
616   InitializeEMCALResponse();
617   
618   SetTOFPidResponseMaster();
619   InitializeTOFResponse();
620
621   SetHMPIDPidResponseMaster();
622   InitializeHMPIDResponse();
623
624   if (fCurrentEvent) fTPCResponse.SetMagField(fCurrentEvent->GetMagneticField());
625 }
626
627 //______________________________________________________________________________
628 Double_t AliPIDResponse::GetTPCMultiplicityBin(const AliVEvent * const event)
629 {
630   //
631   // Get TPC multiplicity in bins of 150
632   //
633   
634   const AliVVertex* vertexTPC = event->GetPrimaryVertex();
635   Double_t tpcMulti=0.;
636   if(vertexTPC){
637     Double_t vertexContribTPC=vertexTPC->GetNContributors();
638     tpcMulti=vertexContribTPC/150.;
639     if (tpcMulti>20.) tpcMulti=20.;
640   }
641   
642   return tpcMulti;
643 }
644
645 //______________________________________________________________________________
646 void AliPIDResponse::SetRecoInfo()
647 {
648   //
649   // Set reconstruction information
650   //
651   
652   //reset information
653   fLHCperiod="";
654   fMCperiodTPC="";
655   
656   fBeamType="";
657     
658   fBeamType="PP";
659
660   Bool_t hasProdInfo=(fCurrentFile.BeginsWith("LHC"));
661   
662   TPRegexp reg(".*(LHC1[1-3][a-z]+[0-9]+[a-z_]*)/.*");
663   if (hasProdInfo) reg=TPRegexp("LHC1[1-2][a-z]+[0-9]+[a-z_]*");
664   TPRegexp reg12a17("LHC1[2-3][a-z]");
665
666   //find the period by run number (UGLY, but not stored in ESD and AOD... )
667   if (fRun>=114737&&fRun<=117223)      { fLHCperiod="LHC10B"; fMCperiodTPC="LHC10D1";  }
668   else if (fRun>=118503&&fRun<=121040) { fLHCperiod="LHC10C"; fMCperiodTPC="LHC10D1";  }
669   else if (fRun>=122195&&fRun<=126437) { fLHCperiod="LHC10D"; fMCperiodTPC="LHC10F6A"; }
670   else if (fRun>=127710&&fRun<=130850) { fLHCperiod="LHC10E"; fMCperiodTPC="LHC10F6A"; }
671   else if (fRun>=133004&&fRun<=135029) { fLHCperiod="LHC10F"; fMCperiodTPC="LHC10F6A"; }
672   else if (fRun>=135654&&fRun<=136377) { fLHCperiod="LHC10G"; fMCperiodTPC="LHC10F6A"; }
673   else if (fRun>=136851&&fRun<=139846) {
674     fLHCperiod="LHC10H";
675     fMCperiodTPC="LHC10H8";
676     if (reg.MatchB(fCurrentFile)) fMCperiodTPC="LHC11A10";
677     // exception for 13d2 and later
678     if (fCurrentAliRootRev >= 62714) fMCperiodTPC="LHC13D2";
679     fBeamType="PBPB";
680   }
681   else if (fRun>=139847&&fRun<=146974) { fLHCperiod="LHC11A"; fMCperiodTPC="LHC10F6A"; }
682   //TODO: periods 11B (146975-150721), 11C (150722-155837) are not yet treated assume 11d for the moment
683   else if (fRun>=146975&&fRun<=155837) { fLHCperiod="LHC11D"; fMCperiodTPC="LHC10F6A"; }
684   else if (fRun>=155838&&fRun<=159649) { fLHCperiod="LHC11D"; fMCperiodTPC="LHC10F6A"; }
685   // also for 11e (159650-162750),f(162751-165771) use 11d
686   else if (fRun>=159650&&fRun<=162750) { fLHCperiod="LHC11D"; fMCperiodTPC="LHC10F6A"; }
687   else if (fRun>=162751&&fRun<=165771) { fLHCperiod="LHC11D"; fMCperiodTPC="LHC10F6A"; }
688   
689   else if (fRun>=165772 && fRun<=170718) {
690     fLHCperiod="LHC11H";
691     fMCperiodTPC="LHC11A10";
692     fBeamType="PBPB";
693     if (reg12a17.MatchB(fCurrentFile)) fMCperiodTPC="LHC12A17";
694   }
695   if (fRun>=170719 && fRun<=177311) { fLHCperiod="LHC12A"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
696   // for the moment use LHC12b parameters up to LHC12e
697   if (fRun>=177312 /*&& fRun<=179356*/) { fLHCperiod="LHC12B"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
698 //   if (fRun>=179357 && fRun<=183173) { fLHCperiod="LHC12C"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
699 //   if (fRun>=183174 && fRun<=186345) { fLHCperiod="LHC12D"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
700 //   if (fRun>=186346 && fRun<=186635) { fLHCperiod="LHC12E"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
701
702 //   if (fRun>=186636 && fRun<=188166) { fLHCperiod="LHC12F"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
703 //   if (fRun >= 188167 && fRun <= 188355 ) { fLHCperiod="LHC12G"; fBeamType="PP"; /*fMCperiodTPC="";*/ }
704 //   if (fRun >= 188356 && fRun <= 188503 ) { fLHCperiod="LHC12G"; fBeamType="PPB"; /*fMCperiodTPC="";*/ }
705 // for the moment use 12g parametrisation for all full gain runs (LHC12f+)
706   if (fRun >= 186636 && fRun < 194480) { fLHCperiod="LHC12G"; fBeamType="PPB"; fMCperiodTPC="LHC12G"; }
707
708   // New parametrisation for 2013 pPb runs
709   if (fRun >= 194480) { 
710     fLHCperiod="LHC13B"; 
711     fBeamType="PPB";
712     fMCperiodTPC="LHC12G";
713   
714     if (fCurrentAliRootRev >= 61605)
715       fMCperiodTPC="LHC13B2_FIX";
716     if (fCurrentAliRootRev >= 62714)
717       fMCperiodTPC="LHC13B2_FIXn1";
718     
719     // High luminosity pPb runs require different parametrisations
720     if (fRun >= 195875 && fRun <= 197411) {
721       fLHCperiod="LHC13F"; 
722     }
723   }
724
725   //exception new pp MC productions from 2011 (11a periods have 10f6a splines!)
726   if (fBeamType=="PP" && reg.MatchB(fCurrentFile) && !fCurrentFile.Contains("LHC11a")) { fMCperiodTPC="LHC11B2"; fBeamType="PP"; }
727   // exception for 11f1
728   if (fCurrentFile.Contains("LHC11f1")) fMCperiodTPC="LHC11F1";
729   // exception for 12f1a, 12f1b and 12i3
730   if (fCurrentFile.Contains("LHC12f1") || fCurrentFile.Contains("LHC12i3")) fMCperiodTPC="LHC12F1";
731   // exception for 12c4
732   if (fCurrentFile.Contains("LHC12c4")) fMCperiodTPC="LHC12C4";
733         // exception for 12d and 13d pp periods
734         if (fBeamType=="PP" && fCurrentAliRootRev >= 61605) fMCperiodTPC="LHC13D1";
735 }
736
737 //______________________________________________________________________________
738 void AliPIDResponse::SetITSParametrisation()
739 {
740   //
741   // Set the ITS parametrisation
742   //
743 }
744
745  
746 //______________________________________________________________________________
747 void AliPIDResponse::AddPointToHyperplane(TH2D* h, TLinearFitter* linExtrapolation, Int_t binX, Int_t binY)
748 {
749   if (h->GetBinContent(binX, binY) <= 1e-4)
750     return; // Reject bins without content (within some numerical precision) or with strange content
751     
752   Double_t coord[2] = {0, 0};
753   coord[0] = h->GetXaxis()->GetBinCenter(binX);
754   coord[1] = h->GetYaxis()->GetBinCenter(binY);
755   Double_t binError = h->GetBinError(binX, binY);
756   if (binError <= 0) {
757     binError = 1000; // Should not happen because bins without content are rejected for the map (TH2D* h)
758     printf("ERROR: This should never happen: Trying to add bin in addPointToHyperplane with error not set....\n");
759   }
760   linExtrapolation->AddPoint(coord, h->GetBinContent(binX, binY, binError));
761 }
762
763
764 //______________________________________________________________________________
765 TH2D* AliPIDResponse::RefineHistoViaLinearInterpolation(TH2D* h, Double_t refineFactorX, Double_t refineFactorY)
766 {
767   if (!h)
768     return 0x0;
769   
770   // Interpolate to finer map
771   TLinearFitter* linExtrapolation = new TLinearFitter(2, "hyp2", "");
772   
773   Double_t upperMapBoundY = h->GetYaxis()->GetBinUpEdge(h->GetYaxis()->GetNbins());
774   Double_t lowerMapBoundY = h->GetYaxis()->GetBinLowEdge(1);
775   Int_t nBinsX = 30;
776   // Binning was find to yield good results, if 40 bins are chosen for the range 0.0016 to 0.02. For the new variable range,
777   // scale the number of bins correspondingly
778   Int_t nBinsY = TMath::Nint((upperMapBoundY - lowerMapBoundY) / (0.02 - 0.0016) * 40);
779   Int_t nBinsXrefined = nBinsX * refineFactorX;
780   Int_t nBinsYrefined = nBinsY * refineFactorY; 
781   
782   TH2D* hRefined = new TH2D(Form("%s_refined", h->GetName()),  Form("%s (refined)", h->GetTitle()),
783                             nBinsXrefined, h->GetXaxis()->GetBinLowEdge(1), h->GetXaxis()->GetBinUpEdge(h->GetXaxis()->GetNbins()),
784                             nBinsYrefined, lowerMapBoundY, upperMapBoundY);
785   
786   for (Int_t binX = 1; binX <= nBinsXrefined; binX++)  {
787     for (Int_t binY = 1; binY <= nBinsYrefined; binY++)  {
788       
789       hRefined->SetBinContent(binX, binY, 1); // Default value is 1
790       
791       Double_t centerX = hRefined->GetXaxis()->GetBinCenter(binX);
792       Double_t centerY = hRefined->GetYaxis()->GetBinCenter(binY);
793       
794       /*OLD
795       linExtrapolation->ClearPoints();
796       
797       // For interpolation: Just take the corresponding bin from the old histo.
798       // For extrapolation: take the last available bin from the old histo.
799       // If the boundaries are to be skipped, also skip the corresponding bins
800       Int_t oldBinX = h->GetXaxis()->FindBin(centerX);
801       if (oldBinX < 1)  
802         oldBinX = 1;
803       if (oldBinX > nBinsX)
804         oldBinX = nBinsX;
805       
806       Int_t oldBinY = h->GetYaxis()->FindBin(centerY);
807       if (oldBinY < 1)  
808         oldBinY = 1;
809       if (oldBinY > nBinsY)
810         oldBinY = nBinsY;
811       
812       // Neighbours left column
813       if (oldBinX >= 2) {
814         if (oldBinY >= 2) {
815           AddPointToHyperplane(h, linExtrapolation, oldBinX - 1, oldBinY - 1);
816         }
817         
818         AddPointToHyperplane(h, linExtrapolation, oldBinX - 1, oldBinY);
819         
820         if (oldBinY < nBinsY) {
821           AddPointToHyperplane(h, linExtrapolation, oldBinX - 1, oldBinY + 1);
822         }
823       }
824       
825       // Neighbours (and point itself) same column
826       if (oldBinY >= 2) {
827         AddPointToHyperplane(h, linExtrapolation, oldBinX, oldBinY - 1);
828       }
829         
830       AddPointToHyperplane(h, linExtrapolation, oldBinX, oldBinY);
831         
832       if (oldBinY < nBinsY) {
833         AddPointToHyperplane(h, linExtrapolation, oldBinX, oldBinY + 1);
834       }
835       
836       // Neighbours right column
837       if (oldBinX < nBinsX) {
838         if (oldBinY >= 2) {
839           AddPointToHyperplane(h, linExtrapolation, oldBinX + 1, oldBinY - 1);
840         }
841         
842         AddPointToHyperplane(h, linExtrapolation, oldBinX + 1, oldBinY);
843         
844         if (oldBinY < nBinsY) {
845           AddPointToHyperplane(h, linExtrapolation, oldBinX + 1, oldBinY + 1);
846         }
847       }
848       
849       
850       // Fit 2D-hyperplane
851       if (linExtrapolation->GetNpoints() <= 0)
852         continue;
853         
854       if (linExtrapolation->Eval() != 0)// EvalRobust -> Takes much, much, [...], much more time (~hours instead of seconds)
855         continue;
856       
857       // Fill the bin of the refined histogram with the extrapolated value
858       Double_t interpolatedValue = linExtrapolation->GetParameter(0) + linExtrapolation->GetParameter(1) * centerX
859                                  + linExtrapolation->GetParameter(2) * centerY;
860       */
861       Double_t interpolatedValue = h->Interpolate(centerX, centerY) ;
862       hRefined->SetBinContent(binX, binY, interpolatedValue);      
863     }
864   } 
865   
866   
867   // Problem: Interpolation does not work before/beyond center of first/last bin (as the name suggests).
868   // Therefore, for each row in dEdx: Take last bin from old map and interpolate values from center and edge.
869   // Assume line through these points and extropolate to last bin of refined map
870   const Double_t firstOldXbinUpEdge = h->GetXaxis()->GetBinUpEdge(1);
871   const Double_t firstOldXbinCenter = h->GetXaxis()->GetBinCenter(1);
872   
873   const Double_t oldXbinHalfWidth = firstOldXbinUpEdge - firstOldXbinCenter;
874   
875   const Double_t lastOldXbinLowEdge = h->GetXaxis()->GetBinLowEdge(h->GetNbinsX());
876   const Double_t lastOldXbinCenter = h->GetXaxis()->GetBinCenter(h->GetNbinsX());
877   
878   for (Int_t binY = 1; binY <= nBinsYrefined; binY++)  {
879     Double_t centerY = hRefined->GetYaxis()->GetBinCenter(binY);
880     
881     const Double_t interpolatedCenterFirstXbin = h->Interpolate(firstOldXbinCenter, centerY);
882     const Double_t interpolatedUpEdgeFirstXbin = h->Interpolate(firstOldXbinUpEdge, centerY);
883     
884     const Double_t extrapolationSlopeFirstXbin = (interpolatedUpEdgeFirstXbin - interpolatedCenterFirstXbin) / oldXbinHalfWidth;
885     const Double_t extrapolationOffsetFirstXbin = interpolatedCenterFirstXbin;
886     
887     
888     const Double_t interpolatedCenterLastXbin = h->Interpolate(lastOldXbinCenter, centerY);
889     const Double_t interpolatedLowEdgeLastXbin = h->Interpolate(lastOldXbinLowEdge, centerY);
890     
891     const Double_t extrapolationSlopeLastXbin = (interpolatedCenterLastXbin - interpolatedLowEdgeLastXbin) / oldXbinHalfWidth;
892     const Double_t extrapolationOffsetLastXbin = interpolatedCenterLastXbin;
893
894     for (Int_t binX = 1; binX <= nBinsXrefined; binX++)  {
895       Double_t centerX = hRefined->GetXaxis()->GetBinCenter(binX);
896      
897       if (centerX < firstOldXbinCenter) {
898         Double_t extrapolatedValue = extrapolationOffsetFirstXbin + (centerX - firstOldXbinCenter) * extrapolationSlopeFirstXbin;
899         hRefined->SetBinContent(binX, binY, extrapolatedValue);      
900       }
901       else if (centerX <= lastOldXbinCenter) {
902         continue;
903       }
904       else {
905         Double_t extrapolatedValue = extrapolationOffsetLastXbin + (centerX - lastOldXbinCenter) * extrapolationSlopeLastXbin;
906         hRefined->SetBinContent(binX, binY, extrapolatedValue);     
907       }
908     }
909   } 
910   
911   delete linExtrapolation;
912   
913   return hRefined;
914 }
915
916 //______________________________________________________________________________
917 void AliPIDResponse::SetTPCEtaMaps(Double_t refineFactorMapX, Double_t refineFactorMapY,
918                                    Double_t refineFactorSigmaMapX, Double_t refineFactorSigmaMapY)
919 {
920   //
921   // Load the TPC eta correction maps from the OADB
922   //
923   
924   if (fUseTPCEtaCorrection == kFALSE) {
925     // Disable eta correction via setting no maps
926     if (!fTPCResponse.SetEtaCorrMap(0x0))
927       AliInfo("Request to disable TPC eta correction -> Eta correction has been disabled"); 
928     else
929       AliError("Request to disable TPC eta correction -> Some error occured when unloading the correction maps");
930     
931     if (!fTPCResponse.SetSigmaParams(0x0, 0))
932       AliInfo("Request to disable TPC eta correction -> Using old parametrisation for sigma"); 
933     else
934       AliError("Request to disable TPC eta correction -> Some error occured when unloading the sigma maps");
935     
936     return;
937   }
938   
939   TString dataType = "DATA";
940   TString period = fLHCperiod.IsNull() ? "No period information" : fLHCperiod;
941   
942   if (fIsMC)  {
943     if (!(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))) {
944       period=fMCperiodTPC;
945       dataType="MC";
946     }
947     fRecoPass = 1;
948     
949     if (!(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC)) && fMCperiodTPC.IsNull()) {
950       AliFatal("MC detected, but no MC period set -> Not changing eta maps!");
951       return;
952     }
953   }
954
955   Int_t recopass = fRecoPass;
956   if (fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC) )
957     recopass = fRecoPassUser;
958   
959   TString defaultObj = Form("Default_%s_pass%d", dataType.Data(), recopass);
960   
961   AliInfo(Form("Current period and reco pass: %s.pass%d", period.Data(), recopass));
962   
963   // Invalidate old maps
964   fTPCResponse.SetEtaCorrMap(0x0);
965   fTPCResponse.SetSigmaParams(0x0, 0);
966   
967   // Load the eta correction maps
968   AliOADBContainer etaMapsCont(Form("TPCetaMaps_%s_pass%d", dataType.Data(), recopass)); 
969   
970   Int_t statusCont = etaMapsCont.InitFromFile(Form("%s/COMMON/PID/data/TPCetaMaps.root", fOADBPath.Data()),
971                                               Form("TPCetaMaps_%s_pass%d", dataType.Data(), recopass));
972   if (statusCont) {
973     AliError("Failed initializing TPC eta correction maps from OADB -> Disabled eta correction");
974     fUseTPCEtaCorrection = kFALSE;
975   }
976   else {
977     AliInfo(Form("Loading TPC eta correction map from %s/COMMON/PID/data/TPCetaMaps.root", fOADBPath.Data()));
978     
979     TH2D* etaMap = 0x0;
980     
981     if (fIsMC && !(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))) {
982       TString searchMap = Form("TPCetaMaps_%s_%s_pass%d", dataType.Data(), period.Data(), recopass);
983       etaMap = dynamic_cast<TH2D *>(etaMapsCont.GetDefaultObject(searchMap.Data()));
984       if (!etaMap) {
985         // Try default object
986         etaMap = dynamic_cast<TH2D *>(etaMapsCont.GetDefaultObject(defaultObj.Data()));
987       }
988     }
989     else {
990       etaMap = dynamic_cast<TH2D *>(etaMapsCont.GetObject(fRun, defaultObj.Data()));
991     }
992     
993         
994     if (!etaMap) {
995       AliError(Form("TPC eta correction map not found for run %d and also no default map found -> Disabled eta correction!!!", fRun));
996       fUseTPCEtaCorrection = kFALSE;
997     }
998     else {
999       TH2D* etaMapRefined = RefineHistoViaLinearInterpolation(etaMap, refineFactorMapX, refineFactorMapY);
1000       
1001       if (etaMapRefined) {
1002         if (!fTPCResponse.SetEtaCorrMap(etaMapRefined)) {
1003           AliError(Form("Failed to set TPC eta correction map for run %d -> Disabled eta correction!!!", fRun));
1004           fTPCResponse.SetEtaCorrMap(0x0);
1005           fUseTPCEtaCorrection = kFALSE;
1006         }
1007         else {
1008           AliInfo(Form("Loaded TPC eta correction map (refine factors %.2f/%.2f) from %s/COMMON/PID/data/TPCetaMaps.root: %s (MD5(map) = %s)", 
1009                        refineFactorMapX, refineFactorMapY, fOADBPath.Data(), fTPCResponse.GetEtaCorrMap()->GetTitle(),
1010                        GetChecksum(fTPCResponse.GetEtaCorrMap()).Data()));
1011         }
1012         
1013         delete etaMapRefined;
1014       }
1015       else {
1016         AliError(Form("Failed to set TPC eta correction map for run %d (map was loaded, but couldn't be refined) -> Disabled eta correction!!!", fRun));
1017         fUseTPCEtaCorrection = kFALSE;
1018       }
1019     }
1020   }
1021   
1022   // If there was some problem loading the eta maps, it makes no sense to load the sigma maps (that require eta corrected data)
1023   if (fUseTPCEtaCorrection == kFALSE) {
1024     AliError("Failed to load TPC eta correction map required by sigma maps -> Using old parametrisation for sigma"); 
1025     return;
1026   }
1027   
1028   // Load the sigma parametrisation (1/dEdx vs tanTheta_local (~eta))
1029   AliOADBContainer etaSigmaMapsCont(Form("TPCetaSigmaMaps_%s_pass%d", dataType.Data(), recopass)); 
1030   
1031   statusCont = etaSigmaMapsCont.InitFromFile(Form("%s/COMMON/PID/data/TPCetaMaps.root", fOADBPath.Data()),
1032                                              Form("TPCetaSigmaMaps_%s_pass%d", dataType.Data(), recopass));
1033   if (statusCont) {
1034     AliError("Failed initializing TPC eta sigma maps from OADB -> Using old sigma parametrisation");
1035   }
1036   else {
1037     AliInfo(Form("Loading TPC eta sigma map from %s/COMMON/PID/data/TPCetaMaps.root", fOADBPath.Data()));
1038     
1039     TObjArray* etaSigmaPars = 0x0;
1040     
1041     if (fIsMC && !(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))) {
1042       TString searchMap = Form("TPCetaSigmaMaps_%s_%s_pass%d", dataType.Data(), period.Data(), recopass);
1043       etaSigmaPars = dynamic_cast<TObjArray *>(etaSigmaMapsCont.GetDefaultObject(searchMap.Data()));
1044       if (!etaSigmaPars) {
1045         // Try default object
1046         etaSigmaPars = dynamic_cast<TObjArray *>(etaSigmaMapsCont.GetDefaultObject(defaultObj.Data()));
1047       }
1048     }
1049     else {
1050       etaSigmaPars = dynamic_cast<TObjArray *>(etaSigmaMapsCont.GetObject(fRun, defaultObj.Data()));
1051     }
1052     
1053     if (!etaSigmaPars) {
1054       AliError(Form("TPC eta sigma parametrisation not found for run %d -> Using old sigma parametrisation!!!", fRun));
1055     }
1056     else {
1057       TH2D* etaSigmaPar1Map = dynamic_cast<TH2D *>(etaSigmaPars->FindObject("sigmaPar1Map"));
1058       TNamed* sigmaPar0Info = dynamic_cast<TNamed *>(etaSigmaPars->FindObject("sigmaPar0"));
1059       Double_t sigmaPar0 = 0.0;
1060       
1061       if (sigmaPar0Info) {
1062         TString sigmaPar0String = sigmaPar0Info->GetTitle();
1063         sigmaPar0 = sigmaPar0String.Atof();
1064       }
1065       else {
1066         // Something is weired because the object for parameter 0 could not be loaded -> New sigma parametrisation can not be used!
1067         etaSigmaPar1Map = 0x0;
1068       }
1069       
1070       TH2D* etaSigmaPar1MapRefined = RefineHistoViaLinearInterpolation(etaSigmaPar1Map, refineFactorSigmaMapX, refineFactorSigmaMapY);
1071       
1072       
1073       if (etaSigmaPar1MapRefined) {
1074         if (!fTPCResponse.SetSigmaParams(etaSigmaPar1MapRefined, sigmaPar0)) {
1075           AliError(Form("Failed to set TPC eta sigma map for run %d -> Using old sigma parametrisation!!!", fRun));
1076           fTPCResponse.SetSigmaParams(0x0, 0);
1077         }
1078         else {
1079           AliInfo(Form("Loaded TPC sigma correction map (refine factors %.2f/%.2f) from %s/COMMON/PID/data/TPCetaMaps.root: %s (MD5(map) = %s, sigmaPar0 = %f)", 
1080                        refineFactorSigmaMapX, refineFactorSigmaMapY, fOADBPath.Data(), fTPCResponse.GetSigmaPar1Map()->GetTitle(),
1081                        GetChecksum(fTPCResponse.GetSigmaPar1Map()).Data(), sigmaPar0));
1082         }
1083         
1084         delete etaSigmaPar1MapRefined;
1085       }
1086       else {
1087         AliError(Form("Failed to set TPC eta sigma map for run %d (map was loaded, but couldn't be refined) -> Using old sigma parametrisation!!!",
1088                       fRun));
1089       }
1090     }
1091   }
1092 }
1093
1094 //______________________________________________________________________________
1095 void AliPIDResponse::SetTPCPidResponseMaster()
1096 {
1097   //
1098   // Load the TPC pid response functions from the OADB
1099   // Load the TPC voltage maps from OADB
1100   //
1101   //don't load twice for the moment
1102    if (fArrPidResponseMaster) return;
1103  
1104
1105   //reset the PID response functions
1106   delete fArrPidResponseMaster;
1107   fArrPidResponseMaster=NULL;
1108   
1109   TString fileName(Form("%s/COMMON/PID/data/TPCPIDResponse.root", fOADBPath.Data()));
1110   TFile *f=NULL;
1111   if (!fCustomTPCpidResponse.IsNull()) fileName=fCustomTPCpidResponse;
1112   
1113   TString fileNamePIDresponse(Form("%s/COMMON/PID/data/TPCPIDResponse.root", fOADBPath.Data()));
1114   f=TFile::Open(fileNamePIDresponse.Data());
1115   if (f && f->IsOpen() && !f->IsZombie()){
1116     fArrPidResponseMaster=dynamic_cast<TObjArray*>(f->Get("TPCPIDResponse"));
1117   }
1118   delete f;
1119
1120   TString fileNameVoltageMaps(Form("%s/COMMON/PID/data/TPCvoltageSettings.root", fOADBPath.Data()));
1121   f=TFile::Open(fileNameVoltageMaps.Data());
1122   if (f && f->IsOpen() && !f->IsZombie()){
1123     fOADBvoltageMaps=dynamic_cast<AliOADBContainer*>(f->Get("TPCvoltageSettings"));
1124   }
1125   delete f;
1126   
1127   if (!fArrPidResponseMaster){
1128     AliFatal(Form("Could not retrieve the TPC pid response from: %s",fileNamePIDresponse.Data()));
1129     return;
1130   }
1131   fArrPidResponseMaster->SetOwner();
1132
1133   if (!fOADBvoltageMaps)
1134   {
1135     AliFatal(Form("Could not retrieve the TPC voltage maps from: %s",fileNameVoltageMaps.Data()));
1136   }
1137   fArrPidResponseMaster->SetOwner();
1138 }
1139
1140 //______________________________________________________________________________
1141 void AliPIDResponse::SetTPCParametrisation()
1142 {
1143   //
1144   // Change BB parametrisation for current run
1145   //
1146   
1147   //
1148   //reset old splines
1149   //
1150   fTPCResponse.ResetSplines();
1151   
1152   if (fLHCperiod.IsNull()) {
1153     AliError("No period set, not changing parametrisation");
1154     return;
1155   }
1156   
1157   //
1158   // Set default parametrisations for data and MC
1159   //
1160   
1161   //data type
1162   TString datatype="DATA";
1163   //in case of mc fRecoPass is per default 1
1164   if (fIsMC) {
1165       if(!(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))) datatype="MC";
1166       fRecoPass=1;
1167   }
1168
1169   // period
1170   TString period=fLHCperiod;
1171   if (fIsMC && !(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))) period=fMCperiodTPC;
1172
1173   Int_t recopass = fRecoPass;
1174   if(fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC)) recopass = fRecoPassUser;
1175     
1176   AliInfo(Form("Searching splines for: %s %s PASS%d %s",datatype.Data(),period.Data(),recopass,fBeamType.Data()));
1177   Bool_t found=kFALSE;
1178   //
1179   //set the new PID splines
1180   //
1181   if (fArrPidResponseMaster){
1182     //for MC don't use period information
1183     //if (fIsMC) period="[A-Z0-9]*";
1184     //for MC use MC period information
1185     //pattern for the default entry (valid for all particles)
1186     TPRegexp reg(Form("TSPLINE3_%s_([A-Z]*)_%s_PASS%d_%s_MEAN(_*)([A-Z1-9]*)",datatype.Data(),period.Data(),recopass,fBeamType.Data()));
1187
1188     //find particle id and gain scenario
1189     for (Int_t igainScenario=0; igainScenario<AliTPCPIDResponse::fgkNumberOfGainScenarios; igainScenario++)
1190     {
1191       TObject *grAll=NULL;
1192       TString gainScenario = AliTPCPIDResponse::GainScenarioName(igainScenario);
1193       gainScenario.ToUpper();
1194       //loop over entries and filter them
1195       for (Int_t iresp=0; iresp<fArrPidResponseMaster->GetEntriesFast();++iresp)
1196       {
1197         TObject *responseFunction=fArrPidResponseMaster->At(iresp);
1198         if (responseFunction==NULL) continue;
1199         TString responseName=responseFunction->GetName();
1200          
1201         if (!reg.MatchB(responseName)) continue;
1202
1203         TObjArray *arr=reg.MatchS(responseName); if (!arr) continue;
1204         TObject* tmp=NULL;
1205         tmp=arr->At(1); if (!tmp) continue;
1206         TString particleName=tmp->GetName();
1207         tmp=arr->At(3); if (!tmp) continue;
1208         TString gainScenarioName=tmp->GetName();
1209         delete arr;
1210         if (particleName.IsNull()) continue;
1211         if (!grAll && particleName=="ALL" && gainScenarioName==gainScenario) grAll=responseFunction;
1212         else 
1213         {
1214           for (Int_t ispec=0; ispec<(AliTPCPIDResponse::fgkNumberOfParticleSpecies); ++ispec)
1215           {
1216             TString particle=AliPID::ParticleName(ispec);
1217             particle.ToUpper();
1218             //std::cout<<responseName<<" "<<particle<<" "<<particleName<<" "<<gainScenario<<" "<<gainScenarioName<<std::endl;
1219             if ( particle == particleName && gainScenario == gainScenarioName )
1220             {
1221               fTPCResponse.SetResponseFunction( responseFunction,
1222                                                 (AliPID::EParticleType)ispec,
1223                                                 (AliTPCPIDResponse::ETPCgainScenario)igainScenario );
1224               fTPCResponse.SetUseDatabase(kTRUE);
1225               AliInfo(Form("Adding graph: %d %d - %s (MD5(spline) = %s)",ispec,igainScenario,responseFunction->GetName(),
1226                            GetChecksum((TSpline3*)responseFunction).Data()));
1227               found=kTRUE;
1228               break;
1229             }
1230           }
1231         }
1232       }
1233       
1234       // Retrieve responsefunction for pions - will (if available) be used for muons if there are no dedicated muon splines.
1235       // For light nuclei, try to set the proton spline, if no dedicated splines are available.
1236       // In both cases: Use default splines, if no dedicated splines and no pion/proton splines are available.
1237       TObject* responseFunctionPion = fTPCResponse.GetResponseFunction( (AliPID::EParticleType)AliPID::kPion,                             
1238                                                                         (AliTPCPIDResponse::ETPCgainScenario)igainScenario);
1239       TObject* responseFunctionProton = fTPCResponse.GetResponseFunction( (AliPID::EParticleType)AliPID::kProton,                             
1240                                                                           (AliTPCPIDResponse::ETPCgainScenario)igainScenario);
1241       
1242       for (Int_t ispec=0; ispec<(AliTPCPIDResponse::fgkNumberOfParticleSpecies); ++ispec)
1243       {
1244         if (!fTPCResponse.GetResponseFunction( (AliPID::EParticleType)ispec,
1245           (AliTPCPIDResponse::ETPCgainScenario)igainScenario))
1246         {
1247           if (ispec == AliPID::kMuon) { // Muons
1248             if (responseFunctionPion) {
1249               fTPCResponse.SetResponseFunction( responseFunctionPion,
1250                                                 (AliPID::EParticleType)ispec,
1251                                                 (AliTPCPIDResponse::ETPCgainScenario)igainScenario );
1252               fTPCResponse.SetUseDatabase(kTRUE);
1253               AliInfo(Form("Adding graph: %d %d - %s (MD5(spline) = %s)",ispec,igainScenario,responseFunctionPion->GetName(),
1254                            GetChecksum((TSpline3*)responseFunctionPion).Data()));
1255               found=kTRUE;  
1256             }
1257             else if (grAll) {
1258               fTPCResponse.SetResponseFunction( grAll,
1259                                                 (AliPID::EParticleType)ispec,
1260                                                 (AliTPCPIDResponse::ETPCgainScenario)igainScenario );
1261               fTPCResponse.SetUseDatabase(kTRUE);
1262               AliInfo(Form("Adding graph: %d %d - %s (MD5(spline) = %s)",ispec,igainScenario,grAll->GetName(),
1263                            GetChecksum((TSpline3*)grAll).Data()));
1264               found=kTRUE;
1265             }
1266             //else
1267             //  AliError(Form("No splines found for muons (also no pion splines and no default splines) for gain scenario %d!", igainScenario));
1268           }
1269           else if (ispec >= AliPID::kSPECIES) { // Light nuclei
1270             if (responseFunctionProton) {
1271               fTPCResponse.SetResponseFunction( responseFunctionProton,
1272                                                 (AliPID::EParticleType)ispec,
1273                                                 (AliTPCPIDResponse::ETPCgainScenario)igainScenario );
1274               fTPCResponse.SetUseDatabase(kTRUE);
1275               AliInfo(Form("Adding graph: %d %d - %s (MD5(spline) = %s)",ispec,igainScenario,responseFunctionProton->GetName(),
1276                            GetChecksum((TSpline3*)responseFunctionProton).Data()));
1277               found=kTRUE;  
1278             }
1279             else if (grAll) {
1280               fTPCResponse.SetResponseFunction( grAll,
1281                                                 (AliPID::EParticleType)ispec,
1282                                                 (AliTPCPIDResponse::ETPCgainScenario)igainScenario );
1283               fTPCResponse.SetUseDatabase(kTRUE);
1284               AliInfo(Form("Adding graph: %d %d - %s (MD5(spline) = %s)",ispec,igainScenario,grAll->GetName(),
1285                            GetChecksum((TSpline3*)grAll).Data()));
1286               found=kTRUE;
1287             }
1288             //else
1289             //  AliError(Form("No splines found for species %d (also no proton splines and no default splines) for gain scenario %d!",
1290             //                ispec, igainScenario));
1291           }
1292         }
1293       }
1294     }
1295   }
1296   else AliInfo("no fArrPidResponseMaster");
1297
1298   if (!found){
1299     AliError(Form("No splines found for: %s %s PASS%d %s",datatype.Data(),period.Data(),recopass,fBeamType.Data()));
1300   }
1301
1302
1303   //
1304   // Setup multiplicity correction
1305   //
1306   if (fUseTPCMultiplicityCorrection && !(fBeamType.CompareTo("PP") == 0)) {
1307     AliInfo("Multiplicity correction enabled!");
1308     
1309     //TODO After testing, load parameters from outside       
1310     /*TODO now correction for MC
1311     if (period.Contains("LHC11A10"))  {//LHC11A10A
1312       AliInfo("Using multiplicity correction parameters for 11a10!");
1313       fTPCResponse.SetParameterMultiplicityCorrection(0, 6.90133e-06);
1314       fTPCResponse.SetParameterMultiplicityCorrection(1, -1.22123e-03);
1315       fTPCResponse.SetParameterMultiplicityCorrection(2, 1.80220e-02);
1316       fTPCResponse.SetParameterMultiplicityCorrection(3, 0.1);
1317       fTPCResponse.SetParameterMultiplicityCorrection(4, 6.45306e-03);
1318       
1319       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(0, -2.85505e-07);
1320       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(1, -1.31911e-06);
1321       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(2, -0.5);
1322
1323       fTPCResponse.SetParameterMultiplicitySigmaCorrection(0, -4.29665e-05);
1324       fTPCResponse.SetParameterMultiplicitySigmaCorrection(1, 1.37023e-02);
1325       fTPCResponse.SetParameterMultiplicitySigmaCorrection(2, -6.36337e-01);
1326       fTPCResponse.SetParameterMultiplicitySigmaCorrection(3, 1.13479e-02);
1327     }
1328     else*/ if (period.Contains("LHC13B") || period.Contains("LHC13C") || period.Contains("LHC13D"))  {// 2013 pPb data taking at low luminosity
1329       AliInfo("Using multiplicity correction parameters for 13b.pass2!");
1330       
1331       fTPCResponse.SetParameterMultiplicityCorrection(0, -5.906e-06);
1332       fTPCResponse.SetParameterMultiplicityCorrection(1, -5.064e-04);
1333       fTPCResponse.SetParameterMultiplicityCorrection(2, -3.521e-02);
1334       fTPCResponse.SetParameterMultiplicityCorrection(3, 2.469e-02);
1335       fTPCResponse.SetParameterMultiplicityCorrection(4, 0);
1336       
1337       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(0, -5.32e-06);
1338       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(1, 1.177e-05);
1339       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(2, -0.5);
1340       
1341       fTPCResponse.SetParameterMultiplicitySigmaCorrection(0, 0.);
1342       fTPCResponse.SetParameterMultiplicitySigmaCorrection(1, 0.);
1343       fTPCResponse.SetParameterMultiplicitySigmaCorrection(2, 0.);
1344       fTPCResponse.SetParameterMultiplicitySigmaCorrection(3, 0.);
1345       
1346       /* Not too bad, but far from perfect in the details
1347       fTPCResponse.SetParameterMultiplicityCorrection(0, -6.27187e-06);
1348       fTPCResponse.SetParameterMultiplicityCorrection(1, -4.60649e-04);
1349       fTPCResponse.SetParameterMultiplicityCorrection(2, -4.26450e-02);
1350       fTPCResponse.SetParameterMultiplicityCorrection(3, 2.40590e-02);
1351       fTPCResponse.SetParameterMultiplicityCorrection(4, 0);
1352       
1353       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(0, -5.338e-06);
1354       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(1, 1.220e-05);
1355       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(2, -0.5);
1356       
1357       fTPCResponse.SetParameterMultiplicitySigmaCorrection(0, 7.89237e-05);
1358       fTPCResponse.SetParameterMultiplicitySigmaCorrection(1, -1.30662e-02);
1359       fTPCResponse.SetParameterMultiplicitySigmaCorrection(2, 8.91548e-01);
1360       fTPCResponse.SetParameterMultiplicitySigmaCorrection(3, 1.47931e-02);
1361       */
1362     }
1363     else if (period.Contains("LHC10H") && recopass == 2) {    
1364       AliInfo("Using multiplicity correction parameters for 10h.pass2!");
1365       fTPCResponse.SetParameterMultiplicityCorrection(0, 3.21636e-07);
1366       fTPCResponse.SetParameterMultiplicityCorrection(1, -6.65876e-04);
1367       fTPCResponse.SetParameterMultiplicityCorrection(2, 1.28786e-03);
1368       fTPCResponse.SetParameterMultiplicityCorrection(3, 1.47677e-02);
1369       fTPCResponse.SetParameterMultiplicityCorrection(4, 0);
1370       
1371       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(0, 7.23591e-08);
1372       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(1, 2.7469e-06);
1373       fTPCResponse.SetParameterMultiplicityCorrectionTanTheta(2, -0.5);
1374       
1375       fTPCResponse.SetParameterMultiplicitySigmaCorrection(0, -1.22590e-05);
1376       fTPCResponse.SetParameterMultiplicitySigmaCorrection(1, 6.88888e-03);
1377       fTPCResponse.SetParameterMultiplicitySigmaCorrection(2, -3.20788e-01);
1378       fTPCResponse.SetParameterMultiplicitySigmaCorrection(3, 1.07345e-02);
1379     }
1380     else {
1381       AliError(Form("Multiplicity correction is enabled, but no multiplicity correction parameters have been found for period %s.pass%d -> Mulitplicity correction DISABLED!", period.Data(), recopass));
1382       fUseTPCMultiplicityCorrection = kFALSE;
1383       fTPCResponse.ResetMultiplicityCorrectionFunctions();
1384     }
1385   }
1386   else {
1387     // Just set parameters such that overall correction factor is 1, i.e. no correction.
1388     // This is just a reasonable choice for the parameters for safety reasons. Disabling
1389     // the multiplicity correction will anyhow skip the calculation of the corresponding
1390     // correction factor inside THIS class. Nevertheless, experts can access the TPCPIDResponse
1391     // directly and use it for calculations - which should still give valid results, even if
1392     // the multiplicity correction is explicitely enabled in such expert calls.
1393     
1394     AliInfo(Form("Multiplicity correction %sdisabled (%s)!", fUseTPCMultiplicityCorrection ? "automatically " : "",
1395                  fUseTPCMultiplicityCorrection ? "pp collisions" : "requested by user"));
1396     
1397     fUseTPCMultiplicityCorrection = kFALSE;
1398     fTPCResponse.ResetMultiplicityCorrectionFunctions();
1399   }
1400   
1401   /*
1402   //TODO NOW start
1403   for (Int_t i = 0; i <= 4 + 1; i++) {
1404     printf("parMultCorr: %d, %e\n", i, fTPCResponse.GetMultiplicityCorrectionFunction()->GetParameter(i));
1405   }
1406   for (Int_t j = 0; j <= 2 + 1; j++) {
1407     printf("parMultCorrTanTheta: %d, %e\n", j, fTPCResponse.GetMultiplicityCorrectionFunctionTanTheta()->GetParameter(j));
1408   }
1409   for (Int_t j = 0; j <= 3 + 1; j++) {
1410     printf("parMultSigmaCorr: %d, %e\n", j, fTPCResponse.GetMultiplicitySigmaCorrectionFunction()->GetParameter(j));
1411   }
1412   
1413   //TODO NOW end
1414   */
1415   
1416   //
1417   // Setup old resolution parametrisation
1418   //
1419   
1420   //default
1421   fTPCResponse.SetSigma(3.79301e-03, 2.21280e+04);
1422   
1423   if (fRun>=122195){
1424     fTPCResponse.SetSigma(2.30176e-02, 5.60422e+02);
1425   }
1426
1427   if (fRun>=186636){
1428 //   if (fRun>=188356){
1429     fTPCResponse.SetSigma(8.62022e-04, 9.08156e+05);
1430   }
1431   
1432   if (fArrPidResponseMaster)
1433   fResolutionCorrection=(TF1*)fArrPidResponseMaster->FindObject(Form("TF1_%s_ALL_%s_PASS%d_%s_SIGMA",datatype.Data(),period.Data(),recopass,fBeamType.Data()));
1434   
1435   if (fResolutionCorrection) AliInfo(Form("Setting multiplicity correction function: %s  (MD5(corr function) = %s)",
1436                                           fResolutionCorrection->GetName(), GetChecksum(fResolutionCorrection).Data()));
1437
1438   //read in the voltage map
1439   TVectorF* gsm = 0x0;
1440   if (fOADBvoltageMaps) gsm=dynamic_cast<TVectorF*>(fOADBvoltageMaps->GetObject(fRun));
1441   if (gsm) 
1442   {
1443     fTPCResponse.SetVoltageMap(*gsm);
1444     TString vals;
1445     AliInfo(Form("Reading the voltage map for run %d\n",fRun));
1446     vals="IROC A: "; for (Int_t i=0; i<18; i++){vals+=Form("%.2f ",(*gsm)[i]);}
1447     AliInfo(vals.Data());
1448     vals="IROC C: "; for (Int_t i=18; i<36; i++){vals+=Form("%.2f ",(*gsm)[i]);}
1449     AliInfo(vals.Data());
1450     vals="OROC A: "; for (Int_t i=36; i<54; i++){vals+=Form("%.2f ",(*gsm)[i]);}
1451     AliInfo(vals.Data());
1452     vals="OROC C: "; for (Int_t i=54; i<72; i++){vals+=Form("%.2f ",(*gsm)[i]);}
1453     AliInfo(vals.Data());
1454   }
1455   else AliInfo("no voltage map, ideal default assumed");
1456 }
1457
1458 //______________________________________________________________________________
1459 void AliPIDResponse::SetTRDPidResponseMaster()
1460 {
1461   //
1462   // Load the TRD pid params and references from the OADB
1463   //
1464   if(fTRDPIDResponseObject) return;
1465   AliOADBContainer contParams("contParams"); 
1466
1467   Int_t statusResponse = contParams.InitFromFile(Form("%s/COMMON/PID/data/TRDPIDResponse.root", fOADBPath.Data()), "AliTRDPIDResponseObject");
1468   if(statusResponse){
1469     AliError("Failed initializing PID Response Object from OADB");
1470   } else {
1471     AliInfo(Form("Loading TRD Response from %s/COMMON/PID/data/TRDPIDResponse.root", fOADBPath.Data()));
1472     fTRDPIDResponseObject = dynamic_cast<AliTRDPIDResponseObject *>(contParams.GetObject(fRun));
1473     if(!fTRDPIDResponseObject){
1474       AliError(Form("TRD Response not found in run %d", fRun));
1475     }
1476   }
1477 }
1478
1479 //______________________________________________________________________________
1480 void AliPIDResponse::InitializeTRDResponse(){
1481   //
1482   // Set PID Params and references to the TRD PID response
1483   // 
1484     fTRDResponse.SetPIDResponseObject(fTRDPIDResponseObject);
1485 }
1486
1487 //______________________________________________________________________________
1488 void AliPIDResponse::SetTRDSlices(UInt_t TRDslicesForPID[2],AliTRDPIDResponse::ETRDPIDMethod method) const{
1489
1490     if(fLHCperiod.Contains("LHC10D") || fLHCperiod.Contains("LHC10E")){
1491         // backward compatibility for setting with 8 slices
1492         TRDslicesForPID[0] = 0;
1493         TRDslicesForPID[1] = 7;
1494     }
1495     else{
1496         if(method==AliTRDPIDResponse::kLQ1D){
1497             TRDslicesForPID[0] = 0; // first Slice contains normalized dEdx
1498             TRDslicesForPID[1] = 0;
1499         }
1500         if(method==AliTRDPIDResponse::kLQ2D){
1501             TRDslicesForPID[0] = 1;
1502             TRDslicesForPID[1] = 7;
1503         }
1504     }
1505     AliDebug(1,Form("Slice Range set to %d - %d",TRDslicesForPID[0],TRDslicesForPID[1]));
1506 }
1507
1508 //______________________________________________________________________________
1509 void AliPIDResponse::SetTOFPidResponseMaster()
1510 {
1511   //
1512   // Load the TOF pid params from the OADB
1513   //
1514
1515   if (fTOFPIDParams) delete fTOFPIDParams;
1516   fTOFPIDParams=NULL;
1517
1518   TFile *oadbf = new TFile(Form("%s/COMMON/PID/data/TOFPIDParams.root",fOADBPath.Data()));
1519   if (oadbf && oadbf->IsOpen()) {
1520     AliInfo(Form("Loading TOF Params from %s/COMMON/PID/data/TOFPIDParams.root", fOADBPath.Data()));
1521     AliOADBContainer *oadbc = (AliOADBContainer *)oadbf->Get("TOFoadb");
1522     if (oadbc) fTOFPIDParams = dynamic_cast<AliTOFPIDParams *>(oadbc->GetObject(fRun,"TOFparams"));
1523     oadbf->Close();
1524     delete oadbc;
1525   }
1526   delete oadbf;
1527
1528   if (!fTOFPIDParams) AliFatal("TOFPIDParams could not be retrieved");
1529 }
1530
1531 //______________________________________________________________________________
1532 void AliPIDResponse::InitializeTOFResponse(){
1533   //
1534   // Set PID Params to the TOF PID response
1535   //
1536
1537   AliInfo("TOF PID Params loaded from OADB");
1538   AliInfo(Form("  TOF resolution %5.2f [ps]",fTOFPIDParams->GetTOFresolution()));
1539   AliInfo(Form("  StartTime method %d",fTOFPIDParams->GetStartTimeMethod()));
1540   AliInfo(Form("  TOF res. mom. params: %5.2f %5.2f %5.2f %5.2f",
1541                fTOFPIDParams->GetSigParams(0),fTOFPIDParams->GetSigParams(1),fTOFPIDParams->GetSigParams(2),fTOFPIDParams->GetSigParams(3)));
1542   AliInfo(Form("  Fraction of tracks within gaussian behaviour: %6.4f",fTOFPIDParams->GetTOFtail()));
1543   AliInfo(Form("  MC: Fraction of tracks (percentage) to cut to fit matching in data: %6.2f%%",fTOFPIDParams->GetTOFmatchingLossMC()));
1544   AliInfo(Form("  MC: Fraction of random hits (percentage) to add to fit mismatch in data: %6.2f%%",fTOFPIDParams->GetTOFadditionalMismForMC()));
1545   AliInfo(Form("  Start Time Offset %6.2f ps",fTOFPIDParams->GetTOFtimeOffset()));
1546
1547   for (Int_t i=0;i<4;i++) {
1548     fTOFResponse.SetTrackParameter(i,fTOFPIDParams->GetSigParams(i));
1549   }
1550   fTOFResponse.SetTimeResolution(fTOFPIDParams->GetTOFresolution());
1551
1552   AliInfo("TZERO resolution loaded from ESDrun/AODheader");
1553   Float_t t0Spread[4];
1554   for (Int_t i=0;i<4;i++) t0Spread[i]=fCurrentEvent->GetT0spread(i);
1555   AliInfo(Form("  TZERO spreads from data: (A+C)/2 %f A %f C %f (A'-C')/2: %f",t0Spread[0],t0Spread[1],t0Spread[2],t0Spread[3]));
1556   Float_t a = t0Spread[1]*t0Spread[1]-t0Spread[0]*t0Spread[0]+t0Spread[3]*t0Spread[3];
1557   Float_t c = t0Spread[2]*t0Spread[2]-t0Spread[0]*t0Spread[0]+t0Spread[3]*t0Spread[3];
1558   if ( (t0Spread[0] > 50. && t0Spread[0] < 400.) && (a > 0.) && (c>0.)) {
1559     fResT0AC=t0Spread[3];
1560     fResT0A=TMath::Sqrt(a);
1561     fResT0C=TMath::Sqrt(c);
1562   } else {
1563     AliInfo("  TZERO spreads not present or inconsistent, loading default");
1564     fResT0A=75.;
1565     fResT0C=65.;
1566     fResT0AC=55.;
1567   }
1568   AliInfo(Form("  TZERO resolution set to: T0A: %f [ps] T0C: %f [ps] T0AC %f [ps]",fResT0A,fResT0C,fResT0AC));
1569
1570 }
1571
1572 //______________________________________________________________________________
1573 void AliPIDResponse::SetHMPIDPidResponseMaster()
1574 {
1575   //
1576   // Load the HMPID pid params from the OADB
1577   //
1578
1579   if (fHMPIDPIDParams) delete fHMPIDPIDParams;
1580   fHMPIDPIDParams=NULL;
1581
1582   TFile *oadbf = new TFile(Form("%s/COMMON/PID/data/HMPIDPIDParams.root",fOADBPath.Data()));
1583   if (oadbf && oadbf->IsOpen()) {
1584     AliInfo(Form("Loading HMPID Params from %s/COMMON/PID/data/HMPIDPIDParams.root", fOADBPath.Data()));
1585     AliOADBContainer *oadbc = (AliOADBContainer *)oadbf->Get("HMPoadb");
1586     if (oadbc) fHMPIDPIDParams = dynamic_cast<AliHMPIDPIDParams *>(oadbc->GetObject(fRun,"HMPparams"));
1587     oadbf->Close();
1588     delete oadbc;
1589   }
1590   delete oadbf;
1591
1592   if (!fHMPIDPIDParams) AliFatal("HMPIDPIDParams could not be retrieved");
1593 }
1594
1595 //______________________________________________________________________________
1596 void AliPIDResponse::InitializeHMPIDResponse(){
1597   //
1598   // Set PID Params to the HMPID PID response
1599   //
1600
1601   fHMPIDResponse.SetRefIndexArray(fHMPIDPIDParams->GetHMPIDrefIndex());
1602 }
1603
1604 //______________________________________________________________________________
1605 Bool_t AliPIDResponse::IdentifiedAsElectronTRD(const AliVTrack *vtrack, Double_t efficiencyLevel,Double_t centrality,AliTRDPIDResponse::ETRDPIDMethod PIDmethod) const {
1606   //
1607   // Check whether track is identified as electron under a given electron efficiency hypothesis
1608     //
1609
1610   Double_t probs[AliPID::kSPECIES];
1611   ComputeTRDProbability(vtrack, AliPID::kSPECIES, probs,PIDmethod);
1612
1613   Int_t ntracklets = vtrack->GetTRDntrackletsPID();
1614   // Take mean of the TRD momenta in the given tracklets
1615   Float_t p = 0, trdmomenta[AliVTrack::kTRDnPlanes];
1616   Int_t nmomenta = 0;
1617   for(Int_t iPl=0;iPl<AliVTrack::kTRDnPlanes;iPl++){
1618     if(vtrack->GetTRDmomentum(iPl) > 0.){
1619       trdmomenta[nmomenta++] = vtrack->GetTRDmomentum(iPl); 
1620     }
1621   }
1622   p = TMath::Mean(nmomenta, trdmomenta);
1623
1624   return fTRDResponse.IdentifiedAsElectron(ntracklets, probs, p, efficiencyLevel,centrality,PIDmethod);
1625 }
1626
1627 //______________________________________________________________________________
1628 void AliPIDResponse::SetEMCALPidResponseMaster()
1629 {
1630   //
1631   // Load the EMCAL pid response functions from the OADB
1632   //
1633   TObjArray* fEMCALPIDParamsRun      = NULL;
1634   TObjArray* fEMCALPIDParamsPass     = NULL;
1635
1636   if(fEMCALPIDParams) return;
1637   AliOADBContainer contParams("contParams"); 
1638
1639   Int_t statusPars = contParams.InitFromFile(Form("%s/COMMON/PID/data/EMCALPIDParams.root", fOADBPath.Data()), "AliEMCALPIDParams");
1640   if(statusPars){
1641     AliError("Failed initializing PID Params from OADB");
1642   } 
1643   else {
1644     AliInfo(Form("Loading EMCAL Params from %s/COMMON/PID/data/EMCALPIDParams.root", fOADBPath.Data()));
1645
1646     fEMCALPIDParamsRun = dynamic_cast<TObjArray *>(contParams.GetObject(fRun));
1647     if(fEMCALPIDParamsRun)  fEMCALPIDParamsPass = dynamic_cast<TObjArray *>(fEMCALPIDParamsRun->FindObject(Form("pass%d",fRecoPass)));
1648     if(fEMCALPIDParamsPass) fEMCALPIDParams     = dynamic_cast<TObjArray *>(fEMCALPIDParamsPass->FindObject(Form("EMCALPIDParams_Particles")));
1649
1650     if(!fEMCALPIDParams){
1651       AliInfo(Form("EMCAL Params not found in run %d pass %d", fRun, fRecoPass));
1652       AliInfo("Will take the standard LHC11d instead ...");
1653
1654       fEMCALPIDParamsRun = dynamic_cast<TObjArray *>(contParams.GetObject(156477));
1655       if(fEMCALPIDParamsRun)  fEMCALPIDParamsPass = dynamic_cast<TObjArray *>(fEMCALPIDParamsRun->FindObject(Form("pass%d",1)));
1656       if(fEMCALPIDParamsPass) fEMCALPIDParams     = dynamic_cast<TObjArray *>(fEMCALPIDParamsPass->FindObject(Form("EMCALPIDParams_Particles")));
1657
1658       if(!fEMCALPIDParams){
1659         AliError(Form("DEFAULT EMCAL Params (LHC11d) not found in file %s/COMMON/PID/data/EMCALPIDParams.root", fOADBPath.Data()));     
1660       }
1661     }
1662   }
1663 }
1664
1665 //______________________________________________________________________________
1666 void AliPIDResponse::InitializeEMCALResponse(){
1667   //
1668   // Set PID Params to the EMCAL PID response
1669   // 
1670   fEMCALResponse.SetPIDParams(fEMCALPIDParams);
1671
1672 }
1673
1674 //______________________________________________________________________________
1675 void AliPIDResponse::FillTrackDetectorPID(const AliVTrack *track, EDetector detector) const
1676 {
1677   //
1678   // create detector PID information and setup the transient pointer in the track
1679   //
1680   
1681   // check if detector number is inside accepted range
1682   if (detector == kNdetectors) return;
1683   
1684   // get detector pid
1685   AliDetectorPID *detPID=const_cast<AliDetectorPID*>(track->GetDetectorPID());
1686   if (!detPID) {
1687     detPID=new AliDetectorPID;
1688     (const_cast<AliVTrack*>(track))->SetDetectorPID(detPID);
1689   }
1690   
1691   //check if values exist
1692   if (detPID->HasRawProbability(detector) && detPID->HasNumberOfSigmas(detector)) return;
1693   
1694   //TODO: which particles to include? See also the loops below...
1695   Double_t values[AliPID::kSPECIESC]={0};
1696
1697   //probabilities
1698   EDetPidStatus status=GetComputePIDProbability(detector,track,AliPID::kSPECIESC,values);
1699   detPID->SetRawProbability(detector, values, (Int_t)AliPID::kSPECIESC, status);
1700   
1701   //nsigmas
1702   for (Int_t ipart=0; ipart<AliPID::kSPECIESC; ++ipart)
1703     values[ipart]=GetNumberOfSigmas(detector,track,(AliPID::EParticleType)ipart);
1704   // the pid status is the same for probabilities and nSigmas, so it is
1705   // fine to use the one from the probabilities also here
1706   detPID->SetNumberOfSigmas(detector, values, (Int_t)AliPID::kSPECIESC, status);
1707   
1708 }
1709
1710 //______________________________________________________________________________
1711 void AliPIDResponse::FillTrackDetectorPID()
1712 {
1713   //
1714   // create detector PID information and setup the transient pointer in the track
1715   //
1716
1717   if (!fCurrentEvent) return;
1718   
1719   for (Int_t itrack=0; itrack<fCurrentEvent->GetNumberOfTracks(); ++itrack){
1720     AliVTrack *track=dynamic_cast<AliVTrack*>(fCurrentEvent->GetTrack(itrack));
1721     if (!track) continue;
1722
1723     for (Int_t idet=0; idet<kNdetectors; ++idet){
1724       FillTrackDetectorPID(track, (EDetector)idet);
1725     }
1726   }
1727 }
1728
1729 //______________________________________________________________________________
1730 void AliPIDResponse::SetTOFResponse(AliVEvent *vevent,EStartTimeType_t option){
1731   //
1732   // Set TOF response function
1733   // Input option for event_time used
1734   //
1735
1736     Float_t t0spread = 0.; //vevent->GetEventTimeSpread();
1737     if(t0spread < 10) t0spread = 80;
1738
1739     // T0-FILL and T0-TO offset (because of TOF misallignment
1740     Float_t starttimeoffset = 0;
1741     if(fTOFPIDParams && !(fIsMC)) starttimeoffset=fTOFPIDParams->GetTOFtimeOffset();
1742
1743
1744     // T0 from TOF algorithm
1745     Bool_t flagT0TOF=kFALSE;
1746     Bool_t flagT0T0=kFALSE;
1747     Float_t *startTime = new Float_t[fTOFResponse.GetNmomBins()];
1748     Float_t *startTimeRes = new Float_t[fTOFResponse.GetNmomBins()];
1749     Int_t *startTimeMask = new Int_t[fTOFResponse.GetNmomBins()];
1750
1751     // T0-TOF arrays
1752     Float_t *estimatedT0event = new Float_t[fTOFResponse.GetNmomBins()];
1753     Float_t *estimatedT0resolution = new Float_t[fTOFResponse.GetNmomBins()];
1754     for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1755       estimatedT0event[i]=0.0;
1756       estimatedT0resolution[i]=0.0;
1757       startTimeMask[i] = 0;
1758     }
1759
1760     Float_t resT0A=fResT0A;
1761     Float_t resT0C=fResT0C;
1762     Float_t resT0AC=fResT0AC;
1763     if(vevent->GetT0TOF()){ // check if T0 detector information is available
1764         flagT0T0=kTRUE;
1765     }
1766
1767
1768     AliTOFHeader *tofHeader = (AliTOFHeader*)vevent->GetTOFHeader();
1769
1770     if (tofHeader) { // read global info and T0-TOF
1771       fTOFResponse.SetTimeResolution(tofHeader->GetTOFResolution());
1772       t0spread = tofHeader->GetT0spread(); // read t0 sprad
1773       if(t0spread < 10) t0spread = 80;
1774
1775       flagT0TOF=kTRUE;
1776       for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){ // read T0-TOF default value
1777         startTime[i]=tofHeader->GetDefaultEventTimeVal();
1778         startTimeRes[i]=tofHeader->GetDefaultEventTimeRes();
1779         if(startTimeRes[i] < 1.e-5) startTimeRes[i] = t0spread;
1780
1781         if(startTimeRes[i] > t0spread - 10 && TMath::Abs(startTime[i]) < 0.001) startTime[i] = -starttimeoffset; // apply offset for T0-fill
1782       }
1783
1784       TArrayI *ibin=(TArrayI*)tofHeader->GetNvalues();
1785       TArrayF *t0Bin=(TArrayF*)tofHeader->GetEventTimeValues();
1786       TArrayF *t0ResBin=(TArrayF*)tofHeader->GetEventTimeRes();
1787       for(Int_t j=0;j < tofHeader->GetNbins();j++){ // fill T0-TOF in p-bins
1788         Int_t icurrent = (Int_t)ibin->GetAt(j);
1789         startTime[icurrent]=t0Bin->GetAt(j);
1790         startTimeRes[icurrent]=t0ResBin->GetAt(j);
1791         if(startTimeRes[icurrent] < 1.e-5) startTimeRes[icurrent] = t0spread;
1792         if(startTimeRes[icurrent] > t0spread - 10 && TMath::Abs(startTime[icurrent]) < 0.001) startTime[icurrent] = -starttimeoffset; // apply offset for T0-fill
1793       }
1794     }
1795
1796     // for cut of 3 sigma on t0 spread
1797     Float_t t0cut = 3 * t0spread;
1798     if(t0cut < 500) t0cut = 500;
1799
1800     if(option == kFILL_T0){ // T0-FILL is used
1801         for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1802           estimatedT0event[i]=0.0-starttimeoffset;
1803           estimatedT0resolution[i]=t0spread;
1804         }
1805         fTOFResponse.SetT0event(estimatedT0event);
1806         fTOFResponse.SetT0resolution(estimatedT0resolution);
1807     }
1808
1809     if(option == kTOF_T0){ // T0-TOF is used when available (T0-FILL otherwise) from ESD
1810         if(flagT0TOF){
1811             fTOFResponse.SetT0event(startTime);
1812             fTOFResponse.SetT0resolution(startTimeRes);
1813             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1814               if(startTimeRes[i]<t0spread) startTimeMask[i]=1;
1815               fTOFResponse.SetT0binMask(i,startTimeMask[i]);
1816             }
1817         }
1818         else{
1819             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1820               estimatedT0event[i]=0.0-starttimeoffset;
1821               estimatedT0resolution[i]=t0spread;
1822               fTOFResponse.SetT0binMask(i,startTimeMask[i]);
1823             }
1824             fTOFResponse.SetT0event(estimatedT0event);
1825             fTOFResponse.SetT0resolution(estimatedT0resolution);
1826         }
1827     }
1828     else if(option == kBest_T0){ // T0-T0 or T0-TOF are used when available (T0-FILL otherwise) from ESD
1829         Float_t t0AC=-10000;
1830         Float_t t0A=-10000;
1831         Float_t t0C=-10000;
1832         if(flagT0T0){
1833             t0A= vevent->GetT0TOF()[1] - starttimeoffset;
1834             t0C= vevent->GetT0TOF()[2] - starttimeoffset;
1835         //      t0AC= vevent->GetT0TOF()[0];
1836             t0AC= t0A/resT0A/resT0A + t0C/resT0C/resT0C;
1837             resT0AC= TMath::Sqrt(1./resT0A/resT0A + 1./resT0C/resT0C);
1838             t0AC /= resT0AC*resT0AC;
1839         }
1840
1841         Float_t t0t0Best = 0;
1842         Float_t t0t0BestRes = 9999;
1843         Int_t t0used=0;
1844         if(TMath::Abs(t0A) < t0cut && TMath::Abs(t0C) < t0cut && TMath::Abs(t0C-t0A) < 500){
1845             t0t0Best = t0AC;
1846             t0t0BestRes = resT0AC;
1847             t0used=6;
1848         }
1849         else if(TMath::Abs(t0C) < t0cut){
1850             t0t0Best = t0C;
1851             t0t0BestRes = resT0C;
1852             t0used=4;
1853         }
1854         else if(TMath::Abs(t0A) < t0cut){
1855             t0t0Best = t0A;
1856             t0t0BestRes = resT0A;
1857             t0used=2;
1858         }
1859
1860         if(flagT0TOF){ // if T0-TOF info is available
1861             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1862                 if(t0t0BestRes < 999){
1863                   if(startTimeRes[i] < t0spread){
1864                     Double_t wtot = 1./startTimeRes[i]/startTimeRes[i] + 1./t0t0BestRes/t0t0BestRes;
1865                     Double_t t0best = startTime[i]/startTimeRes[i]/startTimeRes[i] + t0t0Best/t0t0BestRes/t0t0BestRes;
1866                     estimatedT0event[i]=t0best / wtot;
1867                     estimatedT0resolution[i]=1./TMath::Sqrt(wtot);
1868                     startTimeMask[i] = t0used+1;
1869                   }
1870                   else {
1871                     estimatedT0event[i]=t0t0Best;
1872                     estimatedT0resolution[i]=t0t0BestRes;
1873                     startTimeMask[i] = t0used;
1874                   }
1875                 }
1876                 else{
1877                   estimatedT0event[i]=startTime[i];
1878                   estimatedT0resolution[i]=startTimeRes[i];
1879                   if(startTimeRes[i]<t0spread) startTimeMask[i]=1;
1880                 }
1881                 fTOFResponse.SetT0binMask(i,startTimeMask[i]);
1882             }
1883             fTOFResponse.SetT0event(estimatedT0event);
1884             fTOFResponse.SetT0resolution(estimatedT0resolution);
1885         }
1886         else{ // if no T0-TOF info is available
1887             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1888               fTOFResponse.SetT0binMask(i,t0used);
1889               if(t0t0BestRes < 999){
1890                 estimatedT0event[i]=t0t0Best;
1891                 estimatedT0resolution[i]=t0t0BestRes;
1892               }
1893               else{
1894                 estimatedT0event[i]=0.0-starttimeoffset;
1895                 estimatedT0resolution[i]=t0spread;
1896               }
1897             }
1898             fTOFResponse.SetT0event(estimatedT0event);
1899             fTOFResponse.SetT0resolution(estimatedT0resolution);
1900         }
1901     }
1902
1903     else if(option == kT0_T0){ // T0-T0 is used when available (T0-FILL otherwise)
1904         Float_t t0AC=-10000;
1905         Float_t t0A=-10000;
1906         Float_t t0C=-10000;
1907         if(flagT0T0){
1908             t0A= vevent->GetT0TOF()[1] - starttimeoffset;
1909             t0C= vevent->GetT0TOF()[2] - starttimeoffset;
1910         //      t0AC= vevent->GetT0TOF()[0];
1911             t0AC= t0A/resT0A/resT0A + t0C/resT0C/resT0C;
1912             resT0AC= TMath::Sqrt(1./resT0A/resT0A + 1./resT0C/resT0C);
1913             t0AC /= resT0AC*resT0AC;
1914         }
1915
1916         if(TMath::Abs(t0A) < t0cut && TMath::Abs(t0C) < t0cut && TMath::Abs(t0C-t0A) < 500){
1917             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1918               estimatedT0event[i]=t0AC;
1919               estimatedT0resolution[i]=resT0AC;
1920               fTOFResponse.SetT0binMask(i,6);
1921             }
1922         }
1923         else if(TMath::Abs(t0C) < t0cut){
1924             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1925               estimatedT0event[i]=t0C;
1926               estimatedT0resolution[i]=resT0C;
1927               fTOFResponse.SetT0binMask(i,4);
1928             }
1929         }
1930         else if(TMath::Abs(t0A) < t0cut){
1931             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1932               estimatedT0event[i]=t0A;
1933               estimatedT0resolution[i]=resT0A;
1934               fTOFResponse.SetT0binMask(i,2);
1935             }
1936         }
1937         else{
1938             for(Int_t i=0;i<fTOFResponse.GetNmomBins();i++){
1939               estimatedT0event[i]= 0.0 - starttimeoffset;
1940               estimatedT0resolution[i]=t0spread;
1941               fTOFResponse.SetT0binMask(i,0);
1942             }
1943         }
1944         fTOFResponse.SetT0event(estimatedT0event);
1945         fTOFResponse.SetT0resolution(estimatedT0resolution);
1946     }
1947
1948     delete [] startTime;
1949     delete [] startTimeRes;
1950     delete [] startTimeMask;
1951     delete [] estimatedT0event;
1952     delete [] estimatedT0resolution;
1953 }
1954
1955 //______________________________________________________________________________
1956 // private non cached versions of the PID calculation
1957 //
1958
1959
1960 //______________________________________________________________________________
1961 Float_t AliPIDResponse::GetNumberOfSigmas(EDetector detector, const AliVParticle *vtrack, AliPID::EParticleType type) const
1962 {
1963   //
1964   // NumberOfSigmas for 'detCode'
1965   //
1966
1967   const AliVTrack *track=static_cast<const AliVTrack*>(vtrack);
1968   
1969   switch (detector){
1970     case kITS:   return GetNumberOfSigmasITS(track, type);   break;
1971     case kTPC:   return GetNumberOfSigmasTPC(track, type);   break;
1972     case kTOF:   return GetNumberOfSigmasTOF(track, type);   break;
1973     case kHMPID: return GetNumberOfSigmasHMPID(track, type); break;
1974     case kEMCAL: return GetNumberOfSigmasEMCAL(track, type); break;
1975     default: return -999.;
1976   }
1977
1978   return -999.;
1979 }
1980
1981 //______________________________________________________________________________
1982 Float_t AliPIDResponse::GetNumberOfSigmasITS(const AliVParticle *vtrack, AliPID::EParticleType type) const
1983 {
1984   //
1985   // Calculate the number of sigmas in the ITS
1986   //
1987   
1988   AliVTrack *track=(AliVTrack*)vtrack;
1989
1990   const EDetPidStatus pidStatus=GetITSPIDStatus(track);
1991   if (pidStatus!=kDetPidOk) return -999.;
1992
1993   return fITSResponse.GetNumberOfSigmas(track,type);
1994 }
1995
1996 //______________________________________________________________________________
1997 Float_t AliPIDResponse::GetNumberOfSigmasTPC(const AliVParticle *vtrack, AliPID::EParticleType type) const
1998 {
1999   //
2000   // Calculate the number of sigmas in the TPC
2001   //
2002   
2003   AliVTrack *track=(AliVTrack*)vtrack;
2004
2005   const EDetPidStatus pidStatus=GetTPCPIDStatus(track);
2006   if (pidStatus!=kDetPidOk) return -999.;
2007
2008   // the following call is needed in order to fill the transient data member
2009   // fTPCsignalTuned which is used in the TPCPIDResponse to judge
2010   // if using tuned on data
2011   if (fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))
2012     this->GetTPCsignalTunedOnData(track);
2013   
2014   return fTPCResponse.GetNumberOfSigmas(track, type, AliTPCPIDResponse::kdEdxDefault, fUseTPCEtaCorrection, fUseTPCMultiplicityCorrection);
2015 }
2016
2017 //______________________________________________________________________________
2018 Float_t AliPIDResponse::GetNumberOfSigmasTOF(const AliVParticle *vtrack, AliPID::EParticleType type) const
2019 {
2020   //
2021   // Calculate the number of sigmas in the TOF
2022   //
2023   
2024   AliVTrack *track=(AliVTrack*)vtrack;
2025
2026   const EDetPidStatus pidStatus=GetTOFPIDStatus(track);
2027   if (pidStatus!=kDetPidOk) return -999.;
2028   
2029   return GetNumberOfSigmasTOFold(vtrack, type);
2030 }
2031 //______________________________________________________________________________
2032
2033 Float_t AliPIDResponse::GetNumberOfSigmasHMPID(const AliVParticle *vtrack, AliPID::EParticleType type) const
2034 {
2035   //
2036   // Calculate the number of sigmas in the HMPID
2037   //  
2038   AliVTrack *track=(AliVTrack*)vtrack;
2039     
2040   const EDetPidStatus pidStatus=GetHMPIDPIDStatus(track);
2041   if (pidStatus!=kDetPidOk) return -999.; 
2042   
2043   return fHMPIDResponse.GetNumberOfSigmas(track, type);
2044 }
2045
2046 //______________________________________________________________________________
2047 Float_t AliPIDResponse::GetNumberOfSigmasEMCAL(const AliVParticle *vtrack, AliPID::EParticleType type) const
2048 {
2049   //
2050   // Calculate the number of sigmas in the EMCAL
2051   //
2052   
2053   AliVTrack *track=(AliVTrack*)vtrack;
2054
2055   const EDetPidStatus pidStatus=GetEMCALPIDStatus(track);
2056   if (pidStatus!=kDetPidOk) return -999.;
2057
2058   const Int_t nMatchClus = track->GetEMCALcluster();
2059   AliVCluster *matchedClus = (AliVCluster*)fCurrentEvent->GetCaloCluster(nMatchClus);
2060   
2061   const Double_t mom    = track->P();
2062   const Double_t pt     = track->Pt();
2063   const Int_t    charge = track->Charge();
2064   const Double_t fClsE  = matchedClus->E();
2065   const Double_t EovP   = fClsE/mom;
2066   
2067   return fEMCALResponse.GetNumberOfSigmas(pt,EovP,type,charge);
2068 }
2069
2070 //______________________________________________________________________________
2071 AliPIDResponse::EDetPidStatus AliPIDResponse::GetSignalDeltaITS(const AliVParticle *vtrack, AliPID::EParticleType type, Double_t &val, Bool_t ratio/*=kFALSE*/) const
2072 {
2073   //
2074   // Signal minus expected Signal for ITS
2075   //
2076   AliVTrack *track=(AliVTrack*)vtrack;
2077   val=fITSResponse.GetSignalDelta(track,type,ratio);
2078   
2079   return GetITSPIDStatus(track);
2080 }
2081
2082 //______________________________________________________________________________
2083 AliPIDResponse::EDetPidStatus AliPIDResponse::GetSignalDeltaTPC(const AliVParticle *vtrack, AliPID::EParticleType type, Double_t &val, Bool_t ratio/*=kFALSE*/) const
2084 {
2085   //
2086   // Signal minus expected Signal for TPC
2087   //
2088   AliVTrack *track=(AliVTrack*)vtrack;
2089   
2090   // the following call is needed in order to fill the transient data member
2091   // fTPCsignalTuned which is used in the TPCPIDResponse to judge
2092   // if using tuned on data
2093   if (fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC))
2094     this->GetTPCsignalTunedOnData(track);
2095   
2096   val=fTPCResponse.GetSignalDelta(track, type, AliTPCPIDResponse::kdEdxDefault, fUseTPCEtaCorrection, fUseTPCMultiplicityCorrection, ratio);
2097   
2098   return GetTPCPIDStatus(track);
2099 }
2100
2101 //______________________________________________________________________________
2102 AliPIDResponse::EDetPidStatus AliPIDResponse::GetSignalDeltaTOF(const AliVParticle *vtrack, AliPID::EParticleType type, Double_t &val, Bool_t ratio/*=kFALSE*/) const
2103 {
2104   //
2105   // Signal minus expected Signal for TOF
2106   //
2107   AliVTrack *track=(AliVTrack*)vtrack;
2108   val=GetSignalDeltaTOFold(track, type, ratio);
2109   
2110   return GetTOFPIDStatus(track);
2111 }
2112
2113 //______________________________________________________________________________
2114 AliPIDResponse::EDetPidStatus AliPIDResponse::GetSignalDeltaHMPID(const AliVParticle *vtrack, AliPID::EParticleType type, Double_t &val, Bool_t ratio/*=kFALSE*/) const
2115 {
2116   //
2117   // Signal minus expected Signal for HMPID
2118   //
2119   AliVTrack *track=(AliVTrack*)vtrack;
2120   val=fHMPIDResponse.GetSignalDelta(track, type, ratio);
2121   
2122   return GetHMPIDPIDStatus(track);
2123 }
2124
2125 //______________________________________________________________________________
2126 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputePIDProbability  (EDetector detCode,  const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
2127 {
2128   //
2129   // Compute PID response of 'detCode'
2130   //
2131
2132   switch (detCode){
2133     case kITS: return GetComputeITSProbability(track, nSpecies, p); break;
2134     case kTPC: return GetComputeTPCProbability(track, nSpecies, p); break;
2135     case kTRD: return GetComputeTRDProbability(track, nSpecies, p); break;
2136     case kTOF: return GetComputeTOFProbability(track, nSpecies, p); break;
2137     case kPHOS: return GetComputePHOSProbability(track, nSpecies, p); break;
2138     case kEMCAL: return GetComputeEMCALProbability(track, nSpecies, p); break;
2139     case kHMPID: return GetComputeHMPIDProbability(track, nSpecies, p); break;
2140     default: return kDetNoSignal;
2141   }
2142 }
2143
2144 //______________________________________________________________________________
2145 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputeITSProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
2146 {
2147   //
2148   // Compute PID response for the ITS
2149   //
2150   
2151   // set flat distribution (no decision)
2152   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2153   
2154   const EDetPidStatus pidStatus=GetITSPIDStatus(track);
2155   if (pidStatus!=kDetPidOk) return pidStatus;
2156   
2157   if (track->GetDetectorPID()){
2158     return track->GetDetectorPID()->GetRawProbability(kITS, p, nSpecies);
2159   }
2160   
2161   //check for ITS standalone tracks
2162   Bool_t isSA=kTRUE;
2163   if( track->GetStatus() & AliVTrack::kTPCin ) isSA=kFALSE;
2164
2165   Double_t mom=track->P();
2166   Double_t dedx=track->GetITSsignal();
2167   Double_t momITS=mom;
2168   UChar_t clumap=track->GetITSClusterMap();
2169   Int_t nPointsForPid=0;
2170   for(Int_t i=2; i<6; i++){
2171     if(clumap&(1<<i)) ++nPointsForPid;
2172   }
2173
2174   Bool_t mismatch=kTRUE/*, heavy=kTRUE*/;
2175   for (Int_t j=0; j<nSpecies; j++) {
2176     Double_t mass=AliPID::ParticleMassZ(j);//GeV/c^2
2177     const Double_t chargeFactor = TMath::Power(AliPID::ParticleCharge(j),2.);
2178     Double_t bethe=fITSResponse.Bethe(momITS,mass)*chargeFactor;
2179     //TODO: in case of the electron, use the SA parametrisation,
2180     //      this needs to be changed if ITS provides a parametrisation
2181     //      for electrons also for ITS+TPC tracks
2182     Double_t sigma=fITSResponse.GetResolution(bethe,nPointsForPid,isSA || (j==(Int_t)AliPID::kElectron));
2183     if (TMath::Abs(dedx-bethe) > fRange*sigma) {
2184       p[j]=TMath::Exp(-0.5*fRange*fRange)/sigma;
2185     } else {
2186       p[j]=TMath::Exp(-0.5*(dedx-bethe)*(dedx-bethe)/(sigma*sigma))/sigma;
2187       mismatch=kFALSE;
2188     }
2189   }
2190
2191   if (mismatch){
2192     for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2193   }
2194
2195   return kDetPidOk;
2196 }
2197 //______________________________________________________________________________
2198 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputeTPCProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
2199 {
2200   //
2201   // Compute PID response for the TPC
2202   //
2203   
2204   // set flat distribution (no decision)
2205   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2206   
2207   const EDetPidStatus pidStatus=GetTPCPIDStatus(track);
2208   if (pidStatus!=kDetPidOk) return pidStatus;
2209   
2210   Double_t dedx=track->GetTPCsignal();
2211   Bool_t mismatch=kTRUE/*, heavy=kTRUE*/;
2212   
2213   if (fTuneMConData && ((fTuneMConDataMask & kDetTPC) == kDetTPC)) dedx = this->GetTPCsignalTunedOnData(track);
2214   
2215   Double_t bethe = 0.;
2216   Double_t sigma = 0.;
2217   
2218   for (Int_t j=0; j<nSpecies; j++) {
2219     AliPID::EParticleType type=AliPID::EParticleType(j);
2220     
2221     bethe=fTPCResponse.GetExpectedSignal(track, type, AliTPCPIDResponse::kdEdxDefault, fUseTPCEtaCorrection, fUseTPCMultiplicityCorrection);
2222     sigma=fTPCResponse.GetExpectedSigma(track, type, AliTPCPIDResponse::kdEdxDefault, fUseTPCEtaCorrection, fUseTPCMultiplicityCorrection);
2223     
2224     if (TMath::Abs(dedx-bethe) > fRange*sigma) {
2225       p[j]=TMath::Exp(-0.5*fRange*fRange)/sigma;
2226     } else {
2227       p[j]=TMath::Exp(-0.5*(dedx-bethe)*(dedx-bethe)/(sigma*sigma))/sigma;
2228       mismatch=kFALSE;
2229     }
2230   }
2231   
2232   if (mismatch){
2233     for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2234   }
2235   
2236   return kDetPidOk;
2237 }
2238 //______________________________________________________________________________
2239 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputeTOFProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
2240 {
2241   //
2242   // Compute PID probabilities for TOF
2243   //
2244   
2245   // set flat distribution (no decision)
2246   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2247   
2248   const EDetPidStatus pidStatus=GetTOFPIDStatus(track);
2249   if (pidStatus!=kDetPidOk) return pidStatus;
2250
2251   const Double_t meanCorrFactor = 0.07/fTOFtail; // Correction factor on the mean because of the tail (should be ~ 0.1 with tail = 1.1)
2252   
2253   for (Int_t j=0; j<nSpecies; j++) {
2254     AliPID::EParticleType type=AliPID::EParticleType(j);
2255     const Double_t nsigmas=GetNumberOfSigmasTOFold(track,type) + meanCorrFactor;
2256     
2257     const Double_t expTime = fTOFResponse.GetExpectedSignal(track,type);
2258     const Double_t sig     = fTOFResponse.GetExpectedSigma(track->P(),expTime,AliPID::ParticleMassZ(type));
2259     if (TMath::Abs(nsigmas) > (fRange+2)) {
2260       if(nsigmas < fTOFtail)
2261         p[j] = TMath::Exp(-0.5*(fRange+2)*(fRange+2))/sig;
2262       else
2263         p[j] = TMath::Exp(-(fRange+2 - fTOFtail*0.5)*fTOFtail)/sig;
2264     } else{
2265       if(nsigmas < fTOFtail)
2266         p[j] = TMath::Exp(-0.5*nsigmas*nsigmas)/sig;
2267       else
2268         p[j] = TMath::Exp(-(nsigmas - fTOFtail*0.5)*fTOFtail)/sig;
2269     }    
2270   }
2271   
2272   return kDetPidOk;
2273 }
2274 //______________________________________________________________________________
2275 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputeTRDProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[],AliTRDPIDResponse::ETRDPIDMethod PIDmethod/*=AliTRDPIDResponse::kLQ1D*/) const
2276 {
2277   //
2278   // Compute PID probabilities for the TRD
2279   //
2280   
2281   // set flat distribution (no decision)
2282   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2283   
2284   const EDetPidStatus pidStatus=GetTRDPIDStatus(track);
2285   if (pidStatus!=kDetPidOk) return pidStatus;
2286
2287   UInt_t TRDslicesForPID[2];
2288   SetTRDSlices(TRDslicesForPID,PIDmethod);
2289   
2290   Float_t mom[6]={0.};
2291   Double_t dedx[48]={0.};  // Allocate space for the maximum number of TRD slices
2292   Int_t nslices = TRDslicesForPID[1] - TRDslicesForPID[0] + 1;
2293   AliDebug(1, Form("First Slice: %d, Last Slice: %d, Number of slices: %d",  TRDslicesForPID[0], TRDslicesForPID[1], nslices));
2294   for(UInt_t ilayer = 0; ilayer < 6; ilayer++){
2295     mom[ilayer] = track->GetTRDmomentum(ilayer);
2296     for(UInt_t islice = TRDslicesForPID[0]; islice <= TRDslicesForPID[1]; islice++){
2297       dedx[ilayer*nslices+islice-TRDslicesForPID[0]] = track->GetTRDslice(ilayer, islice);
2298     }
2299   }
2300   
2301   fTRDResponse.GetResponse(nslices, dedx, mom, p,PIDmethod);
2302   return kDetPidOk;
2303 }
2304
2305 //______________________________________________________________________________
2306 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputeEMCALProbability  (const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
2307 {
2308   //
2309   // Compute PID response for the EMCAL
2310   //
2311   
2312   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2313
2314   const EDetPidStatus pidStatus=GetEMCALPIDStatus(track);
2315   if (pidStatus!=kDetPidOk) return pidStatus;
2316
2317   const Int_t nMatchClus = track->GetEMCALcluster();
2318   AliVCluster *matchedClus = (AliVCluster*)fCurrentEvent->GetCaloCluster(nMatchClus);
2319   
2320   const Double_t mom    = track->P();
2321   const Double_t pt     = track->Pt();
2322   const Int_t    charge = track->Charge();
2323   const Double_t fClsE  = matchedClus->E();
2324   const Double_t EovP   = fClsE/mom;
2325   
2326   // compute the probabilities
2327   fEMCALResponse.ComputeEMCALProbability(nSpecies,pt,EovP,charge,p);
2328   return kDetPidOk;
2329 }
2330
2331 //______________________________________________________________________________
2332 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputePHOSProbability (const AliVTrack */*track*/, Int_t nSpecies, Double_t p[]) const
2333 {
2334   //
2335   // Compute PID response for the PHOS
2336   //
2337   
2338   // set flat distribution (no decision)
2339   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2340   return kDetNoSignal;
2341 }
2342
2343 //______________________________________________________________________________
2344 AliPIDResponse::EDetPidStatus AliPIDResponse::GetComputeHMPIDProbability(const AliVTrack *track, Int_t nSpecies, Double_t p[]) const
2345 {
2346   //
2347   // Compute PID response for the HMPID
2348   //
2349   
2350   // set flat distribution (no decision)
2351   for (Int_t j=0; j<nSpecies; j++) p[j]=1./nSpecies;
2352   
2353   const EDetPidStatus pidStatus=GetHMPIDPIDStatus(track);
2354   if (pidStatus!=kDetPidOk) return pidStatus;
2355   
2356   fHMPIDResponse.GetProbability(track,nSpecies,p);
2357     
2358   return kDetPidOk;
2359 }
2360
2361 //______________________________________________________________________________
2362 AliPIDResponse::EDetPidStatus AliPIDResponse::GetITSPIDStatus(const AliVTrack *track) const
2363 {
2364   // compute ITS pid status
2365
2366   // check status bits
2367   if ((track->GetStatus()&AliVTrack::kITSin)==0 &&
2368     (track->GetStatus()&AliVTrack::kITSout)==0) return kDetNoSignal;
2369
2370   const Float_t dEdx=track->GetITSsignal();
2371   if (dEdx<=0) return kDetNoSignal;
2372   
2373   // requite at least 3 pid clusters
2374   const UChar_t clumap=track->GetITSClusterMap();
2375   Int_t nPointsForPid=0;
2376   for(Int_t i=2; i<6; i++){
2377     if(clumap&(1<<i)) ++nPointsForPid;
2378   }
2379   
2380   if(nPointsForPid<3) { 
2381     return kDetNoSignal;
2382   }
2383   
2384   return kDetPidOk;
2385 }
2386
2387 //______________________________________________________________________________
2388 AliPIDResponse::EDetPidStatus AliPIDResponse:: GetTPCPIDStatus(const AliVTrack *track) const
2389 {
2390   // compute TPC pid status
2391   
2392   // check quality of the track
2393   if ( (track->GetStatus()&AliVTrack::kTPCin )==0 && (track->GetStatus()&AliVTrack::kTPCout)==0 ) return kDetNoSignal;
2394
2395   // check pid values
2396   const Double_t dedx=track->GetTPCsignal();
2397   const UShort_t signalN=track->GetTPCsignalN();
2398   if (signalN<10 || dedx<10) return kDetNoSignal;
2399
2400   if (!(fArrPidResponseMaster && fArrPidResponseMaster->At(AliPID::kPion))) return kDetNoParams;
2401   
2402   return kDetPidOk;
2403 }
2404
2405 //______________________________________________________________________________
2406 AliPIDResponse::EDetPidStatus AliPIDResponse::GetTRDPIDStatus(const AliVTrack *track) const
2407 {
2408   // compute TRD pid status
2409
2410   if((track->GetStatus()&AliVTrack::kTRDout)==0) return kDetNoSignal;
2411   return kDetPidOk;
2412 }
2413
2414 //______________________________________________________________________________
2415 AliPIDResponse::EDetPidStatus AliPIDResponse::GetTOFPIDStatus(const AliVTrack *track) const
2416 {
2417   // compute TOF pid status
2418
2419   if ((track->GetStatus()&AliVTrack::kTOFout)==0) return kDetNoSignal;
2420   if ((track->GetStatus()&AliVTrack::kTIME)==0) return kDetNoSignal;
2421
2422   return kDetPidOk;
2423 }
2424
2425 //______________________________________________________________________________
2426 Float_t AliPIDResponse::GetTOFMismatchProbability(const AliVTrack *track) const
2427 {
2428   // compute mismatch probability cross-checking at 5 sigmas with TPC
2429   // currently just implemented as a 5 sigma compatibility cut
2430
2431   // check pid status
2432   const EDetPidStatus tofStatus=GetTOFPIDStatus(track);
2433   if (tofStatus!=kDetPidOk) return 0.;
2434
2435   //mismatch
2436   const EDetPidStatus tpcStatus=GetTPCPIDStatus(track);
2437   if (tpcStatus!=kDetPidOk) return 0.;
2438   
2439   const Double_t meanCorrFactor = 0.11/fTOFtail; // Correction factor on the mean because of the tail (should be ~ 0.1 with tail = 1.1)
2440   Bool_t mismatch = kTRUE/*, heavy = kTRUE*/;
2441   for (Int_t j=0; j<AliPID::kSPECIESC; j++) {
2442     AliPID::EParticleType type=AliPID::EParticleType(j);
2443     const Double_t nsigmas=GetNumberOfSigmasTOFold(track,type) + meanCorrFactor;
2444     
2445     if (TMath::Abs(nsigmas)<5.){
2446       const Double_t nsigmasTPC=GetNumberOfSigmasTPC(track,type);
2447       if (TMath::Abs(nsigmasTPC)<5.) mismatch=kFALSE;
2448     }
2449   }
2450   
2451   if (mismatch){
2452     return 1.;
2453   }
2454   
2455   return 0.;
2456 }
2457
2458 //______________________________________________________________________________
2459 AliPIDResponse::EDetPidStatus AliPIDResponse:: GetHMPIDPIDStatus(const AliVTrack *track) const
2460 {
2461   // compute HMPID pid status
2462   
2463   Int_t ch = track->GetHMPIDcluIdx()/1000000;
2464   Double_t HMPIDsignal = track->GetHMPIDsignal(); 
2465   
2466   if((track->GetStatus()&AliVTrack::kHMPIDpid)==0 || ch<0 || ch>6 || HMPIDsignal<0) return kDetNoSignal;
2467   
2468   return kDetPidOk;
2469 }
2470
2471 //______________________________________________________________________________
2472 AliPIDResponse::EDetPidStatus AliPIDResponse:: GetPHOSPIDStatus(const AliVTrack */*track*/) const
2473 {
2474   // compute PHOS pid status
2475   return kDetNoSignal;  
2476 }
2477
2478 //______________________________________________________________________________
2479 AliPIDResponse::EDetPidStatus AliPIDResponse:: GetEMCALPIDStatus(const AliVTrack *track) const
2480 {
2481   // compute EMCAL pid status
2482
2483
2484   // Track matching
2485   const Int_t nMatchClus = track->GetEMCALcluster();
2486   if (nMatchClus<0) return kDetNoSignal;
2487
2488   AliVCluster *matchedClus = (AliVCluster*)fCurrentEvent->GetCaloCluster(nMatchClus);
2489
2490   if (!(matchedClus && matchedClus->IsEMCAL())) return kDetNoSignal;
2491
2492   const Int_t charge = track->Charge();
2493   if (TMath::Abs(charge)!=1) return kDetNoSignal;
2494
2495   if (!(fEMCALPIDParams && fEMCALPIDParams->At(AliPID::kElectron))) return kDetNoParams;
2496   
2497   return kDetPidOk;
2498
2499 }
2500
2501 //______________________________________________________________________________
2502 AliPIDResponse::EDetPidStatus AliPIDResponse::GetPIDStatus(EDetector detector, const AliVTrack *track) const
2503 {
2504   //
2505   // check pid status for a track
2506   //
2507
2508   switch (detector){
2509     case kITS:   return GetITSPIDStatus(track);   break;
2510     case kTPC:   return GetTPCPIDStatus(track);   break;
2511     case kTRD:   return GetTRDPIDStatus(track);   break;
2512     case kTOF:   return GetTOFPIDStatus(track);   break;
2513     case kPHOS:  return GetPHOSPIDStatus(track);  break;
2514     case kEMCAL: return GetEMCALPIDStatus(track); break;
2515     case kHMPID: return GetHMPIDPIDStatus(track); break;
2516     default: return kDetNoSignal;
2517   }
2518   return kDetNoSignal;
2519   
2520 }
2521
2522 //______________________________________________________________________________
2523 TString AliPIDResponse::GetChecksum(const TObject* obj) const
2524 {
2525   // Return the checksum for an object obj (tested to work properly at least for histograms and TSplines).
2526   
2527   TString fileName = Form("tempChecksum.C"); // File name must be fixed for data type "TSpline3", since the file name will end up in the file content!
2528   
2529   // For parallel processing, a unique file pathname is required. Uniqueness can be guaranteed by using a unique directory name
2530   UInt_t index = 0;
2531   TString uniquePathName = Form("tempChecksum_%u", index);
2532   
2533   // To get a unique path name, increase the index until no directory
2534   // of such a name exists.
2535   // NOTE: gSystem->AccessPathName(...) returns kTRUE, if the access FAILED!
2536   while (!gSystem->AccessPathName(uniquePathName.Data()))
2537     uniquePathName = Form("tempChecksum_%u", ++index);
2538   
2539   if (gSystem->mkdir(uniquePathName.Data()) < 0) {
2540     AliError("Could not create temporary directory to store temp file for checksum determination!");
2541     return "ERROR";
2542   }
2543   
2544   TString option = "";
2545   
2546   // Save object as a macro, which will be deleted immediately after the checksum has been computed
2547   // (does not work for desired data types if saved as *.root for some reason) - one only wants to compare the content, not
2548   // the modification time etc. ...
2549   if (dynamic_cast<const TH1*>(obj))
2550     option = "colz"; // Histos need this option, since w/o this option, a counter is added to the filename
2551   
2552   
2553   // SaveAs must be called with the fixed fileName only, since the first argument goes into the file content
2554   // for some object types. Thus, change the directory, save the file and then go back
2555   TString oldDir = gSystem->pwd();
2556   gSystem->cd(uniquePathName.Data());
2557   obj->SaveAs(fileName.Data(), option.Data());
2558   gSystem->cd(oldDir.Data());
2559   
2560   // Use the file to calculate the MD5 checksum
2561   TMD5* md5 = TMD5::FileChecksum(Form("%s/%s", uniquePathName.Data(), fileName.Data()));
2562   TString checksum = md5->AsString();
2563   
2564   // Clean up
2565   delete md5;
2566   gSystem->Exec(Form("rm -rf %s", uniquePathName.Data()));
2567   
2568   return checksum;
2569 }