1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
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 **************************************************************************/
16 //_________________________________________________________________________
17 // Reconstructed Points for the EMCAL
18 // A RecPoint is a cluster of digits
21 //*-- Author: Yves Schutz (SUBATECH)
22 //*-- Author: Dmitri Peressounko (RRC KI & SUBATECH)
23 //*-- Author: Heather Gray (LBL) merged AliEMCALRecPoint and AliEMCALTowerRecPoint 02/04
25 // --- ROOT system ---
28 #include "TPaveText.h"
29 #include "TClonesArray.h"
31 #include "TGeoMatrix.h"
32 #include "TGeoManager.h"
33 #include "TGeoPhysicalNode.h"
36 // --- Standard library ---
37 #include <Riostream.h>
39 // --- AliRoot header files ---
40 //#include "AliGenerator.h"
44 #include "AliGeomManager.h"
45 #include "AliEMCALGeometry.h"
46 #include "AliEMCALHit.h"
47 #include "AliEMCALDigit.h"
48 #include "AliEMCALRecPoint.h"
49 #include "AliCaloCalibPedestal.h"
50 #include "AliEMCALGeoParams.h"
52 ClassImp(AliEMCALRecPoint)
54 //____________________________________________________________________________
55 AliEMCALRecPoint::AliEMCALRecPoint()
56 : AliCluster(), fGeomPtr(0),
57 fAmp(0), fIndexInList(-1), //to be set when the point is already stored
58 fGlobPos(0,0,0),fLocPos(0,0,0),
59 fMaxDigit(100), fMulDigit(0), fMaxTrack(200),
60 fMulTrack(0), fDigitsList(0), fTracksList(0),
61 fClusterType(-1), fCoreEnergy(0), fDispersion(0),
62 fEnergyList(0), fTimeList(0), fAbsIdList(0),
63 fTime(0.), fNExMax(0), fCoreRadius(10), //HG check this
64 fDETracksList(0), fMulParent(0), fMaxParent(0),
65 fParentsList(0), fDEParentsList(0), fSuperModuleNumber(0),
66 fDigitIndMax(-1), fDistToBadTower(-1), fSharedCluster(kFALSE)
69 fGeomPtr = AliEMCALGeometry::GetInstance();
76 //____________________________________________________________________________
77 AliEMCALRecPoint::AliEMCALRecPoint(const char *)
78 : AliCluster(), fGeomPtr(0),
79 fAmp(0), fIndexInList(-1), //to be set when the point is already stored
80 fGlobPos(0,0,0), fLocPos(0,0,0),
81 fMaxDigit(100), fMulDigit(0), fMaxTrack(1000), fMulTrack(0),
82 fDigitsList(new Int_t[fMaxDigit]), fTracksList(new Int_t[fMaxTrack]),
83 fClusterType(-1), fCoreEnergy(0), fDispersion(0),
84 fEnergyList(new Float_t[fMaxDigit]), fTimeList(new Float_t[fMaxDigit]),
85 fAbsIdList(new Int_t[fMaxDigit]), fTime(-1.), fNExMax(0), fCoreRadius(10),
86 fDETracksList(new Float_t[fMaxTrack]), fMulParent(0), fMaxParent(1000),
87 fParentsList(new Int_t[fMaxParent]), fDEParentsList(new Float_t[fMaxParent]),
88 fSuperModuleNumber(0), fDigitIndMax(-1), fDistToBadTower(-1),fSharedCluster(kFALSE)
91 for (Int_t i = 0; i < fMaxTrack; i++)
93 for (Int_t i = 0; i < fMaxParent; i++) {
95 fDEParentsList[i] = 0;
98 fGeomPtr = AliEMCALGeometry::GetInstance();
103 //____________________________________________________________________________
104 AliEMCALRecPoint::AliEMCALRecPoint(const AliEMCALRecPoint & rp)
105 : AliCluster(rp), fGeomPtr(rp.fGeomPtr),
106 fAmp(rp.fAmp), fIndexInList(rp.fIndexInList),
107 fGlobPos(rp.fGlobPos),fLocPos(rp.fLocPos),
108 fMaxDigit(rp.fMaxDigit), fMulDigit(rp.fMulDigit),
109 fMaxTrack(rp.fMaxTrack), fMulTrack(rp.fMaxTrack),
110 fDigitsList(new Int_t[rp.fMaxDigit]), fTracksList(new Int_t[rp.fMaxTrack]),
111 fClusterType(rp.fClusterType), fCoreEnergy(rp.fCoreEnergy),
112 fDispersion(rp.fDispersion),
113 fEnergyList(new Float_t[rp.fMaxDigit]), fTimeList(new Float_t[rp.fMaxDigit]),
114 fAbsIdList(new Int_t[rp.fMaxDigit]), fTime(rp.fTime), fNExMax(rp.fNExMax),fCoreRadius(rp.fCoreRadius),
115 fDETracksList(new Float_t[rp.fMaxTrack]), fMulParent(rp.fMulParent),
116 fMaxParent(rp.fMaxParent), fParentsList(new Int_t[rp.fMaxParent]),
117 fDEParentsList(new Float_t[rp.fMaxParent]),
118 fSuperModuleNumber(rp.fSuperModuleNumber), fDigitIndMax(rp.fDigitIndMax),
119 fDistToBadTower(rp.fDistToBadTower), fSharedCluster(rp.fSharedCluster)
122 fLambda[0] = rp.fLambda[0];
123 fLambda[1] = rp.fLambda[1];
125 for(Int_t i = 0; i < rp.fMulDigit; i++) {
126 fEnergyList[i] = rp.fEnergyList[i];
127 fTimeList[i] = rp.fTimeList[i];
128 fAbsIdList[i] = rp.fAbsIdList[i];
131 for(Int_t i = 0; i < rp.fMulTrack; i++) fDETracksList[i] = rp.fDETracksList[i];
133 for(Int_t i = 0; i < rp.fMulParent; i++) {
134 fParentsList[i] = rp.fParentsList[i];
135 fDEParentsList[i] = rp.fDEParentsList[i];
139 //____________________________________________________________________________
140 AliEMCALRecPoint::~AliEMCALRecPoint()
144 delete[] fEnergyList ;
148 delete[] fAbsIdList ;
150 delete[] fDETracksList;
152 delete[] fParentsList;
154 delete[] fDEParentsList;
156 delete [] fDigitsList ;
157 delete [] fTracksList ;
160 //____________________________________________________________________________
161 AliEMCALRecPoint& AliEMCALRecPoint::operator= (const AliEMCALRecPoint &rp)
163 // assignment operator
165 if(&rp == this) return *this;
167 fGeomPtr = rp.fGeomPtr;
169 fIndexInList = rp.fIndexInList;
170 fGlobPos = rp.fGlobPos;
171 fLocPos = rp.fLocPos;
172 fMaxDigit = rp.fMaxDigit;
173 fMulDigit = rp.fMulDigit;
174 fMaxTrack = rp.fMaxTrack;
175 fMulTrack = rp.fMaxTrack;
176 for(Int_t i = 0; i<fMaxDigit; i++) fDigitsList[i] = rp.fDigitsList[i];
177 for(Int_t i = 0; i<fMaxTrack; i++) fTracksList[i] = rp.fTracksList[i];
178 fClusterType = rp.fClusterType;
179 fCoreEnergy = rp.fCoreEnergy;
180 fDispersion = rp.fDispersion;
181 for(Int_t i = 0; i<fMaxDigit; i++) {
182 fEnergyList[i] = rp.fEnergyList[i];
183 fTimeList[i] = rp.fTimeList[i];
184 fAbsIdList[i] = rp.fAbsIdList[i];
187 fNExMax = rp.fNExMax;
188 fCoreRadius = rp.fCoreRadius;
189 for(Int_t i = 0; i < fMaxTrack; i++) fDETracksList[i] = rp.fDETracksList[i];
190 fMulParent = rp.fMulParent;
191 fMaxParent = rp.fMaxParent;
192 for(Int_t i = 0; i < fMaxParent; i++) {
193 fParentsList[i] = rp.fParentsList[i];
194 fDEParentsList[i] = rp.fDEParentsList[i];
196 fSuperModuleNumber = rp.fSuperModuleNumber;
197 fDigitIndMax = rp.fDigitIndMax;
199 fLambda[0] = rp.fLambda[0];
200 fLambda[1] = rp.fLambda[1];
202 fDistToBadTower = rp.fDistToBadTower;
203 fSharedCluster = rp.fSharedCluster;
209 //____________________________________________________________________________
210 void AliEMCALRecPoint::AddDigit(AliEMCALDigit & digit, Float_t energy, Bool_t shared)
212 // Adds a digit to the RecPoint
213 // and accumulates the total amplitude and the multiplicity
216 fEnergyList = new Float_t[fMaxDigit];
218 fTimeList = new Float_t[fMaxDigit];
219 if(fAbsIdList == 0) {
220 fAbsIdList = new Int_t[fMaxDigit];
223 if ( fMulDigit >= fMaxDigit ) { // increase the size of the lists
225 Int_t * tempo = new Int_t[fMaxDigit];
226 Float_t * tempoE = new Float_t[fMaxDigit];
227 Float_t * tempoT = new Float_t[fMaxDigit];
228 Int_t * tempoId = new Int_t[fMaxDigit];
231 for ( index = 0 ; index < fMulDigit ; index++ ){
232 tempo[index] = fDigitsList[index] ;
233 tempoE[index] = fEnergyList[index] ;
234 tempoT[index] = fTimeList[index] ;
235 tempoId[index] = fAbsIdList[index] ;
238 delete [] fDigitsList ;
239 delete [] fEnergyList ;
240 delete [] fTimeList ;
241 delete [] fAbsIdList ;
244 fEnergyList = tempoE;
246 fAbsIdList = tempoId;
249 fDigitsList[fMulDigit] = digit.GetIndexInList() ;
250 fEnergyList[fMulDigit] = energy ;
251 fTimeList[fMulDigit] = digit.GetTimeR() ;
252 fAbsIdList[fMulDigit] = digit.GetId();
256 if(shared) fSharedCluster = kTRUE;
258 //GCB, May-2010, setting moved to EvalAll method, set the super module number for the largest energy digit position.
259 //JLK 10-Oct-2007 this hasn't been filled before because it was in
260 //the wrong place in previous versions.
261 //Now we evaluate it only if the supermodulenumber for this recpoint
262 //has not yet been set (or is the 0th one)
263 //if(fSuperModuleNumber == 0)
264 //fSuperModuleNumber = fGeomPtr->GetSuperModuleNumber(digit.GetId());
267 //____________________________________________________________________________
268 Bool_t AliEMCALRecPoint::AreNeighbours(AliEMCALDigit * digit1, AliEMCALDigit * digit2 ) const
270 // Tells if (true) or not (false) two digits are neighbours
271 // A neighbour is defined as being two digits which share a corner
272 // ONLY USED IN CASE OF UNFOLDING
274 Bool_t areNeighbours = kFALSE ;
275 Int_t nSupMod=0, nModule=0, nIphi=0, nIeta=0;
276 Int_t nSupMod1=0, nModule1=0, nIphi1=0, nIeta1=0;
277 Int_t relid1[2] , relid2[2] ; // ieta, iphi
278 Int_t rowdiff=0, coldiff=0;
280 areNeighbours = kFALSE ;
282 fGeomPtr->GetCellIndex(digit1->GetId(), nSupMod,nModule,nIphi,nIeta);
283 fGeomPtr->GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, relid1[0],relid1[1]);
285 fGeomPtr->GetCellIndex(digit2->GetId(), nSupMod1,nModule1,nIphi1,nIeta1);
286 fGeomPtr->GetCellPhiEtaIndexInSModule(nSupMod1,nModule1,nIphi1,nIeta1, relid2[0],relid2[1]);
288 // In case of a shared cluster, index of SM in C side, columns start at 48 and ends at 48*2-1
289 // C Side impair SM, nSupMod%2=1; A side pair SM nSupMod%2=0
291 if(nSupMod1%2) relid1[1]+=AliEMCALGeoParams::fgkEMCALCols;
292 else relid2[1]+=AliEMCALGeoParams::fgkEMCALCols;
295 rowdiff = TMath::Abs( relid1[0] - relid2[0] ) ;
296 coldiff = TMath::Abs( relid1[1] - relid2[1] ) ;
298 if (( coldiff <= 1 ) && ( rowdiff <= 1 ) && (coldiff + rowdiff > 0))
299 areNeighbours = kTRUE ;
301 return areNeighbours;
304 //____________________________________________________________________________
305 Int_t AliEMCALRecPoint::Compare(const TObject * obj) const
307 // Compares two RecPoints according to their position in the EMCAL modules
309 Float_t delta = 1 ; //Width of "Sorting row".
313 AliEMCALRecPoint * clu = (AliEMCALRecPoint *)obj ;
316 GetLocalPosition(locpos1);
318 clu->GetLocalPosition(locpos2);
320 Int_t rowdif = (Int_t)(TMath::Ceil(locpos1.X()/delta)-TMath::Ceil(locpos2.X()/delta)) ;
325 else if(locpos1.Y()>locpos2.Y())
333 // GCB, May-2010, Method not used, just comment it but remove?
334 //____________________________________________________________________________
335 //Int_t AliEMCALRecPoint::DistancetoPrimitive(Int_t px, Int_t py)
337 // // Compute distance from point px,py to a AliEMCALRecPoint considered as a Tmarker
338 // // Compute the closest distance of approach from point px,py to this marker.
339 // // The distance is computed in pixels units.
340 // // HG Still need to update -> Not sure what this should achieve
342 // TVector3 pos(0.,0.,0.) ;
343 // GetLocalPosition(pos) ;
344 // Float_t x = pos.X() ;
345 // Float_t y = pos.Y() ;
346 // const Int_t kMaxDiff = 10;
347 // Int_t pxm = gPad->XtoAbsPixel(x);
348 // Int_t pym = gPad->YtoAbsPixel(y);
349 // Int_t dist = (px-pxm)*(px-pxm) + (py-pym)*(py-pym);
351 // if (dist > kMaxDiff) return 9999;
355 //___________________________________________________________________________
356 void AliEMCALRecPoint::Draw(Option_t *option)
358 // Draw this AliEMCALRecPoint with its current attributes
363 // GCB, May-2010, Method not used, just comment it but remove?
364 //______________________________________________________________________________
365 //void AliEMCALRecPoint::ExecuteEvent(Int_t /*event*/, Int_t, Int_t)
367 // // Execute action corresponding to one event
368 // // This member function is called when a AliEMCALRecPoint is clicked with the locator
370 // // If Left button is clicked on AliEMCALRecPoint, the digits are switched on
371 // // and switched off when the mouse button is released.
373 // // static Int_t pxold, pyold;
375 // /* static TGraph * digitgraph = 0 ;
376 // static TPaveText* clustertext = 0 ;
378 // if (!gPad->IsEditable()) return;
383 // case kButton1Down:{
384 // AliEMCALDigit * digit ;
389 // const Int_t kMulDigit=AliEMCALRecPoint::GetDigitsMultiplicity() ;
390 // Float_t * xi = new Float_t [kMulDigit] ;
391 // Float_t * zi = new Float_t [kMulDigit] ;
393 // for(iDigit = 0; iDigit < kMulDigit; iDigit++) {
394 // Fatal("AliEMCALRecPoint::ExecuteEvent", " -> Something wrong with the code");
395 // digit = 0 ; //dynamic_cast<AliEMCALDigit *>((fDigitsList)[iDigit]);
396 // fGeomPtr->AbsToRelNumbering(digit->GetId(), relid) ;
397 // fGeomPtr->PosInAlice(relid, xi[iDigit], zi[iDigit]) ;
400 // if (!digitgraph) {
401 // digitgraph = new TGraph(fMulDigit,xi,zi);
402 // digitgraph-> SetMarkerStyle(5) ;
403 // digitgraph-> SetMarkerSize(1.) ;
404 // digitgraph-> SetMarkerColor(1) ;
405 // digitgraph-> Draw("P") ;
407 // if (!clustertext) {
409 // TVector3 pos(0.,0.,0.) ;
410 // GetLocalPosition(pos) ;
411 // clustertext = new TPaveText(pos.X()-10,pos.Z()+10,pos.X()+50,pos.Z()+35,"") ;
412 // Text_t line1[40] ;
413 // Text_t line2[40] ;
414 // sprintf(line1,"Energy=%1.2f GeV",GetEnergy()) ;
415 // sprintf(line2,"%d Digits",GetDigitsMultiplicity()) ;
416 // clustertext ->AddText(line1) ;
417 // clustertext ->AddText(line2) ;
418 // clustertext ->Draw("");
430 // delete digitgraph ;
433 // if (clustertext) {
434 // delete clustertext ;
443 //____________________________________________________________________________
444 void AliEMCALRecPoint::EvalAll(Float_t logWeight,TClonesArray * digits, const Bool_t justClusters)
446 // Evaluates cluster parameters
448 // First calculate the index of digit with maximum amplitude and get
449 // the supermodule number where it sits.
451 fDigitIndMax = GetMaximalEnergyIndex();
452 fSuperModuleNumber = fGeomPtr->GetSuperModuleNumber(GetAbsIdMaxDigit());
454 //Evaluate global and local position
455 EvalGlobalPosition(logWeight, digits) ;
456 EvalLocalPosition(logWeight, digits) ;
458 //Evaluate shower parameters
459 EvalElipsAxis(logWeight, digits) ;
460 EvalDispersion(logWeight, digits) ;
462 //EvalCoreEnergy(logWeight, digits);
464 EvalPrimaries(digits) ;
467 //Called last because it sets the global position of the cluster?
468 //Do not call it when recalculating clusters out of standard reconstruction
470 EvalLocal2TrackingCSTransform();
475 //____________________________________________________________________________
476 void AliEMCALRecPoint::EvalDispersion(Float_t logWeight, TClonesArray * digits)
478 // Calculates the dispersion of the shower at the origin of the RecPoint
479 // in cell units - Nov 16,2006
481 Double_t d = 0., wtot = 0., w = 0.;
482 Int_t iDigit=0, nstat=0;
483 AliEMCALDigit * digit=0;
485 // Calculates the dispersion in cell units
486 Double_t etai, phii, etaMean=0.0, phiMean=0.0;
487 int nSupMod=0, nModule=0, nIphi=0, nIeta=0;
489 // Calculate mean values
490 for(iDigit=0; iDigit < fMulDigit; iDigit++) {
491 digit = (AliEMCALDigit *) digits->At(fDigitsList[iDigit]) ;
493 if (fAmp>0 && fEnergyList[iDigit]>0) {
494 fGeomPtr->GetCellIndex(digit->GetId(), nSupMod,nModule,nIphi,nIeta);
495 fGeomPtr->GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi,ieta);
497 // In case of a shared cluster, index of SM in C side, columns start at 48 and ends at 48*2
498 // C Side impair SM, nSupMod%2=1; A side pair SM nSupMod%2=0
499 if(fSharedCluster && nSupMod%2) ieta+=AliEMCALGeoParams::fgkEMCALCols;
503 w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
515 } else AliError(Form("Wrong weight %f\n", wtot));
517 // Calculate dispersion
518 for(iDigit=0; iDigit < fMulDigit; iDigit++) {
519 digit = (AliEMCALDigit *) digits->At(fDigitsList[iDigit]) ;
521 if (fAmp>0 && fEnergyList[iDigit]>0) {
522 fGeomPtr->GetCellIndex(digit->GetId(), nSupMod,nModule,nIphi,nIeta);
523 fGeomPtr->GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi,ieta);
525 // In case of a shared cluster, index of SM in C side, columns start at 48 and ends at 48*2
526 // C Side impair SM, nSupMod%2=1; A side pair SM, nSupMod%2=0
527 if(fSharedCluster && nSupMod%2) ieta+=AliEMCALGeoParams::fgkEMCALCols;
531 w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
535 d += w*((etai-etaMean)*(etai-etaMean)+(phii-phiMean)*(phii-phiMean));
540 if ( wtot > 0 && nstat>1) d /= wtot ;
543 fDispersion = TMath::Sqrt(d) ;
544 //printf("AliEMCALRecPoint::EvalDispersion() : Dispersion %f \n",fDispersion);
547 //____________________________________________________________________________
548 void AliEMCALRecPoint::EvalDistanceToBadChannels(AliCaloCalibPedestal* caloped)
550 //For each EMC rec. point set the distance to the nearest bad channel.
551 //AliInfo(Form("%d bad channel(s) found.\n", caloped->GetDeadTowerCount()));
552 //It is done in cell units and not in global or local position as before (Sept 2010)
554 if(!caloped->GetDeadTowerCount()) return;
556 //Get channels map of the supermodule where the cluster is.
557 TH2D* hMap = caloped->GetDeadMap(fSuperModuleNumber);
560 Float_t minDist = 10000.;
562 Int_t nSupMod, nModule;
565 fDigitIndMax = GetMaximalEnergyIndex();
566 fGeomPtr->GetCellIndex(fAbsIdList[fDigitIndMax], nSupMod,nModule,nIphi,nIeta);
567 fGeomPtr->GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi,ieta);
571 // Float_t minDist = 100000;
575 //Loop on tower status map
576 for(Int_t irow = 0; irow < AliEMCALGeoParams::fgkEMCALRows; irow++){
577 for(Int_t icol = 0; icol < AliEMCALGeoParams::fgkEMCALCols; icol++){
578 //Check if tower is bad.
579 if(hMap->GetBinContent(icol,irow)==AliCaloCalibPedestal::kAlive) continue;
580 //printf("AliEMCALRecPoint::EvalDistanceToBadChannels() - Bad channel in SM %d, col %d, row %d\n",iSM,icol, irow);
582 dRrow=TMath::Abs(irow-iphi);
583 dReta=TMath::Abs(icol-ieta);
584 dist=TMath::Sqrt(dRrow*dRrow+dReta*dReta);
585 if(dist < minDist) minDist = dist;
587 // //Tower is bad, get the absId of the index.
588 // absId = fGeomPtr->GetAbsCellIdFromCellIndexes(fSuperModuleNumber, irow, icol);
590 // //Get the position of this tower.
592 // //Calculate the distance in local coordinates
593 // //fGeomPtr->RelPosCellInSModule(absId,cellpos);
594 // //Calculate distance between this tower and cluster, set if is smaller than previous.
595 // //dR = cellpos-fLocPos;
597 // //Calculate the distance in global coordinates
598 // fGeomPtr->GetGlobal(absId,cellpos);
599 // //Calculate distance between this tower and cluster, set if it is smaller than previous.
600 // dR = cellpos-fGlobPos;
603 // if(dist < minDist) minDist = dist;
608 //In case the cluster is shared by 2 SuperModules, need to check the map of the second Super Module
609 if (fSharedCluster) {
613 //The only possible combinations are (0,1), (2,3) ... (10,11)
614 if(fSuperModuleNumber%2) nSupMod2 = fSuperModuleNumber-1;
615 else nSupMod2 = fSuperModuleNumber+1;
616 hMap2 = caloped->GetDeadMap(nSupMod2);
618 //Loop on tower status map of second super module
619 for(Int_t irow = 0; irow < AliEMCALGeoParams::fgkEMCALRows; irow++){
620 for(Int_t icol = 0; icol < AliEMCALGeoParams::fgkEMCALCols; icol++){
621 //Check if tower is bad.
622 if(hMap2->GetBinContent(icol,irow)==AliCaloCalibPedestal::kAlive) continue;
623 //printf("AliEMCALRecPoint::EvalDistanceToBadChannels() - Bad channel in SM %d, col %d, row %d\n",iSM,icol, irow);
624 dRrow=TMath::Abs(irow-iphi);
626 if(fSuperModuleNumber%2) {
627 dReta=TMath::Abs(icol-(AliEMCALGeoParams::fgkEMCALCols+ieta));
630 dReta=TMath::Abs(AliEMCALGeoParams::fgkEMCALCols+icol-ieta);
633 dist=TMath::Sqrt(dRrow*dRrow+dReta*dReta);
634 if(dist < minDist) minDist = dist;
637 // //Tower is bad, get the absId of the index.
638 // absId = fGeomPtr->GetAbsCellIdFromCellIndexes(nSupMod2, irow, icol);
640 // //Get the position of this tower.
642 // //Calculate the distance in global coordinates
643 // fGeomPtr->GetGlobal(absId,cellpos);
644 // //Calculate distance between this tower and cluster, set if it is smaller than previous.
645 // dR = cellpos-fGlobPos;
648 // if(dist < minDist) minDist = dist;
652 }// shared cluster in 2 SuperModules
654 fDistToBadTower = minDist;
655 //printf("AliEMCALRecPoint::EvalDistanceToBadChannel() - Distance to Bad is %f cm, shared cluster? %d \n",fDistToBadTower,fSharedCluster);
659 //____________________________________________________________________________
660 void AliEMCALRecPoint::EvalLocalPosition(Float_t logWeight, TClonesArray * digits)
662 // Calculates the center of gravity in the local EMCAL-module coordinates
663 // Info("Print", " logWeight %f : cluster energy %f ", logWeight, fAmp); // for testing
665 AliEMCALDigit * digit=0;
668 Double_t dist = TmaxInCm(Double_t(fAmp));
669 //Int_t idMax = GetAbsIdMaxDigit();// idMax is not used at all in RelPosCellInSModule, why use it?
671 Double_t clXYZ[3]={0.,0.,0.}, clRmsXYZ[3]={0.,0.,0.}, xyzi[3], wtot=0., w=0.;
673 //printf(" dist : %f e : %f \n", dist, fAmp);
674 for(Int_t iDigit=0; iDigit<fMulDigit; iDigit++) {
675 digit = dynamic_cast<AliEMCALDigit *>(digits->At(fDigitsList[iDigit])) ;
678 AliError("No Digit!!");
682 //fGeomPtr->RelPosCellInSModule(digit->GetId(), idMax, dist, xyzi[0], xyzi[1], xyzi[2]);
683 fGeomPtr->RelPosCellInSModule(digit->GetId(), dist, xyzi[0], xyzi[1], xyzi[2]);
685 //Temporal patch, due to mapping problem, need to swap "y" in one of the 2 SM, although no effect in position calculation. GCB 05/2010
686 if(fSharedCluster && fSuperModuleNumber != fGeomPtr->GetSuperModuleNumber(digit->GetId())) xyzi[1]*=-1;
688 //printf("EvalLocalPosition Cell: Id %i, SM %i : dist %f Local x,y,z %f %f %f \n",
689 // digit->GetId(), fGeomPtr->GetSuperModuleNumber(digit->GetId()), dist, xyzi[0], xyzi[1], xyzi[2]);
691 if(logWeight > 0.0) w = TMath::Max( 0., logWeight + TMath::Log( fEnergyList[iDigit] / fAmp ));
692 else w = fEnergyList[iDigit]; // just energy
697 for(i=0; i<3; i++ ) {
698 clXYZ[i] += (w*xyzi[i]);
699 clRmsXYZ[i] += (w*xyzi[i]*xyzi[i]);
703 // cout << " wtot " << wtot << endl;
705 // xRMS = TMath::Sqrt(x2m - xMean*xMean);
706 for(i=0; i<3; i++ ) {
709 clRmsXYZ[i] /= (wtot*wtot);
710 clRmsXYZ[i] = clRmsXYZ[i] - clXYZ[i]*clXYZ[i];
711 if(clRmsXYZ[i] > 0.0) {
712 clRmsXYZ[i] = TMath::Sqrt(clRmsXYZ[i]);
713 } else clRmsXYZ[i] = 0;
714 } else clRmsXYZ[i] = 0;
717 for(i=0; i<3; i++ ) {
718 clXYZ[i] = clRmsXYZ[i] = -1.;
723 // // Cluster of one single digit, smear the position to avoid discrete position
724 // // smear x and z with +- 3 cm to uniform (avoid discrete effects). Tower size is approx 6 cm.
725 // // Rndm generates a number in ]0,1]
726 // if (fMulDigit==1) {
727 // clXYZ[0] += fGeomPtr->GetPhiTileSize()*(0.5 - gRandom->Rndm());
728 // clXYZ[2] += fGeomPtr->GetEtaTileSize()*(0.5 - gRandom->Rndm());
731 //Set position in local vector
732 fLocPos.SetX(clXYZ[0]);
733 fLocPos.SetY(clXYZ[1]);
734 fLocPos.SetZ(clXYZ[2]);
737 printf("EvalLocalPosition Cluster: Local (x,y,z) = (%f,%f,%f) \n", fLocPos.X(), fLocPos.Y(), fLocPos.Z()) ;
742 //____________________________________________________________________________
743 void AliEMCALRecPoint::EvalGlobalPosition(Float_t logWeight, TClonesArray * digits)
745 // Calculates the center of gravity in the global ALICE coordinates
746 // Info("Print", " logWeight %f : cluster energy %f ", logWeight, fAmp); // for testing
748 AliEMCALDigit * digit=0;
751 Double_t dist = TmaxInCm(Double_t(fAmp));
752 //Int_t idMax = GetAbsIdMaxDigit();// idMax is not used at all in RelPosCellInSModule, why use it?
754 Double_t clXYZ[3]={0.,0.,0.}, clRmsXYZ[3]={0.,0.,0.}, lxyzi[3], xyzi[3], wtot=0., w=0.;
756 //printf(" dist : %f e : %f \n", dist, fAmp);
757 for(Int_t iDigit=0; iDigit<fMulDigit; iDigit++) {
758 digit = dynamic_cast<AliEMCALDigit *>(digits->At(fDigitsList[iDigit])) ;
761 AliError("No Digit!!");
765 //Get the local coordinates of the cell
766 //fGeomPtr->RelPosCellInSModule(digit->GetId(), idMax, dist, lxyzi[0], lxyzi[1], lxyzi[2]);
767 fGeomPtr->RelPosCellInSModule(digit->GetId(), dist, lxyzi[0], lxyzi[1], lxyzi[2]);
769 //Now get the global coordinate
770 fGeomPtr->GetGlobal(lxyzi,xyzi, fGeomPtr->GetSuperModuleNumber(digit->GetId()));
771 //TVector3 pos(xyzi[0], xyzi[1], xyzi[2]);
772 //printf("EvalGlobalPosition Cell: Id %i, SM %i : dist %f Local (x,y,z) = (%f %f %f), eta %f, phi%f \n",
773 // digit->GetId(), fGeomPtr->GetSuperModuleNumber(digit->GetId()),dist, xyzi[0], xyzi[1], xyzi[2],pos.Eta(),pos.Phi()*TMath::RadToDeg());
775 if(logWeight > 0.0) w = TMath::Max( 0., logWeight + TMath::Log( fEnergyList[iDigit] / fAmp ));
776 else w = fEnergyList[iDigit]; // just energy
781 for(i=0; i<3; i++ ) {
782 clXYZ[i] += (w*xyzi[i]);
783 clRmsXYZ[i] += (w*xyzi[i]*xyzi[i]);
787 // cout << " wtot " << wtot << endl;
789 // xRMS = TMath::Sqrt(x2m - xMean*xMean);
790 for(i=0; i<3; i++ ) {
793 clRmsXYZ[i] /= (wtot*wtot);
794 clRmsXYZ[i] = clRmsXYZ[i] - clXYZ[i]*clXYZ[i];
795 if(clRmsXYZ[i] > 0.0) {
796 clRmsXYZ[i] = TMath::Sqrt(clRmsXYZ[i]);
797 } else clRmsXYZ[i] = 0;
798 } else clRmsXYZ[i] = 0;
801 for(i=0; i<3; i++ ) {
802 clXYZ[i] = clRmsXYZ[i] = -1.;
807 // // Cluster of one single digit, smear the position to avoid discrete position
808 // // smear x and z with +- 3 cm to uniform (avoid discrete effects). Tower size is approx 6 cm.
809 // // Rndm generates a number in ]0,1]
810 // if (fMulDigit==1) {
811 // clXYZ[0] += fGeomPtr->GetPhiTileSize()*(0.5 - gRandom->Rndm());
812 // clXYZ[2] += fGeomPtr->GetEtaTileSize()*(0.5 - gRandom->Rndm());
815 //Set position in global vector
816 fGlobPos.SetX(clXYZ[0]);
817 fGlobPos.SetY(clXYZ[1]);
818 fGlobPos.SetZ(clXYZ[2]);
821 printf("EvalGlobalPosition Cluster: (x ,y ,z) = (%f,%f,%f), eta %f,phi %f\n",
822 fGlobPos.X(), fGlobPos.Y(), fGlobPos.Z(),fGlobPos.Eta(),fGlobPos.Phi()*TMath::RadToDeg()) ;
825 //____________________________________________________________________________
826 void AliEMCALRecPoint::EvalLocalPositionFit(Double_t deff, Double_t logWeight,
827 Double_t phiSlope, TClonesArray * digits)
829 // Evaluates local position of clusters in SM
832 AliEMCALDigit *digit=0;
834 Double_t clXYZ[3]={0.,0.,0.}, clRmsXYZ[3]={0.,0.,0.}, xyzi[3], wtot=0., w=0.;
836 Double_t dist = TmaxInCm(Double_t(fAmp));
837 //Int_t idMax = GetAbsIdMaxDigit();// idMax is not used at all in RelPosCellInSModule, why use it?
839 for(Int_t iDigit=0; iDigit<digits->GetEntries(); iDigit++) {
840 digit = dynamic_cast<AliEMCALDigit *>(digits->At(fDigitsList[iDigit])) ;
843 //fGeomPtr->RelPosCellInSModule(digit->GetId(), idMax, dist, xyzi[0], xyzi[1], xyzi[2]);
844 fGeomPtr->RelPosCellInSModule(digit->GetId(), dist, xyzi[0], xyzi[1], xyzi[2]);
846 if(logWeight > 0.0) w = TMath::Max( 0., logWeight + TMath::Log( fEnergyList[iDigit] / fAmp ));
847 else w = fEnergyList[iDigit]; // just energy
852 for(i=0; i<3; i++ ) {
853 clXYZ[i] += (w*xyzi[i]);
854 clRmsXYZ[i] += (w*xyzi[i]*xyzi[i]);
857 }else AliError("Digit null");
859 // cout << " wtot " << wtot << endl;
861 // xRMS = TMath::Sqrt(x2m - xMean*xMean);
862 for(i=0; i<3; i++ ) {
865 clRmsXYZ[i] /= (wtot*wtot);
866 clRmsXYZ[i] = clRmsXYZ[i] - clXYZ[i]*clXYZ[i];
867 if(clRmsXYZ[i] > 0.0) {
868 clRmsXYZ[i] = TMath::Sqrt(clRmsXYZ[i]);
869 } else clRmsXYZ[i] = 0;
870 } else clRmsXYZ[i] = 0;
873 for(i=0; i<3; i++ ) {
874 clXYZ[i] = clRmsXYZ[i] = -1.;
878 if(phiSlope != 0.0 && logWeight > 0.0 && wtot) {
879 // Correction in phi direction (y - coords here); Aug 16;
880 // May be put to global level or seperate method
881 ycorr = clXYZ[1] * (1. + phiSlope);
882 //printf(" y %f : ycorr %f : slope %f \n", clXYZ[1], ycorr, phiSlope);
886 fLocPos.SetX(clXYZ[0]);
887 fLocPos.SetY(clXYZ[1]);
888 fLocPos.SetZ(clXYZ[2]);
891 // printf("EvalLocalPosition: eta,phi,r = %f,%f,%f", fLocPos.X(), fLocPos.Y(), fLocPos.Z()) ;
894 //_____________________________________________________________________________
895 Bool_t AliEMCALRecPoint::EvalLocalPosition2(TClonesArray * digits, TArrayD &ed)
897 // Evaluated local position of rec.point using digits
898 // and parametrisation of w0 and deff
899 //printf(" <I> AliEMCALRecPoint::EvalLocalPosition2() \n");
900 return AliEMCALRecPoint::EvalLocalPositionFromDigits(digits, ed, fLocPos);
903 //_____________________________________________________________________________
904 Bool_t AliEMCALRecPoint::EvalLocalPositionFromDigits(TClonesArray *digits, TArrayD &ed, TVector3 &locPos)
906 // Used when digits should be recalibrated
907 Double_t deff=0, w0=0, esum=0;
909 // AliEMCALDigit *digit;
911 if(ed.GetSize() && (digits->GetEntries()!=ed.GetSize())) return kFALSE;
913 // Calculate sum energy of digits
915 for(iDigit=0; iDigit<ed.GetSize(); iDigit++) esum += ed[iDigit];
917 GetDeffW0(esum, deff, w0);
919 return EvalLocalPositionFromDigits(esum, deff, w0, digits, ed, locPos);
922 //_____________________________________________________________________________
923 Bool_t AliEMCALRecPoint::EvalLocalPositionFromDigits(const Double_t esum, const Double_t deff, const Double_t w0, TClonesArray *digits, TArrayD &ed, TVector3 &locPos)
925 //Evaluate position of digits in supermodule.
926 AliEMCALDigit *digit=0;
929 Double_t clXYZ[3]={0.,0.,0.}, xyzi[3], wtot=0., w=0.;
930 //Int_t idMax = GetAbsIdMaxDigit();// idMax is not used at all in RelPosCellInSModule, why use it?
932 // Get pointer to EMCAL geometry
933 // (can't use fGeomPtr in static method)
934 AliEMCALGeometry* geo = AliEMCALGeometry::GetInstance();
936 for(Int_t iDigit=0; iDigit<digits->GetEntries(); iDigit++) {
937 digit = dynamic_cast<AliEMCALDigit *>(digits->At(iDigit));
939 //geo->RelPosCellInSModule(digit->GetId(), idMax, deff, xyzi[0], xyzi[1], xyzi[2]);
940 geo->RelPosCellInSModule(digit->GetId(), deff, xyzi[0], xyzi[1], xyzi[2]);
942 if(w0 > 0.0) w = TMath::Max( 0., w0 + TMath::Log(ed[iDigit] / esum));
943 else w = ed[iDigit]; // just energy
948 for(i=0; i<3; i++ ) {
949 clXYZ[i] += (w*xyzi[i]);
952 }else AliError("Digit null");
954 // cout << " wtot " << wtot << endl;
956 for(i=0; i<3; i++ ) {
959 locPos.SetX(clXYZ[0]);
960 locPos.SetY(clXYZ[1]);
961 locPos.SetZ(clXYZ[2]);
969 //_____________________________________________________________________________
970 void AliEMCALRecPoint::GetDeffW0(const Double_t esum , Double_t &deff, Double_t &w0)
974 // Applied for simulation data with threshold 3 adc
975 // Calculate efective distance (deff) and weigh parameter (w0)
976 // for coordinate calculation; 0.5 GeV < esum <100 GeV.
977 // Look to: http://rhic.physics.wayne.edu/~pavlinov/ALICE/SHISHKEBAB/RES/CALIB/GEOMCORR/deffandW0VaEgamma_2.gif
980 const Double_t kdp0=9.25147, kdp1=1.16700; // Hard coded now
981 const Double_t kwp0=4.83713, kwp1=-2.77970e-01, kwp2 = 4.41116;
983 // No extrapolation here
984 e = esum<0.5?0.5:esum;
987 deff = kdp0 + kdp1*TMath::Log(e);
988 w0 = kwp0 / (1. + TMath::Exp(kwp1*(e+kwp2)));
989 //printf("<I> AliEMCALRecPoint::GetDeffW0 esum %5.2f : deff %5.2f : w0 %5.2f \n", esum, deff, w0);
992 //______________________________________________________________________________
993 void AliEMCALRecPoint::EvalCoreEnergy(Float_t logWeight, TClonesArray * digits)
995 // This function calculates energy in the core,
996 // i.e. within a radius rad = fCoreEnergy around the center. Beyond this radius
997 // in accordance with shower profile the energy deposition
998 // should be less than 2%
999 // Unfinished - Nov 15,2006
1000 // Distance is calculate in (phi,eta) units
1002 AliEMCALDigit * digit = 0 ;
1006 if (!fLocPos.Mag()) {
1007 EvalLocalPosition(logWeight, digits);
1010 Double_t phiPoint = fLocPos.Phi(), etaPoint = fLocPos.Eta();
1011 Double_t eta, phi, distance;
1012 for(iDigit=0; iDigit < fMulDigit; iDigit++) {
1013 digit = (AliEMCALDigit *) ( digits->At(fDigitsList[iDigit]) ) ;
1016 fGeomPtr->EtaPhiFromIndex(digit->GetId(),eta, phi) ;
1017 phi = phi * TMath::DegToRad();
1019 distance = TMath::Sqrt((eta-etaPoint)*(eta-etaPoint)+(phi-phiPoint)*(phi-phiPoint));
1020 if(distance < fCoreRadius)
1021 fCoreEnergy += fEnergyList[iDigit] ;
1025 //____________________________________________________________________________
1026 void AliEMCALRecPoint::EvalElipsAxis(Float_t logWeight,TClonesArray * digits)
1028 // Calculates the axis of the shower ellipsoid in eta and phi
1031 TString gn(fGeomPtr->GetName());
1040 AliEMCALDigit * digit = 0;
1042 Double_t etai =0, phii=0, w=0;
1043 int nSupMod=0, nModule=0, nIphi=0, nIeta=0;
1045 for(Int_t iDigit=0; iDigit<fMulDigit; iDigit++) {
1046 digit = (AliEMCALDigit *) digits->At(fDigitsList[iDigit]) ;
1048 // Nov 15,2006 - use cell numbers as coordinates
1049 // Copied for shish-kebab geometry, ieta,iphi is cast as double as eta,phi
1050 // We can use the eta,phi(or coordinates) of cell
1051 nSupMod = nModule = nIphi = nIeta = iphi = ieta = 0;
1053 fGeomPtr->GetCellIndex(digit->GetId(), nSupMod,nModule,nIphi,nIeta);
1054 fGeomPtr->GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi,ieta);
1056 // In case of a shared cluster, index of SM in C side, columns start at 48 and ends at 48*2
1057 // C Side impair SM, nSupMod%2=1; A side pair SM, nSupMod%2=0
1058 if(fSharedCluster && nSupMod%2) ieta+=AliEMCALGeoParams::fgkEMCALCols;
1060 etai=(Double_t)ieta;
1061 phii=(Double_t)iphi;
1063 w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
1064 // fAmp summed amplitude of digits, i.e. energy of recpoint
1065 // Gives smaller value of lambda than log weight
1066 // w = fEnergyList[iDigit] / fAmp; // Nov 16, 2006 - try just energy
1068 dxx += w * etai * etai ;
1070 dzz += w * phii * phii ;
1073 dxz += w * etai * phii ;
1088 fLambda[0] = 0.5 * (dxx + dzz) + TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
1090 fLambda[0] = TMath::Sqrt(fLambda[0]) ;
1094 fLambda[1] = 0.5 * (dxx + dzz) - TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
1096 if(fLambda[1] > 0) //To avoid exception if numerical errors lead to negative lambda.
1097 fLambda[1] = TMath::Sqrt(fLambda[1]) ;
1105 //printf("AliEMCALRecPoint::EvalElipsAxis() lambdas = %f,%f \n", fLambda[0],fLambda[1]) ;
1109 //______________________________________________________________________________
1110 void AliEMCALRecPoint::EvalPrimaries(TClonesArray * digits)
1112 // Constructs the list of primary particles (tracks) which
1113 // have contributed to this RecPoint and calculate deposited energy
1116 AliEMCALDigit * digit =0;
1117 Int_t * primArray = new Int_t[fMaxTrack] ;
1118 memset(primArray,-1,sizeof(Int_t)*fMaxTrack);
1119 Float_t * dEPrimArray = new Float_t[fMaxTrack] ;
1120 memset(dEPrimArray,-1,sizeof(Int_t)*fMaxTrack);
1123 for ( index = 0 ; index < GetDigitsMultiplicity() ; index++ ) { // all digits
1124 digit = dynamic_cast<AliEMCALDigit *>(digits->At( fDigitsList[index] )) ;
1126 AliError("No Digit!!");
1130 Int_t nprimaries = digit->GetNprimary() ;
1131 if ( nprimaries == 0 ) continue ;
1133 for ( jndex = 0 ; jndex < nprimaries ; jndex++ ) { // all primaries in digit
1134 if ( fMulTrack > fMaxTrack ) {
1135 fMulTrack = fMaxTrack ;
1136 Error("EvalPrimaries", "increase fMaxTrack ") ;
1139 Int_t newPrimary = digit->GetPrimary(jndex+1);
1140 Float_t dEPrimary = digit->GetDEPrimary(jndex+1);
1142 Bool_t already = kFALSE ;
1143 for ( kndex = 0 ; kndex < fMulTrack ; kndex++ ) { //check if not already stored
1144 if ( newPrimary == primArray[kndex] ){
1146 dEPrimArray[kndex] += dEPrimary;
1150 if ( !already && (fMulTrack < fMaxTrack)) { // store it
1151 primArray[fMulTrack] = newPrimary ;
1152 dEPrimArray[fMulTrack] = dEPrimary ;
1155 } // all primaries in digit
1158 Int_t *sortIdx = new Int_t[fMulTrack];
1159 TMath::Sort(fMulTrack,dEPrimArray,sortIdx);
1160 for(index = 0; index < fMulTrack; index++) {
1161 fTracksList[index] = primArray[sortIdx[index]] ;
1162 fDETracksList[index] = dEPrimArray[sortIdx[index]] ;
1165 delete [] primArray ;
1166 delete [] dEPrimArray ;
1170 //______________________________________________________________________________
1171 void AliEMCALRecPoint::EvalParents(TClonesArray * digits)
1173 // Constructs the list of parent particles (tracks) which have contributed to this RecPoint
1175 AliEMCALDigit * digit=0 ;
1176 Int_t * parentArray = new Int_t[fMaxTrack] ;
1177 memset(parentArray,-1,sizeof(Int_t)*fMaxTrack);
1178 Float_t * dEParentArray = new Float_t[fMaxTrack] ;
1179 memset(dEParentArray,-1,sizeof(Int_t)*fMaxTrack);
1182 for ( index = 0 ; index < GetDigitsMultiplicity() ; index++ ) { // all digits
1183 if (fDigitsList[index] >= digits->GetEntries() || fDigitsList[index] < 0)
1184 AliError(Form("Trying to get invalid digit %d (idx in WriteRecPoint %d)",fDigitsList[index],index));
1185 digit = dynamic_cast<AliEMCALDigit *>(digits->At( fDigitsList[index] )) ;
1187 AliError("No Digit!!");
1191 Int_t nparents = digit->GetNiparent() ;
1192 if ( nparents == 0 ) continue ;
1195 for ( jndex = 0 ; jndex < nparents ; jndex++ ) { // all primaries in digit
1196 if ( fMulParent > fMaxParent ) {
1198 Error("EvalParents", "increase fMaxParent") ;
1201 Int_t newParent = digit->GetIparent(jndex+1) ;
1202 Float_t newdEParent = digit->GetDEParent(jndex+1) ;
1204 Bool_t already = kFALSE ;
1205 for ( kndex = 0 ; kndex < fMulParent ; kndex++ ) { //check if not already stored
1206 if ( newParent == parentArray[kndex] ){
1207 dEParentArray[kndex] += newdEParent;
1212 if ( !already && (fMulParent < fMaxParent)) { // store it
1213 parentArray[fMulParent] = newParent ;
1214 dEParentArray[fMulParent] = newdEParent ;
1217 } // all parents in digit
1221 Int_t *sortIdx = new Int_t[fMulParent];
1222 TMath::Sort(fMulParent,dEParentArray,sortIdx);
1223 for(index = 0; index < fMulParent; index++) {
1224 fParentsList[index] = parentArray[sortIdx[index]] ;
1225 fDEParentsList[index] = dEParentArray[sortIdx[index]] ;
1230 delete [] parentArray;
1231 delete [] dEParentArray;
1234 //____________________________________________________________________________
1235 void AliEMCALRecPoint::GetLocalPosition(TVector3 & lpos) const
1237 // returns the position of the cluster in the local reference system
1238 // of the sub-detector
1243 //____________________________________________________________________________
1244 void AliEMCALRecPoint::GetGlobalPosition(TVector3 & gpos) const
1246 // returns the position of the cluster in the global reference system of ALICE
1247 // These are now the Cartesian X, Y and Z
1248 // cout<<" geom "<<geom<<endl;
1249 // fGeomPtr->GetGlobal(fLocPos, gpos, fSuperModuleNumber);
1254 //____________________________________________________________________________
1255 //void AliEMCALRecPoint::GetGlobalPosition(TVector3 & gpos, TMatrixF & gmat) const
1257 // // returns the position of the cluster in the global reference system of ALICE
1258 // // These are now the Cartesian X, Y and Z
1259 // // cout<<" geom "<<geom<<endl;
1261 // //To be implemented
1262 // fGeomPtr->GetGlobalEMCAL(this, gpos, gmat);
1266 //_____________________________________________________________________________
1267 void AliEMCALRecPoint::EvalLocal2TrackingCSTransform()
1269 //Evaluates local to "tracking" c.s. transformation (B.P.).
1270 //All evaluations should be completed before calling for this
1272 //See ALICE PPR Chapter 5 p.18 for "tracking" c.s. definition,
1273 //or just ask Jouri Belikov. :)
1275 SetVolumeId(AliGeomManager::LayerToVolUID(AliGeomManager::kEMCAL,GetSuperModuleNumber()));
1277 const TGeoHMatrix* tr2loc = GetTracking2LocalMatrix();
1278 if(!tr2loc) AliFatal(Form("No Tracking2LocalMatrix found."));
1280 Double_t lxyz[3] = {fLocPos.X(),fLocPos.Y(),fLocPos.Z()};
1281 Double_t txyz[3] = {0,0,0};
1283 tr2loc->MasterToLocal(lxyz,txyz);
1284 SetX(txyz[0]); SetY(txyz[1]); SetZ(txyz[2]);
1286 if(AliLog::GetGlobalDebugLevel()>0) {
1287 TVector3 gpos; //TMatrixF gmat;
1288 //GetGlobalPosition(gpos,gmat); //Not doing anythin special, replace by next line.
1289 fGeomPtr->GetGlobal(fLocPos, gpos, GetSuperModuleNumber());
1293 AliInfo(Form("lCS-->(%.3f,%.3f,%.3f), tCS-->(%.3f,%.3f,%.3f), gCS-->(%.3f,%.3f,%.3f), gCScalc-\
1294 ->(%.3f,%.3f,%.3f), supermodule %d",
1295 fLocPos.X(),fLocPos.Y(),fLocPos.Z(),
1296 GetX(),GetY(),GetZ(),
1297 gpos.X(),gpos.Y(),gpos.Z(),
1298 gxyz[0],gxyz[1],gxyz[2],GetSuperModuleNumber()));
1303 //____________________________________________________________________________
1304 Float_t AliEMCALRecPoint::GetMaximalEnergy(void) const
1306 // Finds the maximum energy in the cluster
1308 Float_t menergy = 0. ;
1311 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
1313 if(fEnergyList[iDigit] > menergy)
1314 menergy = fEnergyList[iDigit] ;
1319 //____________________________________________________________________________
1320 Int_t AliEMCALRecPoint::GetMaximalEnergyIndex(void) const
1322 // Finds the maximum energy in the cluster
1324 Float_t menergy = 0. ;
1328 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
1330 if(fEnergyList[iDigit] > menergy){
1331 menergy = fEnergyList[iDigit] ;
1334 }//loop on cluster digits
1340 //____________________________________________________________________________
1341 Int_t AliEMCALRecPoint::GetMultiplicityAtLevel(Float_t H) const
1343 // Calculates the multiplicity of digits with energy larger than H*energy
1347 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
1349 if(fEnergyList[iDigit] > H * fAmp)
1355 //____________________________________________________________________________
1356 Int_t AliEMCALRecPoint::GetNumberOfLocalMax(AliEMCALDigit ** maxAt, Float_t * maxAtEnergy,
1357 Float_t locMaxCut,TClonesArray * digits) const
1359 // Calculates the number of local maxima in the cluster using fLocalMaxCut as the minimum
1360 // energy difference between two local maxima
1362 AliEMCALDigit * digit = 0;
1363 AliEMCALDigit * digitN = 0;
1368 for(iDigit = 0; iDigit < fMulDigit; iDigit++)
1369 maxAt[iDigit] = (AliEMCALDigit*) digits->At(fDigitsList[iDigit]) ;
1371 for(iDigit = 0 ; iDigit < fMulDigit; iDigit++) {
1373 digit = maxAt[iDigit] ;
1375 for(iDigitN = 0; iDigitN < fMulDigit; iDigitN++) {
1376 digitN = (AliEMCALDigit *) digits->At(fDigitsList[iDigitN]) ;
1378 if ( AreNeighbours(digit, digitN) ) {
1379 if (fEnergyList[iDigit] > fEnergyList[iDigitN] ) {
1380 maxAt[iDigitN] = 0 ;
1381 // but may be digit too is not local max ?
1382 if(fEnergyList[iDigit] < fEnergyList[iDigitN] + locMaxCut)
1387 // but may be digitN too is not local max ?
1388 if(fEnergyList[iDigit] > fEnergyList[iDigitN] - locMaxCut)
1389 maxAt[iDigitN] = 0 ;
1391 } // if Areneighbours
1397 for(iDigit = 0; iDigit < fMulDigit; iDigit++) {
1399 maxAt[iDigitN] = maxAt[iDigit] ;
1400 maxAtEnergy[iDigitN] = fEnergyList[iDigit] ;
1407 //____________________________________________________________________________
1408 Int_t AliEMCALRecPoint::GetPrimaryIndex() const
1410 // Get the primary track index in TreeK which deposits the most energy
1411 // in Digits which forms RecPoint.
1414 return fTracksList[0];
1418 //____________________________________________________________________________
1419 void AliEMCALRecPoint::EvalTime(TClonesArray * digits){
1420 // time is set to the time of the digit with the maximum energy
1424 for(Int_t idig=0; idig < fMulDigit; idig++){
1425 if(fEnergyList[idig] > maxE){
1426 maxE = fEnergyList[idig] ;
1430 fTime = ((AliEMCALDigit*) digits->At(fDigitsList[maxAt]))->GetTime() ;
1434 //______________________________________________________________________________
1435 void AliEMCALRecPoint::Paint(Option_t *)
1437 // Paint this ALiRecPoint as a TMarker with its current attributes
1439 TVector3 pos(0.,0.,0.) ;
1440 GetLocalPosition(pos) ;
1441 Coord_t x = pos.X() ;
1442 Coord_t y = pos.Z() ;
1443 Color_t markercolor = 1 ;
1444 Size_t markersize = 1.;
1445 Style_t markerstyle = 5 ;
1447 if (!gPad->IsBatch()) {
1448 gVirtualX->SetMarkerColor(markercolor) ;
1449 gVirtualX->SetMarkerSize (markersize) ;
1450 gVirtualX->SetMarkerStyle(markerstyle) ;
1452 gPad->SetAttMarkerPS(markercolor,markerstyle,markersize) ;
1453 gPad->PaintPolyMarker(1,&x,&y,"") ;
1456 //_____________________________________________________________________
1457 Double_t AliEMCALRecPoint::TmaxInCm(const Double_t e , const Int_t key)
1460 // key = 0(gamma, default)
1462 const Double_t ca = 4.82; // shower max parameter - first guess; ca=TMath::Log(1000./8.07)
1463 Double_t tmax = 0.; // position of electromagnetic shower max in cm
1465 Double_t x0 = 1.31; // radiation lenght (cm)
1466 //If old geometry in use
1467 if(!((fGeomPtr->GetEMCGeometry()->GetGeoName()).Contains("V1"))) x0 = 1.28;
1470 tmax = TMath::Log(e) + ca;
1471 if (key==0) tmax += 0.5;
1473 tmax *= x0; // convert to cm
1478 //______________________________________________________________________________
1479 Float_t AliEMCALRecPoint::EtaToTheta(Float_t arg) const
1481 //Converts Theta (Radians) to Eta(Radians)
1482 return (2.*TMath::ATan(TMath::Exp(-arg)));
1485 //______________________________________________________________________________
1486 Float_t AliEMCALRecPoint::ThetaToEta(Float_t arg) const
1488 //Converts Eta (Radians) to Theta(Radians)
1489 return (-1 * TMath::Log(TMath::Tan(0.5 * arg)));
1492 //____________________________________________________________________________
1493 void AliEMCALRecPoint::Print(Option_t *opt) const
1495 // Print the list of digits belonging to the cluster
1496 if(strlen(opt)==0) return;
1498 message = "AliEMCALRecPoint:\n" ;
1499 message += " digits # = " ;
1500 AliInfo(message.Data()) ;
1503 for(iDigit=0; iDigit<fMulDigit; iDigit++)
1504 printf(" %d ", fDigitsList[iDigit] ) ;
1507 AliInfo(" Energies = ") ;
1508 for(iDigit=0; iDigit<fMulDigit; iDigit++)
1509 printf(" %f ", fEnergyList[iDigit] ) ;
1512 AliInfo("\n Abs Ids = ") ;
1513 for(iDigit=0; iDigit<fMulDigit; iDigit++)
1514 printf(" %i ", fAbsIdList[iDigit] ) ;
1517 AliInfo(" Primaries ") ;
1518 for(iDigit = 0;iDigit < fMulTrack; iDigit++)
1519 printf(" %d ", fTracksList[iDigit]) ;
1521 printf("\n Local x %6.2f y %7.2f z %7.1f \n", fLocPos[0], fLocPos[1], fLocPos[2]);
1523 message = " ClusterType = %d" ;
1524 message += " Multiplicity = %d" ;
1525 message += " Cluster Energy = %f" ;
1526 message += " Core energy = %f" ;
1527 message += " Core radius = %f" ;
1528 message += " Number of primaries %d" ;
1529 message += " Stored at position %d" ;
1530 AliInfo(Form(message.Data(), fClusterType, fMulDigit, fAmp, fCoreEnergy, fCoreRadius, fMulTrack, GetIndexInList()) ) ;
1533 //___________________________________________________________
1534 Double_t AliEMCALRecPoint::GetPointEnergy() const
1536 //Returns energy ....
1538 for(int ic=0; ic<GetMultiplicity(); ic++) e += double(fEnergyList[ic]);