New member functions for CPV clusterization
[u/mrichter/AliRoot.git] / PHOS / AliPHOSEmcRecPoint.cxx
CommitLineData
d15a28e7 1/**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3 * *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
6 * *
7 * Permission to use, copy, modify and distribute this software and its *
8 * documentation strictly for non-commercial purposes is hereby granted *
9 * without fee, provided that the above copyright notice appears in all *
10 * copies and that both the copyright notice and this permission notice *
11 * appear in the supporting documentation. The authors make no claims *
12 * about the suitability of this software for any purpose. It is *
13 * provided "as is" without express or implied warranty. *
14 **************************************************************************/
15
b2a60966 16/* $Id$ */
17
d15a28e7 18//_________________________________________________________________________
b2a60966 19// RecPoint implementation for PHOS-EMC
20// An EmcRecPoint is a cluster of digits
21//
22//*-- Author: Dmitri Peressounko (RRC KI & SUBATECH)
23
d15a28e7 24
25// --- ROOT system ---
9f616d61 26#include "TPad.h"
27#include "TH2.h"
d15a28e7 28#include "TMath.h"
9f616d61 29#include "TCanvas.h"
d15a28e7 30
31// --- Standard library ---
32
de9ec31b 33#include <iostream.h>
d15a28e7 34
35// --- AliRoot header files ---
36
37#include "AliPHOSGeometry.h"
38#include "AliPHOSEmcRecPoint.h"
39#include "AliRun.h"
83974468 40#include "AliPHOSIndexToObject.h"
d15a28e7 41
42ClassImp(AliPHOSEmcRecPoint)
43
44//____________________________________________________________________________
45AliPHOSEmcRecPoint::AliPHOSEmcRecPoint(Float_t W0, Float_t LocMaxCut)
46 : AliPHOSRecPoint()
47{
48 // ctor
49
50 fMulDigit = 0 ;
51 fAmp = 0. ;
52 fEnergyList = new Float_t[fMaxDigit];
92862013 53 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
54 fDelta = phosgeom->GetCrystalSize(0) ;
d15a28e7 55 fW0 = W0 ;
56 fLocMaxCut = LocMaxCut ;
57 fLocPos.SetX(1000000.) ; //Local position should be evaluated
83974468 58
59}
60
61//____________________________________________________________________________
62AliPHOSEmcRecPoint::~AliPHOSEmcRecPoint()
63{
88714635 64 // dtor
83974468 65 if ( fEnergyList )
66 delete[] fEnergyList ;
d15a28e7 67}
68
9f616d61 69//____________________________________________________________________________
83974468 70void AliPHOSEmcRecPoint::AddDigit(AliPHOSDigit & digit, Float_t Energy)
d15a28e7 71{
b2a60966 72 // Adds a digit to the RecPoint
73 // and accumulates the total amplitude and the multiplicity
d15a28e7 74
75 if ( fMulDigit >= fMaxDigit ) { // increase the size of the lists
9f616d61 76 fMaxDigit*=2 ;
83974468 77 Int_t * tempo = new ( Int_t[fMaxDigit] ) ;
9f616d61 78 Float_t * tempoE = new ( Float_t[fMaxDigit] ) ;
79
80 Int_t index ;
d15a28e7 81 for ( index = 0 ; index < fMulDigit ; index++ ){
83974468 82 tempo[index] = fDigitsList[index] ;
d15a28e7 83 tempoE[index] = fEnergyList[index] ;
84 }
85
9f616d61 86 delete [] fDigitsList ;
83974468 87 fDigitsList = new ( Int_t[fMaxDigit] ) ;
9f616d61 88
89 delete [] fEnergyList ;
90 fEnergyList = new ( Float_t[fMaxDigit] ) ;
91
92 for ( index = 0 ; index < fMulDigit ; index++ ){
93 fDigitsList[index] = tempo[index] ;
94 fEnergyList[index] = tempoE[index] ;
95 }
96
97 delete [] tempo ;
98 delete [] tempoE ;
99 } // if
d15a28e7 100
83974468 101 fDigitsList[fMulDigit] = digit.GetIndexInList() ;
102 fEnergyList[fMulDigit] = Energy ;
103 fMulDigit++ ;
d15a28e7 104 fAmp += Energy ;
105}
106
107//____________________________________________________________________________
108Bool_t AliPHOSEmcRecPoint::AreNeighbours(AliPHOSDigit * digit1, AliPHOSDigit * digit2 )
109{
b2a60966 110 // Tells if (true) or not (false) two digits are neighbors)
d15a28e7 111
112 Bool_t aren = kFALSE ;
113
92862013 114 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
d15a28e7 115 Int_t relid1[4] ;
92862013 116 phosgeom->AbsToRelNumbering(digit1->GetId(), relid1) ;
d15a28e7 117
118 Int_t relid2[4] ;
92862013 119 phosgeom->AbsToRelNumbering(digit2->GetId(), relid2) ;
d15a28e7 120
92862013 121 Int_t rowdiff = TMath::Abs( relid1[2] - relid2[2] ) ;
122 Int_t coldiff = TMath::Abs( relid1[3] - relid2[3] ) ;
d15a28e7 123
92862013 124 if (( coldiff <= 1 ) && ( rowdiff <= 1 ) && (coldiff + rowdiff > 0))
d15a28e7 125 aren = kTRUE ;
126
127 return aren ;
128}
129
130//____________________________________________________________________________
131Int_t AliPHOSEmcRecPoint::Compare(TObject * obj)
132{
b2a60966 133 // Compares two RecPoints according to their position in the PHOS modules
134
d15a28e7 135 Int_t rv ;
136
137 AliPHOSEmcRecPoint * clu = (AliPHOSEmcRecPoint *)obj ;
138
139
92862013 140 Int_t phosmod1 = this->GetPHOSMod() ;
141 Int_t phosmod2 = clu->GetPHOSMod() ;
d15a28e7 142
92862013 143 TVector3 locpos1;
144 this->GetLocalPosition(locpos1) ;
145 TVector3 locpos2;
146 clu->GetLocalPosition(locpos2) ;
d15a28e7 147
92862013 148 if(phosmod1 == phosmod2 ) {
149 Int_t rowdif = (Int_t)TMath::Ceil(locpos1.X()/fDelta)-(Int_t)TMath::Ceil(locpos2.X()/fDelta) ;
d15a28e7 150 if (rowdif> 0)
151 rv = -1 ;
152 else if(rowdif < 0)
153 rv = 1 ;
92862013 154 else if(locpos1.Z()>locpos2.Z())
d15a28e7 155 rv = -1 ;
156 else
157 rv = 1 ;
158 }
159
160 else {
92862013 161 if(phosmod1 < phosmod2 )
d15a28e7 162 rv = -1 ;
163 else
164 rv = 1 ;
165 }
166
167 return rv ;
168}
169
9f616d61 170//______________________________________________________________________________
171void AliPHOSEmcRecPoint::ExecuteEvent(Int_t event, Int_t px, Int_t py)
172{
b2a60966 173 // Execute action corresponding to one event
6ad0bfa0 174 // This member function is called when a AliPHOSRecPoint is clicked with the locator
175 //
176 // If Left button is clicked on AliPHOSRecPoint, the digits are switched on
177 // and switched off when the mouse button is released.
178 //
9f616d61 179
180 // static Int_t pxold, pyold;
181
83974468 182 AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
9f616d61 183
83974468 184 static TGraph * digitgraph = 0 ;
185
186 if (!gPad->IsEditable()) return;
187
188 TH2F * histo = 0 ;
189 TCanvas * histocanvas ;
190
191 switch (event) {
192
193 case kButton1Down: {
194 AliPHOSDigit * digit ;
195 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
196 Int_t iDigit;
197 Int_t relid[4] ;
198
88714635 199 const Int_t kMulDigit = AliPHOSEmcRecPoint::GetDigitsMultiplicity() ;
200 Float_t * xi = new Float_t[kMulDigit] ;
201 Float_t * zi = new Float_t[kMulDigit] ;
83974468 202
203 // create the histogram for the single cluster
204 // 1. gets histogram boundaries
205 Float_t ximax = -999. ;
206 Float_t zimax = -999. ;
207 Float_t ximin = 999. ;
208 Float_t zimin = 999. ;
209
88714635 210 for(iDigit=0; iDigit<kMulDigit; iDigit++) {
83974468 211 digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
212 phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
213 phosgeom->RelPosInModule(relid, xi[iDigit], zi[iDigit]);
214 if ( xi[iDigit] > ximax )
215 ximax = xi[iDigit] ;
216 if ( xi[iDigit] < ximin )
217 ximin = xi[iDigit] ;
218 if ( zi[iDigit] > zimax )
219 zimax = zi[iDigit] ;
220 if ( zi[iDigit] < zimin )
221 zimin = zi[iDigit] ;
222 }
223 ximax += phosgeom->GetCrystalSize(0) / 2. ;
224 zimax += phosgeom->GetCrystalSize(2) / 2. ;
225 ximin -= phosgeom->GetCrystalSize(0) / 2. ;
226 zimin -= phosgeom->GetCrystalSize(2) / 2. ;
227 Int_t xdim = (int)( (ximax - ximin ) / phosgeom->GetCrystalSize(0) + 0.5 ) ;
228 Int_t zdim = (int)( (zimax - zimin ) / phosgeom->GetCrystalSize(2) + 0.5 ) ;
229
230 // 2. gets the histogram title
231
232 Text_t title[100] ;
233 sprintf(title,"Energy=%1.2f GeV ; Digits ; %d ", GetEnergy(), GetDigitsMultiplicity()) ;
234
235 if (!histo) {
236 delete histo ;
237 histo = 0 ;
238 }
239 histo = new TH2F("cluster3D", title, xdim, ximin, ximax, zdim, zimin, zimax) ;
240
241 Float_t x, z ;
88714635 242 for(iDigit=0; iDigit<kMulDigit; iDigit++) {
83974468 243 digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
244 phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
245 phosgeom->RelPosInModule(relid, x, z);
246 histo->Fill(x, z, fEnergyList[iDigit] ) ;
247 }
248
249 if (!digitgraph) {
88714635 250 digitgraph = new TGraph(kMulDigit,xi,zi);
83974468 251 digitgraph-> SetMarkerStyle(5) ;
252 digitgraph-> SetMarkerSize(1.) ;
253 digitgraph-> SetMarkerColor(1) ;
254 digitgraph-> Paint("P") ;
255 }
256
257 Print() ;
258 histocanvas = new TCanvas("cluser", "a single cluster", 600, 500) ;
259 histocanvas->Draw() ;
260 histo->Draw("lego1") ;
261
262 delete[] xi ;
263 delete[] zi ;
264
265 break;
266 }
267
268 case kButton1Up:
269 if (digitgraph) {
270 delete digitgraph ;
271 digitgraph = 0 ;
272 }
273 break;
9f616d61 274
275 }
276}
277
d15a28e7 278//____________________________________________________________________________
279Float_t AliPHOSEmcRecPoint::GetDispersion()
280{
b2a60966 281 // Calculates the dispersion of the shower at the origine of the RecPoint
282
83974468 283 AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
284
92862013 285 Float_t d = 0 ;
d15a28e7 286 Float_t wtot = 0 ;
287
92862013 288 TVector3 locpos;
289 GetLocalPosition(locpos);
290 Float_t x = locpos.X() ;
291 Float_t z = locpos.Z() ;
d15a28e7 292
293 AliPHOSDigit * digit ;
92862013 294 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
d15a28e7 295
296 Int_t iDigit;
88714635 297 for(iDigit=0; iDigit < fMulDigit; iDigit++) {
83974468 298 digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
d15a28e7 299 Int_t relid[4] ;
300 Float_t xi ;
301 Float_t zi ;
92862013 302 phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
303 phosgeom->RelPosInModule(relid, xi, zi);
d15a28e7 304 Float_t w = TMath::Max(0.,fW0+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
92862013 305 d += w*((xi-x)*(xi-x) + (zi-z)*(zi-z) ) ;
d15a28e7 306 wtot+=w ;
307 }
308
92862013 309 d /= wtot ;
d15a28e7 310
92862013 311 return TMath::Sqrt(d) ;
d15a28e7 312}
313
314//____________________________________________________________________________
315void AliPHOSEmcRecPoint::GetElipsAxis(Float_t * lambda)
316{
b2a60966 317 // Calculates the axis of the shower ellipsoid
83974468 318
319 AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
320
e8dbb96e 321 Double_t wtot = 0. ;
322 Double_t x = 0.;
323 Double_t z = 0.;
324 Double_t dxx = 0.;
325 Double_t dzz = 0.;
326 Double_t dxz = 0.;
d15a28e7 327
328 AliPHOSDigit * digit ;
92862013 329 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
d15a28e7 330 Int_t iDigit;
331
332 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
83974468 333 digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
d15a28e7 334 Int_t relid[4] ;
335 Float_t xi ;
336 Float_t zi ;
92862013 337 phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
338 phosgeom->RelPosInModule(relid, xi, zi);
e8dbb96e 339 Double_t w = TMath::Max(0.,fW0+TMath::Log(fEnergyList[iDigit]/fAmp ) ) ;
92862013 340 dxx += w * xi * xi ;
d15a28e7 341 x += w * xi ;
92862013 342 dzz += w * zi * zi ;
d15a28e7 343 z += w * zi ;
92862013 344 dxz += w * xi * zi ;
d15a28e7 345 wtot += w ;
346 }
92862013 347 dxx /= wtot ;
d15a28e7 348 x /= wtot ;
92862013 349 dxx -= x * x ;
350 dzz /= wtot ;
d15a28e7 351 z /= wtot ;
92862013 352 dzz -= z * z ;
353 dxz /= wtot ;
354 dxz -= x * z ;
d15a28e7 355
e8dbb96e 356 lambda[0] = 0.5 * (dxx + dzz) + TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
357 if(lambda[0] > 0)
358 lambda[0] = TMath::Sqrt(lambda[0]) ;
359
360 lambda[1] = 0.5 * (dxx + dzz) - TMath::Sqrt( 0.25 * (dxx - dzz) * (dxx - dzz) + dxz * dxz ) ;
361 if(lambda[1] > 0) //To avoid exception if numerical errors lead to negative lambda.
362 lambda[1] = TMath::Sqrt(lambda[1]) ;
363 else
364 lambda[1]= 0. ;
d15a28e7 365}
366
367//____________________________________________________________________________
b2a60966 368void AliPHOSEmcRecPoint::GetLocalPosition(TVector3 &LPos)
369{
370 // Calculates the center of gravity in the local PHOS-module coordinates
83974468 371
372 AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
373
b2a60966 374 if( fLocPos.X() < 1000000.) { // already evaluated
375 LPos = fLocPos ;
376 return ;
377 }
378
379 Float_t wtot = 0. ;
380
381 Int_t relid[4] ;
382
383 Float_t x = 0. ;
384 Float_t z = 0. ;
385
386 AliPHOSDigit * digit ;
387
388 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
389
390 Int_t iDigit;
391
392
393 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
83974468 394 digit = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigit]) );
b2a60966 395
396 Float_t xi ;
397 Float_t zi ;
398 phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
399 phosgeom->RelPosInModule(relid, xi, zi);
400 Float_t w = TMath::Max( 0., fW0 + TMath::Log( fEnergyList[iDigit] / fAmp ) ) ;
401 x += xi * w ;
402 z += zi * w ;
403 wtot += w ;
404
405 }
406
407 x /= wtot ;
408 z /= wtot ;
409 fLocPos.SetX(x) ;
410 fLocPos.SetY(0.) ;
411 fLocPos.SetZ(z) ;
412
413 LPos = fLocPos ;
414}
415
416//____________________________________________________________________________
d15a28e7 417Float_t AliPHOSEmcRecPoint::GetMaximalEnergy(void)
418{
b2a60966 419 // Finds the maximum energy in the cluster
420
d15a28e7 421 Float_t menergy = 0. ;
422
423 Int_t iDigit;
424
425 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
426
427 if(fEnergyList[iDigit] > menergy)
428 menergy = fEnergyList[iDigit] ;
429 }
430 return menergy ;
431}
432
433//____________________________________________________________________________
31aa6d6c 434Int_t AliPHOSEmcRecPoint::GetMultiplicityAtLevel(const Float_t H)
d15a28e7 435{
b2a60966 436 // Calculates the multiplicity of digits with energy larger than H*energy
437
d15a28e7 438 Int_t multipl = 0 ;
439 Int_t iDigit ;
440 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
441
442 if(fEnergyList[iDigit] > H * fAmp)
443 multipl++ ;
444 }
445 return multipl ;
446}
447
448//____________________________________________________________________________
6ad0bfa0 449Int_t AliPHOSEmcRecPoint::GetNumberOfLocalMax(Int_t * maxAt, Float_t * maxAtEnergy)
d15a28e7 450{
b2a60966 451 // Calculates the number of local maxima in the cluster using fLocalMaxCut as the minimum
452 // energy difference between two local maxima
453
83974468 454 AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
455
d15a28e7 456 AliPHOSDigit * digit ;
457 AliPHOSDigit * digitN ;
458
459
460 Int_t iDigitN ;
461 Int_t iDigit ;
462
6ad0bfa0 463 for(iDigit = 0; iDigit < fMulDigit; iDigit++){
83974468 464 maxAt[iDigit] = (Int_t) ( please->GimeDigit(fDigitsList[iDigit]) ) ;
d15a28e7 465 }
466
6ad0bfa0 467 for(iDigit = 0 ; iDigit < fMulDigit; iDigit++) {
9f616d61 468 if(maxAt[iDigit] != -1) {
469 digit = (AliPHOSDigit *) maxAt[iDigit] ;
83974468 470
6ad0bfa0 471 for(iDigitN = 0; iDigitN < fMulDigit; iDigitN++) {
83974468 472 digitN = (AliPHOSDigit *) ( please->GimeDigit(fDigitsList[iDigitN]) ) ;
d15a28e7 473
9f616d61 474 if ( AreNeighbours(digit, digitN) ) {
d15a28e7 475 if (fEnergyList[iDigit] > fEnergyList[iDigitN] ) {
476 maxAt[iDigitN] = -1 ;
6ad0bfa0 477 // but may be digit too is not local max ?
478 if(fEnergyList[iDigit] < fEnergyList[iDigitN] + fLocMaxCut)
d15a28e7 479 maxAt[iDigit] = -1 ;
480 }
481 else {
482 maxAt[iDigit] = -1 ;
6ad0bfa0 483 // but may be digitN too is not local max ?
484 if(fEnergyList[iDigit] > fEnergyList[iDigitN] - fLocMaxCut)
d15a28e7 485 maxAt[iDigitN] = -1 ;
486 }
487 } // if Areneighbours
488 } // while digitN
489 } // slot not empty
490 } // while digit
491
492 iDigitN = 0 ;
6ad0bfa0 493 for(iDigit = 0; iDigit < fMulDigit; iDigit++) {
d15a28e7 494 if(maxAt[iDigit] != -1){
495 maxAt[iDigitN] = maxAt[iDigit] ;
9f616d61 496 maxAtEnergy[iDigitN] = fEnergyList[iDigit] ;
497 iDigitN++ ;
d15a28e7 498 }
499 }
500 return iDigitN ;
501}
502
d15a28e7 503
504// //____________________________________________________________________________
505// AliPHOSEmcRecPoint& AliPHOSEmcRecPoint::operator = (AliPHOSEmcRecPoint Clu)
506// {
92862013 507// int * dl = Clu.GetDigitsList() ;
d15a28e7 508
509// if(fDigitsList)
510// delete fDigitsList ;
511
512// AliPHOSDigit * digit ;
513
514// Int_t iDigit;
515
516// for(iDigit=0; iDigit<fMulDigit; iDigit++) {
92862013 517// digit = (AliPHOSDigit *) dl[iDigit];
d15a28e7 518// AddDigit(*digit) ;
519// }
520
521// fAmp = Clu.GetTotalEnergy() ;
522// fGeom = Clu.GetGeom() ;
92862013 523// TVector3 locpos;
524// Clu.GetLocalPosition(locpos) ;
525// fLocPos = locpos;
d15a28e7 526// fMulDigit = Clu.GetMultiplicity() ;
527// fMaxDigit = Clu.GetMaximumMultiplicity() ;
528// fPHOSMod = Clu.GetPHOSMod() ;
529// fW0 = Clu.GetLogWeightCut() ;
530// fDelta = Clu.GetDelta() ;
531// fLocMaxCut = Clu.GetLocMaxCut() ;
532
92862013 533// delete dl ;
d15a28e7 534
535// return *this ;
536// }
537
538//____________________________________________________________________________
539void AliPHOSEmcRecPoint::Print(Option_t * option)
540{
b2a60966 541 // Print the list of digits belonging to the cluster
542
d15a28e7 543 cout << "AliPHOSEmcRecPoint: " << endl ;
544
545 AliPHOSDigit * digit ;
546 Int_t iDigit;
92862013 547 AliPHOSGeometry * phosgeom = (AliPHOSGeometry *) fGeom ;
d15a28e7 548
9f616d61 549 Float_t xi ;
550 Float_t zi ;
551 Int_t relid[4] ;
83974468 552
553 AliPHOSIndexToObject * please = AliPHOSIndexToObject::GetInstance() ;
554
d15a28e7 555 for(iDigit=0; iDigit<fMulDigit; iDigit++) {
83974468 556 digit = please->GimeDigit( fDigitsList[iDigit] ) ;
92862013 557 phosgeom->AbsToRelNumbering(digit->GetId(), relid) ;
558 phosgeom->RelPosInModule(relid, xi, zi);
9f616d61 559 cout << " Id = " << digit->GetId() ;
560 cout << " module = " << relid[0] ;
561 cout << " x = " << xi ;
562 cout << " z = " << zi ;
563 cout << " Energy = " << fEnergyList[iDigit] << endl ;
d15a28e7 564 }
565 cout << " Multiplicity = " << fMulDigit << endl ;
566 cout << " Cluster Energy = " << fAmp << endl ;
83974468 567 cout << " Stored at position " << GetIndexInList() << endl ;
568
d15a28e7 569}
d15a28e7 570//______________________________________________________________________________
88714635 571// void AliPHOSEmcRecPoint::Streamer(TBuffer &R__b)
572// {
573// // Stream an object of class AliPHOSEmcRecPoint.
574
575// if (R__b.IsReading()) {
576// Version_t R__v = R__b.ReadVersion(); if (R__v) { }
577// AliPHOSRecPoint::Streamer(R__b);
578// R__b >> fDelta;
579// fEnergyList = new Float_t[fMulDigit] ;
580// R__b.ReadFastArray(fEnergyList, fMulDigit);
581// R__b >> fLocMaxCut;
582// R__b >> fW0;
583// } else {
584// R__b.WriteVersion(AliPHOSEmcRecPoint::IsA());
585// AliPHOSRecPoint::Streamer(R__b);
586// R__b << fDelta;
587// R__b.WriteFastArray(fEnergyList, fMulDigit);
588// R__b << fLocMaxCut;
589// R__b << fW0;
590// }
591// }
592