2 /**************************************************************************
3 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
5 * Author: The ALICE Off-line Project. *
6 * Contributors are mentioned in the code where appropriate. *
8 * Permission to use, copy, modify and distribute this software and its *
9 * documentation strictly for non-commercial purposes is hereby granted *
10 * without fee, provided that the above copyright notice appears in all *
11 * copies and that both the copyright notice and this permission notice *
12 * appear in the supporting documentation. The authors make no claims *
13 * about the suitability of this software for any purpose. It is *
14 * provided "as is" without express or implied warranty. *
15 **************************************************************************/
20 Basic calibration and QA class for the TPC gain calibration based on tracks from BEAM events.
23 Send comments etc. to: A.Kalweit@gsi.de, marian.ivanov@cern.ch
27 #include "Riostream.h"
40 #include "TGraphErrors.h"
42 #include "AliTPCcalibDB.h"
43 #include "AliTPCclusterMI.h"
44 #include "AliTPCClusterParam.h"
45 #include "AliTPCseed.h"
46 #include "AliESDVertex.h"
47 #include "AliESDEvent.h"
48 #include "AliESDfriend.h"
49 #include "AliESDInputHandler.h"
50 #include "AliAnalysisManager.h"
51 #include "AliTPCParam.h"
53 #include "AliComplexCluster.h"
54 #include "AliTPCclusterMI.h"
58 #include "AliTPCcalibGainMult.h"
60 #include "TTreeStream.h"
61 #include "TDatabasePDG.h"
62 #include "AliKFParticle.h"
63 #include "AliKFVertex.h"
65 #include "AliESDkink.h"
66 #include "AliRecoParam.h"
67 #include "AliTracker.h"
68 #include "AliTPCTransform.h"
69 #include "AliTPCROC.h"
71 ClassImp(AliTPCcalibGainMult)
73 Double_t AliTPCcalibGainMult::fgMergeEntriesCut=10000000.;
75 AliTPCcalibGainMult::AliTPCcalibGainMult()
95 // Empty default cosntructor
97 AliDebug(5,"Default Constructor");
101 AliTPCcalibGainMult::AliTPCcalibGainMult(const Text_t *name, const Text_t *title)
108 fHistClusterShape(0),
127 fLowerTrunc = 0.02; // IMPORTANT CHANGE --> REMOVE HARDWIRED TRUNCATION FROM TRACKER
129 fUseMax = kTRUE; // IMPORTANT CHANGE FOR PbPb; standard: kFALSE;
131 fHistNTracks = new TH1F("ntracks","Number of Tracks per Event; number of tracks per event; number of tracks",1001,-0.5,1000.5);
132 fHistClusterShape = new TH1F("fHistClusterShape","cluster shape; rms meas. / rms exp.;",300,0,3);
133 fHistQA = new TH3F("fHistQA","dEdx; momentum p (GeV); TPC signal (a.u.); pad",500,0.1,20.,500,0.,500,6,-0.5,5.5);
134 AliTPCcalibBase::BinLogX(fHistQA);
137 // MIP, sect, pad (short,med,long,full,oroc), run, ncl
138 Int_t binsGainSec[5] = { 145, 72, 4, 10000000, 65};
139 Double_t xminGainSec[5] = { 10., -0.5, -0.5, -0.5, -0.5};
140 Double_t xmaxGainSec[5] = {300., 71.5, 3.5, 9999999.5, 64.5};
141 TString axisNameSec[5]={"Q","sector","pad type","run", "ncl"};
142 TString axisTitleSec[5]={"Q (a.u)","sector","pad type","run","ncl"};
144 fHistGainSector = new THnSparseF("fHistGainSector","0:MIP, 1:sect, 2:pad, 3:run, 4:ncl", 5, binsGainSec, xminGainSec, xmaxGainSec);
145 for (Int_t iaxis=0; iaxis<5;iaxis++){
146 fHistGainSector->GetAxis(iaxis)->SetName(axisNameSec[iaxis]);
147 fHistGainSector->GetAxis(iaxis)->SetTitle(axisTitleSec[iaxis]);
152 Int_t binsPadEqual[5] = { 400, 400, 4, 10, 10};
153 Double_t xminPadEqual[5] = { 0.0, 0.0, -0.5, 0, -250};
154 Double_t xmaxPadEqual[5] = { 2.0, 2.0, 3.5, 13000, 250};
155 TString axisNamePadEqual[5] = {"dEdxRatioMax","dEdxRatioTot","padType","mult","driftlength"};
156 TString axisTitlePadEqual[5] = {"dEdx_padRegion/mean_dEdx Qmax", "dEdx_padRegion/mean_dEdx Qtot","padType","mult","driftlength"};
158 fHistPadEqual = new THnSparseF("fHistPadEqual","0:dEdx_pad/dEdx_mean, 1:pad, 2:mult, 3:drift", 5, binsPadEqual, xminPadEqual, xmaxPadEqual);
159 for (Int_t iaxis=0; iaxis<5;iaxis++){
160 fHistPadEqual->GetAxis(iaxis)->SetName(axisNamePadEqual[iaxis]);
161 fHistPadEqual->GetAxis(iaxis)->SetTitle(axisTitlePadEqual[iaxis]);
165 // MIP Qmax, MIP Qtot, z, pad, vtx. contribut., ncl
166 Int_t binsGainMult[6] = { 145, 145, 25, 4, 100, 80};
167 Double_t xminGainMult[6] = { 10., 10., 0, -0.5, 0, -0.5};
168 Double_t xmaxGainMult[6] = {300., 300., 250, 3.5, 13000, 159.5};
169 TString axisNameMult[6]={"Qmax","Qtot","drift","padtype""multiplicity","ncl"};
170 TString axisTitleMult[6]={"Qmax (a.u)","Qtot (a.u.)","driftlenght l (cm)","Pad Type","multiplicity","ncl"};
172 fHistGainMult = new THnSparseF("fHistGainMult","MIP Qmax, MIP Qtot, z, type, vtx. contribut.", 6, binsGainMult, xminGainMult, xmaxGainMult);
173 for (Int_t iaxis=0; iaxis<6;iaxis++){
174 fHistGainMult->GetAxis(iaxis)->SetName(axisNameMult[iaxis]);
175 fHistGainMult->GetAxis(iaxis)->SetTitle(axisTitleMult[iaxis]);
179 // dedx maps - bigger granulatity in phi -
180 // to construct the dedx sector/phi map
181 Int_t binsGainMap[4] = { 100, 90, 10, 6};
182 Double_t xminGainMap[4] = { 0.3, -TMath::Pi(), 0, 0};
183 Double_t xmaxGainMap[4] = { 2, TMath::Pi(), 1, 6};
184 TString axisNameMap[4] = {"Q_Qexp","phi", "1/Qexp","Pad Type"};
185 TString axisTitleMap[4] = {"Q/Q_{exp}","#phi (a.u.)","1/Q_{exp}","Pad Type"};
187 fHistdEdxMap = new THnSparseF("fHistdEdxMap","fHistdEdxMap", 4, binsGainMap, xminGainMap, xmaxGainMap);
188 for (Int_t iaxis=0; iaxis<4;iaxis++){
189 fHistdEdxMap->GetAxis(iaxis)->SetName(axisNameMap[iaxis]);
190 fHistdEdxMap->GetAxis(iaxis)->SetTitle(axisTitleMap[iaxis]);
196 Int_t binsGainMax[6] = { 100, 10, 10, 10, 5, 3};
197 Double_t xminGainMax[6] = { 0.5, 0, 0, 0, 0, 0};
198 Double_t xmaxGainMax[6] = { 1.5, 1, 1.0, 1.0, 3000, 3};
199 TString axisNameMax[6] = {"Q_Qexp","1/Qexp", "phi","theta","mult", "Pad Type"};
200 TString axisTitleMax[6] = {"Q/Q_{exp}","1/Qexp", "#phi","#theta","mult","Pad Type"};
202 fHistdEdxMax = new THnSparseF("fHistdEdxMax","fHistdEdxMax", 6, binsGainMax, xminGainMax, xmaxGainMax);
203 fHistdEdxTot = new THnSparseF("fHistdEdxTot","fHistdEdxTot", 6, binsGainMax, xminGainMax, xmaxGainMax);
204 for (Int_t iaxis=0; iaxis<6;iaxis++){
205 fHistdEdxMax->GetAxis(iaxis)->SetName(axisNameMax[iaxis]);
206 fHistdEdxMax->GetAxis(iaxis)->SetTitle(axisTitleMax[iaxis]);
207 fHistdEdxTot->GetAxis(iaxis)->SetName(axisNameMax[iaxis]);
208 fHistdEdxTot->GetAxis(iaxis)->SetTitle(axisTitleMax[iaxis]);
211 AliDebug(5,"Non Default Constructor");
215 AliTPCcalibGainMult::~AliTPCcalibGainMult(){
219 delete fHistNTracks; // histogram showing number of ESD tracks per event
220 delete fHistClusterShape; // histogram to check the cluster shape
221 delete fHistQA; // dE/dx histogram showing the final spectrum
223 delete fHistGainSector; // histogram which shows MIP peak for each of the 3x36 sectors (pad region)
224 delete fHistPadEqual; // histogram for the equalization of the gain in the different pad regions -> pass0
225 delete fHistGainMult; // histogram which shows decrease of MIP signal as a function
231 if (fBBParam) delete fBBParam;
236 void AliTPCcalibGainMult::Process(AliESDEvent *event) {
238 // Main function of the class
239 // 1. Select Identified particles - for identified particles the flag in the PID matrix is stored
240 // 1.a) ProcessV0s - select Electron (gamma coversion) and pion canditates (from K0s)
241 // 1.b) ProcessTOF - select - Proton, kaon and pions candidates
242 // AS THE TOF not calibrated yet in Pass0 - we are calibrating the TOF T0 in this function
243 // 1.c) ProcessCosmic - select cosmic mumn candidates - too few entries - not significant for the calibration
244 // 1.d) ProcessKinks - select Kaon and pion candidates. From our experience (see Kink debug streamer), the angular cut for kink daughter is not sufficient - big contamination - delta rays, hadronic interaction (proton)
245 // - NOT USED for the
247 // 2. Loop over tracks
248 // 2.a DumpTrack() - for identified particles dump the track and dEdx information into the tree (for later fitting)
249 // 3. Actual fitting for the moment macro
252 // Criteria for the track selection
254 const Int_t kMinNCL=80; // minimal number of cluster - tracks accepted for the dedx calibration
255 const Double_t kMaxEta=0.8; // maximal eta fo the track to be accepted
256 const Double_t kMaxDCAR=10; // maximal DCA R of the track
257 const Double_t kMaxDCAZ=5; // maximal DCA Z of the track
258 const Double_t kMIPPt=0.45; // MIP pt
261 Printf("ERROR: ESD not available");
264 fCurrentEvent=event ;
265 fMagF = event->GetMagneticField();
266 Int_t ntracks=event->GetNumberOfTracks();
267 AliESDfriend *esdFriend=static_cast<AliESDfriend*>(event->FindListObject("AliESDfriend"));
269 //Printf("ERROR: esdFriend not available");
273 if (!(esdFriend->TestSkipBit())) fPIDMatrix= new TMatrixD(ntracks,5);
274 fHistNTracks->Fill(ntracks);
275 ProcessCosmic(event); // usually not enogh statistic
277 if (esdFriend->TestSkipBit()) {
281 ProcessV0s(event); //
282 ProcessTOF(event); //
283 //ProcessKinks(event); // not relyable
285 UInt_t runNumber = event->GetRunNumber();
286 Int_t nContributors = event->GetNumberOfTracks();
290 for (Int_t i=0;i<ntracks;++i) {
292 AliESDtrack *track = event->GetTrack(i);
293 if (!track) continue;
295 AliExternalTrackParam * trackIn = (AliExternalTrackParam *)track->GetInnerParam();
296 if (!trackIn) continue;
298 // calculate necessary track parameters
299 Double_t meanP = trackIn->GetP();
300 Int_t ncls = track->GetTPCNcls();
302 if (ncls < kMinNCL) continue;
303 // exclude tracks which do not look like primaries or are simply too short or on wrong sectors
304 if (TMath::Abs(trackIn->Eta()) > kMaxEta) continue;
306 UInt_t status = track->GetStatus();
307 if ((status&AliESDtrack::kTPCrefit)==0) continue;
308 //if (track->GetNcls(0) < 3) continue; // ITS clusters
309 Float_t dca[2], cov[3];
310 track->GetImpactParameters(dca,cov);
311 Float_t primVtxDCA = TMath::Sqrt(dca[0]*dca[0]);
312 if (primVtxDCA > kMaxDCAR || primVtxDCA < 0.00001) continue;
313 if (TMath::Abs(dca[1]) > kMaxDCAZ) continue;
316 // fill Alexander QA histogram
318 if (primVtxDCA < 3 && track->GetNcls(0) > 3 && track->GetKinkIndex(0) == 0 && ncls > 100) fHistQA->Fill(meanP, track->GetTPCsignal(), 5);
321 AliESDfriendTrack *friendTrack = esdFriend->GetTrack(i);
322 if (!friendTrack) continue;
323 TObject *calibObject;
324 AliTPCseed *seed = 0;
325 for (Int_t l=0;(calibObject=friendTrack->GetCalibObject(l));++l) {
326 if ((seed=dynamic_cast<AliTPCseed*>(calibObject))) break;
328 //if (seed) DumpTrack(track, friendTrack,seed,i); // MI implementation for the identified particles
330 if (seed) { // seed the container with track parameters and the clusters
332 const AliExternalTrackParam * trackOut = friendTrack->GetTPCOut(); // tack at the outer radius of TPC
333 if (!trackIn) continue;
334 if (!trackOut) continue;
335 Double_t meanDrift = 250 - 0.5*TMath::Abs(trackIn->GetZ() + trackOut->GetZ());
337 for (Int_t irow =0; irow<160;irow++) {
338 AliTPCTrackerPoint * point = seed->GetTrackPoint(irow);
339 if (point==0) continue;
340 AliTPCclusterMI * cl = seed->GetClusterPointer(irow);
343 Float_t rsigmay = TMath::Sqrt(point->GetSigmaY());
344 fHistClusterShape->Fill(rsigmay);
350 Double_t signalShortMax = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,1,0,62);
351 Double_t signalMedMax = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,1,63,126);
352 Double_t signalLongMax = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,1,127,159);
353 Double_t signalMax = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,1,row0,row1);
354 Double_t signalArrayMax[4] = {signalShortMax, signalMedMax, signalLongMax, signalMax};
356 Double_t signalShortTot = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,0,0,62);
357 Double_t signalMedTot = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,0,63,126);
358 Double_t signalLongTot = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,0,127,159);
359 Double_t signalTot = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,0,row0,row1);
360 Double_t signalArrayTot[4] = {signalShortTot, signalMedTot, signalLongTot, signalTot};
362 Double_t mipSignalShort = fUseMax ? signalShortMax : signalShortTot;
363 Double_t mipSignalMed = fUseMax ? signalMedMax : signalMedTot;
364 Double_t mipSignalLong = fUseMax ? signalLongMax : signalLongTot;
365 Double_t mipSignalOroc = seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,fUseMax,63,159);
366 Double_t signal = fUseMax ? signalMax : signalTot;
368 fHistQA->Fill(meanP, mipSignalShort, 0);
369 fHistQA->Fill(meanP, mipSignalMed, 1);
370 fHistQA->Fill(meanP, mipSignalLong, 2);
371 fHistQA->Fill(meanP, signal, 3);
372 fHistQA->Fill(meanP, mipSignalOroc, 4);
374 // "dEdxRatioMax","dEdxRatioTot","padType","mult","driftlength", "1_pt"
375 Float_t meanMax = (1/3.)*(signalArrayMax[0] + signalArrayMax[1] + signalArrayMax[2]);
376 Float_t meanTot = (1/3.)*(signalArrayTot[0] + signalArrayTot[1] + signalArrayTot[2]);
377 if (meanMax < 1e-5 || meanTot < 1e-5) continue;
378 for(Int_t ipad = 0; ipad < 4; ipad ++) {
379 Double_t vecPadEqual[5] = {signalArrayMax[ipad]/meanMax, signalArrayTot[ipad]/meanTot, ipad, nContributors, meanDrift};
380 if ( TMath::Abs(meanP-kMIPPt)<0.05 ) fHistPadEqual->Fill(vecPadEqual);
383 // if (meanP > 0.4 && meanP < 0.55) {
384 if ( TMath::Abs(meanP-kMIPPt)<0.05 ) {
385 Double_t vecMult[6] = {seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,1,row0,row1),
386 seed->CookdEdxAnalytical(fLowerTrunc,fUpperTrunc,0,row0,row1),
392 fHistGainMult->Fill(vecMult);
393 vecMult[0]=mipSignalShort; vecMult[1]=mipSignalShort; vecMult[3]=0;
394 fHistGainMult->Fill(vecMult);
395 vecMult[0]=mipSignalMed; vecMult[1]=mipSignalMed; vecMult[3]=1;
396 fHistGainMult->Fill(vecMult);
397 vecMult[0]=mipSignalLong; vecMult[1]=mipSignalLong; vecMult[3]=2;
398 fHistGainMult->Fill(vecMult);
403 if ( TMath::Abs(meanP-kMIPPt)>0.05 ) continue; // only MIP pions
404 //if (meanP > 0.5 || meanP < 0.4) continue; // only MIP pions
406 // for each track, we look at the three different pad regions, split it into tracklets, check if the sector does not change and fill the histogram
408 Bool_t isNotSplit[3] = {kTRUE, kTRUE, kTRUE}; // short, medium, long (true if the track is not split between two chambers)
410 Double_t sector[4] = {-1, -1, -1, -1}; // sector number short, medium, long, all
411 Int_t ncl[3] = {0,0,0};
414 for (Int_t irow=0; irow < 159; irow++){
416 if (irow > 62) padRegion = 1;
417 if (irow > 126) padRegion = 2;
419 AliTPCclusterMI* cluster = seed->GetClusterPointer(irow);
420 if (!cluster) continue;
421 if (sector[padRegion] == -1) {
422 sector[padRegion] = cluster->GetDetector();
425 if (sector[padRegion] != -1 && sector[padRegion] != cluster->GetDetector()) isNotSplit[padRegion] = kFALSE;
429 // MIP, sect, pad, run
431 Double_t vecMip[5] = {mipSignalShort, mipSignalMed, mipSignalLong, signal, mipSignalOroc};
433 for(Int_t ipad = 0; ipad < 3; ipad++) {
434 // AK. - run Number To be removed - not needed
435 Double_t vecGainSec[5] = {vecMip[ipad], sector[ipad], ipad, runNumber, ncl[ipad]};
436 if (isNotSplit[ipad]) fHistGainSector->Fill(vecGainSec);
446 void AliTPCcalibGainMult::MakeLookup(THnSparse * /*hist*/, Char_t * /*outputFile*/) {
448 // Not yet implemented
453 void AliTPCcalibGainMult::Analyze() {
463 Long64_t AliTPCcalibGainMult::Merge(TCollection *li) {
465 // merging of the component
468 const Int_t kMaxEntriesSparse=2000000; // MI- temporary - restrict the THnSparse size
469 TIterator* iter = li->MakeIterator();
470 AliTPCcalibGainMult* cal = 0;
472 while ((cal = (AliTPCcalibGainMult*)iter->Next())) {
473 if (!cal->InheritsFrom(AliTPCcalibGainMult::Class())) {
474 Error("Merge","Attempt to add object of class %s to a %s", cal->ClassName(), this->ClassName());
478 if (cal->GetHistNTracks()) fHistNTracks->Add(cal->GetHistNTracks());
479 if (cal->GetHistClusterShape()) fHistClusterShape->Add(cal->GetHistClusterShape());
480 if (cal->GetHistQA()) fHistQA->Add(cal->GetHistQA());
481 if (cal->GetHistGainSector() && fHistGainSector )
483 if ((fHistGainSector->GetEntries()+cal->GetHistGainSector()->GetEntries()) < fgMergeEntriesCut)
485 //AliInfo(Form("fHistGainSector has %.0f tracks, going to add %.0f\n",fHistGainSector->GetEntries(),cal->GetHistGainSector()->GetEntries()));
486 fHistGainSector->Add(cal->GetHistGainSector());
490 AliInfo(Form("fHistGainSector full (has %.0f entries, trying to add %.0f., max allowed: %.0f)",
491 fHistGainSector->GetEntries(),cal->GetHistGainSector()->GetEntries(),fgMergeEntriesCut));
494 if (cal->GetHistPadEqual()) fHistPadEqual->Add(cal->GetHistPadEqual());
495 if (cal->GetHistGainMult()) {
496 if (fHistGainMult->GetEntries()<kMaxEntriesSparse) fHistGainMult->Add(cal->GetHistGainMult());
499 if (cal->fHistdEdxMap){
500 if (fHistdEdxMap) fHistdEdxMap->Add(cal->fHistdEdxMap);
502 if (cal->fHistdEdxMax){
503 if (fHistdEdxMax) fHistdEdxMax->Add(cal->fHistdEdxMax);
505 if (cal->fHistdEdxTot){
506 if (fHistdEdxTot) fHistdEdxTot->Add(cal->fHistdEdxTot);
509 // Originally we tireied to write the tree to the same file as other calibration components
510 // We failed in merging => therefore this optio was disabled
512 // if (cal->fdEdxTree && cal->fdEdxTree->GetEntries()>0) {
514 // const Int_t kMax=100000;
515 // Int_t entriesSum = (Int_t)fdEdxTree->GetEntries();
516 // Int_t entriesCurrent = (Int_t)cal->fdEdxTree->GetEntries();
517 // Int_t entriesCp=TMath::Min((Int_t) entriesCurrent*(kMax*entriesSum),entriesCurrent);
518 // // cal->fdEdxTree->SetBranchStatus("track*",0);
519 // // cal->fdEdxTree->SetBranchStatus("vertex*",0);
520 // // cal->fdEdxTree->SetBranchStatus("tpcOut*",0);
521 // // cal->fdEdxTree->SetBranchStatus("vec*",0);
522 // // fdEdxTree->SetBranchStatus("track*",0);
523 // // fdEdxTree->SetBranchStatus("vertex*",0);
524 // // fdEdxTree->SetBranchStatus("tpcOut*",0);
525 // // fdEdxTree->SetBranchStatus("vec*",0);
526 // fdEdxTree->Print();
527 // fdEdxTree->Dump();
528 // fdEdxTree->GetEntry(0);
529 // for (Int_t i=0; i<entriesCurrent; i++){
530 // cal->fdEdxTree->CopyAddresses(fdEdxTree);
531 // cal->fdEdxTree->GetEntry(i);
532 // fdEdxTree->Fill();
534 // TObjArray *brarray = cal->fdEdxTree->GetListOfBranches();
535 // for (Int_t i=0; i<brarray->GetEntries(); i++) {TBranch * br = (TBranch *)brarray->At(i); br->SetAddress(0); }
538 // fdEdxTree = (TTree*)(cal->fdEdxTree->Clone());
539 // TObjArray *brarray = fdEdxTree->GetListOfBranches();
540 // for (Int_t i=0; i<brarray->GetEntries(); i++) {TBranch * br = (TBranch *)brarray->At(i); br->SetAddress(0);}
554 void AliTPCcalibGainMult::UpdateGainMap() {
556 // read in the old gain map and scale it appropriately...
559 gSystem->Load("libANALYSIS");
560 gSystem->Load("libTPCcalib");
562 TFile jj("Run0_999999999_v1_s0.root");
563 AliTPCCalPad * pad = AliCDBEntry->GetObject()->Clone();
564 TFile hh("output.root");
565 AliTPCcalibGainMult * gain = calibTracksGain;
566 TH2D * histGainSec = gain->GetHistGainSector()->Projection(0,1);
569 histGainSec->FitSlicesY(0, 0, -1, 0, "QNR", &arr);
570 TH1D * meanGainSec = arr->At(1);
571 Double_t gainsIROC[36];
572 Double_t gainsOROC[36];
575 for(Int_t isec = 1; isec < meanGainSec->GetNbinsX() + 1; isec++) {
576 cout << isec << " " << meanGainSec->GetXaxis()->GetBinCenter(isec) << " " <<meanGainSec->GetBinContent(isec) << endl;
577 gains[isec-1] = meanGainSec->GetBinContent(isec);
579 gainsIROC[isec-1] = meanGainSec->GetBinContent(isec);
581 gainsOROC[isec - 36 -1] = meanGainSec->GetBinContent(isec);
584 Double_t meanIroc = TMath::Mean(36, gainsIROC);
585 Double_t meanOroc = TMath::Mean(36, gainsIROC);
586 for(Int_t i = 0; i < 36; i++) gains[i] /= meanIroc;
587 for(Int_t i = 36; i < 72; i++) gains[i] /= meanOroc;
589 for(Int_t i = 0; i < 72; i++) {
590 AliTPCCalROC * chamber = pad->GetCalROC(i);
591 chamber->Multiply(gains[i]);
592 cout << i << " "<< chamber->GetMean() << endl;
597 AliCDBMetaData *metaData= new AliCDBMetaData();
598 metaData->SetObjectClassName("AliTPCCalPad");
599 metaData->SetResponsible("Alexander Kalweit");
600 metaData->SetBeamPeriod(1);
601 metaData->SetAliRootVersion("04-19-05"); //root version
602 metaData->SetComment("New gain map for 1600V OROC gain increase and equalization. Valid for runs starting after technical stop beginning of September.");
603 AliCDBId id1("TPC/Calib/GainFactorDedx", 131541, AliCDBRunRange::Infinity()); // important: new gain runs here..
604 AliCDBStorage * gStorage = AliCDBManager::Instance()->GetStorage("local:///d/alice05/akalweit/projects/OCDBupdate/HighGain_2010-09-03/OCDB/");
605 gStorage->Put(pad, id1, metaData);
610 void AliTPCcalibGainMult::UpdateClusterParam() {
615 gSystem->Load("libANALYSIS");
616 gSystem->Load("libTPCcalib");
618 TFile ff("OldClsParam.root");
619 AliTPCClusterParam * param = AliCDBEntry->GetObject()->Clone();
621 TFile hh("output.root");
622 AliTPCcalibGainMult * gain = calibGainMult;
623 TH2D * histGainSec = gain->GetHistGainSector()->Projection(0,2);
625 histGainSec->FitSlicesY(0, 0, -1, 0, "QNR", &arr);
626 histGainSec->Draw("colz");
627 TH1D * fitVal = arr.At(1);
628 fitVal->Draw("same");
629 param->GetQnormCorrMatrix()->Print();
630 param->GetQnormCorrMatrix()(0,5) *= fitVal->GetBinContent(1)/fitVal->GetBinContent(1); // short pads Qtot
631 param->GetQnormCorrMatrix()(1,5) *= fitVal->GetBinContent(2)/fitVal->GetBinContent(1); // med pads Qtot
632 param->GetQnormCorrMatrix()(2,5) *= fitVal->GetBinContent(3)/fitVal->GetBinContent(1); // long pads Qtot
634 param->GetQnormCorrMatrix()(3,5) *= fitVal->GetBinContent(1)/fitVal->GetBinContent(1); // short pads Qmax -> scaling assumed
635 param->GetQnormCorrMatrix()(4,5) *= fitVal->GetBinContent(2)/fitVal->GetBinContent(1); // med pads Qmax -> scaling assumed
636 param->GetQnormCorrMatrix()(5,5) *= fitVal->GetBinContent(3)/fitVal->GetBinContent(1); // long pads Qmax -> scaling assumed
638 TFile jj("newClusterParam.root","RECREATE");
640 param->GetQnormCorrMatrix()->Print();
644 AliCDBMetaData *metaData= new AliCDBMetaData();
645 metaData->SetObjectClassName("AliTPCClusterParam");
646 metaData->SetResponsible("Alexander Kalweit");
647 metaData->SetBeamPeriod(1);
648 metaData->SetAliRootVersion("04-19-04"); //root version
649 metaData->SetComment("1600V OROC / hard thres. / new algorithm");
650 AliCDBId id1("TPC/Calib/ClusterParam", 0, AliCDBRunRange::Infinity()); // important: new gain runs here..
651 AliCDBStorage * gStorage = AliCDBManager::Instance()->GetStorage("local:///lustre/alice/akalweit/baseline/CalibrationEntries/OldThres_NewAlgo_PP");
652 gStorage->Put(param, id1, metaData);
659 void AliTPCcalibGainMult::DumpTrack(AliESDtrack * track, AliESDfriendTrack *ftrack, AliTPCseed * seed, Int_t index){
661 // dump interesting tracks
662 // 1. track at MIP region
663 // 2. highly ionizing protons
664 // pidType: 0 - unselected
670 const Int_t kMax=10000;
671 const Int_t kMinRows=80;
672 const Double_t kDCAcut=30;
674 // Bethe Bloch paramerization
676 Double_t kp1= 0.0851148;
677 Double_t kp2= 9.25771;
678 Double_t kp3= 2.6558e-05;
679 Double_t kp4= 2.32742;
680 Double_t kp5= 1.83039;
689 static const AliTPCROC *roc = AliTPCROC::Instance();
690 static const TDatabasePDG *pdg = TDatabasePDG::Instance();
692 Int_t nclITS = track->GetNcls(0);
693 Int_t ncl = track->GetTPCncls();
694 Double_t ncl21 = track->GetTPCClusterInfo(3,1);
695 Double_t ncl20 = track->GetTPCClusterInfo(3,0);
698 if (ncl21<kMinRows) return;
699 static Int_t counter=0;
700 static Int_t counterHPT=0;
702 static TH1F *hisBB=new TH1F("hisBB","hisBB",20,0.1,1.00); // bethe bloch histogram =
703 // used to cover more homegenously differnt dEdx regions
704 static Double_t massPi = pdg->GetParticle("pi-")->Mass(); //
705 static Double_t massK = pdg->GetParticle("K-")->Mass();
706 static Double_t massP = pdg->GetParticle("proton")->Mass();
707 static Double_t massE = pdg->GetParticle("e-")->Mass();
708 static Double_t massMuon = pdg->GetParticle("mu-")->Mass();
709 static Double_t radius0= roc->GetPadRowRadiiLow(roc->GetNRows(0)/2);
710 static Double_t radius1= roc->GetPadRowRadiiUp(30);
711 static Double_t radius2= roc->GetPadRowRadiiUp(roc->GetNRows(36)-15);
713 AliESDVertex *vertex= (AliESDVertex *)fCurrentEvent->GetPrimaryVertex();
715 // Estimate current MIP position -
717 static Double_t mipArray[kMax]; // mip array
718 static Int_t counterMIP0=0;
719 static Double_t medianMIP0=100000; // current MIP median position - estimated after some mimnimum number of MIP tracks
721 if (TMath::Abs(track->GetP()-0.5)<0.1&&track->GetTPCsignal()/medianMIP0<1.5){
722 mipArray[counterMIP0%kMax]= track->GetTPCsignal();
724 if (counterMIP0>10) medianMIP0=TMath::Median(counterMIP0%kMax, mipArray);
726 // the PID as defiend from the external sources
728 Int_t isElectron = TMath::Nint((*fPIDMatrix)(index,0));
729 Int_t isMuon = TMath::Nint((*fPIDMatrix)(index,1));
730 Int_t isPion = TMath::Nint((*fPIDMatrix)(index,2));
731 Int_t isKaon = TMath::Nint((*fPIDMatrix)(index,3));
732 Int_t isProton = TMath::Nint((*fPIDMatrix)(index,4));
734 track->GetImpactParameters(dca[0],dca[1]);
736 if ( (isMuon==0 && isElectron==0) && (TMath::Sqrt(dca[0]*dca[0]+dca[1]*dca[1])>kDCAcut) ) return;
737 Double_t normdEdx= track->GetTPCsignal()/(medianMIP0); // TPC signal normalized to the MIP
739 AliExternalTrackParam * trackIn = (AliExternalTrackParam *)track->GetInnerParam();
740 AliExternalTrackParam * trackOut = (AliExternalTrackParam *)track->GetOuterParam();
741 AliExternalTrackParam * tpcOut = (AliExternalTrackParam *)ftrack->GetTPCOut();
742 if (!trackIn) return;
743 if (!trackOut) return;
745 if (trackIn->GetZ()*trackOut->GetZ()<0) return; // remove crossing tracks
747 // calculate local and global angle
748 Int_t side = (trackIn->GetZ()>0)? 1:-1;
749 Double_t tgl=trackIn->GetTgl();
750 Double_t gangle[3]={0,0,0};
751 Double_t langle[3]={0,0,0};
752 Double_t length[3]={0,0,0};
753 Double_t pxpypz[3]={0,0,0};
755 trackIn->GetXYZAt(radius0,bz,pxpypz); // get the global position at the middle of the IROC
756 gangle[0]=TMath::ATan2(pxpypz[1],pxpypz[0]); // global angle IROC
757 trackIn->GetXYZAt(radius1,bz,pxpypz); // get the global position at the middle of the OROC - medium pads
758 gangle[1]=TMath::ATan2(pxpypz[1],pxpypz[0]); // global angle OROC
759 trackOut->GetXYZAt(radius2,bz,pxpypz); // get the global position at the middle of OROC - long pads
760 gangle[2]=TMath::ATan2(pxpypz[1],pxpypz[0]);
762 trackIn->GetPxPyPzAt(radius0,bz,pxpypz); //get momentum vector
763 langle[0]=TMath::ATan2(pxpypz[1],pxpypz[0])-gangle[0]; //local angle between padrow and track IROC
764 trackIn->GetPxPyPzAt(radius1,bz,pxpypz);
765 langle[1]=TMath::ATan2(pxpypz[1],pxpypz[0])-gangle[1];
766 trackOut->GetPxPyPzAt(radius2,bz,pxpypz); // OROC medium
767 langle[2]=TMath::ATan2(pxpypz[1],pxpypz[0])-gangle[2];
768 for (Int_t i=0; i<3; i++){
769 if (langle[i]>TMath::Pi()) langle[i]-=TMath::TwoPi();
770 if (langle[i]<-TMath::Pi()) langle[i]+=TMath::TwoPi();
771 length[i]=TMath::Sqrt(1+langle[i]*langle[i]+tgl*tgl); // the tracklet length
774 // Select the kaons and Protons which are "isolated" in TPC dedx curve
777 Double_t dedxP = AliExternalTrackParam::BetheBlochAleph(track->GetInnerParam()->GetP()/massP,kp1,kp2,kp3,kp4,kp5);
778 Double_t dedxK = AliExternalTrackParam::BetheBlochAleph(track->GetInnerParam()->GetP()/massK,kp1,kp2,kp3,kp4,kp5);
779 if (dedxP>2 || dedxK>2){
780 if (track->GetP()<1.2 && normdEdx>1.8&&counterMIP0>10){ // not enough from TOF and V0s triggered by high dedx
781 // signing the Proton and kaon - using the "bitmask" bit 1 and 2 is dedicated for V0s and TOF selected
782 if ( TMath::Abs(normdEdx/dedxP-1)<0.3) isProton+=4;
783 if ( TMath::Abs(normdEdx/dedxK-1)<0.3) isKaon+=4;
784 if (normdEdx/dedxK>1.3) isProton+=8;
785 if (normdEdx/dedxP<0.7) isKaon+=8;
792 Bool_t isHighPt = ((TMath::Power(1/track->Pt(),4)*gRandom->Rndm())<0.005); // rnadomly selected HPT tracks
793 // there are selected for the QA of the obtained calibration
794 Bool_t isMIP = TMath::Abs(track->GetInnerParam()->P()-0.4)<0.005&&(counter<kMax); //
795 // REMINDER - it is not exactly MIP - we select the regtion where the Kaon and Electrons are well separated
797 if (isElectron>0) mass = massE;
798 if (isProton>0) mass = massP;
799 if (isKaon>0) mass = massK;
800 if (isMuon>0) mass = massMuon;
801 if (isPion>0) mass = massPi;
802 if (isHighPt) mass = massPi; //assign mass of pions
803 if (isMIP&&track->GetTPCsignal()/medianMIP0<1.5) mass = massPi; //assign mass of pions
806 // calculate expected dEdx
808 Double_t dedxDefPion= 0,dedxDefProton=0, dedxDefKaon=0;
809 Double_t pin=trackIn->GetP();
810 Double_t pout=trackOut->GetP();
811 Double_t p=(pin+pout)*0.5; // momenta as the mean between tpc momenta at inner and outer wall of the TPC
812 if (mass>0) dedxDef = AliExternalTrackParam::BetheBlochAleph(p/mass,kp1,kp2,kp3,kp4,kp5);
813 dedxDefPion = AliExternalTrackParam::BetheBlochAleph(p/massPi,kp1,kp2,kp3,kp4,kp5);
814 dedxDefProton = AliExternalTrackParam::BetheBlochAleph(p/massP,kp1,kp2,kp3,kp4,kp5);
815 dedxDefKaon = AliExternalTrackParam::BetheBlochAleph(p/massK,kp1,kp2,kp3,kp4,kp5);
817 // dEdx Truncated mean vectros with differnt tuncation
818 // 11 truncations array - 0-10 - 0~50% 11=100%
819 // 3 Regions - IROC,OROC0, OROC1
820 // 2 Q - total charge and max charge
821 // Log - Logarithmic mean used
822 // Up/Dwon - Upper half or lower half of truncation used
823 // RMS - rms of the distribction (otherwise truncated mean)
824 // M2 suffix - second moment ( truncated)
825 TVectorF truncUp(11);
826 TVectorF truncDown(11);
827 TVectorF vecAllMax(11);
828 TVectorF vecIROCMax(11);
829 TVectorF vecOROCMax(11);
830 TVectorF vecOROC0Max(11);
831 TVectorF vecOROC1Max(11);
833 TVectorF vecAllTot(11);
834 TVectorF vecIROCTot(11);
835 TVectorF vecOROCTot(11);
836 TVectorF vecOROC0Tot(11);
837 TVectorF vecOROC1Tot(11);
839 TVectorF vecAllTotLog(11);
840 TVectorF vecIROCTotLog(11);
841 TVectorF vecOROCTotLog(11);
842 TVectorF vecOROC0TotLog(11);
843 TVectorF vecOROC1TotLog(11);
845 TVectorF vecAllTotUp(11);
846 TVectorF vecIROCTotUp(11);
847 TVectorF vecOROCTotUp(11);
848 TVectorF vecOROC0TotUp(11);
849 TVectorF vecOROC1TotUp(11);
851 TVectorF vecAllTotDown(11);
852 TVectorF vecIROCTotDown(11);
853 TVectorF vecOROCTotDown(11);
854 TVectorF vecOROC0TotDown(11);
855 TVectorF vecOROC1TotDown(11);
857 TVectorF vecAllTotRMS(11);
858 TVectorF vecIROCTotRMS(11);
859 TVectorF vecOROCTotRMS(11);
860 TVectorF vecOROC0TotRMS(11);
861 TVectorF vecOROC1TotRMS(11);
863 TVectorF vecAllTotM2(11);
864 TVectorF vecIROCTotM2(11);
865 TVectorF vecOROCTotM2(11);
866 TVectorF vecOROC0TotM2(11);
867 TVectorF vecOROC1TotM2(11);
869 TVectorF vecAllTotMS(11);
870 TVectorF vecIROCTotMS(11);
871 TVectorF vecOROCTotMS(11);
872 TVectorF vecOROC0TotMS(11);
873 TVectorF vecOROC1TotMS(11);
875 // Differnt number of clusters definitions - in separate regions of the TPC
876 // 20 - ratio - found/findabel
877 // 21 - number of clusters used for given dEdx calculation
879 // suffix - 3 or 4 - number of padrows before and after given row to define findable row
881 Double_t ncl20All = seed->CookdEdxAnalytical(0.0,1, 1 ,0,159,3);
882 Double_t ncl20IROC = seed->CookdEdxAnalytical(0.,1, 1 ,0,63,3);
883 Double_t ncl20OROC = seed->CookdEdxAnalytical(0.,1, 1 ,64,159,3);
884 Double_t ncl20OROC0= seed->CookdEdxAnalytical(0.,1, 1 ,64,128,3);
885 Double_t ncl20OROC1= seed->CookdEdxAnalytical(0.,1, 1 ,129,159,3);
887 Double_t ncl20All4 = seed->CookdEdxAnalytical(0.0,1, 1 ,0,159,3,4);
888 Double_t ncl20IROC4 = seed->CookdEdxAnalytical(0.,1, 1 ,0,63,3,4);
889 Double_t ncl20OROC4 = seed->CookdEdxAnalytical(0.,1, 1 ,64,159,3,4);
890 Double_t ncl20OROC04= seed->CookdEdxAnalytical(0.,1, 1 ,64,128,3,4);
891 Double_t ncl20OROC14= seed->CookdEdxAnalytical(0.,1, 1 ,129,159,3,4);
893 Double_t ncl20All3 = seed->CookdEdxAnalytical(0.0,1, 1 ,0,159,3,3);
894 Double_t ncl20IROC3 = seed->CookdEdxAnalytical(0.,1, 1 ,0,63,3,3);
895 Double_t ncl20OROC3 = seed->CookdEdxAnalytical(0.,1, 1 ,64,159,3,3);
896 Double_t ncl20OROC03= seed->CookdEdxAnalytical(0.,1, 1 ,64,128,3,3);
897 Double_t ncl20OROC13= seed->CookdEdxAnalytical(0.,1, 1 ,129,159,3,3);
899 Double_t ncl21All = seed->CookdEdxAnalytical(0.0,1, 1 ,0,159,2);
900 Double_t ncl21IROC = seed->CookdEdxAnalytical(0.,1, 1 ,0,63,2);
901 Double_t ncl21OROC = seed->CookdEdxAnalytical(0.,1, 1 ,64,159,2);
902 Double_t ncl21OROC0= seed->CookdEdxAnalytical(0.,1, 1 ,64,128,2);
903 Double_t ncl21OROC1= seed->CookdEdxAnalytical(0.,1, 1 ,129,159,2);
904 // calculate truncated dEdx - mean rms M2 ...
906 for (Int_t ifracDown=0; ifracDown<1; ifracDown++){
907 for (Int_t ifracUp=0; ifracUp<11; ifracUp++){
908 Double_t fracDown = 0.0+Double_t(ifracDown)*0.05;
909 Double_t fracUp = 0.5+Double_t(ifracUp)*0.05;
910 vecAllMax[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 1 ,0,159,0);
911 vecIROCMax[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 1 ,0,63,0);
912 vecOROCMax[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 1 ,64,159,0);
913 vecOROC0Max[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 1 ,64,128,0);
914 vecOROC1Max[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 1 ,129,159,0);
916 vecAllTot[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,0);
917 vecIROCTot[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,0);
918 vecOROCTot[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,0);
919 vecOROC0Tot[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,0);
920 vecOROC1Tot[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,0);
922 vecAllTotLog[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,0,2,1);
923 vecIROCTotLog[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,0,2,1);
924 vecOROCTotLog[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,0,2,1);
925 vecOROC0TotLog[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,0,2,1);
926 vecOROC1TotLog[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,0,2,1);
928 vecAllTotUp[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,4,2,1);
929 vecIROCTotUp[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,4,2,1);
930 vecOROCTotUp[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,4,2,1);
931 vecOROC0TotUp[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,4,2,1);
932 vecOROC1TotUp[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,4,2,1);
934 vecAllTotDown[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,5,2,1);
935 vecIROCTotDown[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,5,2,1);
936 vecOROCTotDown[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,5,2,1);
937 vecOROC0TotDown[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,5,2,1);
938 vecOROC1TotDown[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,5,2,1);
940 vecAllTotRMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,1,2,0);
941 vecIROCTotRMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,1,2,0);
942 vecOROCTotRMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,1,2,0);
943 vecOROC0TotRMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,1,2,0);
944 vecOROC1TotRMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,1,2,0);
946 vecAllTotM2[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,6,2,1);
947 vecIROCTotM2[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,6,2,1);
948 vecOROCTotM2[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,6,2,1);
949 vecOROC0TotM2[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,6,2,1);
950 vecOROC1TotM2[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,6,2,1);
952 vecAllTotMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,159,8,2,1);
953 vecIROCTotMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,0,63,8,2,1);
954 vecOROCTotMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,159,8,2,1);
955 vecOROC0TotMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,64,128,8,2,1);
956 vecOROC1TotMS[ifrac]= seed->CookdEdxAnalytical(fracDown,fracUp, 0 ,129,159,8,2,1);
957 truncUp[ifrac]=fracUp;
958 truncDown[ifrac]=fracDown;
965 if (((isKaon||isProton||isPion||isElectron||isMIP||isMuon)&&(!isHighPt)) && dedxDef>0) {
967 Int_t ncont = vertex->GetNContributors();
968 for (Int_t ipad=0; ipad<3; ipad++){
969 // histogram with enahanced phi granularity - to make gain phi maps
970 Double_t xxx[4]={0,gangle[ipad],1./dedxDef,ipad*2+((side>0)?0:1)};
972 if (ipad==0) {xxx[0]=vecIROCTot[4]/medianMIP0; nclR=ncl21IROC/63.;}
973 if (ipad==1) {xxx[0]=vecOROC0Tot[4]/medianMIP0;nclR=ncl21OROC0/63.;}
974 if (ipad==2) {xxx[0]=vecOROC1Tot[4]/medianMIP0;nclR=ncl21OROC1/32.;}
976 if (xxx[0]>0) xxx[0]=1./xxx[0];
977 if (TMath::Abs(langle[ipad])<0.25&&nclR>0.4) fHistdEdxMap->Fill(xxx);
979 for (Int_t ipad=0; ipad<3; ipad++){
981 // this are histogram to define overall main gain correction
982 // Maybe dead end - we can not put all info which can be used into the THnSparse
983 // It is keeped there for educational point of view
985 Double_t xxx[6]={0,1./dedxDef, TMath::Abs(langle[ipad]), TMath::Abs(tgl), ncont, ipad };
986 if (ipad==0) {xxx[0]=vecIROCTot[4]/medianMIP0;}
987 if (ipad==1) {xxx[0]=vecOROC0Tot[4]/medianMIP0;}
988 if (ipad==2) {xxx[0]=vecOROC1Tot[4]/medianMIP0;}
990 if (xxx[0]>0) xxx[0]=1./xxx[0];
991 if (xxx[0]>0) fHistdEdxTot->Fill(xxx);
992 if (ipad==0) {xxx[0]=vecIROCMax[4]/medianMIP0;}
993 if (ipad==1) {xxx[0]=vecOROC0Max[4]/medianMIP0;}
994 if (ipad==2) {xxx[0]=vecOROC1Max[4]/medianMIP0;}
996 if (xxx[0]>0) xxx[0]=1./xxx[0];
997 fHistdEdxMax->Fill(xxx);
1001 // Downscale selected tracks before filling the tree
1003 Bool_t isSelected = kFALSE;
1005 if (isKaon||isProton||isPion||isElectron||isMIP||isMuon) isSelected=kTRUE;
1007 if (!isSelected) isHighPt = ((TMath::Power(1/track->Pt(),4)*gRandom->Rndm())<0.005);
1008 //if (counter>kMax && ((1/track->Pt()*gRandom->Rndm())>kMax/counter)) return;
1009 isSelected|=isHighPt;
1013 // Equalize statistic in BB bins - special care about pions
1014 Int_t entriesBB = (Int_t)hisBB->GetEntries();
1015 if ((isElectron==0 &&isMuon==0 && p<2.) && entriesBB>20 &&dedxDef>0.01){
1016 Int_t bin = hisBB->GetXaxis()->FindBin(1./dedxDef);
1017 Double_t cont = hisBB->GetBinContent(bin);
1018 Double_t mean =(entriesBB)/20.;
1019 if ((isPion>0) && gRandom->Rndm()*cont > 0.1*mean) return;
1020 if ((isPion==0) && gRandom->Rndm()*cont > 0.25*mean) return;
1022 if (!isSelected) return;
1023 if (dedxDef>0.01) hisBB->Fill(1./dedxDef);
1025 if (isHighPt) counterHPT++;
1028 TTreeSRedirector * pcstream = GetDebugStreamer();
1029 Double_t ptrel0 = AliTPCcalibDB::GetPTRelative(fTime,fRun,0);
1030 Double_t ptrel1 = AliTPCcalibDB::GetPTRelative(fTime,fRun,1);
1031 Int_t sectorIn = Int_t(18+9*(trackIn->GetAlpha()/TMath::Pi()))%18;
1032 Int_t sectorOut = Int_t(18+9*(trackOut->GetAlpha()/TMath::Pi()))%18;
1035 (*pcstream)<<"dump"<<
1036 "vertex.="<<vertex<<
1040 "sectorIn="<<sectorIn<<
1041 "sectorOut="<<sectorOut<<
1045 "isProton="<<isProton<<
1048 "isElectron="<<isElectron<<
1050 "isHighPt="<<isHighPt<<
1052 "dedxDef="<<dedxDef<<
1053 "dedxDefPion="<<dedxDefPion<<
1054 "dedxDefKaon="<<dedxDefKaon<<
1055 "dedxDefProton="<<dedxDefProton<<
1062 "ncl20All="<<ncl20All<<
1063 "ncl20OROC="<<ncl20OROC<<
1064 "ncl20IROC="<<ncl20IROC<<
1065 "ncl20OROC0="<<ncl20OROC0<<
1066 "ncl20OROC1="<<ncl20OROC1<<
1068 "ncl20All4="<<ncl20All4<<
1069 "ncl20OROC4="<<ncl20OROC4<<
1070 "ncl20IROC4="<<ncl20IROC4<<
1071 "ncl20OROC04="<<ncl20OROC04<<
1072 "ncl20OROC14="<<ncl20OROC14<<
1074 "ncl20All3="<<ncl20All3<<
1075 "ncl20OROC3="<<ncl20OROC3<<
1076 "ncl20IROC3="<<ncl20IROC3<<
1077 "ncl20OROC03="<<ncl20OROC03<<
1078 "ncl20OROC13="<<ncl20OROC13<<
1080 "ncl21All="<<ncl21All<<
1081 "ncl21OROC="<<ncl21OROC<<
1082 "ncl21IROC="<<ncl21IROC<<
1083 "ncl21OROC0="<<ncl21OROC0<<
1084 "ncl21OROC1="<<ncl21OROC1<<
1086 "langle0="<<langle[0]<<
1087 "langle1="<<langle[1]<<
1088 "langle2="<<langle[2]<<
1089 "gangle0="<<gangle[0]<< //global angle phi IROC
1090 "gangle1="<<gangle[1]<< // OROC medium
1091 "gangle2="<<gangle[2]<< // OROC long
1100 //"trackIn.="<<trackIn<<
1101 //"trackOut.="<<trackOut<<
1102 //"tpcOut.="<<tpcOut<<
1104 "medianMIP0="<<medianMIP0<< // median MIP position as estimated from the array of (not only) "MIPS"
1106 "truncUp.="<<&truncUp<<
1107 "truncDown.="<<&truncDown<<
1108 "vecAllMax.="<<&vecAllMax<<
1109 "vecIROCMax.="<<&vecIROCMax<<
1110 "vecOROCMax.="<<&vecOROCMax<<
1111 "vecOROC0Max.="<<&vecOROC0Max<<
1112 "vecOROC1Max.="<<&vecOROC1Max<<
1114 "vecAllTot.="<<&vecAllTot<<
1115 "vecIROCTot.="<<&vecIROCTot<<
1116 "vecOROCTot.="<<&vecOROCTot<<
1117 "vecOROC0Tot.="<<&vecOROC0Tot<<
1118 "vecOROC1Tot.="<<&vecOROC1Tot<<
1120 "vecAllTotLog.="<<&vecAllTotLog<<
1121 "vecIROCTotLog.="<<&vecIROCTotLog<<
1122 "vecOROCTotLog.="<<&vecOROCTotLog<<
1123 "vecOROC0TotLog.="<<&vecOROC0TotLog<<
1124 "vecOROC1TotLog.="<<&vecOROC1TotLog<<
1126 "vecAllTotUp.="<<&vecAllTotUp<<
1127 "vecIROCTotUp.="<<&vecIROCTotUp<<
1128 "vecOROCTotUp.="<<&vecOROCTotUp<<
1129 "vecOROC0TotUp.="<<&vecOROC0TotUp<<
1130 "vecOROC1TotUp.="<<&vecOROC1TotUp<<
1132 "vecAllTotDown.="<<&vecAllTotDown<<
1133 "vecIROCTotDown.="<<&vecIROCTotDown<<
1134 "vecOROCTotDown.="<<&vecOROCTotDown<<
1135 "vecOROC0TotDown.="<<&vecOROC0TotDown<<
1136 "vecOROC1TotDown.="<<&vecOROC1TotDown<<
1138 "vecAllTotRMS.="<<&vecAllTotRMS<<
1139 "vecIROCTotRMS.="<<&vecIROCTotRMS<<
1140 "vecOROCTotRMS.="<<&vecOROCTotRMS<<
1141 "vecOROC0TotRMS.="<<&vecOROC0TotRMS<<
1142 "vecOROC1TotRMS.="<<&vecOROC1TotRMS<<
1144 "vecAllTotM2.="<<&vecAllTotM2<<
1145 "vecIROCTotM2.="<<&vecIROCTotM2<<
1146 "vecOROCTotM2.="<<&vecOROCTotM2<<
1147 "vecOROC0TotM2.="<<&vecOROC0TotM2<<
1148 "vecOROC1TotM2.="<<&vecOROC1TotM2<<
1150 "vecAllTotMS.="<<&vecAllTotMS<<
1151 "vecIROCTotMS.="<<&vecIROCTotMS<<
1152 "vecOROCTotMS.="<<&vecOROCTotMS<<
1153 "vecOROC0TotMS.="<<&vecOROC0TotMS<<
1154 "vecOROC1TotMS.="<<&vecOROC1TotMS<<
1162 void AliTPCcalibGainMult::ProcessV0s(AliESDEvent * event){
1164 // Select the K0s and gamma - and sign daughter products
1166 TTreeSRedirector * pcstream = GetDebugStreamer();
1167 AliKFParticle::SetField(event->GetMagneticField());
1168 AliESDfriend *esdFriend=static_cast<AliESDfriend*>(event->FindListObject("AliESDfriend"));
1170 //Printf("ERROR: esdFriend not available");
1173 if (esdFriend->TestSkipBit()) return;
1176 static const TDatabasePDG *pdg = TDatabasePDG::Instance();
1177 const Double_t kChi2Cut=5;
1178 const Double_t kMinR=2;
1179 const Int_t kMinNcl=110;
1180 const Double_t kMinREl=5;
1181 const Double_t kMaxREl=70;
1183 Int_t nv0 = event->GetNumberOfV0s();
1184 AliESDVertex *vertex= (AliESDVertex *)event->GetPrimaryVertex();
1185 AliKFVertex kfvertex=*vertex;
1187 for (Int_t iv0=0;iv0<nv0;iv0++){
1188 AliESDv0 *v0 = event->GetV0(iv0);
1190 if (v0->GetOnFlyStatus()<0.5) continue;
1191 if (v0->GetPindex()<0) continue;
1192 if (v0->GetNindex()<0) continue;
1193 if (TMath::Max(v0->GetPindex(), v0->GetNindex())>event->GetNumberOfTracks()) continue;
1196 AliExternalTrackParam pp=(v0->GetParamP()->GetSign()>0) ? (*(v0->GetParamP())):(*(v0->GetParamN()));
1197 AliExternalTrackParam pn=(v0->GetParamP()->GetSign()>0) ? (*(v0->GetParamN())):(*(v0->GetParamP()));
1198 AliKFParticle kfp1( pp, 211 );
1199 AliKFParticle kfp2( pn, -211 );
1201 AliKFParticle *v0KFK0 = new AliKFParticle(kfp1,kfp2);
1202 AliKFParticle *v0KFK0CV = new AliKFParticle(*v0KFK0);
1203 v0KFK0CV->SetProductionVertex(kfvertex);
1204 v0KFK0CV->TransportToProductionVertex();
1205 Double_t chi2K0 = v0KFK0CV->GetChi2();
1206 if (chi2K0>kChi2Cut) continue;
1207 if (v0->GetRr()<kMinR) continue;
1208 Bool_t isOKC=TMath::Max(v0->GetCausalityP()[0],v0->GetCausalityP()[1])<0.7&&TMath::Min(v0->GetCausalityP()[2],v0->GetCausalityP()[3])>0.2;
1210 Double_t effMass22=v0->GetEffMass(2,2);
1211 Double_t effMass42=v0->GetEffMass(4,2);
1212 Double_t effMass24=v0->GetEffMass(2,4);
1213 Double_t effMass00=v0->GetEffMass(0,0);
1214 AliKFParticle *v0KFK0CVM = new AliKFParticle(*v0KFK0CV);
1215 v0KFK0CVM->SetMassConstraint(pdg->GetParticle("K_S0")->Mass());
1216 Bool_t isV0= kFALSE;
1218 Double_t d22 = TMath::Abs(effMass22-pdg->GetParticle("K_S0")->Mass());
1219 Double_t d42 = TMath::Abs(effMass42-pdg->GetParticle("Lambda0")->Mass());
1220 Double_t d24 = TMath::Abs(effMass24-pdg->GetParticle("Lambda0")->Mass());
1221 Double_t d00 = TMath::Abs(effMass00);
1223 Bool_t isKaon = d22<0.01 && d22< 0.3 * TMath::Min(TMath::Min(d42,d24),d00);
1224 Bool_t isLambda = d42<0.01 && d42< 0.3 * TMath::Min(TMath::Min(d22,d24),d00);
1225 Bool_t isAntiLambda= d24<0.01 && d24< 0.3 * TMath::Min(TMath::Min(d22,d42),d00);
1226 Bool_t isGamma = d00<0.02 && d00< 0.3 * TMath::Min(TMath::Min(d42,d24),d22);
1228 if (isGamma && (isKaon||isLambda||isAntiLambda)) continue;
1229 if (isLambda && (isKaon||isGamma||isAntiLambda)) continue;
1230 if (isKaon && (isLambda||isGamma||isAntiLambda)) continue;
1231 Double_t sign= v0->GetParamP()->GetSign()* v0->GetParamN()->GetSign();
1232 if (sign>0) continue;
1233 isV0=isKaon||isLambda||isAntiLambda||isGamma;
1234 if (!(isV0)) continue;
1235 if (isGamma&&v0->GetRr()<kMinREl) continue;
1236 if (isGamma&&v0->GetRr()>kMaxREl) continue;
1237 if (!isOKC) continue;
1239 Int_t pindex = (v0->GetParamP()->GetSign()>0) ? v0->GetPindex() : v0->GetNindex();
1240 Int_t nindex = (v0->GetParamP()->GetSign()>0) ? v0->GetNindex() : v0->GetPindex();
1241 AliESDtrack * trackP = event->GetTrack(pindex);
1242 AliESDtrack * trackN = event->GetTrack(nindex);
1243 if (!trackN) continue;
1244 if (!trackP) continue;
1245 Int_t nclP= (Int_t)trackP->GetTPCClusterInfo(2,1);
1246 Int_t nclN= (Int_t)trackN->GetTPCClusterInfo(2,1);
1247 if (TMath::Min(nclP,nclN)<kMinNcl) continue;
1248 Double_t eta = TMath::Max(TMath::Abs(trackP->Eta()), TMath::Abs(trackN->Eta()));
1249 if (TMath::Abs(eta)>1) continue;
1252 AliESDfriendTrack *friendTrackP = esdFriend->GetTrack(pindex);
1253 AliESDfriendTrack *friendTrackN = esdFriend->GetTrack(nindex);
1254 if (!friendTrackP) continue;
1255 if (!friendTrackN) continue;
1256 TObject *calibObject;
1257 AliTPCseed *seedP = 0;
1258 AliTPCseed *seedN = 0;
1259 for (Int_t l=0;(calibObject=friendTrackP->GetCalibObject(l));++l) {
1260 if ((seedP=dynamic_cast<AliTPCseed*>(calibObject))) break;
1262 for (Int_t l=0;(calibObject=friendTrackN->GetCalibObject(l));++l) {
1263 if ((seedN=dynamic_cast<AliTPCseed*>(calibObject))) break;
1266 if ( TMath::Abs((trackP->GetTPCsignal()/(trackN->GetTPCsignal()+0.0001)-1)>0.3)) continue;
1268 if (isGamma) (*fPIDMatrix)(pindex, 0)+=2;
1269 if (isGamma) (*fPIDMatrix)(nindex, 0)+=2;
1271 if (isKaon) (*fPIDMatrix)(pindex, 2)+=2;
1272 if (isKaon) (*fPIDMatrix)(nindex, 2)+=2;
1276 (*pcstream)<<"v0s"<<
1277 "isGamma="<<isGamma<<
1279 "isLambda="<<isLambda<<
1280 "isAntiLambda="<<isAntiLambda<<
1282 "trackP.="<<trackP<<
1283 "trackN.="<<trackN<<
1293 void AliTPCcalibGainMult::ProcessCosmic(const AliESDEvent * event) {
1295 // Find cosmic pairs trigger by random trigger
1298 AliTPCTransform *transform = AliTPCcalibDB::Instance()->GetTransform() ;
1299 AliTPCParam *param = AliTPCcalibDB::Instance()->GetParameters();
1301 AliESDVertex *vertexSPD = (AliESDVertex *)event->GetPrimaryVertexSPD();
1302 AliESDVertex *vertexTPC = (AliESDVertex *)event->GetPrimaryVertexTPC();
1303 AliESDfriend *esdFriend=static_cast<AliESDfriend*>(event->FindListObject("AliESDfriend"));
1304 const Double_t kMinPt=4;
1305 const Double_t kMinPtMax=0.8;
1306 const Double_t kMinNcl=159*0.5;
1307 const Double_t kMaxDelta[5]={2,600,0.02,0.02,0.1};
1308 Int_t ntracks=event->GetNumberOfTracks();
1309 const Double_t kMaxImpact=80;
1310 // Float_t dcaTPC[2]={0,0};
1311 // Float_t covTPC[3]={0,0,0};
1313 UInt_t specie = event->GetEventSpecie(); // skip laser events
1314 if (specie==AliRecoParam::kCalib) return;
1317 for (Int_t itrack0=0;itrack0<ntracks;itrack0++) {
1318 AliESDtrack *track0 = event->GetTrack(itrack0);
1319 if (!track0) continue;
1320 if (!track0->IsOn(AliESDtrack::kTPCrefit)) continue;
1322 if (TMath::Abs(AliTracker::GetBz())>1&&track0->Pt()<kMinPt) continue;
1323 if (track0->GetTPCncls()<kMinNcl) continue;
1324 if (TMath::Abs(track0->GetY())<2*kMaxDelta[0]) continue;
1325 if (TMath::Abs(track0->GetY())>kMaxImpact) continue;
1326 if (track0->GetKinkIndex(0)>0) continue;
1327 const Double_t * par0=track0->GetParameter(); //track param at rhe DCA
1330 for (Int_t itrack1=itrack0+1;itrack1<ntracks;itrack1++) {
1331 AliESDtrack *track1 = event->GetTrack(itrack1);
1332 if (!track1) continue;
1333 if (!track1->IsOn(AliESDtrack::kTPCrefit)) continue;
1334 if (track1->GetKinkIndex(0)>0) continue;
1335 if (TMath::Abs(AliTracker::GetBz())>1&&track1->Pt()<kMinPt) continue;
1336 if (track1->GetTPCncls()<kMinNcl) continue;
1337 if (TMath::Abs(AliTracker::GetBz())>1&&TMath::Max(track1->Pt(), track0->Pt())<kMinPtMax) continue;
1338 if (TMath::Abs(track1->GetY())<2*kMaxDelta[0]) continue;
1339 if (TMath::Abs(track1->GetY())>kMaxImpact) continue;
1341 const Double_t* par1=track1->GetParameter(); //track param at rhe DCA
1343 Bool_t isPair=kTRUE;
1344 for (Int_t ipar=0; ipar<5; ipar++){
1345 if (ipar==4&&TMath::Abs(AliTracker::GetBz())<1) continue; // 1/pt not defined for B field off
1346 if (TMath::Abs(TMath::Abs(par0[ipar])-TMath::Abs(par1[ipar]))>kMaxDelta[ipar]) isPair=kFALSE;
1348 if (!isPair) continue;
1349 if (TMath::Abs(TMath::Abs(track0->GetAlpha()-track1->GetAlpha())-TMath::Pi())>kMaxDelta[2]) isPair=kFALSE;
1350 //delta with correct sign
1351 if (TMath::Abs(par0[0]+par1[0])>kMaxDelta[0]) isPair=kFALSE; //delta y opposite sign
1352 if (TMath::Abs(par0[3]+par1[3])>kMaxDelta[3]) isPair=kFALSE; //delta tgl opposite sign
1353 if (TMath::Abs(AliTracker::GetBz())>1 && TMath::Abs(par0[4]+par1[4])>kMaxDelta[4]) isPair=kFALSE; //delta 1/pt opposite sign
1354 if (!isPair) continue;
1355 TString filename(AliAnalysisManager::GetAnalysisManager()->GetTree()->GetCurrentFile()->GetName());
1356 Int_t eventNumber = event->GetEventNumberInFile();
1357 Bool_t hasFriend=(esdFriend) ? (esdFriend->GetTrack(itrack0)!=0):0;
1358 Bool_t hasITS=(track0->GetNcls(0)+track1->GetNcls(0)>4);
1359 AliInfo(Form("DUMPHPTCosmic:%s|%f|%d|%d|%d\n",filename.Data(),(TMath::Min(track0->Pt(),track1->Pt())), eventNumber,hasFriend,hasITS));
1362 TTreeSRedirector * pcstream = GetDebugStreamer();
1363 Int_t ntracksSPD = vertexSPD->GetNContributors();
1364 Int_t ntracksTPC = vertexTPC->GetNContributors();
1367 (*pcstream)<<"cosmicPairsAll"<<
1368 "run="<<fRun<< // run number
1369 "event="<<fEvent<< // event number
1370 "time="<<fTime<< // time stamp of event
1371 "trigger="<<fTrigger<< // trigger
1372 "triggerClass="<<&fTriggerClass<< // trigger
1373 "bz="<<fMagF<< // magnetic field
1375 "nSPD="<<ntracksSPD<<
1376 "nTPC="<<ntracksTPC<<
1377 "vSPD.="<<vertexSPD<< //primary vertex -SPD
1378 "vTPC.="<<vertexTPC<< //primary vertex -TPC
1379 "t0.="<<track0<< //track0
1380 "t1.="<<track1<< //track1
1384 AliESDfriendTrack *friendTrack0 = esdFriend->GetTrack(itrack0);
1385 if (!friendTrack0) continue;
1386 AliESDfriendTrack *friendTrack1 = esdFriend->GetTrack(itrack1);
1387 if (!friendTrack1) continue;
1388 TObject *calibObject;
1389 AliTPCseed *seed0 = 0;
1390 AliTPCseed *seed1 = 0;
1392 for (Int_t l=0;(calibObject=friendTrack0->GetCalibObject(l));++l) {
1393 if ((seed0=dynamic_cast<AliTPCseed*>(calibObject))) break;
1395 for (Int_t l=0;(calibObject=friendTrack1->GetCalibObject(l));++l) {
1396 if ((seed1=dynamic_cast<AliTPCseed*>(calibObject))) break;
1400 (*pcstream)<<"cosmicPairs"<<
1401 "run="<<fRun<< // run number
1402 "event="<<fEvent<< // event number
1403 "time="<<fTime<< // time stamp of event
1404 "trigger="<<fTrigger<< // trigger
1405 "triggerClass="<<&fTriggerClass<< // trigger
1406 "bz="<<fMagF<< // magnetic field
1408 "nSPD="<<ntracksSPD<<
1409 "nTPC="<<ntracksTPC<<
1410 "vSPD.="<<vertexSPD<< //primary vertex -SPD
1411 "vTPC.="<<vertexTPC<< //primary vertex -TPC
1412 "t0.="<<track0<< //track0
1413 "t1.="<<track1<< //track1
1414 "ft0.="<<friendTrack0<< //track0
1415 "ft1.="<<friendTrack1<< //track1
1416 "s0.="<<seed0<< //track0
1417 "s1.="<<seed1<< //track1
1420 if (!seed0) continue;
1421 if (!seed1) continue;
1422 Int_t nclA0=0, nclC0=0; // number of clusters
1423 Int_t nclA1=0, nclC1=0; // number of clusters
1425 for (Int_t irow=0; irow<159; irow++){
1426 AliTPCclusterMI *cluster0=seed0->GetClusterPointer(irow);
1427 AliTPCclusterMI *cluster1=seed1->GetClusterPointer(irow);
1429 if (cluster0->GetQ()>0 && cluster0->GetDetector()%36<18) nclA0++;
1430 if (cluster0->GetQ()>0 && cluster0->GetDetector()%36>=18) nclC0++;
1433 if (cluster1->GetQ()>0 && cluster1->GetDetector()%36<18) nclA1++;
1434 if (cluster1->GetQ()>0 && cluster1->GetDetector()%36>=18) nclC1++;
1437 Int_t cosmicType=0; // types of cosmic topology
1438 if ((nclA0>nclC0) && (nclA1>nclC1)) cosmicType=0; // AA side
1439 if ((nclA0<nclC0) && (nclA1<nclC1)) cosmicType=1; // CC side
1440 if ((nclA0>nclC0) && (nclA1<nclC1)) cosmicType=2; // AC side
1441 if ((nclA0<nclC0) && (nclA1>nclC1)) cosmicType=3; // CA side
1442 if (cosmicType<2) continue; // use only crossing tracks
1444 Double_t deltaTimeCluster=0;
1445 deltaTimeCluster=0.5*(track1->GetZ()-track0->GetZ())/param->GetZWidth();
1446 if (nclA0>nclC0) deltaTimeCluster*=-1; // if A side track
1448 for (Int_t irow=0; irow<159; irow++){
1449 AliTPCclusterMI *cluster0=seed0->GetClusterPointer(irow);
1450 if (cluster0 &&cluster0->GetX()>10){
1451 Double_t x0[3]={cluster0->GetRow(),cluster0->GetPad(),cluster0->GetTimeBin()+deltaTimeCluster};
1452 Int_t index0[1]={cluster0->GetDetector()};
1453 transform->Transform(x0,index0,0,1);
1454 cluster0->SetX(x0[0]);
1455 cluster0->SetY(x0[1]);
1456 cluster0->SetZ(x0[2]);
1459 AliTPCclusterMI *cluster1=seed1->GetClusterPointer(irow);
1460 if (cluster1&&cluster1->GetX()>10){
1461 Double_t x1[3]={cluster1->GetRow(),cluster1->GetPad(),cluster1->GetTimeBin()+deltaTimeCluster};
1462 Int_t index1[1]={cluster1->GetDetector()};
1463 transform->Transform(x1,index1,0,1);
1464 cluster1->SetX(x1[0]);
1465 cluster1->SetY(x1[1]);
1466 cluster1->SetZ(x1[2]);
1472 (*fPIDMatrix)(itrack0,1)+=4; //
1473 (*fPIDMatrix)(itrack1,1)+=4; //
1481 void AliTPCcalibGainMult::ProcessKinks(const AliESDEvent * event){
1485 AliKFParticle::SetField(event->GetMagneticField());
1486 AliESDfriend *esdFriend=static_cast<AliESDfriend*>(event->FindListObject("AliESDfriend"));
1488 //Printf("ERROR: esdFriend not available");
1491 // if (esdFriend->TestSkipBit()) return;
1494 const Double_t kChi2Cut=10;
1495 const Double_t kMinR=100;
1496 const Double_t kMaxR=230;
1497 const Int_t kMinNcl=110;
1499 Int_t nkinks = event->GetNumberOfKinks();
1500 AliESDVertex *vertex= (AliESDVertex *)event->GetPrimaryVertex();
1501 AliKFVertex kfvertex=*vertex;
1502 TTreeSRedirector * pcstream = GetDebugStreamer();
1504 for (Int_t ikink=0;ikink<nkinks;ikink++){
1505 AliESDkink *kink = event->GetKink(ikink);
1506 if (!kink) continue;
1507 if (kink->GetIndex(0)<0) continue;
1508 if (kink->GetIndex(1)<0) continue;
1509 if (TMath::Max(kink->GetIndex(1), kink->GetIndex(0))>event->GetNumberOfTracks()) continue;
1512 AliExternalTrackParam pd=kink->RefParamDaughter();
1513 AliExternalTrackParam pm=kink->RefParamMother();
1514 AliKFParticle kfpd( pd, 211 );
1515 AliKFParticle kfpm( pm, -13 );
1517 AliKFParticle *v0KF = new AliKFParticle(kfpm,kfpd);
1518 v0KF->SetVtxGuess(kink->GetPosition()[0],kink->GetPosition()[1],kink->GetPosition()[2]);
1519 Double_t chi2 = v0KF->GetChi2();
1520 AliESDtrack * trackM = event->GetTrack(kink->GetIndex(0));
1521 AliESDtrack * trackD = event->GetTrack(kink->GetIndex(1));
1522 if (!trackM) continue;
1523 if (!trackD) continue;
1524 Int_t nclM= (Int_t)trackM->GetTPCClusterInfo(2,1);
1525 Int_t nclD= (Int_t)trackD->GetTPCClusterInfo(2,1);
1526 Double_t eta = TMath::Max(TMath::Abs(trackM->Eta()), TMath::Abs(trackD->Eta()));
1527 Double_t kx= v0KF->GetX();
1528 Double_t ky= v0KF->GetY();
1529 Double_t kz= v0KF->GetZ();
1530 Double_t ex= v0KF->GetErrX();
1531 Double_t ey= v0KF->GetErrY();
1532 Double_t ez= v0KF->GetErrZ();
1534 Double_t radius=TMath::Sqrt(kx*kx+ky*ky);
1535 Double_t alpha=TMath::ATan2(ky,kx);
1536 if (!pd.Rotate(alpha)) continue;
1537 if (!pm.Rotate(alpha)) continue;
1538 if (!pd.PropagateTo(radius,event->GetMagneticField())) continue;
1539 if (!pm.PropagateTo(radius,event->GetMagneticField())) continue;
1540 Double_t pos[2]={0,kz};
1541 Double_t cov[3]={ex*ex+ey*ey,0,ez*ez};
1546 (*pcstream)<<"kinks"<<
1551 "trackM.="<<trackM<<
1552 "trackD.="<<trackD<<
1553 "pm.="<<&pm<< //updated parameters
1554 "pd.="<<&pd<< // updated parameters
1560 TCut cutQ="chi2<10&&kink.fRr>90&&kink.fRr<220";
1561 TCut cutRD="20*sqrt(pd.fC[14])<abs(pd.fP[4])&&trackD.fTPCsignal>10&&trackD.fTPCsignalN>50";
1565 if (chi2>kChi2Cut) continue;
1566 if (kink->GetR()<kMinR) continue;
1567 if (kink->GetR()>kMaxR) continue;
1568 if ((nclM+nclD)<kMinNcl) continue;
1569 if (TMath::Abs(eta)>1) continue;
1572 AliESDfriendTrack *friendTrackM = esdFriend->GetTrack(kink->GetIndex(0));
1573 AliESDfriendTrack *friendTrackD = esdFriend->GetTrack(kink->GetIndex(1));
1574 if (!friendTrackM) continue;
1575 if (!friendTrackD) continue;
1576 TObject *calibObject;
1577 AliTPCseed *seedM = 0;
1578 AliTPCseed *seedD = 0;
1579 for (Int_t l=0;(calibObject=friendTrackM->GetCalibObject(l));++l) {
1580 if ((seedM=dynamic_cast<AliTPCseed*>(calibObject))) break;
1582 for (Int_t l=0;(calibObject=friendTrackD->GetCalibObject(l));++l) {
1583 if ((seedD=dynamic_cast<AliTPCseed*>(calibObject))) break;
1588 void AliTPCcalibGainMult::DumpHPT(const AliESDEvent * event){
1590 // Function to select the HPT tracks and events
1591 // It is used to select event with HPT - list used later for the raw data downloading
1592 // - and reconstruction
1593 // Not actualy used for the calibration of the data
1595 TTreeSRedirector * pcstream = GetDebugStreamer();
1596 AliKFParticle::SetField(event->GetMagneticField());
1597 AliESDfriend *esdFriend=static_cast<AliESDfriend*>(event->FindListObject("AliESDfriend"));
1599 //Printf("ERROR: esdFriend not available");
1602 if (esdFriend->TestSkipBit()) return;
1604 Int_t ntracks=event->GetNumberOfTracks();
1606 for (Int_t i=0;i<ntracks;++i) {
1608 AliESDtrack *track = event->GetTrack(i);
1609 if (!track) continue;
1610 if (track->Pt()<4) continue;
1611 UInt_t status = track->GetStatus();
1613 AliExternalTrackParam * trackIn = (AliExternalTrackParam *)track->GetInnerParam();
1614 if (!trackIn) continue;
1615 if ((status&AliESDtrack::kTPCrefit)==0) continue;
1616 if ((status&AliESDtrack::kITSrefit)==0) continue;
1617 AliESDfriendTrack *friendTrack = esdFriend->GetTrack(i);
1618 if (!friendTrack) continue;
1619 AliExternalTrackParam * itsOut = (AliExternalTrackParam *)(friendTrack->GetITSOut());
1620 if (!itsOut) continue;
1621 AliExternalTrackParam * itsOut2 = (AliExternalTrackParam *)(friendTrack->GetITSOut()->Clone());
1622 AliExternalTrackParam * tpcIn2 = (AliExternalTrackParam *)(trackIn->Clone());
1623 if (!itsOut2->Rotate(trackIn->GetAlpha())) continue;
1624 //Double_t xmiddle=0.5*(itsOut2->GetX()+tpcIn2->GetX());
1625 Double_t xmiddle=(itsOut2->GetX());
1626 if (!itsOut2->PropagateTo(xmiddle,event->GetMagneticField())) continue;
1627 if (!tpcIn2->PropagateTo(xmiddle,event->GetMagneticField())) continue;
1629 AliExternalTrackParam * tpcInner = (AliExternalTrackParam *)(track->GetTPCInnerParam());
1630 if (!tpcInner) continue;
1631 tpcInner->Rotate(track->GetAlpha());
1632 tpcInner->PropagateTo(track->GetX(),event->GetMagneticField());
1636 AliExternalTrackParam * tpcInnerC = (AliExternalTrackParam *)(track->GetTPCInnerParam()->Clone());
1637 if (!tpcInnerC) continue;
1638 tpcInnerC->Rotate(track->GetAlpha());
1639 tpcInnerC->PropagateTo(track->GetX(),event->GetMagneticField());
1640 Double_t dz[2],cov[3];
1641 AliESDVertex *vtx= (AliESDVertex *)event->GetPrimaryVertex();
1643 if (!tpcInnerC->PropagateToDCA(vtx, event->GetMagneticField(), 3, dz, cov)) continue;
1644 Double_t covar[6]; vtx->GetCovMatrix(covar);
1645 Double_t p[2]={tpcInnerC->GetParameter()[0]-dz[0],tpcInnerC->GetParameter()[1]-dz[1]};
1646 Double_t c[3]={covar[2],0.,covar[5]};
1648 Double_t chi2C=tpcInnerC->GetPredictedChi2(p,c);
1649 tpcInnerC->Update(p,c);
1652 (*pcstream)<<"hpt"<<
1658 "tpcInner.="<<tpcInner<<
1659 "tpcInnerC.="<<tpcInnerC<<
1673 void AliTPCcalibGainMult::ProcessTOF(const AliESDEvent * event){
1675 // 1. Loop over tracks
1677 // 3. Sign positivelly identified tracks
1679 const Double_t kMaxDelta=1000;
1680 const Double_t kOrbit=50000; // distance in the time beween two orbits in the TOF time units - 50000=50 ns
1681 const Double_t kMaxD=20;
1682 const Double_t kRMS0=200;
1683 const Double_t kMaxDCAZ=10;
1684 AliESDVertex *vtx= (AliESDVertex *)event->GetPrimaryVertex();
1686 TTreeSRedirector * pcstream = GetDebugStreamer();
1687 AliKFParticle::SetField(event->GetMagneticField());
1688 AliESDfriend *esdFriend=static_cast<AliESDfriend*>(event->FindListObject("AliESDfriend"));
1690 //Printf("ERROR: esdFriend not available");
1693 //if (esdFriend->TestSkipBit()) return;
1695 Int_t ntracks=event->GetNumberOfTracks();
1697 Double_t deltaTPion[10000];
1698 Double_t medianT0=0;
1703 // Get Median time for pion hypothesy
1705 for (Int_t iter=0; iter<3; iter++){
1707 for (Int_t i=0;i<ntracks;++i) {
1709 AliESDtrack *track = event->GetTrack(i);
1710 if (!track) continue;
1711 if (!track->IsOn(AliESDtrack::kTIME)) continue;
1712 if (TMath::Abs(track->GetZ())>kMaxDCAZ) continue; // remove overlaped events
1713 if (TMath::Abs(track->GetTOFsignalDz())>kMaxD) continue;
1714 Double_t times[1000];
1715 track->GetIntegratedTimes(times);
1716 Int_t norbit=TMath::Nint((track->GetTOFsignal()-times[2])/kOrbit);
1717 Double_t torbit=norbit*kOrbit;
1718 if (iter==1 &&TMath::Abs(times[2]-times[3])<3*rms) continue; // skip umbigous points - kaon pion
1722 for (Int_t j=3; j<5; j++)
1723 if (TMath::Abs(track->GetTOFsignal()-times[j]-torbit-medianT0)<TMath::Abs(track->GetTOFsignal()-times[j]-torbit-medianT0)) indexBest=j;
1726 if (iter>0) if (TMath::Abs(track->GetTOFsignal()-times[indexBest]-torbit-medianT0)>3*(kRMS0+rms)) continue;
1727 if (iter>0) if (TMath::Abs(track->GetTOFsignal()-times[indexBest]-torbit-medianT0)>kMaxDelta) continue;
1728 deltaTPion[counter]=track->GetTOFsignal()-times[indexBest]-torbit;
1731 if (counter<2) return;
1732 medianT0=TMath::Median(counter,deltaTPion);
1733 meanT0=TMath::Median(counter,deltaTPion);
1734 rms=TMath::RMS(counter,deltaTPion);
1736 if (counter<3) return;
1740 for (Int_t i=0;i<ntracks;++i) {
1742 AliESDtrack *track = event->GetTrack(i);
1743 if (!track) continue;
1744 if (!track->IsOn(AliESDtrack::kTIME)) continue;
1745 if (TMath::Abs(track->GetZ())>kMaxDCAZ) continue; //remove overlapped events
1746 if (TMath::Abs(track->GetTOFsignalDz())>kMaxD) continue;
1747 Double_t times[1000];
1748 track->GetIntegratedTimes(times);
1749 Int_t norbit=TMath::Nint((track->GetTOFsignal()-times[2])/kOrbit);
1750 Double_t torbit=norbit*kOrbit;
1751 if (rms<=0) continue;
1753 Double_t tPion = (track->GetTOFsignal()-times[2]-medianT0-torbit);
1754 Double_t tKaon = (track->GetTOFsignal()-times[3]-medianT0-torbit);
1755 Double_t tProton= (track->GetTOFsignal()-times[4]-medianT0-torbit);
1756 Double_t tElectron= (track->GetTOFsignal()-times[0]-medianT0-torbit);
1758 Bool_t isPion = (TMath::Abs(tPion/rms)<6) && TMath::Abs(tPion)<(TMath::Min(TMath::Abs(tKaon), TMath::Abs(tProton))-rms);
1759 Bool_t isKaon = (TMath::Abs(tKaon/rms)<3) && TMath::Abs(tKaon)<0.2*(TMath::Min(TMath::Abs(tPion), TMath::Abs(tProton))-3*rms);
1760 Bool_t isProton = (TMath::Abs(tProton/rms)<6) && TMath::Abs(tProton)<0.5*(TMath::Min(TMath::Abs(tKaon), TMath::Abs(tPion))-rms);
1761 Bool_t isElectron = (TMath::Abs(tElectron/rms)<6) && TMath::Abs(tElectron)<0.2*(TMath::Min(TMath::Abs(tKaon), TMath::Abs(tPion))-rms) &&TMath::Abs(tElectron)<0.5*(TMath::Abs(tPion)-rms);
1763 if (isPion) (*fPIDMatrix)(i,2)+=1;
1764 if (isKaon) (*fPIDMatrix)(i,3)+=1;
1765 if (isProton) (*fPIDMatrix)(i,4)+=1;
1766 // if (isElectron) (*fPIDMatrix)(i,0)+=1;
1769 // debug streamer to dump the information
1770 (*pcstream)<<"tof"<<
1773 "isProton="<<isProton<<
1774 "isElectron="<<isElectron<<
1776 "counter="<<counter<<
1779 "medianT0="<<medianT0<<
1789 tof->SetAlias("isProton","(abs(track.fTOFsignal-track.fTrackTime[4]-medianT0-torbit)<(0.5*abs(track.fTOFsignal-track.fTrackTime[3]-medianT0-torbit)-rmsT0))");
1790 tof->SetAlias("isPion","(abs(track.fTOFsignal-track.fTrackTime[2]-medianT0-torbit)<(0.5*abs(track.fTOFsignal-track.fTrackTime[3]-medianT0-torbit)-rmsT0))");
1791 tof->SetAlias("isKaon","(abs(track.fTOFsignal-track.fTrackTime[3]-medianT0-torbit)<(0.5*abs(track.fTOFsignal-track.fTrackTime[2]-medianT0-torbit)-rmsT0))&&(abs(track.fTOFsignal-track.fTrackTime[3]-medianT0-torbit)<(0.5*abs(track.fTOFsignal-track.fTrackTime[4]-medianT0-torbit)-rmsT0))");
1798 TGraphErrors* AliTPCcalibGainMult::GetGainPerChamber(Int_t padRegion/*=1*/, Bool_t plotQA/*=kFALSE*/)
1801 // Extract gain variations per chamger for 'padRegion'
1804 if (padRegion<0||padRegion>2) return 0x0;
1806 if (!fHistGainSector) return NULL;
1807 if (!fHistGainSector->GetAxis(2)) return NULL;
1808 fHistGainSector->GetAxis(2)->SetRangeUser(padRegion,padRegion);
1809 TH2D * histGainSec = fHistGainSector->Projection(0,1);
1810 // TH1D* proj=fHistGainSector->Projection(0);
1811 // Double_t max=proj->GetBinCenter(proj->GetMaximumBin());
1815 // TF1 fg("gaus","gaus",histGainSec->GetYaxis()->GetXmin()+1,histGainSec->GetYaxis()->GetXmax()-1);
1816 // histGainSec->FitSlicesY(&fg, 0, -1, 0, "QNR", &arr);
1817 histGainSec->FitSlicesY(0, 0, -1, 0, "QNR", &arr);
1818 TH1D * meanGainSec = (TH1D*)arr.At(1);
1819 Double_t gainsIROC[36]={0.};
1820 Double_t gainsOROC[36]={0.};
1821 Double_t gains[72]={0.};
1822 Double_t gainsErr[72]={0.};
1823 TGraphErrors *gr=new TGraphErrors(36);
1825 for(Int_t isec = 1; isec < meanGainSec->GetNbinsX() + 1; isec++) {
1826 TH1D *slice=histGainSec->ProjectionY("_py",isec,isec);
1827 Double_t max=slice->GetBinCenter(slice->GetMaximumBin());
1828 TF1 fg("gaus","gaus",max-30,max+30);
1829 slice->Fit(&fg,"QNR");
1830 meanGainSec->SetBinContent(isec,fg.GetParameter(1));
1831 meanGainSec->SetBinError(isec,fg.GetParError(1));
1833 // cout << isec << " " << meanGainSec->GetXaxis()->GetBinCenter(isec) << " " <<meanGainSec->GetBinContent(isec) << endl;
1834 gains[isec-1] = meanGainSec->GetBinContent(isec);
1836 gainsIROC[isec-1] = meanGainSec->GetBinContent(isec);
1838 gainsOROC[isec - 36 -1] = meanGainSec->GetBinContent(isec);
1840 gainsErr[isec-1]=meanGainSec->GetBinError(isec);
1843 Double_t meanIroc = TMath::Median(36, gainsIROC);
1844 Double_t meanOroc = TMath::Median(36, gainsOROC);
1845 if (TMath::Abs(meanIroc)<1e-30) meanIroc=1.;
1846 if (TMath::Abs(meanOroc)<1e-30) meanOroc=1.;
1847 for(Int_t i = 0; i < 36; i++) {
1848 gains[i] /= meanIroc;
1849 gainsErr[i] /= meanIroc;
1852 for(Int_t i = 36; i < 72; i++){
1853 gains[i] /= meanOroc;
1854 gainsErr[i] /= meanOroc;
1858 for(Int_t i = 0; i < 72; i++) {
1859 if (padRegion==0 && i>35) continue;
1860 if ( (padRegion==1 || padRegion==2) && i<36) continue;
1862 if (gains[i]<1e-20 || gainsErr[i]/gains[i]>.2){
1863 AliWarning(Form("Invalid chamber gain in ROC/region: %d / %d", i, padRegion));
1868 gr->SetPoint(ipoint,i,gains[i]);
1869 gr->SetPointError(ipoint,0,gainsErr[i]);
1873 const char* names[3]={"SHORT","MEDIUM","LONG"};
1874 gr->SetNameTitle(Form("TGRAPHERRORS_MEAN_CHAMBERGAIN_%s_BEAM_ALL",names[padRegion]),Form("TGRAPHERRORS_MEAN_CHAMBERGAIN_%s_BEAM_ALL",names[padRegion]));
1877 //=====================================
1878 // Do QA plotting if requested
1880 TCanvas *c=(TCanvas*)gROOT->GetListOfCanvases()->FindObject("cQA");
1881 if (!c) c=new TCanvas("cQA","cQA");
1885 histGainSec->DrawCopy("colz");
1886 meanGainSec->DrawCopy("same");
1887 gr->SetMarkerStyle(20);
1888 gr->SetMarkerSize(.5);
1897 // void AliTPCcalibGainMult::Terminate(){
1899 // // Terminate function
1900 // // call base terminate + Eval of fitters
1902 // Info("AliTPCcalibGainMult","Terminate");
1903 // TTreeSRedirector *pcstream = GetDebugStreamer();
1905 // TTreeStream &stream = (*pcstream)<<"dump";
1906 // TTree* tree = stream.GetTree();
1907 // if (tree) if ( tree->GetEntries()>0){
1908 // TObjArray *array = tree->GetListOfBranches();
1909 // for (Int_t i=0; i<array->GetEntries(); i++) {TBranch * br = (TBranch *)array->At(i); br->SetAddress(0);}
1910 // gDirectory=gROOT;
1911 // fdEdxTree=tree->CloneTree(10000);
1914 // AliTPCcalibBase::Terminate();