/* $Id$ */
+/* History of cvs commits:
+ *
+ * $Log$
+ * Revision 1.59 2007/10/18 15:12:22 kharlov
+ * Moved MakePrimary to EMCRecPoint to rpduce correct order of primaries
+ *
+ * Revision 1.58 2007/04/16 09:03:37 kharlov
+ * Incedent angle correction fixed
+ *
+ * Revision 1.57 2007/04/05 10:18:58 policheh
+ * Introduced distance to nearest bad crystal.
+ *
+ * Revision 1.56 2007/03/06 06:47:28 kharlov
+ * DP:Possibility to use actual vertex position added
+ *
+ * Revision 1.55 2007/01/19 20:31:19 kharlov
+ * Improved formatting for Print()
+ */
+
//_________________________________________________________________________
// RecPoint implementation for PHOS-EMC
// An EmcRecPoint is a cluster of digits
-//
-//*-- Author: Dmitri Peressounko (RRC KI & SUBATECH)
+//--
+//-- Author: Dmitri Peressounko (RRC KI & SUBATECH)
// --- ROOT system ---
-#include "TPad.h"
#include "TH2.h"
#include "TMath.h"
#include "TCanvas.h"
+#include "TGraph.h"
// --- Standard library ---
-#include <iostream.h>
-
// --- AliRoot header files ---
-
+#include "AliLog.h"
+#include "AliPHOSLoader.h"
+#include "AliGenerator.h"
#include "AliPHOSGeometry.h"
+#include "AliPHOSDigit.h"
#include "AliPHOSEmcRecPoint.h"
-#include "AliRun.h"
-#include "AliPHOSIndexToObject.h"
-
+#include "AliPHOSReconstructor.h"
+
ClassImp(AliPHOSEmcRecPoint)
//____________________________________________________________________________
-AliPHOSEmcRecPoint::AliPHOSEmcRecPoint(Float_t W0, Float_t LocMaxCut)
- : AliPHOSRecPoint()
+AliPHOSEmcRecPoint::AliPHOSEmcRecPoint() :
+ AliPHOSRecPoint(),
+ fCoreEnergy(0.), fDispersion(0.),
+ fEnergyList(0), fTime(-1.), fNExMax(0),
+ fM2x(0.), fM2z(0.), fM3x(0.), fM4z(0.),
+ fPhixe(0.), fDistToBadCrystal(-1),fDebug(0)
{
// ctor
+ fMulDigit = 0 ;
+ fAmp = 0. ;
+ fLocPos.SetX(1000000.) ; //Local position should be evaluated
+
+ fLambda[0] = 0.;
+ fLambda[1] = 0.;
+
+}
+//____________________________________________________________________________
+AliPHOSEmcRecPoint::AliPHOSEmcRecPoint(const char * opt) :
+ AliPHOSRecPoint(opt),
+ fCoreEnergy(0.), fDispersion(0.),
+ fEnergyList(0), fTime(-1.), fNExMax(0),
+ fM2x(0.), fM2z(0.), fM3x(0.), fM4z(0.),
+ fPhixe(0.), fDistToBadCrystal(-1), fDebug(0)
+{
+ // ctor
fMulDigit = 0 ;
fAmp = 0. ;
- fEnergyList = new Float_t[fMaxDigit];
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
- fDelta = phosgeom->GetCrystalSize(0) ;
- fW0 = W0 ;
- fLocMaxCut = LocMaxCut ;
fLocPos.SetX(1000000.) ; //Local position should be evaluated
+ fLambda[0] = 0.;
+ fLambda[1] = 0.;
+}
+
+//____________________________________________________________________________
+AliPHOSEmcRecPoint::AliPHOSEmcRecPoint(const AliPHOSEmcRecPoint & rp) :
+ AliPHOSRecPoint(rp),
+ fCoreEnergy(rp.fCoreEnergy), fDispersion(rp.fDispersion),
+ fEnergyList(0), fTime(rp.fTime), fNExMax(rp.fNExMax),
+ fM2x(rp.fM2x), fM2z(rp.fM2z), fM3x(rp.fM3x), fM4z(rp.fM4z),
+ fPhixe(rp.fPhixe), fDistToBadCrystal(rp.fDistToBadCrystal), fDebug(rp.fDebug)
+{
+ // cpy ctor
+ fMulDigit = rp.fMulDigit ;
+ fAmp = rp.fAmp ;
+ if (rp.fMulDigit>0) fEnergyList = new Float_t[rp.fMulDigit] ;
+ for(Int_t index = 0 ; index < fMulDigit ; index++)
+ fEnergyList[index] = rp.fEnergyList[index] ;
+
+ for(Int_t i=0; i<2; i++) {
+ fLambda[i] = rp.fLambda[i];
+ }
}
//____________________________________________________________________________
}
//____________________________________________________________________________
-void AliPHOSEmcRecPoint::AddDigit(AliPHOSDigit & digit, Float_t Energy)
+void AliPHOSEmcRecPoint::AddDigit(AliPHOSDigit & digit, Float_t Energy, Float_t time)
{
// Adds a digit to the RecPoint
- // and accumulates the total amplitude and the multiplicity
+ // and accumulates the total amplitude and the multiplicity
+ if(fEnergyList == 0)
+ fEnergyList = new Float_t[fMaxDigit];
+
if ( fMulDigit >= fMaxDigit ) { // increase the size of the lists
fMaxDigit*=2 ;
- Int_t * tempo = new ( Int_t[fMaxDigit] ) ;
- Float_t * tempoE = new ( Float_t[fMaxDigit] ) ;
+ Int_t * tempo = new Int_t[fMaxDigit];
+ Float_t * tempoE = new Float_t[fMaxDigit];
Int_t index ;
for ( index = 0 ; index < fMulDigit ; index++ ){
}
delete [] fDigitsList ;
- fDigitsList = new ( Int_t[fMaxDigit] ) ;
+ fDigitsList = new Int_t[fMaxDigit];
delete [] fEnergyList ;
- fEnergyList = new ( Float_t[fMaxDigit] ) ;
+ fEnergyList = new Float_t[fMaxDigit];
for ( index = 0 ; index < fMulDigit ; index++ ){
fDigitsList[index] = tempo[index] ;
delete [] tempoE ;
} // if
+ //time
+ Bool_t isMax=kTRUE ;
+ for(Int_t index = 0 ; index < fMulDigit ; index++ ){
+ if(fEnergyList[index]>Energy){
+ isMax=kFALSE ;
+ break ;
+ }
+ }
+ if(isMax){
+ fTime=time ;
+ }
+ //Alternative time calculation - still to be validated
+ // fTime = (fTime*fAmp + time*Energy)/(fAmp+Energy) ;
+
fDigitsList[fMulDigit] = digit.GetIndexInList() ;
fEnergyList[fMulDigit] = Energy ;
fMulDigit++ ;
fAmp += Energy ;
+ EvalPHOSMod(&digit) ;
}
//____________________________________________________________________________
-Bool_t AliPHOSEmcRecPoint::AreNeighbours(AliPHOSDigit * digit1, AliPHOSDigit * digit2 )
+Bool_t AliPHOSEmcRecPoint::AreNeighbours(AliPHOSDigit * digit1, AliPHOSDigit * digit2 ) const
{
- // Tells if (true) or not (false) two digits are neighbors)
+ // Tells if (true) or not (false) two digits are neighbors
Bool_t aren = kFALSE ;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance() ;
+
Int_t relid1[4] ;
phosgeom->AbsToRelNumbering(digit1->GetId(), relid1) ;
}
//____________________________________________________________________________
-Int_t AliPHOSEmcRecPoint::Compare(TObject * obj)
+Int_t AliPHOSEmcRecPoint::Compare(const TObject * obj) const
{
// Compares two RecPoints according to their position in the PHOS modules
-
+
+ const Float_t delta = 1 ; //Width of "Sorting row". If you changibg this
+ //value (what is senseless) change as vell delta in
+ //AliPHOSTrackSegmentMakerv* and other RecPoints...
Int_t rv ;
AliPHOSEmcRecPoint * clu = (AliPHOSEmcRecPoint *)obj ;
- Int_t phosmod1 = this->GetPHOSMod() ;
+ Int_t phosmod1 = GetPHOSMod() ;
Int_t phosmod2 = clu->GetPHOSMod() ;
TVector3 locpos1;
- this->GetLocalPosition(locpos1) ;
+ GetLocalPosition(locpos1) ;
TVector3 locpos2;
clu->GetLocalPosition(locpos2) ;
if(phosmod1 == phosmod2 ) {
- Int_t rowdif = (Int_t)TMath::Ceil(locpos1.X()/fDelta)-(Int_t)TMath::Ceil(locpos2.X()/fDelta) ;
+ Int_t rowdif = (Int_t)TMath::Ceil(locpos1.X()/delta)-(Int_t)TMath::Ceil(locpos2.X()/delta) ;
if (rowdif> 0)
- rv = -1 ;
+ rv = 1 ;
else if(rowdif < 0)
- rv = 1 ;
+ rv = -1 ;
else if(locpos1.Z()>locpos2.Z())
rv = -1 ;
else
return rv ;
}
-
//______________________________________________________________________________
-void AliPHOSEmcRecPoint::ExecuteEvent(Int_t event, Int_t px, Int_t py)
+void AliPHOSEmcRecPoint::ExecuteEvent(Int_t event, Int_t, Int_t) /*const*/
{
+
// Execute action corresponding to one event
// This member function is called when a AliPHOSRecPoint is clicked with the locator
//
// If Left button is clicked on AliPHOSRecPoint, the digits are switched on
// and switched off when the mouse button is released.
- //
-
- // static Int_t pxold, pyold;
-
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
+
+
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance();
static TGraph * digitgraph = 0 ;
TH2F * histo = 0 ;
TCanvas * histocanvas ;
+
+
+ //try to get run loader from default event folder
+ AliRunLoader* rn = AliRunLoader::GetRunLoader(AliConfig::GetDefaultEventFolderName());
+ if (rn == 0x0)
+ {
+ AliError(Form("Cannot find Run Loader in Default Event Folder"));
+ return;
+ }
+ AliPHOSLoader* phosLoader = dynamic_cast<AliPHOSLoader*>(rn->GetLoader("PHOSLoader"));
+ if (phosLoader == 0x0)
+ {
+ AliError(Form("Cannot find PHOS Loader from Run Loader"));
+ return;
+ }
+
+
+ const TClonesArray * digits = phosLoader->Digits() ;
switch (event) {
case kButton1Down: {
AliPHOSDigit * digit ;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
Int_t iDigit;
Int_t relid[4] ;
Float_t zimin = 999. ;
for(iDigit=0; iDigit<kMulDigit; iDigit++) {
- digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
phosgeom->RelPosInModule(relid, xi[iDigit], zi[iDigit]);
if ( xi[iDigit] > ximax )
// 2. gets the histogram title
Text_t title[100] ;
- sprintf(title,"Energy=%1.2f GeV ; Digits ; %d ", GetEnergy(), GetDigitsMultiplicity()) ;
+ snprintf(title,100,"Energy=%1.2f GeV ; Digits ; %d ", GetEnergy(), GetDigitsMultiplicity()) ;
if (!histo) {
delete histo ;
Float_t x, z ;
for(iDigit=0; iDigit<kMulDigit; iDigit++) {
- digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
phosgeom->RelPosInModule(relid, x, z);
histo->Fill(x, z, fEnergyList[iDigit] ) ;
digitgraph-> Paint("P") ;
}
- Print() ;
- histocanvas = new TCanvas("cluser", "a single cluster", 600, 500) ;
+ // Print() ;
+ histocanvas = new TCanvas("cluster", "a single cluster", 600, 500) ;
histocanvas->Draw() ;
histo->Draw("lego1") ;
}
//____________________________________________________________________________
-Float_t AliPHOSEmcRecPoint::GetDispersion()
+void AliPHOSEmcRecPoint::EvalDispersion(Float_t logWeight,TClonesArray * digits, TVector3 & /* vInc */)
{
// Calculates the dispersion of the shower at the origine of the RecPoint
+ //DP: should we correct dispersion for non-perpendicular hit????????
+
+ Float_t d = 0. ;
+ Float_t wtot = 0. ;
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
-
- Float_t d = 0 ;
- Float_t wtot = 0 ;
-
- TVector3 locpos;
- GetLocalPosition(locpos);
- Float_t x = locpos.X() ;
- Float_t z = locpos.Z() ;
+ Float_t x = 0.;
+ Float_t z = 0.;
AliPHOSDigit * digit ;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
+
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance();
+
+ // Calculates the center of gravity in the local PHOS-module coordinates
Int_t iDigit;
+
+ for(iDigit=0; iDigit<fMulDigit; iDigit++) {
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
+ Int_t relid[4] ;
+ Float_t xi ;
+ Float_t zi ;
+ phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
+ phosgeom->RelPosInModule(relid, xi, zi);
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ Float_t w = TMath::Max( 0., logWeight + TMath::Log( fEnergyList[iDigit] / fAmp ) ) ;
+ x += xi * w ;
+ z += zi * w ;
+ wtot += w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+ }
+ if (wtot>0) {
+ x /= wtot ;
+ z /= wtot ;
+ }
+ else
+ AliError(Form("Wrong weight %f\n", wtot));
+
+
+// Calculates the dispersion in coordinates
+ wtot = 0.;
for(iDigit=0; iDigit < fMulDigit; iDigit++) {
- digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
Int_t relid[4] ;
Float_t xi ;
Float_t zi ;
phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
phosgeom->RelPosInModule(relid, xi, zi);
- Float_t w = TMath::Max(0.,fW0+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
- d += w*((xi-x)*(xi-x) + (zi-z)*(zi-z) ) ;
- wtot+=w ;
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ Float_t w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
+ d += w*((xi-x)*(xi-x) + (zi-z)*(zi-z) ) ;
+ wtot+=w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+ }
+
+
+ if (wtot>0) {
+ d /= wtot ;
}
+ else
+ AliError(Form("Wrong weight %f\n", wtot));
- d /= wtot ;
+ fDispersion = 0;
+ if (d>=0)
+ fDispersion = TMath::Sqrt(d) ;
- return TMath::Sqrt(d) ;
+
}
//______________________________________________________________________________
-Float_t AliPHOSEmcRecPoint::CoreEnergy()
+void AliPHOSEmcRecPoint::EvalCoreEnergy(Float_t logWeight, Float_t coreRadius, TClonesArray * digits)
{
- //This function calculates energy in the core,
- //i.e. within radius rad = 3cm. Beyond this radius
- //in accoradnce with shower profile energy deposition
+ // This function calculates energy in the core,
+ // i.e. within a radius rad = 3cm around the center. Beyond this radius
+ // in accordance with shower profile the energy deposition
// should be less than 2%
+//DP: non-perpendicular incidence??????????????
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
+ Float_t x = 0 ;
+ Float_t z = 0 ;
- Float_t eCore = 0 ;
- Float_t coreRadius = 3 ;
+ AliPHOSDigit * digit ;
- TVector3 locpos;
- GetLocalPosition(locpos);
- Float_t x = locpos.X() ;
- Float_t z = locpos.Z() ;
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance();
- AliPHOSDigit * digit ;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
-
Int_t iDigit;
+
+// Calculates the center of gravity in the local PHOS-module coordinates
+ Float_t wtot = 0;
+ for(iDigit=0; iDigit<fMulDigit; iDigit++) {
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
+ Int_t relid[4] ;
+ Float_t xi ;
+ Float_t zi ;
+ phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
+ phosgeom->RelPosInModule(relid, xi, zi);
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ Float_t w = TMath::Max( 0., logWeight + TMath::Log( fEnergyList[iDigit] / fAmp ) ) ;
+ x += xi * w ;
+ z += zi * w ;
+ wtot += w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+ }
+ if (wtot>0) {
+ x /= wtot ;
+ z /= wtot ;
+ }
+ else
+ AliError(Form("Wrong weight %f\n", wtot));
+
+
for(iDigit=0; iDigit < fMulDigit; iDigit++) {
- digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
+ digit = (AliPHOSDigit *) ( digits->At(fDigitsList[iDigit]) ) ;
Int_t relid[4] ;
Float_t xi ;
Float_t zi ;
phosgeom->RelPosInModule(relid, xi, zi);
Float_t distance = TMath::Sqrt((xi-x)*(xi-x)+(zi-z)*(zi-z)) ;
if(distance < coreRadius)
- eCore += fEnergyList[iDigit] ;
+ fCoreEnergy += fEnergyList[iDigit] ;
}
-return eCore ;
+
}
//____________________________________________________________________________
-void AliPHOSEmcRecPoint::GetElipsAxis(Float_t * lambda)
+void AliPHOSEmcRecPoint::EvalElipsAxis(Float_t logWeight,TClonesArray * digits, TVector3 & /* vInc */)
{
// Calculates the axis of the shower ellipsoid
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
-
Double_t wtot = 0. ;
Double_t x = 0.;
Double_t z = 0.;
Double_t dxz = 0.;
AliPHOSDigit * digit ;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
+
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance();
+
Int_t iDigit;
+
for(iDigit=0; iDigit<fMulDigit; iDigit++) {
- digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
Int_t relid[4] ;
Float_t xi ;
Float_t zi ;
phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
phosgeom->RelPosInModule(relid, xi, zi);
- Double_t w = TMath::Max(0.,fW0+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
- dxx += w * xi * xi ;
- x += w * xi ;
- dzz += w * zi * zi ;
- z += w * zi ;
- dxz += w * xi * zi ;
- wtot += w ;
- }
- dxx /= wtot ;
- x /= wtot ;
- dxx -= x * x ;
- dzz /= wtot ;
- z /= wtot ;
- dzz -= z * z ;
- dxz /= wtot ;
- dxz -= x * z ;
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ Double_t w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
+ dxx += w * xi * xi ;
+ x += w * xi ;
+ dzz += w * zi * zi ;
+ z += w * zi ;
+ dxz += w * xi * zi ;
+ wtot += w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+ }
+ if (wtot>0) {
+ dxx /= wtot ;
+ x /= wtot ;
+ dxx -= x * x ;
+ dzz /= wtot ;
+ z /= wtot ;
+ dzz -= z * z ;
+ dxz /= wtot ;
+ dxz -= x * z ;
// //Apply correction due to non-perpendicular incidence
// Double_t CosX ;
// Double_t CosZ ;
-// Double_t DistanceToIP= (Double_t ) ((AliPHOSGeometry *) fGeom)->GetIPtoCrystalSurface() ;
+// AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance() ;
+// Double_t DistanceToIP= (Double_t ) phosgeom->GetIPtoCrystalSurface() ;
// CosX = DistanceToIP/TMath::Sqrt(DistanceToIP*DistanceToIP+x*x) ;
// CosZ = DistanceToIP/TMath::Sqrt(DistanceToIP*DistanceToIP+z*z) ;
// dxz = dxz/(CosX*CosZ) ;
- lambda[0] = 0.5 * (dxx + dzz) + TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
- if(lambda[0] > 0)
- lambda[0] = TMath::Sqrt(lambda[0]) ;
+ fLambda[0] = 0.5 * (dxx + dzz) + TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
+ if(fLambda[0] > 0)
+ fLambda[0] = TMath::Sqrt(fLambda[0]) ;
- lambda[1] = 0.5 * (dxx + dzz) - TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
- if(lambda[1] > 0) //To avoid exception if numerical errors lead to negative lambda.
- lambda[1] = TMath::Sqrt(lambda[1]) ;
- else
- lambda[1]= 0. ;
+ fLambda[1] = 0.5 * (dxx + dzz) - TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
+ if(fLambda[1] > 0) //To avoid exception if numerical errors lead to negative lambda.
+ fLambda[1] = TMath::Sqrt(fLambda[1]) ;
+ else
+ fLambda[1]= 0. ;
+ }
+ else {
+ AliError(Form("Wrong weight %f\n", wtot));
+ fLambda[0]=fLambda[1]=0.;
+ }
}
//____________________________________________________________________________
-void AliPHOSEmcRecPoint::GetLocalPosition(TVector3 &LPos)
+void AliPHOSEmcRecPoint::EvalMoments(Float_t logWeight,TClonesArray * digits, TVector3 & /* vInc */)
{
- // Calculates the center of gravity in the local PHOS-module coordinates
+ // Calculate the shower moments in the eigen reference system
+ // M2x, M2z, M3x, M4z
+ // Calculate the angle between the shower position vector and the eigen vector
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
+ Double_t wtot = 0. ;
+ Double_t x = 0.;
+ Double_t z = 0.;
+ Double_t dxx = 0.;
+ Double_t dzz = 0.;
+ Double_t dxz = 0.;
+ Double_t lambda0=0, lambda1=0;
+
+ AliPHOSDigit * digit ;
+
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance() ;
+
+ Int_t iDigit;
+
+ // 1) Find covariance matrix elements:
+ // || dxx dxz ||
+ // || dxz dzz ||
+
+ Float_t xi ;
+ Float_t zi ;
+ Int_t relid[4] ;
+ Double_t w;
+ for(iDigit=0; iDigit<fMulDigit; iDigit++) {
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
+ phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
+ phosgeom->RelPosInModule(relid, xi, zi);
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
+ x += w * xi ;
+ z += w * zi ;
+ dxx += w * xi * xi ;
+ dzz += w * zi * zi ;
+ dxz += w * xi * zi ;
+ wtot += w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+
+ }
+ if (wtot>0) {
+ x /= wtot ;
+ z /= wtot ;
+ dxx /= wtot ;
+ dzz /= wtot ;
+ dxz /= wtot ;
+ dxx -= x * x ;
+ dzz -= z * z ;
+ dxz -= x * z ;
+
+ // 2) Find covariance matrix eigen values lambda0 and lambda1
+
+ lambda0 = 0.5 * (dxx + dzz) + TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
+ lambda1 = 0.5 * (dxx + dzz) - TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
+ }
+ else {
+ AliError(Form("Wrong weight %f\n", wtot));
+ lambda0=lambda1=0.;
+ }
+
+ // 3) Find covariance matrix eigen vectors e0 and e1
- if( fLocPos.X() < 1000000.) { // already evaluated
- LPos = fLocPos ;
- return ;
+ TVector2 e0,e1;
+ if (dxz != 0)
+ e0.Set(1.,(lambda0-dxx)/dxz);
+ else
+ e0.Set(0.,1.);
+
+ e0 = e0.Unit();
+ e1.Set(-e0.Y(),e0.X());
+
+ // 4) Rotate cluster tensor from (x,z) to (e0,e1) system
+ // and calculate moments M3x and M4z
+
+ Float_t cosPhi = e0.X();
+ Float_t sinPhi = e0.Y();
+
+ Float_t xiPHOS ;
+ Float_t ziPHOS ;
+ Double_t dx3, dz3, dz4;
+ wtot = 0.;
+ x = 0.;
+ z = 0.;
+ dxx = 0.;
+ dzz = 0.;
+ dxz = 0.;
+ dx3 = 0.;
+ dz3 = 0.;
+ dz4 = 0.;
+ for(iDigit=0; iDigit<fMulDigit; iDigit++) {
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
+ phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
+ phosgeom->RelPosInModule(relid, xiPHOS, ziPHOS);
+ xi = xiPHOS*cosPhi + ziPHOS*sinPhi;
+ zi = ziPHOS*cosPhi - xiPHOS*sinPhi;
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ w = TMath::Max(0.,logWeight+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
+ x += w * xi ;
+ z += w * zi ;
+ dxx += w * xi * xi ;
+ dzz += w * zi * zi ;
+ dxz += w * xi * zi ;
+ dx3 += w * xi * xi * xi;
+ dz3 += w * zi * zi * zi ;
+ dz4 += w * zi * zi * zi * zi ;
+ wtot += w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+ }
+ if (wtot>0) {
+ x /= wtot ;
+ z /= wtot ;
+ dxx /= wtot ;
+ dzz /= wtot ;
+ dxz /= wtot ;
+ dx3 /= wtot ;
+ dz3 /= wtot ;
+ dz4 /= wtot ;
+ dx3 += -3*dxx*x + 2*x*x*x;
+ dz4 += -4*dz3*z + 6*dzz*z*z -3*z*z*z*z;
+ dxx -= x * x ;
+ dzz -= z * z ;
+ dxz -= x * z ;
+ }
+ else
+ AliError(Form("Wrong weight %f\n", wtot));
+
+ // 5) Find an angle between cluster center vector and eigen vector e0
+
+ Float_t phi = 0;
+ if ( (x*x+z*z) > 0 )
+ phi = TMath::ACos ((x*e0.X() + z*e0.Y()) / sqrt(x*x + z*z));
+
+ fM2x = lambda0;
+ fM2z = lambda1;
+ fM3x = dx3;
+ fM4z = dz4;
+ fPhixe = phi;
+
+}
+//______________________________________________________________________________
+void AliPHOSEmcRecPoint::EvalPrimaries(TClonesArray * digits)
+{
+ // Constructs the list of primary particles (tracks) which have contributed to this RecPoint
+
+ AliPHOSDigit * digit ;
+ Int_t * tempo = new Int_t[fMaxTrack] ;
+
+ //First find digit with maximal energy deposition and copy its primaries
+ Float_t emax=0.;
+ Int_t imaxDigit=0;
+ for(Int_t id=0; id<GetDigitsMultiplicity(); id++){
+ if(emax<fEnergyList[id])
+ imaxDigit=id ;
+ }
+ digit = static_cast<AliPHOSDigit *>(digits->At( fDigitsList[imaxDigit] )) ;
+ Int_t nprimaries = digit->GetNprimary() ;
+ if ( nprimaries > fMaxTrack ) {
+ fMulTrack = - 1 ;
+ Error("EvalPrimaries", "GetNprimaries ERROR > increase fMaxTrack" ) ;
+ nprimaries = fMaxTrack; //skip the rest
}
+ for(fMulTrack=0; fMulTrack<nprimaries ; fMulTrack++){
+ tempo[fMulTrack] = digit->GetPrimary(fMulTrack+1) ;
+ }
+
+ //Now add other digits contributions
+ for (Int_t index = 0 ; index < GetDigitsMultiplicity() ; index++ ) { // all digits
+ if(index==imaxDigit) //already in
+ continue ;
+ digit = static_cast<AliPHOSDigit *>(digits->At( fDigitsList[index] )) ;
+ nprimaries = digit->GetNprimary() ;
+ for(Int_t ipr=0; ipr<nprimaries; ipr++){
+ Int_t iprimary = digit->GetPrimary(ipr+1) ;
+ Bool_t notIn=1 ;
+ for(Int_t kndex = 0 ; (kndex < fMulTrack)&& notIn ; kndex++ ) { //check if not already stored
+ if(iprimary == tempo[kndex]){
+ notIn = kFALSE ;
+ }
+ }
+ if(notIn){
+ if(fMulTrack<fMaxTrack){
+ tempo[fMulTrack]=iprimary ;
+ fMulTrack++ ;
+ }
+ else{
+ Error("EvalPrimaries", "GetNprimaries ERROR > increase fMaxTrack!!!" ) ;
+ break ;
+ }
+ }
+ }
+ } // all digits
+ if(fMulTrack > 0){
+ if(fTracksList)delete [] fTracksList;
+ fTracksList = new Int_t[fMulTrack] ;
+ }
+ for(Int_t index = 0; index < fMulTrack; index++)
+ fTracksList[index] = tempo[index] ;
+
+ delete [] tempo ;
+
+}
+//____________________________________________________________________________
+void AliPHOSEmcRecPoint::EvalAll(TClonesArray * digits )
+{
+// EvalCoreEnergy(logWeight, digits);
+ EvalTime(digits) ;
+ EvalPrimaries(digits) ;
+ AliPHOSRecPoint::EvalAll(digits) ;
+}
+//____________________________________________________________________________
+void AliPHOSEmcRecPoint::EvalAll(Float_t logWeight, TVector3 &vtx, TClonesArray * digits )
+{
+ // Evaluates all shower parameters
+ TVector3 vInc ;
+ EvalLocalPosition(logWeight, vtx, digits,vInc) ;
+ EvalElipsAxis(logWeight, digits, vInc) ; //they are evaluated with momenta
+ EvalMoments(logWeight, digits, vInc) ;
+ EvalDispersion(logWeight, digits, vInc) ;
+}
+//____________________________________________________________________________
+void AliPHOSEmcRecPoint::EvalLocalPosition(Float_t logWeight, TVector3 &vtx, TClonesArray * digits, TVector3 &vInc)
+{
+ // Calculates the center of gravity in the local PHOS-module coordinates
Float_t wtot = 0. ;
Int_t relid[4] ;
AliPHOSDigit * digit ;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
+ AliPHOSGeometry * phosgeom = AliPHOSGeometry::GetInstance() ;
Int_t iDigit;
-
for(iDigit=0; iDigit<fMulDigit; iDigit++) {
- digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) );
+ digit = (AliPHOSDigit *) digits->At(fDigitsList[iDigit]) ;
Float_t xi ;
Float_t zi ;
phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
phosgeom->RelPosInModule(relid, xi, zi);
- Float_t w = TMath::Max( 0., fW0 + TMath::Log( fEnergyList[iDigit] / fAmp ) ) ;
- x += xi * w ;
- z += zi * w ;
- wtot += w ;
+ if (fAmp>0 && fEnergyList[iDigit]>0) {
+ Float_t w = TMath::Max( 0., logWeight + TMath::Log( fEnergyList[iDigit] / fAmp ) ) ;
+ x += xi * w ;
+ z += zi * w ;
+ wtot += w ;
+ }
+ else
+ AliError(Form("Wrong energy %f and/or amplitude %f\n", fEnergyList[iDigit], fAmp));
+ }
+ if (wtot>0) {
+ x /= wtot ;
+ z /= wtot ;
+ }
+ else
+ AliError(Form("Wrong weight %f\n", wtot));
+ // Correction for the depth of the shower starting point (TDR p 127)
+ Float_t para = 0.925 ;
+ Float_t parb = 6.52 ;
+
+ phosgeom->GetIncidentVector(vtx,GetPHOSMod(),x,z,vInc) ;
+
+ Float_t depthx = 0.;
+ Float_t depthz = 0.;
+ if (fAmp>0&&vInc.Y()!=0.) {
+ depthx = ( para * TMath::Log(fAmp) + parb ) * vInc.X()/TMath::Abs(vInc.Y()) ;
+ depthz = ( para * TMath::Log(fAmp) + parb ) * vInc.Z()/TMath::Abs(vInc.Y()) ;
}
+ else
+ AliError(Form("Wrong amplitude %f\n", fAmp));
- x /= wtot ;
- z /= wtot ;
- fLocPos.SetX(x) ;
+ fLocPos.SetX(x - depthx) ;
fLocPos.SetY(0.) ;
- fLocPos.SetZ(z) ;
+ fLocPos.SetZ(z - depthz) ;
- LPos = fLocPos ;
}
//____________________________________________________________________________
-Float_t AliPHOSEmcRecPoint::GetMaximalEnergy(void)
+Float_t AliPHOSEmcRecPoint::GetMaximalEnergy(void) const
{
// Finds the maximum energy in the cluster
}
//____________________________________________________________________________
-Int_t AliPHOSEmcRecPoint::GetMultiplicityAtLevel(const Float_t H)
+Int_t AliPHOSEmcRecPoint::GetMultiplicityAtLevel(Float_t H) const
{
// Calculates the multiplicity of digits with energy larger than H*energy
}
//____________________________________________________________________________
-Int_t AliPHOSEmcRecPoint::GetNumberOfLocalMax(Int_t * maxAt, Float_t * maxAtEnergy)
+Int_t AliPHOSEmcRecPoint::GetNumberOfLocalMax( AliPHOSDigit ** maxAt, Float_t * maxAtEnergy,
+ Float_t locMaxCut,TClonesArray * digits) const
{
// Calculates the number of local maxima in the cluster using fLocalMaxCut as the minimum
- // energy difference between two local maxima
-
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
+ // energy difference between two local maxima
AliPHOSDigit * digit ;
AliPHOSDigit * digitN ;
Int_t iDigitN ;
Int_t iDigit ;
- for(iDigit = 0; iDigit < fMulDigit; iDigit++){
- maxAt[iDigit] = (Int_t) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
- }
+ for(iDigit = 0; iDigit < fMulDigit; iDigit++)
+ maxAt[iDigit] = (AliPHOSDigit*) digits->At(fDigitsList[iDigit]) ;
+
for(iDigit = 0 ; iDigit < fMulDigit; iDigit++) {
- if(maxAt[iDigit] != -1) {
- digit = (AliPHOSDigit *) maxAt[iDigit] ;
+ if(maxAt[iDigit]) {
+ digit = maxAt[iDigit] ;
for(iDigitN = 0; iDigitN < fMulDigit; iDigitN++) {
- digitN = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigitN]) ) ;
+ if(iDigit == iDigitN)
+ continue ;
+
+ digitN = (AliPHOSDigit *) digits->At(fDigitsList[iDigitN]) ;
if ( AreNeighbours(digit, digitN) ) {
if (fEnergyList[iDigit] > fEnergyList[iDigitN] ) {
- maxAt[iDigitN] = -1 ;
+ maxAt[iDigitN] = 0 ;
// but may be digit too is not local max ?
- if(fEnergyList[iDigit] < fEnergyList[iDigitN] + fLocMaxCut)
- maxAt[iDigit] = -1 ;
+ if(fEnergyList[iDigit] < fEnergyList[iDigitN] + locMaxCut)
+ maxAt[iDigit] = 0 ;
}
else {
- maxAt[iDigit] = -1 ;
+ maxAt[iDigit] = 0 ;
// but may be digitN too is not local max ?
- if(fEnergyList[iDigit] > fEnergyList[iDigitN] - fLocMaxCut)
- maxAt[iDigitN] = -1 ;
+ if(fEnergyList[iDigit] > fEnergyList[iDigitN] - locMaxCut)
+ maxAt[iDigitN] = 0 ;
}
} // if Areneighbours
} // while digitN
iDigitN = 0 ;
for(iDigit = 0; iDigit < fMulDigit; iDigit++) {
- if(maxAt[iDigit] != -1){
+ if(maxAt[iDigit]){
maxAt[iDigitN] = maxAt[iDigit] ;
maxAtEnergy[iDigitN] = fEnergyList[iDigit] ;
iDigitN++ ;
}
return iDigitN ;
}
+//____________________________________________________________________________
+void AliPHOSEmcRecPoint::EvalTime(TClonesArray * /*digits*/)
+{
+ // Define a rec.point time as a time in the cell with the maximum energy
+ //Time already evaluated during AddDigit()
+
+/*
+ Float_t maxE = 0;
+ Int_t maxAt = 0;
+ for(Int_t idig=0; idig < fMulDigit; idig++){
+ if(fEnergyList[idig] > maxE){
+ maxE = fEnergyList[idig] ;
+ maxAt = idig;
+ }
+ }
+ fTime = ((AliPHOSDigit*) digits->At(fDigitsList[maxAt]))->GetTime() ;
+*/
+}
+//____________________________________________________________________________
+void AliPHOSEmcRecPoint::Purify(Float_t threshold){
+ //Removes digits below threshold
+
+ Int_t * tempo = new Int_t[fMaxDigit];
+ Float_t * tempoE = new Float_t[fMaxDigit];
+
+ Int_t mult = 0 ;
+ for(Int_t iDigit=0;iDigit< fMulDigit ;iDigit++){
+ if(fEnergyList[iDigit] > threshold){
+ tempo[mult] = fDigitsList[iDigit] ;
+ tempoE[mult] = fEnergyList[iDigit] ;
+ mult++ ;
+ }
+ }
+
+ fMulDigit = mult ;
+ delete [] fDigitsList ;
+ delete [] fEnergyList ;
+ fDigitsList = new Int_t[fMulDigit];
+ fEnergyList = new Float_t[fMulDigit];
+
+ fAmp = 0.; //Recalculate total energy
+ for(Int_t iDigit=0;iDigit< fMulDigit ;iDigit++){
+ fDigitsList[iDigit] = tempo[iDigit];
+ fEnergyList[iDigit] = tempoE[iDigit] ;
+ fAmp+=tempoE[iDigit];
+ }
+
+ delete [] tempo ;
+ delete [] tempoE ;
-
-// //____________________________________________________________________________
-// AliPHOSEmcRecPoint& AliPHOSEmcRecPoint::operator = (AliPHOSEmcRecPoint Clu)
-// {
-// int * dl = Clu.GetDigitsList() ;
-
-// if(fDigitsList)
-// delete fDigitsList ;
-
-// AliPHOSDigit * digit ;
-
-// Int_t iDigit;
-
-// for(iDigit=0; iDigit<fMulDigit; iDigit++) {
-// digit = (AliPHOSDigit *) dl[iDigit];
-// AddDigit(*digit) ;
-// }
-
-// fAmp = Clu.GetTotalEnergy() ;
-// fGeom = Clu.GetGeom() ;
-// TVector3 locpos;
-// Clu.GetLocalPosition(locpos) ;
-// fLocPos = locpos;
-// fMulDigit = Clu.GetMultiplicity() ;
-// fMaxDigit = Clu.GetMaximumMultiplicity() ;
-// fPHOSMod = Clu.GetPHOSMod() ;
-// fW0 = Clu.GetLogWeightCut() ;
-// fDelta = Clu.GetDelta() ;
-// fLocMaxCut = Clu.GetLocMaxCut() ;
-
-// delete dl ;
-
-// return *this ;
-// }
-
+}
//____________________________________________________________________________
-void AliPHOSEmcRecPoint::Print(Option_t * option)
+void AliPHOSEmcRecPoint::Print(Option_t *) const
{
// Print the list of digits belonging to the cluster
- cout << "AliPHOSEmcRecPoint: " << endl ;
+ TString message ;
+ message = "AliPHOSEmcRecPoint:\n" ;
+ message += "Digit multiplicity = %d" ;
+ message += ", cluster Energy = %f" ;
+ message += ", number of primaries = %d" ;
+ message += ", rec.point index = %d \n" ;
+ printf(message.Data(), fMulDigit, fAmp, fMulTrack,GetIndexInList() ) ;
- AliPHOSDigit * digit ;
Int_t iDigit;
- AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
-
- Float_t xi ;
- Float_t zi ;
- Int_t relid[4] ;
+ printf(" digits ids = ") ;
+ for(iDigit=0; iDigit<fMulDigit; iDigit++)
+ printf(" %d ", fDigitsList[iDigit] ) ;
- AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
+ printf("\n digit energies = ") ;
+ for(iDigit=0; iDigit<fMulDigit; iDigit++)
+ printf(" %f ", fEnergyList[iDigit] ) ;
+
+ printf("\n digit primaries ") ;
+ if (fMulTrack<1) printf("... no primaries");
+ for(iDigit = 0;iDigit < fMulTrack; iDigit++)
+ printf(" %d ", fTracksList[iDigit]) ;
+ printf("\n") ;
- for(iDigit=0; iDigit<fMulDigit; iDigit++) {
- digit = please->GimeDigit( fDigitsList[iDigit] ) ;
- phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
- phosgeom->RelPosInModule(relid, xi, zi);
- cout << " Id = " << digit->GetId() ;
- cout << " module = " << relid[0] ;
- cout << " x = " << xi ;
- cout << " z = " << zi ;
- cout << " Energy = " << fEnergyList[iDigit] << endl ;
- }
- cout << " Multiplicity = " << fMulDigit << endl ;
- cout << " Cluster Energy = " << fAmp << endl ;
- cout << " Stored at position " << GetIndexInList() << endl ;
-
}
-//______________________________________________________________________________
-// void AliPHOSEmcRecPoint::Streamer(TBuffer &R__b)
-// {
-// // Stream an object of class AliPHOSEmcRecPoint.
-
-// if (R__b.IsReading()) {
-// Version_t R__v = R__b.ReadVersion(); if (R__v) { }
-// AliPHOSRecPoint::Streamer(R__b);
-// R__b >> fDelta;
-// fEnergyList = new Float_t[fMulDigit] ;
-// R__b.ReadFastArray(fEnergyList, fMulDigit);
-// R__b >> fLocMaxCut;
-// R__b >> fW0;
-// } else {
-// R__b.WriteVersion(AliPHOSEmcRecPoint::IsA());
-// AliPHOSRecPoint::Streamer(R__b);
-// R__b << fDelta;
-// R__b.WriteFastArray(fEnergyList, fMulDigit);
-// R__b << fLocMaxCut;
-// R__b << fW0;
-// }
-// }
+