]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - EMCAL/AliEMCALGetter.cxx
new classes for track segments
[u/mrichter/AliRoot.git] / EMCAL / AliEMCALGetter.cxx
index 76c028e6f1ec8316a85dad12d4e50fc8e4eb2c52..d7d8832a9a182d7cc76f53225a8dfa2c52a9806c 100644 (file)
  **************************************************************************/
 
 /* $Id:  */
-
 /* $Log:
    29.05.2001 Yuri Kharlov:
               Everywhere reading the treese TTree->GetEvent(i)
               is replaced by reading the branches TBranch->GetEntry(0)
 */
 
+/* $Log:
+   08.2002 Dmitri Peressounko:
+*/
+
 //_________________________________________________________________________
 //  A singleton. This class should be used in the analysis stage to get 
 //  reconstructed objects: Digits, RecPoints, TrackSegments and RecParticles,
 //  instead of directly reading them from galice.root file. This container 
-//  ensures, that one reads Digits, made of these particular digits, RecPoints, 
+//  ensures, that one reads Digits, made of these particular digits, RecPoints,
 //  made of these particular RecPoints, TrackSegments and RecParticles. 
 //  This becomes non trivial if there are several identical branches, produced with
 //  different set of parameters. 
 //*--         Completely redesigned by Dmitri Peressounko March 2001  
 //
 //*-- YS June 2001 : renamed the original AliEMCALIndexToObject and make
-//*--         systematic usage of TFolders without changing the interface        
+//*--         systematic usage of TFolders without changing the interface     
+//*-- YS August 2002 : clone PHOS as closely as possible and intoduction
+//                     of new  IO (à la PHOS)
+
 //////////////////////////////////////////////////////////////////////////////
 
 
+
 // --- ROOT system ---
 
 #include "TFile.h"
 #include "TROOT.h"
 #include "TObjString.h"
 #include "TFolder.h"
+#include "TParticle.h"
 
 // --- Standard library ---
-#include <iostream.h>
+
+#include <Riostream.h>
 
 // --- AliRoot header files ---
 
 #include "AliRun.h"
 #include "AliConfig.h"
 #include "AliEMCALGetter.h"
-#include "AliEMCALv1.h"
+#include "AliEMCAL.h"
 #include "AliEMCALDigitizer.h"
 #include "AliEMCALSDigitizer.h"
-//#include "AliEMCALClusterizer.h"
-//#include "AliEMCALClusterizerv1.h"
-//#include "AliEMCALTrackSegmentMaker.h"
-//#include "AliEMCALTrackSegmentMakerv1.h"
-//#include "AliEMCALTrackSegment.h"
-//#include "AliEMCALPID.h" 
-//#include "AliEMCALPIDv1.h" 
+#include "AliEMCALClusterizerv1.h"
+#include "AliEMCALTrackSegmentMakerv1.h"
+#include "AliEMCALTrackSegment.h"
 #include "AliEMCALGeometry.h"
 
 ClassImp(AliEMCALGetter)
-  
+
   AliEMCALGetter * AliEMCALGetter::fgObjGetter = 0 ; 
+  TFile * AliEMCALGetter::fFile = 0 ; 
 
 //____________________________________________________________________________ 
-AliEMCALGetter::AliEMCALGetter(const char* headerFile, const char* branchTitle )
+
+AliEMCALGetter::AliEMCALGetter(const char* headerFile, const char* branchTitle, const Bool_t toSplit)
 {
-  //Initialize  all lists
+  // This is the ctor called by GetInstance and the only one that can be used 
 
-  fHeaderFile         = headerFile ; 
-  fBranchTitle        = branchTitle ;
-  fSDigitsTitle       = branchTitle ; 
-  fDigitsTitle        = branchTitle ; 
-  //fRecPointsTitle     = branchTitle ; 
-  //fRecParticlesTitle  = branchTitle ; 
-  //fTrackSegmentsTitle = branchTitle ; 
+  if ( fHeaderFile.Contains("_") ) {
+    Fatal("AliEMCALGetter","Invalid file name (_ not allowed) %s",fHeaderFile.Data()) ;
+  }
+
+  //Initialize  all data
+
+  fFailed = kFALSE ;   
+  fDebug  = 0 ; 
+  fAlice  = 0 ; 
+
+  fToSplit    = toSplit ;
+  fHeaderFile = headerFile ; 
 
   fPrimaries = new TObjArray(1) ;
 
-  fModuleFolder  = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Configuration/Modules")); 
-  fHitsFolder    = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/RunMC/Event/Data/Hits")); 
-  fSDigitsFolder = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/RunMC/Event/Data/SDigits")); 
-  fDigitsFolder  = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Event/Data")); 
-  //fRecoFolder    = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Event/RecData")); 
+  fModuleFolder    = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Configuration/Modules")); 
+  fPrimariesFolder = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/RunMC/Event/Data")); 
+  fHitsFolder      = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/RunMC/Event/Data/Hits")); 
+  fSDigitsFolder   = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/RunMC/Event/Data/SDigits")); 
+  fDigitsFolder    = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Event/Data")); 
+  fRecoFolder      = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Event/RecData")); 
   //fQAFolder      = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Run/Conditions/QA")); 
-  fTasksFolder   = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Tasks")) ; 
+  fTasksFolder     = dynamic_cast<TFolder*>(gROOT->FindObjectAny("Folders/Tasks")) ; 
+
+  //Set titles to branches and create EMCAL specific folders
+
+  SetTitle(branchTitle) ;
 
   if ( fHeaderFile != "aliroot"  ) { // to call the getter without a file
 
     //open headers file
-    TFile * file = static_cast<TFile*>(gROOT->GetFile(fHeaderFile.Data() ) ) ;
-    
-    if(file == 0){    //if file was not opened yet, read gAlice
-      if(fHeaderFile.Contains("rfio")) // if we read file using HPSS
-       file =  TFile::Open(fHeaderFile.Data(),"update") ;
-      else
-       file = new TFile(fHeaderFile.Data(),"update") ;
-      
-      if (!file->IsOpen()) {
-       cerr << "ERROR : AliEMCALGetter::AliEMCALGetter -> Cannot open " << fHeaderFile.Data() << endl ; 
-       abort() ; 
+
+    fFile = static_cast<TFile*>(gROOT->GetFile(fHeaderFile.Data() ) ) ;
+
+    if(!fFile){    //if file was not opened yet, read gAlice
+      fFile = TFile::Open(fHeaderFile.Data(), "update") ;   
+      if (!fFile->IsOpen()) {
+        Error("AliEMCALGetter","Cannot open %s",fHeaderFile.Data()) ; 
+               fFailed = kTRUE ;
+        return ;  
       }
-      
-      gAlice = static_cast<AliRun *>(file->Get("gAlice")) ;
     }
+    gAlice = static_cast<AliRun *>(fFile->Get("gAlice")) ;
   }
 
   if (!gAlice) {
-    cerr << "ERROR : AliEMCALGetter::AliEMCALGetter -> Cannot find gAlice in " << fHeaderFile.Data() << endl ; 
-    abort() ; 
+    Error("AliEMCALGetter","Cannot find gAlice in %s",fHeaderFile.Data()) ; 
+    fFailed = kTRUE ;
+    return ; 
   }
   if (!EMCAL()) {
     if (fDebug)
-      cout << "INFO: AliEMCALGetter -> Posting EMCAL to Folders" << endl ; 
-    AliConfig * conf = AliConfig::Instance() ; 
-    conf->Add(static_cast<AliDetector*>(gAlice->GetDetector("EMCAL"))) ; 
-    conf->Add(static_cast<AliModule*>(gAlice->GetDetector("EMCAL"))) ; 
+      Info("AliEMCALGetter","Posting EMCAL to Folders") ; 
+
+    if (gAlice->GetDetector("EMCAL")) {
+      AliConfig * conf = AliConfig::Instance() ;
+      conf->Add(static_cast<AliDetector*>(gAlice->GetDetector("EMCAL"))) ; 
+      conf->Add(static_cast<AliModule*>(gAlice->GetDetector("EMCAL"))) ;
+    }
+    else 
+      Error("AliEMCALGetter"," Detector EMCAL not found");
   }
-  
+
   fDebug=0;
 }
+
 //____________________________________________________________________________ 
-AliEMCALGetter::~AliEMCALGetter(){
 
+AliEMCALGetter::~AliEMCALGetter()
+{
+  if (fPrimaries) {
+    fPrimaries->Delete() ; 
+    delete fPrimaries ; 
+  }
+
+  TFolder * emcalF = dynamic_cast<TFolder *>(fSDigitsFolder->FindObject("EMCAL")) ;
+  TCollection * folderslist = emcalF->GetListOfFolders() ; 
+  TIter next(folderslist) ; 
+  TFolder * folder = 0 ; 
+
+  while ( (folder = static_cast<TFolder*>(next())) ) 
+    emcalF->Remove(folder) ; 
+
+  if (fFile) { 
+    fFile->Close() ;  
+    delete fFile ; 
+    fFile = 0 ;
+  }
+
+  fgObjGetter = 0 ; 
 }
 
 //____________________________________________________________________________ 
-void AliEMCALGetter::CreateWhiteBoard() const
+
+void AliEMCALGetter::CloseFile()
 {
+  delete gAlice ;  
+  gAlice = 0 ; 
+  delete fAlice ; 
+  fAlice = 0 ; 
+}
 
+//____________________________________________________________________________ 
+
+const TFolder * AliEMCALGetter::Folder(const TString what) const {
+
+  // returns the EMCAL folder required by what
+  // what = hits, sdigits, digits
+
+  if ( what == "hits" ) 
+    return dynamic_cast<const TFolder *>(fHitsFolder->FindObject("EMCAL")) ; 
+  else if ( what == "sdigits" ) 
+    return  dynamic_cast<const TFolder *>(fSDigitsFolder->FindObject("EMCAL")) ; 
+  else if ( what == "digits" ) 
+    return  dynamic_cast<const TFolder *>(fDigitsFolder->FindObject("EMCAL")) ;
+  else {
+    Error("GetFolder","%s illegal option (hits, sdigits, digits) ", what.Data()) ; 
+    return 0 ; 
+  }
 }
 
 //____________________________________________________________________________ 
+
 AliEMCALGetter * AliEMCALGetter::GetInstance()
 {
   // Returns the pointer of the unique instance already defined
-  
-  AliEMCALGetter * rv = 0 ;
-  if ( fgObjGetter )
-    rv = fgObjGetter ;
-  else
-    cout << "AliEMCALGetter::GetInstance ERROR: not yet initialized" << endl ;
 
-  return rv ;
+  if ( fgObjGetter ) {
+    return fgObjGetter ;
+  }
+  else {
+    return 0 ;
+  }
 }
 
 //____________________________________________________________________________ 
+
 AliEMCALGetter * AliEMCALGetter::GetInstance(const char* headerFile,
-                                          const char* branchTitle)
+                                            const char* branchTitle,
+                                            const Bool_t toSplit)
 {
   // Creates and returns the pointer of the unique instance
   // Must be called only when the environment has changed 
 
-  if ( fgObjGetter )    
-    if((fgObjGetter->fBranchTitle.CompareTo(branchTitle) == 0) && 
-       (fgObjGetter->fHeaderFile.CompareTo(headerFile)==0))
+  if(!fgObjGetter){
+    fgObjGetter = new AliEMCALGetter(headerFile,branchTitle,toSplit) ;
+    if(fgObjGetter->fFailed)
+      return 0;
+    else
       return fgObjGetter ;
+  }
+
+  //First checks, if header file already opened
+
+  if(!fgObjGetter->fFile){
+     fgObjGetter = new AliEMCALGetter(headerFile,branchTitle,toSplit) ;
+    if(fgObjGetter->fFailed)
+      return 0;
     else
-      fgObjGetter->~AliEMCALGetter() ;  // delete it if already exists another version
-  
-  fgObjGetter = new AliEMCALGetter(headerFile,branchTitle) ; 
-  
-  // Posts a few item to the white board (folders)
-  // fgObjGetter->CreateWhiteBoard() ;
-    
+      return fgObjGetter ;
+  }
+
+  if(fgObjGetter->fHeaderFile.CompareTo(headerFile)==0){ //Opened the same header file   
+    if((fgObjGetter->fBranchTitle.CompareTo(branchTitle) == 0)&&   //Open the same branch title
+       (toSplit==fgObjGetter->fToSplit)){                          //Nothing should be cleaned
+    }
+    else{ //Clean all data and AliEMCAL...zers
+      if(fgObjGetter->fToSplit)
+        fgObjGetter->CloseSplitFiles() ;         
+      //fgObjGetter->CleanWhiteBoard() ;
+      fgObjGetter->fToSplit = toSplit ;
+      fgObjGetter->SetTitle(branchTitle) ;
+    }
+  }
+  else{  //Close already opened files, clean memory and open new header file
+    if(gAlice){ //should first delete gAlice, then close file
+      //Should be in dtor of EMCAL, but if one changes path ...
+      fgObjGetter->fModuleFolder->Remove(fgObjGetter->fModuleFolder->FindObject("EMCAL")) ; 
+      delete gAlice ;
+    }
+    if(fgObjGetter->fFile){
+      fgObjGetter->fFile->Close() ;
+      fgObjGetter->fFile=0;
+    }
+    if(fgObjGetter->fToSplit)
+      fgObjGetter->CloseSplitFiles() ;
+    fgObjGetter->CleanWhiteBoard() ;    
+    fgObjGetter = new AliEMCALGetter(headerFile,branchTitle,toSplit) ;
+  }
+
   return fgObjGetter ; 
-  
+
+}
+
+//____________________________________________________________________________ 
+
+const Bool_t AliEMCALGetter::BranchExists(const TString recName) const
+{
+  //Looks in the tree Tree"name" if branch with current name olready exists
+
+  TString filename("") ;
+  TString name, dataname, zername;
+  if(recName == "SDigits"){
+    filename=fSDigitsFileName ;
+    name = "TreeS0" ;
+    dataname = "EMCAL" ;
+    zername = "AliEMCALSDigitizer" ;
+  }
+  else if(recName == "Digits"){
+    filename=fDigitsFileName ;
+    name = "TreeD0" ;
+    dataname = "EMCAL" ;
+    zername = "AliEMCALDigitizer" ;
+  }
+  else if(recName =="RecPoints"){
+       filename=fRecPointsFileName ;
+       name = "TreeR0" ;
+       dataname = "EMCALEmcRP" ;
+       zername = "AliEMCALClusterizer" ;
+  }
+  else if(recName == "TrackSegments"){
+    filename=fTrackSegmentsFileName ;
+    name = "TreeR0" ;
+    dataname = "EMCALTS" ;
+    zername = "AliEMCALTrackSegmentMaker" ;
+  }     
+  else if(recName == "RecParticles"){
+    filename= fRecParticlesFileName ;
+    name = "TreeR0" ;
+    dataname = "EMCALRP" ;
+    zername = "AliEMCALPID" ;
+  }
+  else
+    return kFALSE ;
+
+  TFile * file ;
+  TTree * tree ;
+  if(fToSplit){
+    file = static_cast<TFile*>(gROOT->GetFile(filename.Data() ) ) ;
+    if(!file)
+      file = TFile::Open(fSDigitsFileName.Data(),"update");
+  }
+  else
+    file = fFile ;
+
+  tree = (TTree *)file->Get(name.Data()) ;
+
+  if(!tree ) 
+    return kFALSE ;
+
+  TObjArray * lob = static_cast<TObjArray*>(tree->GetListOfBranches()) ;
+  TIter next(lob) ; 
+  TBranch * branch = 0 ;  
+  TString titleName(fBranchTitle);
+  titleName+=":";
+
+  while ((branch = (static_cast<TBranch*>(next())))) {
+    TString branchName(branch->GetName() ) ; 
+    TString branchTitle(branch->GetTitle() ) ;  
+    if ( branchName.BeginsWith(dataname) && branchTitle.BeginsWith(fBranchTitle) ){  
+      Warning("BranchExists", "branch %s with title %s already exits in %s", dataname.Data(), fBranchTitle.Data(), name.Data());
+      return kTRUE ;
+    }
+
+    if ( branchName.BeginsWith(zername) &&  branchTitle.BeginsWith(titleName) ){
+      Warning("BranchExists","Branch AliEMCAL... with title %s already exits in %s",branch->GetTitle(), name.Data());     
+      return kTRUE ; 
+    }
+  }
+
+    //We can't delete three if gAlice points to it... To be redisigned somehow???!!!
+
+  if(!fToSplit){
+    if(name.Contains("TreeS"))
+      if(tree!=gAlice->TreeS())
+        tree->Delete();
+    if(name.Contains("TreeD"))
+      if(tree!=gAlice->TreeD())
+        tree->Delete();
+    if(name.Contains("TreeR"))
+      if(tree!=gAlice->TreeR())
+        tree->Delete();    
+  }
+
+  return kFALSE ;
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::ListBranches(Int_t event) const  
+{
+  TBranch * branch = 0 ; 
+  if (gAlice->GetEvent(event) == -1)
+    return ; 
+
+  TTree * t =  gAlice->TreeH() ; 
+
+  if(t){
+    Info("ListBranches"," -> ****** Hits    : "); 
+    TObjArray * lob = t->GetListOfBranches() ;
+    TIter next(lob) ; 
+
+    while ( (branch = static_cast<TBranch*>(next())) )
+      Info("ListBranches","         %s", branch->GetName());
+
+  } else 
+    Warning("ListBranches"," -> TreeH not found for event %d",event);  
+
+  t = gAlice->TreeS() ;
+
+  if(t){
+    Info("ListBranches"," -> ****** SDigits : "); 
+    TObjArray * lob = t->GetListOfBranches() ;
+    TIter next(lob) ; 
+
+    while ( (branch = static_cast<TBranch*>(next())) )
+      Info("ListBranches","             %s %s",branch->GetName(),branch->GetTitle()); 
+  } else 
+    Warning("ListBranches"," -> TreeS not found for event %d",event);  
+
+  t = gAlice->TreeD() ;
+
+  if(t){
+    Info("ListBranches"," -> ****** Digits  : "); 
+    TObjArray * lob = t->GetListOfBranches() ;
+    TIter next(lob) ; 
+
+    while ( (branch = static_cast<TBranch*>(next())) )
+      Info("             %s %s", branch->GetName(), branch->GetTitle()); 
+  } else 
+    Warning("ListBranches"," -> TreeD not found for event %d", event);  
+
+  t = gAlice->TreeR() ;
+
+  if(t){
+    Info("ListBranches"," -> ****** Recon   : "); 
+    TObjArray * lob = t->GetListOfBranches() ;
+    TIter next(lob) ; 
+    while ( (branch = static_cast<TBranch*>(next())) )
+      Info("             %s %s", branch->GetName(), branch->GetTitle()); 
+  } else 
+    Warning("ListBranches"," -> TreeR not found for event %d",event);  
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::NewBranch(TString name, Int_t event)  
+{
+  fBranchTitle = fSDigitsTitle = fDigitsTitle = fRecPointsTitle = fTrackSegmentsTitle = fRecParticlesTitle =  name ; 
+  Event(event) ; 
+}
+
+//____________________________________________________________________________ 
+
+Bool_t AliEMCALGetter::NewFile(TString name)  
+{
+  fHeaderFile = name ; 
+  fFile->Close() ; 
+  fFailed = kFALSE; 
+
+  fFile = static_cast<TFile*>(gROOT->GetFile(fHeaderFile.Data() ) ) ;
+
+  if(!fFile) {    //if file was not opened yet, read gAlice
+    fFile = TFile::Open(fHeaderFile.Data(),"update") ;
+    if (!fFile->IsOpen()) {
+      Error("NewFile", " -> Cannot open %s", fHeaderFile.Data()); 
+      fFailed = kTRUE ;
+      return fFailed ;  
+    }
+    gAlice = static_cast<AliRun *>(fFile->Get("gAlice")) ;
+  } 
+
+  if (!gAlice) {
+    Error("NewFile"," -> Cannot find gAlice in %s", fHeaderFile.Data());
+    fFailed = kTRUE ;
+    return fFailed ; 
+  }
+  return fFailed ; 
 }
 
 //____________________________________________________________________________ 
-const AliEMCALv1 * AliEMCALGetter::EMCAL() 
+
+const AliEMCAL * AliEMCALGetter::EMCAL() 
 {
   // returns the EMCAL object 
-  AliEMCALv1 * emcal = dynamic_cast<AliEMCALv1*>(fModuleFolder->FindObject("EMCAL")) ;  
+
+  AliEMCAL * emcal = dynamic_cast<AliEMCAL*>(fModuleFolder->FindObject("EMCAL")) ;  
+
   if (!emcal) 
     if (fDebug)
-      cout << "WARNING: AliEMCALGetter::EMCAL -> EMCAL module not found in Folders" << endl ; 
+      Warning("EMCAL"," -> EMCAL module not found in Folders" );
   return emcal ; 
 }  
 
 //____________________________________________________________________________ 
-const AliEMCALGeometry * AliEMCALGetter::EMCALGeometry() 
+
+AliEMCALGeometry * AliEMCALGetter::EMCALGeometry() 
 {
   AliEMCALGeometry * rv = 0 ; 
   if (EMCAL() )
@@ -203,195 +494,259 @@ const AliEMCALGeometry * AliEMCALGetter::EMCALGeometry()
 } 
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostHits(void) const 
-{  //------- Hits ----------------------
 
+const Bool_t AliEMCALGetter::PostPrimaries(void) const 
+{  
+  //------- Primaries ----------------------
+  // the hierarchy is //Folders/RunMC/Event/Data/Primaries
+
+  TFolder * primariesFolder = dynamic_cast<TFolder*>(fPrimariesFolder->FindObject("Primaries")) ; 
+  if ( !primariesFolder ) {
+    if (fDebug) {
+      Warning("PostPrimaries", "-> Folder //%s/Primaries/ not found!", fPrimariesFolder->GetName());
+      Info("PostPrimaries", "-> Adding Folder //%s/Primaries/",fPrimariesFolder->GetName());
+    }
+    primariesFolder = fPrimariesFolder->AddFolder("Primaries", "Primaries particles from TreeK") ; 
+  }    
+
+  TClonesArray *primaries=  new TClonesArray("TParticle",1000) ;
+  primaries->SetName("Primaries") ;
+  primariesFolder->Add(primaries) ; 
+
+  return kTRUE;
+} 
+
+//____________________________________________________________________________ 
+
+TObject** AliEMCALGetter::PrimariesRef(void) const 
+{  
+  //------- Primaries ----------------------
+  // the hierarchy is //Folders/RunMC/Event/Data/Primaries
+
+  if ( !fPrimariesFolder ) {
+    Fatal("PrimariesRef", "-> Folder //%s not found!",fPrimariesFolder);
+  }    
+
+  TFolder * primariesFolder = dynamic_cast<TFolder *>(fPrimariesFolder->FindObject("Primaries")) ;
+
+  if ( !primariesFolder ) {
+    Fatal("PrimariesRef", "-> Folder //%s/Primaries/ not found!",fPrimariesFolder);  
+  }
+
+  TObject * p = primariesFolder->FindObject("Primaries") ;
+
+  if(!p) {
+    Fatal("PrimariesRef", "-> %s/Primaries not found !",primariesFolder->GetName()); 
+  }
+
+  return primariesFolder->GetListOfFolders()->GetObjectRef(p) ;
+}
+
+//____________________________________________________________________________ 
+
+const Bool_t AliEMCALGetter::PostHits(void) const 
+{  
+  //------- Hits ----------------------
   // the hierarchy is //Folders/RunMC/Event/Data/EMCAL/Hits
-  
+
   TFolder * emcalFolder = dynamic_cast<TFolder*>(fHitsFolder->FindObject("EMCAL")) ; 
+
   if ( !emcalFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post H -> Folder //" << fHitsFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post H -> Adding Folder //" << fHitsFolder << "/EMCAL/"  << endl;
+      Warning("PostHits", "-> Folder //%s/EMCAL/ not found!", fHitsFolder);
+      Info("PostHits", "-> Adding Folder //%s/EMCAL/",fHitsFolder);
     }
     emcalFolder = fHitsFolder->AddFolder("EMCAL", "Hits from EMCAL") ; 
   }    
+
   TClonesArray *hits=  new TClonesArray("AliEMCALHit",1000) ;
   hits->SetName("Hits") ;
   emcalFolder->Add(hits) ; 
-  
+
   return kTRUE;
 } 
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::HitsRef(void) const 
-{  //------- Hits ----------------------
 
-  
+TObject ** AliEMCALGetter::HitsRef(void) const 
+{  
+  //------- Hits ----------------------
   // the hierarchy is //Folders/RunMC/Event/Data/EMCAL/Hits
+
   if ( !fHitsFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post H -> Folder //" << fHitsFolder << " not found!" << endl;
+    Error("HitsRef", "-> Folder //%s not found!",fHitsFolder);
     return 0;
   }    
+
   TFolder * emcalFolder = dynamic_cast<TFolder *>(fHitsFolder->FindObject("EMCAL")) ;
   if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post HRef -> Folder //" << fHitsFolder << "/EMCAL/ not found!" << endl;  
+    Error("HitsRef", "-> Folder //%s/EMCAL/ not found!",fHitsFolder);
     return 0;
   }
+
   TObject * h = emcalFolder->FindObject("Hits") ;
+
   if(!h) {
-    cerr << "ERROR: AliEMCALGetter::HRef -> " << emcalFolder->GetName() << "/Hits not found !" << endl ; 
+    Error("HitsRef", "-> %s/Hits not found !",emcalFolder->GetName());
     return 0 ;
   }
   else
-    return static_cast<void *>(emcalFolder->GetListOfFolders()->GetObjectRef(h)) ;
+    return emcalFolder->GetListOfFolders()->GetObjectRef(h) ;
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostSDigits(const char * name, const char * headerFile) const 
-{  //---------- SDigits -------------------------
 
-  
+const Bool_t AliEMCALGetter::PostSDigits(const char * name, const char * headerFile) const 
+{  
+  //---------- SDigits -------------------------
   // the hierarchy is //Folders/RunMC/Event/Data/EMCAL/SDigits/headerFile/sdigitsname
   // because you can have sdigits from several hit files for mixing
-  
+
   TFolder * emcalFolder = dynamic_cast<TFolder*>(fSDigitsFolder->FindObject("EMCAL")) ;
+
   if ( !emcalFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post S -> Folder //" << fSDigitsFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post S -> Adding Folder //" << fHitsFolder << "/EMCAL/" << endl;
+      Warning("PostSDigits", "-> Folder //%s/EMCAL/ not found!", fSDigitsFolder);
+      Info("PostSDigits", "-> Adding Folder //%s/EMCAL/",fHitsFolder);
     }
     emcalFolder = fSDigitsFolder->AddFolder("EMCAL", "SDigits from EMCAL") ; 
   }    
+
   TString subdir(headerFile) ;
+  subdir.ReplaceAll("/", "_") ; 
   TFolder * emcalSubFolder = dynamic_cast<TFolder*>(emcalFolder->FindObject(subdir)) ; 
   if ( !emcalSubFolder ) 
     emcalSubFolder = emcalFolder->AddFolder(subdir, ""); 
-  
+
   TObject * sd  = emcalSubFolder->FindObject(name); 
-  if ( sd ) {
-    if (fDebug)
-      cerr <<"INFO: AliEMCALGetter::Post S -> Folder " << subdir 
-          << " already exists!" << endl ;  
-  }else{
+
+  if ( !sd ) {
     TClonesArray * sdigits = new TClonesArray("AliEMCALDigit",1) ;
     sdigits->SetName(name) ;
     emcalSubFolder->Add(sdigits) ;
   }
-  
+
   return kTRUE;
 } 
+
 //____________________________________________________________________________ 
-void * AliEMCALGetter::SDigitsRef(const char * name, const char * file) const 
-{  //------- SDigits ----------------------
-  
+
+TObject ** AliEMCALGetter::SDigitsRef(const char * name, const char * file) const 
+{  
+  //------- SDigits ----------------------
   // the hierarchy is //Folders/RunMC/Event/Data/EMCAL/SDigits/filename/SDigits
 
   if ( !fSDigitsFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post SRef -> Folder //" << fSDigitsFolder << " not found!" << endl;
-    return 0;
+    Fatal("SDigitsRef", "-> Folder //%s not found!", fSDigitsFolder);
   }    
+
   TFolder * emcalFolder = dynamic_cast<TFolder *>(fSDigitsFolder->FindObject("EMCAL")) ;
+
   if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post SRef -> Folder //" << fSDigitsFolder << "/EMCAL/ not found!" << endl;
-    return 0;
+    Fatal("SDigitsRef", "-> Folder //%s/EMCAL/ not found!", fSDigitsFolder);
   }
 
   TFolder * emcalSubFolder = 0 ;
+
   if(file)
     emcalSubFolder = dynamic_cast<TFolder *>(emcalFolder->FindObject(file)) ;
   else
     emcalSubFolder = dynamic_cast<TFolder *>(emcalFolder->FindObject(fHeaderFile)) ;
-  
+
   if(!emcalSubFolder) {
-    cerr << "ERROR: AliEMCALGetter::Post SRef -> Folder //Folders/RunMC/Event/Data/EMCAL/" << file << "not found!" << endl;
-    return 0;
+    Fatal("SDigitsRef", "-> Folder //Folders/RunMC/Event/Data/EMCAL/%s not found!", file);
   }
 
   TObject * dis = emcalSubFolder->FindObject(name) ;
-  if(!dis)
-    return 0 ;
-  else
-    return static_cast<void *>(emcalSubFolder->GetListOfFolders()->GetObjectRef(dis)) ;
 
+  if(!dis) {
+    Fatal("SDigitsRef", "-> object %s not found!", name);
+  }
+
+  return emcalSubFolder->GetListOfFolders()->GetObjectRef(dis) ;
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostSDigitizer(AliEMCALSDigitizer * sdigitizer) const 
-{  //---------- SDigitizer -------------------------
-    
-  // the hierarchy is //Folders/Tasks/SDigitizer/EMCAL/sdigitsname
 
+const Bool_t AliEMCALGetter::PostSDigitizer(AliEMCALSDigitizer * sdigitizer) const 
+{  
+  //---------- SDigitizer -------------------------
+  // the hierarchy is //Folders/Tasks/SDigitizer/EMCAL/sdigitsname
 
   TTask * sd  = dynamic_cast<TTask*>(fTasksFolder->FindObject("SDigitizer")) ; 
 
   if ( !sd ) {
-    cerr << "ERROR: AliEMCALGetter::Post Ser -> Task //" << fTasksFolder << "/SDigitizer not found!" << endl;
+    Error("PostSDigitizer", "-> Task //%s/SDigitizer not found!",fTasksFolder);
     return kFALSE ;
   }        
+
   TTask * emcal = dynamic_cast<TTask*>(sd->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Ser ->//" << fTasksFolder << "/SDigitizer/EMCAL/ not found!" << endl;  
-      cout <<"INFO: AliEMCALGetter::Post Ser -> Adding //" << fTasksFolder << "/SDigitizer/EMCAL/" << endl;
+      Warning("PostSDigitizer", "->//%s/SDigitizer/EMCAL/ not found!",fTasksFolder);
+      Info("PostSDigitizer", "-> Adding //%s/SDigitizer/EMCAL/", fTasksFolder);
     }
     emcal = new TTask("EMCAL", "") ; 
     sd->Add(emcal) ; 
   } 
+
   AliEMCALSDigitizer * emcalsd  = dynamic_cast<AliEMCALSDigitizer *>(emcal->GetListOfTasks()->FindObject( sdigitizer->GetName() )); 
+
   if (emcalsd) { 
     if (fDebug)
-      cout << "INFO: AliEMCALGetter::Post Ser -> Task " << sdigitizer->GetName() << " already exists" << endl ; 
+      Info("PostSDigitizer", "-> Task %s already exists",sdigitizer->GetName());
     emcal->GetListOfTasks()->Remove(emcalsd) ;
   }
+
   emcal->Add(sdigitizer) ;     
+
   return kTRUE; 
-  
 }
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::SDigitizerRef(const char * name) const 
-{  
 
+TObject ** AliEMCALGetter::SDigitizerRef(const char * name) const 
+{  
   TTask * sd  = dynamic_cast<TTask*>(fTasksFolder->FindObject("SDigitizer")) ; 
+
   if ( !sd ) {
-    cerr << "ERROR: AliEMCALGetter::Post SerRef -> Task //" << fTasksFolder << "/SDigitizer not found!" << endl;
-    abort();
+    Fatal("SDigitizerRef", "-> Task //%s/SDigitizer not found!", fTasksFolder);
   }        
 
   TTask * emcal = dynamic_cast<TTask*>(sd->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
-    cerr <<"ERROR: AliEMCALGetter::Post SerRef ->  //" << fTasksFolder << "/SDigitizer/EMCAL not found!" << endl;
-    abort();
+    Fatal("SDigitizerRef", "->  //%s/SDigitizer/EMCAL not found!", fTasksFolder);
   }        
 
   TTask * task = dynamic_cast<TTask*>(emcal->GetListOfTasks()->FindObject(name)) ; 
 
-  return static_cast<void *>(emcal->GetListOfTasks()->GetObjectRef(task)) ;
-
+  return emcal->GetListOfTasks()->GetObjectRef(task) ;
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostSDigitizer(const char * name, const char * file) const 
-{  //---------- SDigitizer -------------------------
-  
- // the hierarchy is //Folders/Tasks/SDigitizer/EMCAL/sdigitsname
 
+const Bool_t AliEMCALGetter::PostSDigitizer(const char * name, const char * file) const 
+{  
+  //---------- SDigitizer -------------------------
+  // the hierarchy is //Folders/Tasks/SDigitizer/EMCAL/sdigitsname
 
   TTask * sd  = dynamic_cast<TTask*>(fTasksFolder->FindObject("SDigitizer")) ; 
+
   if ( !sd ) {
-    cerr << "ERROR: AliEMCALGetter::Post Ser -> Task //" << fTasksFolder << "/SDigitizer not found!" << endl;
+    Error("PostSDigitizer", "-> Task //%s/SDigitizer not found!", fTasksFolder);
     return kFALSE ;
   }        
 
   TTask * emcal = dynamic_cast<TTask*>(sd->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Ser ->  //" << fTasksFolder << "/SDigitizer/EMCAL/ not found!" << endl;
-      cout <<"INFO: AliEMCALGetter::Post Ser -> Adding  //" << fTasksFolder << "/SDigitizer/EMCAL" << endl;
+      Warning("PostSDigitizer", "->  //%s/SDigitizer/EMCAL/ not found!", fTasksFolder);
+
+      Info("PostSDigitizer", "-> Adding  //%s/SDigitizer/EMCAL", fTasksFolder);
+
     }
     emcal = new TTask("EMCAL", "") ; 
     sd->Add(emcal) ; 
@@ -400,304 +755,390 @@ Bool_t AliEMCALGetter::PostSDigitizer(const char * name, const char * file) cons
   TString sdname(name) ;
   sdname.Append(":") ;
   sdname.Append(file);
+  sdname.ReplaceAll("/","_") ; 
   AliEMCALSDigitizer * emcalsd  = dynamic_cast<AliEMCALSDigitizer *>(emcal->GetListOfTasks()->FindObject( sdname )); 
+
   if (!emcalsd) {
     emcalsd = new AliEMCALSDigitizer() ;  
-    //Note, we can not call constructor with parameters: it will call Getter and scrud up everething
+
+    //Note, we can not call constructor with parameters: it will call Getter and screw up everething
+
     emcalsd->SetName(sdname) ;
     emcalsd->SetTitle(file) ;
     emcal->Add(emcalsd) ;      
   }
+
   return kTRUE; 
-  
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostDigits(const char * name) const 
-{  //---------- Digits -------------------------
 
+const Bool_t AliEMCALGetter::PostDigits(const char * name) const 
+{  
+  //---------- Digits -------------------------
   // the hierarchy is //Folders/Run/Event/Data/EMCAL/SDigits/name
 
   TFolder * emcalFolder  = dynamic_cast<TFolder*>(fDigitsFolder->FindObject("EMCAL")) ;
 
   if ( !emcalFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post D -> Folder //" << fDigitsFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post D -> Adding Folder //" << fDigitsFolder << "/EMCAL/" << endl;
+      Warning("PostDigits", "-> Folder //%s/EMCAL/ not found!", fDigitsFolder);
+      Info("PostDigits", "-> Adding Folder //%s/EMCAL/", fDigitsFolder);
     }
     emcalFolder = fDigitsFolder->AddFolder("EMCAL", "Digits from EMCAL") ;  
   }    
+
   TObject*  dig = emcalFolder->FindObject( name ) ;
+
   if ( !dig ) {
     TClonesArray * digits = new TClonesArray("AliEMCALDigit",1000) ;
     digits->SetName(name) ;
     emcalFolder->Add(digits) ;  
   }
+
   return kTRUE; 
 }
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::DigitsRef(const char * name) const 
-{ //------- Digits ----------------------
-  
+
+TObject ** AliEMCALGetter::DigitsRef(const char * name) const 
+{ 
+  //------- Digits ----------------------
   // the hierarchy is //Folders/Run/Event/Data/EMCAL/Digits/name
 
   if ( !fDigitsFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post DRef -> Folder //" << fDigitsFolder << " not found!" << endl;
-    return 0;
+    Fatal("DigitsRef", "-> Folder //%s not found!", fDigitsFolder);
   }    
-  
+
   TFolder * emcalFolder  = dynamic_cast<TFolder*>(fDigitsFolder->FindObject("EMCAL")) ; 
+
   if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::DRef -> Folder //" << fDigitsFolder << "/EMCAL/ not found!" << endl;
-    return 0;
+    Fatal("DigitsRef", "-> Folder //%s/EMCAL/ not found!", fDigitsFolder);
   }    
 
   TObject * d = emcalFolder->FindObject(name) ;
-  if(!d)
-    return 0 ;
-  else
-    return static_cast<void *>(emcalFolder->GetListOfFolders()->GetObjectRef(d)) ;
 
+  if(!d) {
+    Fatal("DigitsRef", "-> object %s not found!", name);
+  }   
+
+  return emcalFolder->GetListOfFolders()->GetObjectRef(d) ;
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostDigitizer(AliEMCALDigitizer * digitizer) const 
-{  //---------- Digitizer -------------------------
-  
-  TTask * sd  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Digitizer")) ; 
+
+const Bool_t AliEMCALGetter::PostDigitizer(AliEMCALDigitizer * digitizer) const
+{  
+  //---------- Digitizer -------------------------
+
+  TTask * sd  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Digitizer")) ; 
 
   if ( !sd ) {
-    cerr << "ERROR: AliEMCALGetter::Post Der -> Task //" << fTasksFolder << "/Digitizer not found!" << endl;
+    Error("PostDigitizer", "-> Task //%s/Digitizer not found!", fTasksFolder);
     return kFALSE ;
   }        
+
   TTask * emcal = dynamic_cast<TTask*>(sd->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Der ->  //" << fTasksFolder << "/Digitizer/EMCAL not found!" << endl;
-      cout <<"INFO: AliEMCALGetter::Post Der -> Adding //" << fTasksFolder << "/Digitizer/EMCAL" << endl; 
+      Warning("PostDigitizer", "->  //%s/Digitizer/EMCAL not found!", fTasksFolder);
+      Info("PostDigitizer", "-> Adding //%s/Digitizer/EMCAL", fTasksFolder);
     }
     emcal = new TTask("EMCAL", "") ; 
     sd->Add(emcal) ; 
   } 
 
     AliEMCALDigitizer * emcald = dynamic_cast<AliEMCALDigitizer*>(emcal->GetListOfTasks()->FindObject(digitizer->GetName())) ; 
+
     if (emcald) { 
       emcald->Delete() ;
       emcal->GetListOfTasks()->Remove(emcald) ;
     }
+
     emcal->Add(digitizer) ; 
+
     return kTRUE; 
 }  
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostDigitizer(const char * name) const 
-{  //---------- Digitizer -------------------------
-  
- // the hierarchy is //Folders/Tasks/SDigitizer/EMCAL/sdigitsname
+
+const Bool_t AliEMCALGetter::PostDigitizer(const char * name) const 
+{  
+  //---------- Digitizer -------------------------
+  // the hierarchy is //Folders/Tasks/SDigitizer/EMCAL/sdigitsname
 
   TTask * d  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Digitizer")) ; 
+
   if ( !d ) {
-    cerr << "ERROR: AliEMCALGetter::Post Der -> Task //" << fTasksFolder << "/Digitizer not found!" << endl;
+
+    Error("PostDigitizer", "-> Task //%s/Digitizer not found!", fTasksFolder);
     return kFALSE ;
   }        
 
   TTask * emcal = dynamic_cast<TTask*>(d->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Der -> //" << fTasksFolder << "/Digitizer/EMCAL not found!" << endl; 
-      cout <<"INFO: AliEMCALGetter::Post Der -> Adding //" << fTasksFolder << "/Digitizer/EMCAL" << endl;
+      Warning("PostDigitizer", "-> //%s/Digitizer/EMCAL not found!", fTasksFolder);
+
+      Info("PostDigitizer", "-> Adding //%s/Digitizer/EMCAL", fTasksFolder);
     }
     emcal = new TTask("EMCAL", "") ; 
     d->Add(emcal) ; 
 } 
 
   AliEMCALDigitizer * emcald = dynamic_cast<AliEMCALDigitizer*>(emcal->GetListOfTasks()->FindObject(name)) ; 
+
   if (!emcald) { 
     emcald = new AliEMCALDigitizer() ;
     emcald->SetName(fDigitsTitle) ;
     emcald->SetTitle(fHeaderFile) ;
     emcal->Add(emcald) ;
   }
+
   return kTRUE;  
 }
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::DigitizerRef(const char * name) const 
+
+TObject ** AliEMCALGetter::DigitizerRef(const char * name) const 
 {  
+
   TTask * sd  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Digitizer")) ; 
+
   if ( !sd ) {
-    cerr << "ERROR: AliEMCALGetter::Post DerRef -> Task //" << fTasksFolder << "/Digitizer not found!" << endl;
-    abort();
+    Fatal("DigitizerRef", "-> Task //%s/Digitizer not found!", fTasksFolder->GetName());
   }        
 
   TTask * emcal = dynamic_cast<TTask*>(sd->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
-    cerr <<"ERROR: AliEMCALGetter::Post DerRef ->  //" << fTasksFolder << "/Digitizer/EMCAL" << endl;
-    abort();
+    Fatal("DigitizerRef", "->  //%s/Digitizer/EMCAL", fTasksFolder->GetName());
   }        
 
   TTask * task = dynamic_cast<TTask*>(emcal->GetListOfTasks()->FindObject(name)) ; 
 
-  return static_cast<void *>(emcal->GetListOfTasks()->GetObjectRef(task)) ;
-
+  return emcal->GetListOfTasks()->GetObjectRef(task) ;
 }
+
 //____________________________________________________________________________ 
-/*
-Bool_t AliEMCALGetter::PostRecPoints(const char * name) const 
-{ // -------------- RecPoints -------------------------------------------
-  
-  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/EMCARecPoints/name
-  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/CPVRecPoints/name
+
+const Bool_t AliEMCALGetter::PostRecPoints(const char * name) const 
+{ 
+  // -------------- RecPoints -------------------------------------------
+  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/TowerRecPoints/name
+  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/PreShowerRecPoints/name
 
   TFolder * emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL")) ; 
-  
+
   if ( !emcalFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post RPo -> Folder //" << fRecoFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post Rpo -> Adding Folder //" << fRecoFolder << "/EMCAL/" << endl;
+      Warning("PostRecPoints", "-> Folder //%s/EMCAL/ not found!", fRecoFolder);
+      Info("PostRecPoints", "-> Adding Folder //%s/EMCAL/", fRecoFolder);
     }
     emcalFolder = fRecoFolder->AddFolder("EMCAL", "Reconstructed data from EMCAL") ;  
   }    
-  
-  // EMCA RecPoints 
-  TFolder * emcalRPoEMCAFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("EMCARecPoints")) ;
-  if ( !emcalRPoEMCAFolder ) {
+
+  // Pre Shower RecPoints 
+
+  TFolder * emcalRPoPREFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("PRERecPoints")) ;
+
+  if ( !emcalRPoPREFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post RPo -> Folder //" << fRecoFolder << "/EMCAL/EMCARecPoints/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post Rpo -> Adding Folder //" << fRecoFolder << "/EMCAL/EMCARecPoints not found!" << endl;
+      Warning("PostRecPoints", "-> Folder //%s/EMCAL/PRERecPoints/ not found!", fRecoFolder);
+      Info("PostRecPoints", "-> Adding Folder //%s/EMCAL/PRERecPoints/", fRecoFolder);
     }
-    emcalRPoEMCAFolder = emcalFolder->AddFolder("EMCARecPoints", "EMCA RecPoints from EMCAL") ;  
+    emcalRPoPREFolder = emcalFolder->AddFolder("PRERecPoints", "PRE RecPoints from EMCAL") ;  
   }    
-  
-  TObject * erp = emcalFolder->FindObject( name ) ;
-  if ( !erp )   {
-    TObjArray * emcrp = new TObjArray(100) ;
-    emcrp->SetName(name) ;
-    emcalRPoEMCAFolder->Add(emcrp) ;  
+
+  TObject * rpPRE =  emcalRPoPREFolder->FindObject( name ) ;
+
+  if ( !rpPRE )   {
+    TObjArray * aPRErp = new TObjArray(100) ;
+    aPRErp->SetName(name) ;
+    emcalRPoPREFolder->Add(aPRErp) ;  
   }
 
-  // CPV RecPoints 
-  TFolder * emcalRPoCPVFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("CPVRecPoints")) ;
-  if ( !emcalRPoCPVFolder ) {
+ // EC RecPoints 
+
+  TFolder * emcalRPoECFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("ECRecPoints")) ;
+
+  if ( !emcalRPoECFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post RPo -> Folder //" << fRecoFolder << "/EMCAL/CPVRecPoints/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post Rpo -> Adding Folder //" << fRecoFolder << "/EMCAL/CPVRecPoints/" << endl;
+
+      Warning("PostRecPoints", "-> Folder //%s/EMCAL/ECRecPoints/ not found!", fRecoFolder);
+      Info("PostRecPoints", "-> Adding Folder //%s/EMCAL/ECRecPoints not found!", fRecoFolder);
     }
-    emcalRPoCPVFolder = emcalFolder->AddFolder("CPVRecPoints", "CPV RecPoints from EMCAL") ;  
+    emcalRPoECFolder = emcalFolder->AddFolder("ECRecPoints", "EC RecPoints from EMCAL") ;  
   }    
-  
-  TObject * crp =  emcalRPoCPVFolder->FindObject( name ) ;
-  if ( !crp )   {
-    TObjArray * cpvrp = new TObjArray(100) ;
-    cpvrp->SetName(name) ;
-    emcalRPoCPVFolder->Add(cpvrp) ;  
+
+  TObject * rpEC = emcalFolder->FindObject( name ) ;
+
+  if ( !rpEC )   {
+    TObjArray * aECrp = new TObjArray(100) ;
+    aECrp->SetName(name) ;
+    emcalRPoECFolder->Add(aECrp) ;  
+  }
+
+ // HC RecPoints 
+
+  TFolder * emcalRPoHCFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("HCRecPoints")) ;
+
+  if ( !emcalRPoHCFolder ) {
+    if (fDebug) {
+
+      Warning("PostRecPoints", "-> Folder //%s/EMCAL/HCRecPoints/ not found!", fRecoFolder);
+      Info("PostRecPoints", "-> Adding Folder //%s/EMCAL/HCRecPoints not found!", fRecoFolder);
+    }
+    emcalRPoHCFolder = emcalFolder->AddFolder("HCRecPoints", "HC RecPoints from EMCAL") ;  
+  }    
+
+  TObject * rpHC = emcalFolder->FindObject( name ) ;
+
+  if ( !rpHC )   {
+    TObjArray * aHCrp = new TObjArray(100) ;
+    aHCrp->SetName(name) ;
+    emcalRPoHCFolder->Add(aHCrp) ;  
   }
+
   return kTRUE; 
 }
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::EmcRecPointsRef(const char * name) const 
-{ // -------------- RecPoints -------------------------------------------
-  
-  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/EMCARecPoints/name
-   
+
+TObject ** AliEMCALGetter::ECRecPointsRef(const char * name) const 
+{ 
+  // -------------- RecPoints -------------------------------------------
+  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/ECRecPoints/name
+
   if ( !fRecoFolder ) {
-    cerr << "ERROR: AliEMCALGetter::EmcRecPointsRef -> Folder //" << fRecoFolder << " not found!" << endl;
-    return 0 ; 
+    Fatal("ECRecPointsRef", "-> Folder //%s not found!", fRecoFolder);
   }    
 
-  TFolder * emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/EMCARecPoints")) ; 
-  if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::EmcRecPointsRef -> Folder //" << fRecoFolder << "/EMCAL/EMCARecPoints/ not found!" << endl;
-    return 0;
+  TFolder * towerFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/ECRecPoints")) ; 
+
+  if ( !towerFolder ) {
+    Fatal("ECRecPointsRef", "-> Folder //%s/EMCAL/ECRecPoints/ not found!", fRecoFolder);
   }    
 
+  TObject * trp = towerFolder->FindObject(name ) ;
 
-  TObject * erp = emcalFolder->FindObject(name ) ;
-  if ( !erp )   {
-    return 0 ;
+  if ( !trp )   {
+    Fatal("ECRecPointsRef", "-> Object %s not found!", name);
   }
-  return static_cast<void *>(emcalFolder->GetListOfFolders()->GetObjectRef(erp)) ;
 
+  return towerFolder->GetListOfFolders()->GetObjectRef(trp) ;
 } 
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::CpvRecPointsRef(const char * name) const 
-{ // -------------- RecPoints -------------------------------------------
-  
-  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/CPVRecPoints/name
-   
+
+TObject ** AliEMCALGetter::HCRecPointsRef(const char * name) const 
+{ 
+  // -------------- RecPoints -------------------------------------------
+  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/HCRecPoints/name
+
   if ( !fRecoFolder ) {
-    cerr << "ERROR: AliEMCALGetter::EmcRecPointsRef -> Folder //" << fRecoFolder << " not found!" << endl;
-    return 0 ; 
+    Fatal("HCRecPointsRef", "-> Folder //%s not found!", fRecoFolder);
   }    
 
-  TFolder * emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/CPVRecPoints")) ; 
-  if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::CpvRecPointsRef -> Folder //" << fRecoFolder << "/EMCAL/CPVRecPoints/" << endl;
-    return 0;
+  TFolder * towerFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/HCRecPoints")) ; 
+
+  if ( !towerFolder ) {
+    Fatal("HCRecPointsRef", "-> Folder //%s/EMCAL/HCRecPoints/ not found!", fRecoFolder);
   }    
 
-  TObject * crp = emcalFolder->FindObject(name ) ;
-  if ( !crp )   {
-    return 0 ;
+  TObject * trp = towerFolder->FindObject(name ) ;
+
+  if ( !trp )   {
+    Fatal("HCRecPointsRef", "-> Object %s not found!", name);
   }
-  return static_cast<void *>(emcalFolder->GetListOfFolders()->GetObjectRef(crp)) ;
 
+  return towerFolder->GetListOfFolders()->GetObjectRef(trp) ;
 } 
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostClusterizer(AliEMCALClusterizer * clu) const 
-{ // ------------------ AliEMCALClusterizer ------------------------
-  
+
+TObject ** AliEMCALGetter::PRERecPointsRef(const char * name) const 
+{ 
+  // -------------- RecPoints -------------------------------------------
+  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/PRERecPoints/name
+
+  if ( !fRecoFolder ) {
+    Fatal("PRERecPointsRef", "-> Folder //%s not found!", fRecoFolder);
+  }    
+
+  TFolder * folderPRE  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/PRERecPoints")) ; 
+
+  if ( !folderPRE ) {
+    Fatal("PRERecPointsRef", "-> Folder //%s/EMCAL/PRERecPoints/", fRecoFolder);
+  }    
+
+
+
+  TObject * prp = folderPRE->FindObject(name ) ;
+
+  if ( !prp )   {
+    Fatal("PRERecPointsRef", "-> Object %s not found!", name);
+  }
+
+  return folderPRE->GetListOfFolders()->GetObjectRef(prp) ;
+} 
+
+//____________________________________________________________________________ 
+
+const Bool_t AliEMCALGetter::PostClusterizer(AliEMCALClusterizer * clu) const 
+{ 
+  // ------------------ AliEMCALClusterizer ------------------------
   // the hierarchy is //Folders/Tasks/Reconstructioner/EMCAL/sdigitsname
 
   TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
 
   if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post Rer -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
+    Error("PostClusterizer", "-> Task //%s/Reconstructioner not found!", fTasksFolder);
     return kFALSE ;
   }        
-        
+
   TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Rer -> //" << fTasksFolder << "/ReconstructionerEMCAL not found!" << endl; 
-      cout <<"INFO: AliEMCALGetter::Post Rer -> Adding //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl; 
+      Warning("PostClusterizer", "-> //%s/ReconstructionerEMCAL not found!", fTasksFolder);
+      Info("PostClusterizer", "-> Adding //%s/Reconstructioner/EMCAL", fTasksFolder);
     }
     emcal = new TTask("EMCAL", "") ; 
     tasks->Add(emcal) ; 
   } 
 
-  AliEMCALClusterizer * emcalcl = dynamic_cast<AliEMCALClusterizer*>(emcal->GetListOfTasks()->FindObject(clu->GetName())) ; 
+  AliEMCALClusterizerv1 * emcalcl = dynamic_cast<AliEMCALClusterizerv1*>(emcal->GetListOfTasks()->FindObject(clu->GetName())) ; 
+
   if (emcalcl) { 
     if (fDebug)
-      cout << "INFO: AliEMCALGetter::Post Rer -> Task " << clu->GetName() << " already exists" << endl ; 
+      Info("PostClusterizer", "-> Task %s already exists", clu->GetName());
     emcalcl->Delete() ; 
     emcal->GetListOfTasks()->Remove(emcalcl) ;
   }
   emcal->Add(clu) ;      
+
   return kTRUE; 
 } 
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::ClusterizerRef(const char * name) const 
-{ // ------------------ AliEMCALClusterizer ------------------------
-  
+
+TObject ** AliEMCALGetter::ClusterizerRef(const char * name) const 
+{ 
+  // ------------------ AliEMCALClusterizer ------------------------
+
   TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
 
   if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post RerRef -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
-    return kFALSE ;
+    Fatal("ClusterizerRef", "-> Task //%s/Reconstructioner not found!", fTasksFolder->GetName());
   }        
-        
+
   TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
-    cerr <<"WARNING: AliEMCALGetter::Post RerRef -> //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl; 
-    return 0 ; 
+    Fatal("ClusterizerRef", "-> //%s/Reconstructioner/EMCAL", fTasksFolder->GetName());
   }   
 
   TList * l = emcal->GetListOfTasks() ; 
@@ -706,6 +1147,7 @@ void * AliEMCALGetter::ClusterizerRef(const char * name) const
   TTask * clu = 0 ;
   TString cluname(name) ;
   cluname+=":clu-" ;
+
   while((task = static_cast<TTask *>(it.Next()) )){
     TString taskname(task->GetName()) ;
     if(taskname.BeginsWith(cluname)){
@@ -714,46 +1156,64 @@ void * AliEMCALGetter::ClusterizerRef(const char * name) const
     }
   }
 
-  if(clu) 
-    return static_cast<void *>(l->GetObjectRef(clu)) ;
-  else
-    return 0 ;
+  if(!clu) {
+    Fatal("ClusterizerRef", "-> task %s not found!", task->GetName());
+  }
+
+  return l->GetObjectRef(clu) ;
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostClusterizer(const char * name) const 
-{ // ------------------ AliEMCALClusterizer ------------------------
 
+const Bool_t AliEMCALGetter::PostClusterizer(const char * name) const 
+{ 
+  // ------------------ AliEMCALClusterizer ------------------------
   // the hierarchy is //Folders/Tasks/Reconstructioner/EMCAL/sdigitsname
   
+
   TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
 
   if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post Rer -> Task//" << fTasksFolder << "/Reconstructioner not found!" << endl; 
+    Error("PostClusterizer", "-> Task //%s/Reconstructioner not found!", fTasksFolder->GetName());
     return kFALSE ;
   }        
-  
+
   TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Rer -> //" << fTasksFolder << "/Reconstructioner/EMCAL not found!" << endl;
-      cout <<"INFO: AliEMCALGetter::Post Rer -> Adding //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl;
+      Warning("PostClusterizer", "-> //%s/Reconstructioner/EMCAL not found!", fTasksFolder);
+      Info("PostClusterizer", "-> Adding //%s/Reconstructioner/EMCAL", fTasksFolder);
     }
     emcal = new TTask("EMCAL", "") ; 
     tasks->Add(emcal) ; 
   } 
 
-  AliEMCALClusterizer * emcalcl = new AliEMCALClusterizerv1() ;
+  TList * l = emcal->GetListOfTasks() ;   
+  TIter it(l) ;
   TString clun(name) ;
-  clun+=":clu-v1" ;
+  clun+=":clu" ; 
+  TTask * task ;
+
+  while((task = static_cast<TTask *>(it.Next()) )){
+    TString taskname(task->GetName()) ;
+
+    if(taskname.BeginsWith(clun))
+      return kTRUE ;
+  }
+
+  AliEMCALClusterizerv1 * emcalcl = new AliEMCALClusterizerv1() ;
+
+  clun+="-v1" ; 
   emcalcl->SetName(clun) ;
+  emcalcl->SetTitle(fHeaderFile) ; 
   emcal->Add(emcalcl) ;
+
   return kTRUE; 
-  
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostTrackSegments(const char * name) const 
+const Bool_t AliEMCALGetter::PostTrackSegments(const char * name) const 
 { // ---------------TrackSegments -----------------------------------
   
   // the hierarchy is //Folders/Run/Event/RecData/EMCAL/TrackSegments/name
@@ -762,8 +1222,8 @@ Bool_t AliEMCALGetter::PostTrackSegments(const char * name) const
   
   if ( !emcalFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post TS -> Folder //" << fRecoFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post TS -> Adding Folder //" << fRecoFolder << "/EMCAL" << endl;
+      Warning("PostTrackSegments", "-> Folder //%s/EMCAL/ not found", fRecoFolder->GetName()) ;
+      Info("PostTrackSegments", "-> Adding Folder //%s/EMCAL", fRecoFolder->GetName()) ;
     }
     emcalFolder = fRecoFolder->AddFolder("EMCAL", "Reconstructed data from EMCAL") ;  
   }    
@@ -771,8 +1231,8 @@ Bool_t AliEMCALGetter::PostTrackSegments(const char * name) const
   TFolder * emcalTSFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("TrackSegments")) ;
   if ( !emcalTSFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post TS -> Folder//" << fRecoFolder << "/EMCAL/TrackSegments/ not found!" << endl
-      cout << "INFO:    AliEMCALGetter::Post TS -> Adding Folder //" << fRecoFolder << "/EMCAL/TrackSegments/" << endl
+      Warning("PostTrackSegments", "-> Folder //%s/EMCAL/TrackSegments/ not found!", fRecoFolder->GetName() ) 
+      Info("PostTrackSegments", "-> Adding Folder //%s/EMCAL/TrackSegments/", fRecoFolder->GetName()) 
     }
     emcalTSFolder = emcalFolder->AddFolder("TrackSegments", "TrackSegments from EMCAL") ;  
   }    
@@ -787,31 +1247,29 @@ Bool_t AliEMCALGetter::PostTrackSegments(const char * name) const
 } 
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::TrackSegmentsRef(const char * name) const 
+TObject** AliEMCALGetter::TrackSegmentsRef(const char * name) const 
 { // ---------------TrackSegments -----------------------------------
   
   // the hierarchy is //Folders/Run/Event/RecData/EMCAL/TrackSegments/name
 
  if ( !fRecoFolder ) {
-    cerr << "ERROR: AliEMCALGetter::TrackSegmentsRef -> Folder //" << fRecoFolder << "not found!" << endl;
-    return 0 ; 
+    Fatal("TrackSegmentsRef", "Folder //%s not found !", fRecoFolder->GetName() ) ;
   }    
 
   TFolder * emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/TrackSegments")) ; 
   if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::TrackSegmentsRef -> Folder //" << fRecoFolder << "/EMCAL/TrackSegments/ not found!" << endl;
-    return 0;
+    Fatal("TrackSegmentsRef", "Folder //%s/EMCAL/TrackSegments/ not found !", fRecoFolder->GetName() ) ;
   }    
   
   TObject * tss =  emcalFolder->FindObject(name) ;
   if (!tss) {
-    return 0 ;  
+    Fatal("TrackSegmentsRef", "object %s not found !", name) ;  
   }
-  return static_cast<void *>(emcalFolder->GetListOfFolders()->GetObjectRef(tss)) ;
+  return emcalFolder->GetListOfFolders()->GetObjectRef(tss) ;
 } 
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostTrackSegmentMaker(AliEMCALTrackSegmentMaker * tsmaker) const 
+const Bool_t AliEMCALGetter::PostTrackSegmentMaker(AliEMCALTrackSegmentMaker * tsmaker) const 
 { //------------Track Segment Maker ------------------------------
   
   // the hierarchy is //Folders/Tasks/Reconstructioner/EMCAL/sdigitsname
@@ -819,15 +1277,15 @@ Bool_t AliEMCALGetter::PostTrackSegmentMaker(AliEMCALTrackSegmentMaker * tsmaker
   TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
 
   if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post Ter -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
+    Error("PostTrackSegmentMaker", "Task //%s/Reconstructioner not found !", fTasksFolder) ;
     return kFALSE ;
   }        
         
   TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Rer -> //" << fTasksFolder << "/Reconstructioner/EMCAL not found!" << endl
-      cout <<"INFO: AliEMCALGetter::Post Rer -> Adding //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl;
+      Warning("PostTrackSegmentMaker", "//%s/Reconstructioner/EMCAL not found!", fTasksFolder) 
+      Info("PostTrackSegmentMaker", "Adding //%s/Reconstructioner/EMCAL", fTasksFolder) ;
     }
     emcal = new TTask("EMCAL", "") ; 
     tasks->Add(emcal) ; 
@@ -844,57 +1302,61 @@ Bool_t AliEMCALGetter::PostTrackSegmentMaker(AliEMCALTrackSegmentMaker * tsmaker
   
 } 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostTrackSegmentMaker(const char * name) const 
+const Bool_t AliEMCALGetter::PostTrackSegmentMaker(const char * name) const 
 { //------------Track Segment Maker ------------------------------
   
   // the hierarchy is //Folders/Tasks/Reconstructioner/EMCAL/sdigitsname
   
-  
   TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
   
   if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post Ter -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
+    Error("PostTrackSegmentMaker", "Task //%s/Reconstructioner not found !", fTasksFolder->GetName() ) ;
     return kFALSE ;
   }        
   
   TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
   if ( !emcal )  {
     if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Rer -> //" << fTasksFolder << "/Reconstructioner/EMCAL not found!" << endl
-      cout <<"INFO: AliEMCALGetter::Post Rer -> Adding //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl;
+      Warning("PostTrackSegmentMaker", "//%s/Reconstructioner/EMCAL not found!", fTasksFolder->GetName() ) 
+      Info("PostTrackSegmentMaker", "Adding //%s/Reconstructioner/EMCAL", fTasksFolder->GetName()) ;
     }
     emcal = new TTask("EMCAL", "") ; 
     tasks->Add(emcal) ; 
   } 
 
-  AliEMCALTrackSegmentMaker * emcalts = 
-    dynamic_cast<AliEMCALTrackSegmentMaker*>(emcal->GetListOfTasks()->FindObject(name)) ; 
-  if (!emcalts) { 
-    emcalts = new AliEMCALTrackSegmentMakerv1() ;
-    TString tsn(name);
-    tsn+=":tsm-v1" ;
-    emcalts->SetName(tsn) ;
-    emcal->Add(emcalts) ;      
+  TList * l = emcal->GetListOfTasks() ;   
+  TIter it(l) ;
+  TString tsn(name);
+  tsn+=":tsm" ; 
+  TTask * task ;
+  while((task = static_cast<TTask *>(it.Next()) )){
+    TString taskname(task->GetName()) ;
+    if(taskname.BeginsWith(tsn))
+      return kTRUE ;
   }
+  
+  AliEMCALTrackSegmentMakerv1 * emcalts = new AliEMCALTrackSegmentMakerv1() ;
+  tsn+="-v1" ;
+  emcalts->SetName(tsn) ;
+  emcalts->SetTitle(fHeaderFile) ;
+  emcal->Add(emcalts) ;      
   return kTRUE; 
   
 } 
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::TSMakerRef(const char * name) const 
+TObject** AliEMCALGetter::TSMakerRef(const char * name) const 
 { //------------Track Segment Maker ------------------------------
   
   TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
 
   if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post TerRef -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
-    return kFALSE ;
+    Fatal("TSMakerRef", "Task //%s/Reconstructioner not found !", fTasksFolder->GetName() ) ;
   }        
         
   TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
   if ( !emcal )  {
-    cerr <<"WARNING: AliEMCALGetter::Post TerRef -> //" << fTasksFolder << "/Reconstructioner/EMCAL not found!" << endl; 
-    return 0 ; 
+    Fatal("TSMakerRef", "//%s/Reconstructioner/EMCAL not found !", fTasksFolder->GetName() ) ; 
   }   
 
   TList * l = emcal->GetListOfTasks() ; 
@@ -902,7 +1364,7 @@ void * AliEMCALGetter::TSMakerRef(const char * name) const
   TTask * task ;
   TTask * tsm = 0 ;
   TString tsmname(name) ;
-  tsmname+=":tsm-" ;
+  tsmname+=":tsm" ;
   while((task = static_cast<TTask *>(it.Next()) )){
     TString taskname(task->GetName()) ;
     if(taskname.BeginsWith(tsmname)){
@@ -911,260 +1373,250 @@ void * AliEMCALGetter::TSMakerRef(const char * name) const
     }
   }
   
-  if(tsm) 
-    return static_cast<void *>(l->GetObjectRef(tsm)) ;
-  else
-    return 0 ;
-  
+  if(!tsm) {
+   Fatal("TSMakerRef", "Task //%s/Reconstructioner/EMCAL/TrackSegmentMarker/%s not found !", fTasksFolder->GetName(),  name) ;
+  }
+  return l->GetObjectRef(tsm) ;
+
 } 
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostRecParticles(const char * name) const 
+const Bool_t AliEMCALGetter::PostRecParticles(const char * name) const 
 {  // -------------------- RecParticles ------------------------
   
-  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/TrackSegments/name
+  // the hierarchy is //Folders/Run/Event/RecData/EMCAL/RecParticles/name
 
-  TFolder * emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL")) ; 
+  TFolder * phosFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL")) ; 
   
-  if ( !emcalFolder ) {
+  if ( !phosFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post RPa -> Folder //" << fRecoFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post Rpa -> Adding Folder //" << fRecoFolder << "/EMCAL/" << endl;
+      Warning("PostRecParticles", "-> Folder //%s/EMCAL/ not found!", fRecoFolder->GetName()) ;
+      Info("PostRecParticles", "-> Adding Folder //%s/EMCAL/", fRecoFolder->GetName()) ;
     }
-    emcalFolder = fRecoFolder->AddFolder("EMCAL", "Reconstructed data from EMCAL") ;  
+    phosFolder = fRecoFolder->AddFolder("EMCAL", "Reconstructed data from EMCAL") ;  
   }    
 
- TFolder * emcalRPaFolder  = dynamic_cast<TFolder*>(emcalFolder->FindObject("RecParticles")) ;
-  if ( !emcalRPaFolder ) {
+ TFolder * phosRPaFolder  = dynamic_cast<TFolder*>(phosFolder->FindObject("RecParticles")) ;
+  if ( !phosRPaFolder ) {
     if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post RPa -> Folder //" << fRecoFolder << "/EMCAL/RecParticles/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post RPa -> Adding Folder //" << fRecoFolder << "/EMCAL/RecParticles/" << endl;
+      Warning("PostRecParticles", "-> Folder //%s/EMCAL/RecParticles/ not found!", fRecoFolder->GetName()) ;
+      Info("PostRecParticles", "-> Adding Folder //%s/EMCAL/RecParticles/", fRecoFolder->GetName()) ;
     }
-    emcalRPaFolder = emcalFolder->AddFolder("RecParticles", "RecParticles from EMCAL") ;  
+    phosRPaFolder = phosFolder->AddFolder("RecParticles", "RecParticles from EMCAL") ;  
   } 
 
-  TObject * rps = emcalRPaFolder->FindObject( name )  ;
+  TObject * rps = phosRPaFolder->FindObject( name )  ;
   if ( !rps ) {
     TClonesArray * rp = new TClonesArray("AliEMCALRecParticle",100) ;
     rp->SetName(name) ;    
-    emcalRPaFolder->Add(rp) ;  
+    phosRPaFolder->Add(rp) ;  
   }
   return kTRUE; 
 } 
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::RecParticlesRef(const char * name) const 
-{ // ---------------TrackSegments -----------------------------------
+TObject** AliEMCALGetter::RecParticlesRef(const char * name) const 
+{ // ---------------RecParticles -----------------------------------
   
   // the hierarchy is //Folders/Run/Event/RecData/EMCAL/TrackSegments/name
 
  if ( !fRecoFolder ) {
-    cerr << "ERROR: AliEMCALGetter::RecParticlesRef -> Folder//" << fRecoFolder << " not found!" << endl; 
-    return 0 ; 
+    Fatal("RecParticlesRef", "Folder//%s not found !", fRecoFolder->GetName() ) ; 
   }    
 
-  TFolder * emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/RecParticles")) ; 
-  if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::RecParticlesRef -> Folder //" << fRecoFolder << "/EMCAL/RecParticles/ not found!" << endl;
-    return 0;
+  TFolder * phosFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/RecParticles")) ; 
+  if ( !phosFolder ) {
+    Fatal("RecParticlesRef", "Folder //%s/EMCAL/RecParticles/ not found !", fRecoFolder->GetName() ) ;
   }    
 
-  TObject * tss =  emcalFolder->FindObject(name  ) ;
+  TObject * tss =  phosFolder->FindObject(name  ) ;
   if (!tss) {
-    return 0 ;  
+    Fatal("RecParticlesRef", "object %s not found !", name) ; 
   }
-  return static_cast<void *>(emcalFolder->GetListOfFolders()->GetObjectRef(tss)) ;
+  return phosFolder->GetListOfFolders()->GetObjectRef(tss) ;
 }
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostPID(AliEMCALPID * pid) const 
-{      // ------------AliEMCAL PID -----------------------------
+TTree * AliEMCALGetter::TreeK(TString filename)  
+{
+  // returns TreeK from file filename
+  // usefull in case of split file
 
-  TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
+  if ( filename.IsNull() ) 
+    filename = fHeaderFile ; 
 
-  if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post Per -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
-    return kFALSE ;
-  }        
-  
-  TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
-  if ( !emcal )  {
-    if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Per -> //" << fTasksFolder << "/Reconstructioner/EMCAL not found!" << endl; 
-      cout <<"INFO: AliEMCALGetter::Post Per -> Adding //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl;
-    }
-    emcal = new TTask("EMCAL", "") ; 
-    tasks->Add(emcal) ; 
-  } 
+  TFile * file = 0 ; 
 
-  AliEMCALPID * emcalpid = dynamic_cast<AliEMCALPID*>(emcal->GetListOfTasks()->FindObject(pid->GetName())) ; 
-  if (emcalpid) { 
-    if (fDebug)
-      cout << "INFO: AliEMCALGetter::Post Per -> Task " << pid->GetName()
-          << " already exists" << endl ; 
-    emcal->GetListOfTasks()->Remove(emcalpid) ;
-  }
-  
-  emcal->Add(pid) ;      
-  return kTRUE; 
-} 
+  file = static_cast<TFile*>(gROOT->GetFile(filename.Data() ) ) ;
 
-//____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostPID(const char * name) const 
-{     
-  // the hierarchy is //Folders/Tasks/Reconstructioner/EMCAL/sdigitsname
+  if (!file || !file->IsOpen())  // file not yet open 
+    file = TFile::Open(filename.Data(), "read") ; 
   
-  TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
+  if(filename != fHeaderFile ){
+    fAlice = dynamic_cast<AliRun *>(file->Get("gAlice")) ;
+  }
 
-  if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post Per -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
-    return kFALSE ;
-  }        
-  
-  TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
-  if ( !emcal )  {
-    if (fDebug) {
-      cout <<"WARNING: AliEMCALGetter::Post Per -> //" << fTasksFolder << "/Reconstructioner/EMCAL not found!" << endl; 
-      cout <<"INFO: AliEMCALGetter::Post Per -> Adding //" << fTasksFolder << "/Reconstructioner/EMCAL" << endl;
-    }
-    emcal = new TTask("EMCAL", "") ; 
-    tasks->Add(emcal) ; 
-  } 
+  TString treeName("TreeK") ; 
+  treeName += EventNumber()  ; 
+  TTree * tree = static_cast<TTree *>(file->Get(treeName.Data())) ;
 
-  TList * l = emcal->GetListOfTasks() ;   
-  TIter it(l) ;
-  TString pidname(name) ;
-  pidname+=":pid" ; 
-  TTask * task ;
-  while((task = static_cast<TTask *>(it.Next()) )){
-    TString taskname(task->GetName()) ;
-    if(taskname.BeginsWith(pidname))
-      return kTRUE ;
-  }
-  AliEMCALPIDv1 * emcalpid = new AliEMCALPIDv1() ;
-  pidname+="-v1" ;
-  emcalpid->SetName(pidname) ;
-  emcal->Add(emcalpid) ;      
-  
-  return kTRUE; 
-} 
+  if (!tree && fDebug)  
+    Warning("TreeK", "-> %s not found in %s", treeName.Data(),filename.Data());
+
+  return tree ;                      
+}
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::PIDRef(const char * name) const 
-{ //------------PID ------------------------------
 
-  TTask * tasks  = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ; 
+TTree * AliEMCALGetter::TreeH(TString filename)  
+{
+  // returns TreeH from file filename
+  // usefull in case of split file
 
-  if ( !tasks ) {
-    cerr << "ERROR: AliEMCALGetter::Post PerRef -> Task //" << fTasksFolder << "/Reconstructioner not found!" << endl;
-    return kFALSE ;
-  }        
-        
-  TTask * emcal = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
-  if ( !emcal )  {
-    cerr <<"WARNING: AliEMCALGetter::Post PerRef -> //" << fTasksFolder << "/ReconstructionerEMCAL not found!" << endl; 
-    return 0 ; 
-  }   
-  
-  TList * l = emcal->GetListOfTasks() ; 
-  TIter it(l) ;
-  TTask * task ;
-  TTask * pid = 0 ;
-  TString pidname(name) ;
-  pidname+=":pid-" ;
-  while((task = static_cast<TTask *>(it.Next()) )){
-    TString taskname(task->GetName()) ;
-    if(taskname.BeginsWith(pidname)){
-      pid = task ;
-      break ;
-    }
+  if ( filename.IsNull() ) 
+    filename = fHeaderFile ; 
+
+  TFile * file = 0 ; 
+  file = static_cast<TFile*>(gROOT->GetFile(filename.Data() ) ) ;
+
+  if (!file) { // file not open yet
+    file = TFile::Open(filename.Data(), "read") ; 
   }
-  
-  if(pid) 
-    return static_cast<void *>(l->GetObjectRef(pid)) ;
-  else
-    return 0 ;
-  
-} 
+
+  TString treeName("TreeH") ; 
+  treeName += EventNumber()  ; 
+  TTree * tree = static_cast<TTree *>(file->Get(treeName.Data())) ;
+
+  if (!tree && fDebug)  
+    Warning("TreeH", "-> %s not found in %s", treeName.Data(), filename.Data());
+  return tree ;                      
+}
 
 //____________________________________________________________________________ 
-Bool_t AliEMCALGetter::PostQA(void) const 
-{ // ------------------ QA ---------------------------------
 
-  // the hierarchy is //Folders/Run/Conditions/QA/EMCAL/alarmsName
+TTree * AliEMCALGetter::TreeS(TString filename)  
+{
+  // returns TreeS from file filename
+  // usefull in case of split file
 
-  TFolder * emcalFolder = dynamic_cast<TFolder*>(fQAFolder->FindObject("EMCAL")) ; 
-  if ( !emcalFolder ) {
-    if (fDebug) {
-      cout << "WARNING: AliEMCALGetter::Post Q -> Folder //" << fQAFolder << "/EMCAL/ not found!" << endl;
-      cout << "INFO:    AliEMCALGetter::Post Q -> Adding Folder //" << fQAFolder << "/EMCAL/" << endl;
-    }
-    emcalFolder = fQAFolder->AddFolder("EMCAL", "QA from EMCAL") ; 
-  }      
+  if ( filename.IsNull() ) 
+    filename = fHeaderFile ; 
 
-  return kTRUE;
+  TFile * file = 0 ; 
+  file = static_cast<TFile*>(gROOT->GetFile(filename.Data() ) ) ;
+
+  if (!file) { // file not open yet
+    file = TFile::Open(filename.Data(), "read") ; 
+  }
+
+  TString treeName("TreeS") ; 
+  treeName += EventNumber()  ; 
+  TTree * tree = static_cast<TTree *>(file->Get(treeName.Data())) ;
+
+  if (!tree && fDebug)  
+    Warning("TreeS", "-> %s not found in %s", treeName.Data(), filename.Data());
+  return tree ;                      
 }
 
 //____________________________________________________________________________ 
-void * AliEMCALGetter::AlarmsRef(void) const 
-{  //------- Alarms ----------------------
 
-  
-  // the hierarchy is //Folders/Run/Conditions/QA/EMCAL
-  if ( !fQAFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post QRef -> Folder //" << fQAFolder << " not found!" << endl;
-    return 0;
-  }    
-  TFolder * emcalFolder = dynamic_cast<TFolder *>(fQAFolder->FindObject("EMCAL")) ;
-  if ( !emcalFolder ) {
-    cerr << "ERROR: AliEMCALGetter::Post QRef -> Folder //" << fQAFolder << "/EMCAL/ not found!" << endl;
-    return 0;
+TTree * AliEMCALGetter::TreeD(TString filename)  
+{
+  // returns TreeD from file filename
+  // usefull in case of split file
+
+  if ( filename.IsNull() ) 
+    filename = fHeaderFile ; 
+
+  TFile * file = 0 ; 
+  file = static_cast<TFile*>(gROOT->GetFile(filename.Data() ) ) ;
+
+  if (!file) { // file not open yet
+    file = TFile::Open(filename.Data(), "read") ; 
   }
-   
-  return static_cast<void *>(fQAFolder->GetListOfFolders()->GetObjectRef(emcalFolder)) ;
+
+  TString treeName("TreeD") ; 
+  treeName += EventNumber()  ; 
+  TTree * tree = static_cast<TTree *>(file->Get(treeName.Data())) ;
+
+  if (!tree && fDebug)  
+    Warning("TreeD", "-> %s not found in %s", treeName.Data(), filename.Data());
+  return tree ;                      
 }
-*/
+
 //____________________________________________________________________________ 
+
 const TParticle * AliEMCALGetter::Primary(Int_t index) const
 {
   // Return primary particle numbered by <index>
 
   if(index < 0) 
     return 0 ;
-  
-  Int_t primaryIndex = index % 10000000 ; 
-  Int_t primaryList = (Int_t ) ((index-primaryIndex)/10000000.)  ;
-  
-  if ( primaryList > 0  ) {
-    if (fDebug) {
-      cout << " Getter does not support currently Mixing of primary " << endl ;
-      cout << "   can not return primary: " << index<< " (list "<< primaryList<< " primary # " << primaryIndex << " )"<<endl ;
-    }
-    return 0;
-  }
-  
-  return gAlice->Particle(primaryIndex) ;
-  
+
+  TParticle *  p = 0 ;
+    if (fAlice) 
+      p = fAlice->Particle(index) ; 
+    else
+      p = gAlice->Particle(index) ; 
+  return p ; 
+}
+
+//____________________________________________________________________________ 
+
+const TParticle * AliEMCALGetter::Secondary(TParticle* p, Int_t index) const
+{
+  // Return first (index=1) or second (index=2) secondary particle of primary particle p 
+
+  if(index <= 0) 
+    return 0 ;
+  if(index > 2)
+    return 0 ;
+
+  if(p) {
+    Int_t daughterIndex = p->GetDaughter(index-1) ; 
+    return  gAlice->Particle(daughterIndex) ; 
+  }
+  else
+    return 0 ;
 }
 
 //____________________________________________________________________________ 
-void AliEMCALGetter::ReadTreeD()
+
+Int_t AliEMCALGetter::ReadTreeD(const Int_t event)
 {
   // Read the digit tree gAlice->TreeD()  
-  if(gAlice->TreeD()== 0){
-    cerr <<   "ERROR: AliEMCALGetter::ReadTreeD: can not read TreeD " << endl ;
-  return ;
+
+  TTree * treeD ;
+  if(fToSplit){
+    TFile * file = static_cast<TFile*>(gROOT->GetFile(fDigitsFileName)); 
+    if(!file) 
+      file = TFile::Open(fDigitsFileName) ;      
+
+    // Get Digits Tree header from file
+
+    TString treeName("TreeD") ;
+    treeName += event ; 
+    treeD = dynamic_cast<TTree*>(file->Get(treeName.Data()));
+
+    if(!treeD){ // TreeD not found in header file
+      if (fDebug)
+        Warning("ReadTreeD", "-> Cannot find TreeD in %s", fDigitsFileName.Data());
+      return 1;
+    }
   }
-  
-  TObjArray * lob = static_cast<TObjArray*>(gAlice->TreeD()->GetListOfBranches()) ;
+  else
+    treeD = gAlice->TreeD() ;
+
+  TObjArray * lob = static_cast<TObjArray*>(treeD->GetListOfBranches()) ;
   TIter next(lob) ; 
   TBranch * branch = 0 ; 
   TBranch * digitsbranch = 0 ; 
   TBranch * digitizerbranch = 0 ; 
+
   Bool_t emcalfound = kFALSE, digitizerfound = kFALSE ; 
-  
+
   while ( (branch = static_cast<TBranch*>(next())) && (!emcalfound || !digitizerfound) ) {
     if ( (strcmp(branch->GetName(), "EMCAL")==0) && (strcmp(branch->GetTitle(), fDigitsTitle)==0) ) {
       digitsbranch = branch ; 
@@ -1178,185 +1630,247 @@ void AliEMCALGetter::ReadTreeD()
 
   if ( !emcalfound || !digitizerfound ) {
     if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeD -> Cannot find Digits and/or Digitizer with name " 
-          << fDigitsTitle << endl ;
-    return ; 
+      Warning("ReadTreeD", "-> Cannot find Digits and/or Digitizer with name %s", fDigitsTitle.Data());
+    return 2; 
   }   
+
   //read digits
+
   if(!Digits(fDigitsTitle) ) 
     PostDigits(fDigitsTitle);
   digitsbranch->SetAddress(DigitsRef(fDigitsTitle)) ;
   digitsbranch->GetEntry(0) ;
-  
-  
+
   // read  the Digitizer
+
+  RemoveTask("D", fDigitsTitle) ; // I do not understand why I need that 
   if(!Digitizer(fDigitsTitle))
     PostDigitizer(fDigitsTitle) ;
   digitizerbranch->SetAddress(DigitizerRef(fDigitsTitle)) ;
   digitizerbranch->GetEntry(0) ;
-  
+
+  lob->Delete();
+
+  if(gAlice->TreeD()!=treeD)
+    treeD->Delete();
+
+  return 0 ; 
 }
 
 //____________________________________________________________________________ 
-void AliEMCALGetter::ReadTreeH()
+
+Int_t AliEMCALGetter::ReadTreeH()
 {
   // Read the first entry of EMCAL branch in hit tree gAlice->TreeH()
 
-  if(gAlice->TreeH()== 0){
-    cerr <<   "ERROR: AliEMCALGetter::ReadTreeH: -> Cannot read TreeH " << endl ;
-    return ;
+  TTree * treeH = gAlice->TreeH() ;
+
+  if(!treeH) {// TreeH not found in header file
+    if (fDebug) 
+      Warning("ReadTreeH", "-> Cannot find TreeH in %s", fHeaderFile.Data());
+
+    TString searchFileName("EMCAL.HITS") ; 
+    if((strcmp(fBranchTitle.Data(),"Default")!=0)&&(strcmp(fBranchTitle.Data(),"")!=0)){
+      searchFileName+="." ;
+      searchFileName += fBranchTitle ;
+    }
+
+    searchFileName+=".root" ;
+
+    if ( (treeH = TreeH(searchFileName)) ) { //found TreeH in the file which contains the hits
+      if (fDebug) 
+        Info("ReadTreeH", "-> TreeH found in %s", searchFileName.Data());
+    } else {
+      Error("ReadTreeH", "-> TreeH not found "); 
+      return 1;
+    }  
   }
-  
+
   TBranch * hitsbranch = static_cast<TBranch*>(gAlice->TreeH()->GetBranch("EMCAL")) ;
+
   if ( !hitsbranch ) {
     if (fDebug)
-      cout << "WARNING:  AliEMCALGetter::ReadTreeH -> Cannot find branch EMCAL" << endl 
-    return ;
+      Warning("ReadTreeH", "-> Cannot find branch EMCAL")
+    return 2;
   }
+
   if(!Hits())
     PostHits() ;
 
-  hitsbranch->SetAddress(HitsRef()) ;
-
-  hitsbranch->GetEntry(0) ;
-
+  if (hitsbranch->GetEntries() > 1 ) {
+    (dynamic_cast<TClonesArray*> (*HitsRef()))->Clear() ;
+    TClonesArray * tempo =  new TClonesArray("AliEMCALHit",1000) ;
+    TClonesArray * hits = dynamic_cast<TClonesArray*>(*HitsRef()) ; 
+    hitsbranch->SetAddress(&tempo) ;
+
+    Int_t index = 0 ; 
+    Int_t i = 0 ;
+
+    for (i = 0 ; i < hitsbranch->GetEntries() ; i++) {
+      hitsbranch->GetEntry(i) ;
+      Int_t j = 0 ; 
+      for ( j = 0 ; j < tempo->GetEntries() ; j++) { 
+        const AliEMCALHit * hit = static_cast<const AliEMCALHit *>(tempo->At(j)) ; 
+        new((*hits)[index]) AliEMCALHit( *hit ) ;
+        index++ ; 
+      }
+    }
+    delete tempo ; 
+  }
+  else {
+    (dynamic_cast<TClonesArray*> (*HitsRef()))->Clear() ;
+    hitsbranch->SetAddress(HitsRef()) ;
+    hitsbranch->GetEntry(0) ;
+  }
+  return 0 ; 
 }
 
 //____________________________________________________________________________ 
-void AliEMCALGetter::Track(Int_t itrack)
+
+void AliEMCALGetter::Track(const Int_t itrack)
 {
   // Read the first entry of EMCAL branch in hit tree gAlice->TreeH()
-
   if(gAlice->TreeH()== 0){
-    cerr <<   "ERROR: AliEMCALGetter::ReadTreeH: -> Cannot read TreeH " << endl ;
+    Error("ReadTreeH", "-> Cannot read TreeH ");
     return ;
   }
-  
+
   TBranch * hitsbranch = dynamic_cast<TBranch*>(gAlice->TreeH()->GetListOfBranches()->FindObject("EMCAL")) ;
+
   if ( !hitsbranch ) {
     if (fDebug)
-      cout << "WARNING:  AliEMCALGetter::ReadTreeH -> Cannot find branch EMCAL" << endl 
+      Warning("ReadTreeH", "-> Cannot find branch EMCAL")
     return ;
   }  
+
   if(!Hits())
     PostHits() ;
+
+  (dynamic_cast<TClonesArray*> (*HitsRef()))->Clear() ;
   hitsbranch->SetAddress(HitsRef()) ;
   hitsbranch->GetEntry(itrack) ;
-
-
 }
+
 //____________________________________________________________________________ 
-/*void AliEMCALGetter::ReadTreeQA()
+
+void AliEMCALGetter::ReadTreeQA()
 {
-  // Read the digit tree gAlice->TreeQA()
-  // so far only EMCAL knows about this Tree  
+  if (fDebug)
+    Warning("ReadTreeQA", "-> %s not implemented", ClassName());
+}
 
-  if(EMCAL()->TreeQA()== 0){
-    cerr <<   "ERROR: AliEMCALGetter::ReadTreeQA: can not read TreeQA " << endl ;
-    return ;
-  }
   
-  TBranch * qabranch = EMCAL()->TreeQA()->GetBranch("EMCAL") ; 
-  if (!qabranch) { 
-    if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeQA -> Cannot find QA Alarms for EMCAL" << endl ;
-    return ; 
-  }   
-  
-  if(!Alarms())
-    PostQA() ; 
 
-  qabranch->SetAddress(AlarmsRef()) ;
+//____________________________________________________________________________ 
 
-  qabranch->GetEntry(0) ;
-//   PostQA("EMCAL") ; 
-//   TFolder * alarmsF = Alarms() ; 
-//   alarmsF->Clear() ; 
-//   qabranch->SetAddress(&alarmsF) ;
-//   qabranch->GetEntry(0) ;
-  
-}
+Int_t AliEMCALGetter::ReadTreeR(const Int_t event)
 
-//____________________________________________________________________________ 
-void AliEMCALGetter::ReadTreeR()
 {
   // Read the reconstrunction tree gAlice->TreeR()
-
-  if(gAlice->TreeR()== 0){
-    cerr <<   "ERROR: AliEMCALGetter::ReadTreeR: can not read TreeR " << endl ;
-    return ;
+  // A particularity has been introduced here :
+  //  if gime->Event(ievent,"R") is called branches with the current title are read, the current title
+  //   being for example give in AliEMCALPID(fileName, title)
+  //  if gime(Event(ievent, "RA") is called the title of the branches is not checked anymore, "A" stands for any
+  // This is a feature needed by PID to be able to reconstruct several times particles (each time a ther title is given)
+  // from a given set of TrackSegments (with a given name)
+  // This is why any is NOT used to read the branch of RecParticles
+  // any migh have become obsolete : to be checked
+  // See AliEMCALPIDv1    
+
+  //first - clean if necessary
+  if(ECALRecPoints(fRecPointsTitle)){
+    ECALRecPoints(fRecPointsTitle)->Delete() ;
+    PRERecPoints(fRecPointsTitle)->Delete() ;
+    HCALRecPoints(fRecPointsTitle)->Delete() ;
+ }
+  //clear TrackSegments
+  if(TrackSegments(fTrackSegmentsTitle))
+    TrackSegments(fTrackSegmentsTitle)->Clear() ;
+       
+  TTree * treeR ;
+
+  if(fToSplit){
+    TFile * file = static_cast<TFile*>(gROOT->GetFile(fRecPointsFileName)); 
+    if(!file) 
+      file = TFile::Open(fRecPointsFileName) ;      
+    // Get Digits Tree header from file
+
+    TString treeName("TreeR") ;
+    treeName += event ; 
+    treeR = dynamic_cast<TTree*>(file->Get(treeName.Data()));
+
+    if(!treeR){ // TreeR not found in header file
+      if (fDebug)
+        Warning("ReadTreeR", "-> Cannot find TreeR in %s", fRecPointsFileName.Data());
+      return 1;
+    }
   }
-  
+  else
+    treeR = gAlice->TreeR() ;
+
   // RecPoints 
-  TObjArray * lob = static_cast<TObjArray*>(gAlice->TreeR()->GetListOfBranches()) ;
+
+  TObjArray * lob = static_cast<TObjArray*>(treeR->GetListOfBranches()) ;
   TIter next(lob) ; 
   TBranch * branch = 0 ; 
-  TBranch * emcbranch = 0 ; 
-  TBranch * cpvbranch = 0 ; 
+  TBranch * branchPRE = 0 ; 
+  TBranch * branchEC  = 0 ; 
+  TBranch * branchHC  = 0 ; 
   TBranch * clusterizerbranch = 0 ; 
-  Bool_t emcalemcrpfound = kFALSE, emcalcpvrpfound = kFALSE, clusterizerfound = kFALSE ; 
-  
-  while ( (branch = static_cast<TBranch*>(next())) && (!emcalemcrpfound || !emcalcpvrpfound || !clusterizerfound) ) 
-    if(strcmp(branch->GetTitle(), fRecPointsTitle)==0) {
-      if ( strcmp(branch->GetName(), "EMCALEmcRP")==0) {
-       emcbranch = branch ; 
-       emcalemcrpfound = kTRUE ;
+
+  Bool_t emcalPRERPfound = kFALSE, emcalECRPfound = kFALSE, emcalHCRPfound = kFALSE, clusterizerfound = kFALSE ; 
+
+  while ( (branch = static_cast<TBranch*>(next())) && (!emcalPRERPfound || !emcalECRPfound || !emcalHCRPfound || !clusterizerfound) ) {
+    if(strcmp(branch->GetTitle(), fRecPointsTitle)==0 ) {
+      if ( strcmp(branch->GetName(), "EMCALPRERP")==0) {
+        branchPRE = branch ; 
+        emcalPRERPfound = kTRUE ;
+      }
+      else if ( strcmp(branch->GetName(), "EMCALECRP")==0) {
+        branchEC = branch ; 
+        emcalECRPfound = kTRUE ;
       }
-      else if ( strcmp(branch->GetName(), "EMCALCpvRP")==0) {
-       cpvbranch = branch ; 
-       emcalcpvrpfound = kTRUE ;
+      else if ( strcmp(branch->GetName(), "EMCALHCRP")==0) {
+        branchHC = branch ; 
+        emcalHCRPfound = kTRUE ;
       }
-      else if(strcmp(branch->GetName(), "AliEMCALClusterizer")==0){
-       clusterizerbranch = branch ; 
-       clusterizerfound = kTRUE ; 
+       else if(strcmp(branch->GetName(), "AliEMCALClusterizer")==0){
+        clusterizerbranch = branch ; 
+        clusterizerfound = kTRUE ; 
       }
     }
+  }
 
-  if ( !emcalemcrpfound ) {
+  if ( !emcalPRERPfound || !emcalECRPfound || !emcalHCRPfound || !clusterizerfound) {
     if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeR -> Cannot find EmcRecPoints with title " 
-          << fRecPointsTitle << endl ;
-    return ; 
-  }   
-  if ( !emcalcpvrpfound ) {
-    if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeR -> Cannot find CpvRecPoints with title " 
-          << fRecPointsTitle << endl ;
-    return ; 
-  }   
-  if ( !clusterizerfound ) {
-    if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeR -> Can not find Clusterizer with title " 
-          << fRecPointsTitle << endl ;
-    return ; 
-  }   
-  
-  // Read and Post the RecPoints
-  if(!EmcRecPoints(fRecPointsTitle) )
-    PostRecPoints(fRecPointsTitle) ;
-  emcbranch->SetAddress(EmcRecPointsRef(fRecPointsTitle)) ;
-  emcbranch->GetEntry(0) ;
-
-  cpvbranch->SetAddress(CpvRecPointsRef(fRecPointsTitle)) ;
-  cpvbranch->GetEntry(0) ;
-  
-  if(!Clusterizer(fRecPointsTitle) )
-    PostClusterizer(fRecPointsTitle) ;
-  clusterizerbranch->SetAddress(ClusterizerRef(fRecPointsTitle)) ;
-  clusterizerbranch->GetEntry(0) ;
-  
+      Warning("ReadTreeR", "-> Cannot find RecPoints and/or Clusterizer with name %s", fRecPointsTitle.Data());
+  } 
+  else { 
+    if(!ECALRecPoints(fRecPointsTitle) ) 
+      PostRecPoints(fRecPointsTitle) ;
+    branchEC->SetAddress(ECRecPointsRef(fRecPointsTitle)) ;
+    branchEC->GetEntry(0) ;
+
+    branchPRE->SetAddress(PRERecPointsRef(fRecPointsTitle)) ; 
+    branchPRE->GetEntry(0) ;  
+
+    branchHC->SetAddress(HCRecPointsRef(fRecPointsTitle)) ; 
+    branchHC->GetEntry(0) ;  
+
+    if(!Clusterizer(fRecPointsTitle) )
+      PostClusterizer(fRecPointsTitle) ;
+
+    clusterizerbranch->SetAddress(ClusterizerRef(fRecPointsTitle)) ;
+    clusterizerbranch->GetEntry(0) ;
+  }
+
   //------------------- TrackSegments ---------------------
   next.Reset() ; 
   TBranch * tsbranch = 0 ; 
   TBranch * tsmakerbranch = 0 ; 
   Bool_t emcaltsfound = kFALSE, tsmakerfound = kFALSE ; 
-    
-  while ( (branch = static_cast<TBranch*>(next())) && (!emcaltsfound || !tsmakerfound) ) 
-    if(strcmp(branch->GetTitle(), fTrackSegmentsTitle)==0)  {
+  while ( (branch = static_cast<TBranch*>(next())) && (!emcaltsfound || !tsmakerfound) ) {
+    if(strcmp(branch->GetTitle(), fTrackSegmentsTitle)==0 )  {
       if ( strcmp(branch->GetName(), "EMCALTS")==0){
        tsbranch = branch ; 
        emcaltsfound = kTRUE ;
@@ -1366,28 +1880,25 @@ void AliEMCALGetter::ReadTreeR()
        tsmakerfound  = kTRUE ; 
       }
     }
-  
+  }
+
   if ( !emcaltsfound || !tsmakerfound ) {
     if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeR -> Cannot find TrackSegments and/or TrackSegmentMaker with name "
-          << fTrackSegmentsTitle << endl ;
-    return ; 
-  } 
-  
-  // Read and Post the TrackSegments
-  if(!TrackSegments(fTrackSegmentsTitle))
-    PostTrackSegments(fTrackSegmentsTitle) ;
-  tsbranch->SetAddress(TrackSegmentsRef(fTrackSegmentsTitle)) ;
-  tsbranch->GetEntry(0) ;
-  
-  // Read and Post the TrackSegment Maker
-  if(!TrackSegmentMaker(fTrackSegmentsTitle))
-    PostTrackSegmentMaker(fTrackSegmentsTitle) ;
-  tsmakerbranch->SetAddress(TSMakerRef(fTrackSegmentsTitle)) ;
-  tsmakerbranch->GetEntry(0) ;
-  
-  
-  //------------ RecParticles ----------------------------
+      Warning("ReadTreeR", "-> Cannot find TrackSegments and/or TrackSegmentMaker with name %s", fTrackSegmentsTitle.Data() ) ;
+  } else { 
+    // Read and Post the TrackSegments
+    if(!TrackSegments(fTrackSegmentsTitle))
+      PostTrackSegments(fTrackSegmentsTitle) ;
+    tsbranch->SetAddress(TrackSegmentsRef(fTrackSegmentsTitle)) ;
+    tsbranch->GetEntry(0) ;
+
+    // Read and Post the TrackSegment Maker
+    if(!TrackSegmentMaker(fTrackSegmentsTitle))
+      PostTrackSegmentMaker(fTrackSegmentsTitle) ;
+    tsmakerbranch->SetAddress(TSMakerRef(fTrackSegmentsTitle)) ;
+    tsmakerbranch->GetEntry(0) ;
+ }
+ //------------ RecParticles ----------------------------
   next.Reset() ; 
   TBranch * rpabranch = 0 ; 
   TBranch * pidbranch = 0 ; 
@@ -1407,279 +1918,260 @@ void AliEMCALGetter::ReadTreeR()
   
   if ( !emcalrpafound || !pidfound ) {
     if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeR -> Cannot find RecParticles and/or PID with name " 
-          << fRecParticlesTitle << endl ;
-    return ; 
-  } 
-  
-  // Read and Post the RecParticles
-  if(!RecParticles(fRecParticlesTitle))
-    PostRecParticles(fRecParticlesTitle) ;
-  rpabranch->SetAddress(RecParticlesRef(fRecParticlesTitle)) ;
-  rpabranch->GetEntry(0) ;
-  
-  // Read and Post the PID
-  if(!PID(fRecParticlesTitle))
-    PostPID(fRecParticlesTitle) ;
-  pidbranch->SetAddress(PIDRef(fRecParticlesTitle)) ;
-  pidbranch->GetEntry(0) ;
-  
-  
+      Warning("ReadTreeR", "-> Cannot find RecParticles and/or PID with name %s", fRecParticlesTitle.Data() ) ; 
+  } else { 
+    // Read and Post the RecParticles
+    if(!RecParticles(fRecParticlesTitle)) 
+      PostRecParticles(fRecParticlesTitle) ;
+    rpabranch->SetAddress(RecParticlesRef(fRecParticlesTitle)) ;
+    rpabranch->GetEntry(0) ;
+    // Read and Post the PID
+    if(!PID(fRecParticlesTitle))
+      PostPID(fRecParticlesTitle) ;
+    pidbranch->SetAddress(PIDRef(fRecParticlesTitle)) ;
+    pidbranch->GetEntry(0) ;
+  }
+
+  if(gAlice->TreeR()!=treeR)
+    treeR->Delete();
+  return 0 ; 
 }
-*/
+
 //____________________________________________________________________________ 
-void AliEMCALGetter::ReadTreeS(Int_t event)
+
+Int_t AliEMCALGetter::ReadTreeS(const Int_t event)
 {
-  // Read the summable digits tree gAlice->TreeS()  
-  
-  // loop over all opened files and read their SDigits to the White Board
+  // Reads the SDigits treeS from all files  
+  // Files, which should be opened are listed in emcalF
+  // So, first get list of files
+
   TFolder * emcalF = dynamic_cast<TFolder *>(fSDigitsFolder->FindObject("EMCAL")) ;
+
   if (!emcalF) 
     emcalF = fSDigitsFolder->AddFolder("EMCAL", "SDigits from EMCAL") ; 
+
   TCollection * folderslist = emcalF->GetListOfFolders() ; 
-  
-  //Add current file to list if it is not there yet
-  if ( (fHeaderFile != "aliroot") && ( !folderslist->Contains(fHeaderFile) ) ){
-    emcalF->AddFolder(fHeaderFile, ""); 
-  }
-    
+
+  // Now iterate over the list of files and read TreeS into Whiteboard
+
   TIter next(folderslist) ; 
   TFolder * folder = 0 ; 
   TFile * file; 
   TTree * treeS = 0;
+
   while ( (folder = static_cast<TFolder*>(next())) ) {
-    if(fHeaderFile.CompareTo(folder->GetName()) == 0 ) 
-      treeS=gAlice->TreeS() ;
-    else{
-      file = static_cast<TFile*>(gROOT->GetFile(folder->GetName())); 
-      file->cd() ;
-      
-      // Get SDigits Tree header from file
-      TString treeName("TreeS") ;
-      treeName += event ; 
-      treeS = dynamic_cast<TTree*>(gDirectory->Get(treeName.Data()));
-    }
-    if(treeS==0){
-      cerr << "ERROR: AliEMCALGetter::ReadTreeS There is no SDigit Tree" << endl;
-      return ;
+    TString fileName("") ;
+    if(fToSplit)
+      fileName = folder->GetTitle() ;
+    else
+      fileName = folder->GetName() ; 
+
+    fileName.ReplaceAll("_","/") ; 
+    file = static_cast<TFile*>(gROOT->GetFile(fileName)); 
+
+    if(!file) 
+      file = TFile::Open(fileName) ;      
+
+    // Get SDigits Tree header from file
+
+    TString treeName("TreeS") ;
+    treeName += event ; 
+    treeS = dynamic_cast<TTree*>(file->Get(treeName.Data()));
+
+    if(!treeS){ // TreeS not found in header file
+      if (fDebug)
+        Warning("ReadTreeS", "-> Cannot find TreeS in %s", fileName.Data());
+      return 1;
     }
-    
+
     //set address of the SDigits and SDigitizer
+
     TBranch   * sdigitsBranch    = 0;
     TBranch   * sdigitizerBranch = 0;
     TBranch   * branch           = 0 ;  
     TObjArray * lob = static_cast<TObjArray*>(treeS->GetListOfBranches()) ;
     TIter next(lob) ; 
+
     Bool_t emcalfound = kFALSE, sdigitizerfound = kFALSE ; 
-    
+
     while ( (branch = static_cast<TBranch*>(next())) && (!emcalfound || !sdigitizerfound) ) {
       if ( (strcmp(branch->GetName(), "EMCAL")==0) && (strcmp(branch->GetTitle(), fSDigitsTitle)==0) ) {
-       emcalfound = kTRUE ;
-       sdigitsBranch = branch ; 
+        emcalfound = kTRUE ;
+        sdigitsBranch = branch ; 
       }
-      
-      else if ( (strcmp(branch->GetName(), "AliEMCALSDigitizer")==0) && (strcmp(branch->GetTitle(), fSDigitsTitle)==0) ) {
-       sdigitizerfound = kTRUE ; 
-       sdigitizerBranch = branch ;
+      else if ( (strcmp(branch->GetName(), "AliEMCALSDigitizer")==0) && 
+                (strcmp(branch->GetTitle(), fSDigitsTitle)==0) ) {
+        sdigitizerfound = kTRUE ; 
+        sdigitizerBranch = branch ;
       }
     }
     if ( !emcalfound || !sdigitizerfound ) {
       if (fDebug)
-       cout << "WARNING: AliEMCALDigitizer::ReadSDigits -> Digits and/or Digitizer branch with name " << GetName() 
-            << " not found" << endl ;
-      return ; 
+        Warning("ReadSDigits", "-> Digits and/or Digitizer branch with name %s not found", GetName());
+      return 2; 
     }   
-    
+
     if ( !folder->FindObject(fSDigitsTitle) )  
       PostSDigits(fSDigitsTitle,folder->GetName()) ;
+
+    ((TClonesArray*) (*SDigitsRef(fSDigitsTitle,folder->GetName())))->Clear() ;
+
     sdigitsBranch->SetAddress(SDigitsRef(fSDigitsTitle,folder->GetName())) ;
     sdigitsBranch->GetEntry(0) ;
-    
+
     TString sdname(fSDigitsTitle) ;
     sdname+=":" ;
     sdname+=folder->GetName() ;
+
     if(!SDigitizer(sdname) ) 
       PostSDigitizer(fSDigitsTitle,folder->GetName()) ;
+
     sdigitizerBranch->SetAddress(SDigitizerRef(sdname)) ;
-    sdigitizerBranch->GetEntry(0) ;
-    
+    sdigitizerBranch->GetEntry(0) ; 
+
+    if(gAlice->TreeS()!=treeS)
+      treeS->Delete();
   }    
-  
-  // After SDigits have been read from all files, return to the first one
-  
-  next.Reset();
-  folder = static_cast<TFolder*>(next());
-  if(folder){
-    file   = static_cast<TFile*>(gROOT->GetFile(folder->GetName())); 
-    file   ->cd() ;
-  }
-  
+   return 0 ;  
 }
+
 //____________________________________________________________________________ 
-void AliEMCALGetter::ReadTreeS(TTree * treeS, Int_t input)
-{  // Read the summable digits fron treeS()  
 
+void AliEMCALGetter::ReadTreeS(TTree * treeS, Int_t input)
+{  
+  // Read the summable digits fron treeS()  
 
   TString filename("mergefile") ;
   filename+= input ;
 
   TFolder * emcalFolder = dynamic_cast<TFolder*>(fSDigitsFolder->FindObject("EMCAL")) ; 
   if ( !emcalFolder ) { 
-   emcalFolder = fSDigitsFolder->AddFolder("EMCAL", "SDigits from EMCAL") ; 
+    emcalFolder = fSDigitsFolder->AddFolder("EMCAL", "SDigits from EMCAL") ; 
   } 
+
   TFolder * folder=(TFolder*)emcalFolder->FindObject(filename) ;
+
   //set address of the SDigits and SDigitizer
+
   TBranch   * sdigitsBranch    = 0;
   TBranch   * sdigitizerBranch = 0;
   TBranch   * branch           = 0 ;  
   TObjArray * lob = (TObjArray*)treeS->GetListOfBranches() ;
   TIter next(lob) ; 
+
   Bool_t emcalfound = kFALSE, sdigitizerfound = kFALSE ; 
-  
+
   while ( (branch = (TBranch*)next()) && (!emcalfound || !sdigitizerfound) ) {
     if ( strcmp(branch->GetName(), "EMCAL")==0) {
       emcalfound = kTRUE ;
       sdigitsBranch = branch ; 
     }
-    
     else if ( strcmp(branch->GetName(), "AliEMCALSDigitizer")==0) {
       sdigitizerfound = kTRUE ; 
       sdigitizerBranch = branch ;
     }
   }
+
   if ( !emcalfound || !sdigitizerfound ) {
     if (fDebug)
-      cout << "WARNING: AliEMCALGetter::ReadTreeS -> Digits and/or Digitizer branch not found" << endl ;
+      Warning("ReadTreeS", "-> Digits and/or Digitizer branch not found");
     return ; 
   }   
-  
+
   if (!folder || !(folder->FindObject(sdigitsBranch->GetTitle()) ) )
     PostSDigits(sdigitsBranch->GetTitle(),filename) ;
 
   sdigitsBranch->SetAddress(SDigitsRef(sdigitsBranch->GetTitle(),filename)) ;
   sdigitsBranch->GetEntry(0) ;
-  
+
   TString sdname(sdigitsBranch->GetTitle()) ;
   sdname+=":" ;
   sdname+=filename ;
+
   if(!SDigitizer(sdigitsBranch->GetTitle()) )
     PostSDigitizer(sdigitsBranch->GetTitle(),filename) ;
 
   sdigitizerBranch->SetAddress(SDigitizerRef(sdname)) ;
   sdigitizerBranch->GetEntry(0) ;
-  
-}    
 
+  if(gAlice->TreeS()!=treeS)
+    treeS->Delete();
+}    
 
 //____________________________________________________________________________ 
+
 void AliEMCALGetter::ReadPrimaries()
 {
+
   // Reads specific branches of primaries
-  
-  fNPrimaries = gAlice->GetNtrack();
-  
-  //   //Check, is it necessary to open new files
-  //   TArrayI* events = fDigitizer->GetCurrentEvents() ; 
-  //   TClonesArray * filenames = fDigitizer->GetHeadersFiles() ;
-//   Int_t input ;
-//   for(input = 0; input < filenames->GetEntriesFast(); input++){
-
-//     TObjString * filename = (TObjString *) filenames->At(input) ;
-
-//     //Test, if this file already open
-//     TFile *file = (TFile*) gROOT->GetFile( filename->GetString() ) ;
-//     if(file == 0)
-//       file = new TFile( filename->GetString()) ;
-//     file->cd() ;
-    
-//     // Get Kine Tree from file
-// //     char treeName[20];
-// //     sprintf(treeName,"TreeK%d",events->At(input));
-// //     TTree * treeK = (TTree*)gDirectory->Get(treeName);
-// //     if (treeK) 
-// //       treeK->SetBranchAddress("Particles", &fParticleBuffer);
-// //     else    
-// //       cout << "AliEMCALGetter: cannot find Kine Tree for event:" << events->At(input) << endl;
-
-// //     // Create the particle stack
-// //     if(!fParticles) fParticles = new TClonesArray("TParticle",1000);
-// //     // Build the pointer list
-// //     if(fParticleMap) {     <----
-// //       fParticleMap->Clear();
-// //       fParticleMap->Expand(treeK->GetEntries());
-// //     } else
-// //       fParticleMap = new TObjArray(treeK->GetEntries());
-    
-//     // From gAlice->Particle(i) 
-
-
-// //   if(!(*fParticleMap)[i]) {
-// //     Int_t nentries = fParticles->GetEntries();
-    
-// //     // algorithmic way of getting entry index
-// //     // (primary particles are filled after secondaries)
-// //     Int_t entry;
-// //     if (i<fHeader.GetNprimary())
-// //       entry = i+fHeader.GetNsecondary();
-// //     else 
-// //       entry = i-fHeader.GetNprimary();
-      
-// //     // only check the algorithmic way and give
-// //     // the fatal error if it is wrong
-// //     if (entry != fParticleFileMap[i]) {
-// //       Fatal("Particle",
-// //         "!!!! The algorithmic way is WRONG: !!!\n entry: %d map: %d",
-// //  entry, fParticleFileMap[i]); 
-// //     }  
-      
-// //     fTreeK->GetEntry(fParticleFileMap[i]);
-// //     new ((*fParticles)[nentries]) TParticle(*fParticleBuffer);
-// //     fParticleMap->AddAt((*fParticles)[nentries],i);
-// //   }
-// //   return (TParticle *) (*fParticleMap)[i];
-
-   
-    
-//   }
-
-
-//   //scan over opened files and read corresponding TreeK##
-
-  return ;
+
+  TClonesArray * ar = 0  ; 
+
+  if(! (ar = Primaries()) ) { 
+    PostPrimaries() ;
+    ar = Primaries() ; 
+  }
+
+  ar->Delete() ; 
+
+  if (TreeK(fHeaderFile)) { // treeK found in header file
+    if (fDebug) 
+      Info("ReadPrimaries", "-> TreeK found in %s", fHeaderFile.Data());
+    fNPrimaries = gAlice->GetNtrack() ; 
+    fAlice = 0 ; 
+  } 
+  else { // treeK not found in header file
+    Error("ReadPrimaries", "-> TreeK not  found ");
+    return ;
+  }
+
+  Int_t index = 0 ; 
+
+  for (index = 0 ; index < fNPrimaries; index++) { 
+    new ((*ar)[index]) TParticle(*(Primary(index)));
+  }
 }
+
 //____________________________________________________________________________ 
+
 void AliEMCALGetter::Event(const Int_t event, const char* opt)
 {
   // Reads the content of all Tree's S, D and R
-  
+
   if (event >= gAlice->TreeE()->GetEntries() ) {
-    cerr << "ERROR: AliEMCALGetter::Event -> " << event << " not found in TreeE!" << endl ; 
+    Error("Event", "-> %d not found in TreeE!", event);
     return ; 
   }
-  gAlice->GetEvent(event) ;
 
-  if(strstr(opt,"H") )
-    ReadTreeH() ;
-  
-  if(strstr(opt,"S") )
-    ReadTreeS(event) ;
+  Bool_t any = kFALSE ; 
+
+  if (strstr(opt,"A") ) // do not check the title of the branches
+    any = kTRUE; 
+
+  gAlice->GetEvent(event) ; 
+
+  if( strstr(opt,"R") )
+    ReadTreeR(event) ;
 
   if( strstr(opt,"D") )
-    ReadTreeD() ;
+    ReadTreeD(event) ;
 
// if( strstr(opt,"R") )
-  //  ReadTreeR() ;
 if(strstr(opt,"S") )
+    ReadTreeS(event) ;
 
// if( strstr(opt,"Q") )
-  //  ReadTreeQA() ;
 if(strstr(opt,"H") )
+    ReadTreeH() ;
 
// if( strstr(opt,"P") || (strcmp(opt,"")==0) )
//   ReadPrimaries() ;
 if( strstr(opt,"Q") )
   ReadTreeQA() ;
 
+  if( strstr(opt,"P") )
+    ReadPrimaries() ;
 }
 
 //____________________________________________________________________________ 
-const TObject * AliEMCALGetter::ReturnO(TString what, TString name, TString file) const 
+
+TObject * AliEMCALGetter::ReturnO(TString what, TString name, TString file) const 
 {
   // get the object named "what" from the folder
   // folders are named like //Folders
@@ -1690,18 +2182,25 @@ const TObject * AliEMCALGetter::ReturnO(TString what, TString name, TString file
   TFolder * folder = 0 ;
   TObject * emcalO  = 0 ; 
 
-  //  if ( name.IsNull() ) {
-  if ( what.CompareTo("Hits") == 0 ) {
+  if ( what.CompareTo("Primaries") == 0 ) {
+    folder = dynamic_cast<TFolder *>(fPrimariesFolder->FindObject("Primaries")) ; 
+    if (folder) 
+      emcalO  = dynamic_cast<TObject *>(folder->FindObject("Primaries")) ;  
+    else 
+      return 0 ; 
+  }
+  else if ( what.CompareTo("Hits") == 0 ) {
     folder = dynamic_cast<TFolder *>(fHitsFolder->FindObject("EMCAL")) ; 
     if (folder) 
       emcalO  = dynamic_cast<TObject *>(folder->FindObject("Hits")) ;  
   }
   else if ( what.CompareTo("SDigits") == 0 ) { 
+    file.ReplaceAll("/","_") ; 
     TString path = "EMCAL/" + file  ; 
     folder = dynamic_cast<TFolder *>(fSDigitsFolder->FindObject(path.Data())) ; 
     if (folder) { 
       if (name.IsNull())
-       name = fSDigitsTitle ; 
+        name = fSDigitsTitle ; 
       emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ; 
     }
   }
@@ -1709,25 +2208,33 @@ const TObject * AliEMCALGetter::ReturnO(TString what, TString name, TString file
     folder = dynamic_cast<TFolder *>(fDigitsFolder->FindObject("EMCAL")) ; 
     if (folder) { 
       if (name.IsNull())
-       name = fDigitsTitle ; 
+        name = fDigitsTitle ; 
       emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ; 
     } 
   }
-/*  else if ( what.CompareTo("EmcRecPoints") == 0 ) {
-    folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/EMCARecPoints")) ; 
+  else if ( what.CompareTo("PRERecPoints") == 0 ) {
+    folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/PRERecPoints")) ; 
+    if (folder) { 
+      if (name.IsNull())
+        name = fRecPointsTitle ; 
+      emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ; 
+    }   
+  }
+  else if ( what.CompareTo("ECALRecPoints") == 0 ) {
+    folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/ECRecPoints")) ; 
     if (folder) { 
       if (name.IsNull())
-       name = fRecPointsTitle ; 
+        name = fRecPointsTitle ; 
       emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ; 
     } 
   }
-  else if ( what.CompareTo("CpvRecPoints") == 0 ) {
-    folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/CPVRecPoints")) ; 
+  else if ( what.CompareTo("HCALRecPoints") == 0 ) {
+    folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/HCRecPoints")) ; 
     if (folder) { 
       if (name.IsNull())
-       name = fRecPointsTitle ; 
+        name = fRecPointsTitle ; 
       emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ; 
-    }   
+    } 
   }
   else if ( what.CompareTo("TrackSegments") == 0 ) {
     folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/TrackSegments")) ; 
@@ -1739,40 +2246,30 @@ const TObject * AliEMCALGetter::ReturnO(TString what, TString name, TString file
   }
   else if ( what.CompareTo("RecParticles") == 0 ) {
     folder = dynamic_cast<TFolder *>(fRecoFolder->FindObject("EMCAL/RecParticles")) ; 
-   if (folder) { 
+    if (folder) { 
       if (name.IsNull())
        name = fRecParticlesTitle ; 
-      emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ; 
+      emcalO  = dynamic_cast<TObject *>(folder->FindObject(name)) ;
     }   
- }
-  else if ( what.CompareTo("Alarms") == 0 ){ 
-    if (name.IsNull() ) 
-      emcalO = dynamic_cast<TObject *>(fQAFolder->FindObject("EMCAL")) ;  
-    else {
-      folder = dynamic_cast<TFolder *>(fQAFolder->FindObject("EMCAL")) ; 
-      if (!folder) 
-       emcalO = 0 ; 
-      else 
-       emcalO = dynamic_cast<TObject *>(folder->FindObject(name)) ;  
-    }
   }
-*/
-  if (!emcalO) {
+ if (!emcalO) {
     if(fDebug)
-      cerr << "ERROR : AliEMCALGetter::ReturnO -> Object " << what << " not found in " << folder->GetName() << endl ; 
+      Warning("ReturnO", "-> Object %s  not found in %s", what.Data(), folder->GetName());
     return 0 ;
   }
+
   return emcalO ;
 }
-  
+
 //____________________________________________________________________________ 
+
 const TTask * AliEMCALGetter::ReturnT(TString what, TString name) const 
 {
   // get the TTask named "what" from the folder
   // folders are named like //Folders/Tasks/what/EMCAL/name
 
   TString search(what) ; 
-/*  if ( what.CompareTo("Clusterizer") == 0 ) 
+  if ( what.CompareTo("Clusterizer") == 0 ) 
     search = "Reconstructioner" ; 
   else if ( what.CompareTo("TrackSegmentMaker") == 0 ) 
     search = "Reconstructioner" ; 
@@ -1780,29 +2277,32 @@ const TTask * AliEMCALGetter::ReturnT(TString what, TString name) const
     search = "Reconstructioner" ; 
   else if ( what.CompareTo("QATasks") == 0 ) 
     search = "QA" ; 
-*/
+  
   TTask * tasks = dynamic_cast<TTask*>(fTasksFolder->FindObject(search)) ; 
 
   if (!tasks) {
-    cerr << "ERROR: AliEMCALGetter::ReturnT -> Task " << what << " not found!" << endl ;  
+    Error("AliReturnT", "-> Task %s not found!", what.Data());
     return 0 ; 
   }
 
   TTask * emcalT = dynamic_cast<TTask*>(tasks->GetListOfTasks()->FindObject("EMCAL")) ; 
+
   if (!emcalT) { 
-    cerr << "ERROR: AliEMCALGetter::ReturnT -> Task " << what << "/EMCAL not found!" << endl ;  
+    Error("ReturnT", "-> Task %s/EMCAL not found!", what.Data());
     return 0 ; 
   }
-  
+
   TList * list = emcalT->GetListOfTasks() ; 
+
   if (what.CompareTo("SDigitizer") == 0) {  
     if ( name.IsNull() )
       name =  fSDigitsTitle ; 
-  } else  if (what.CompareTo("Digitizer") == 0){ 
+  }
+  else  if (what.CompareTo("Digitizer") == 0){ 
     if ( name.IsNull() )
       name =  fDigitsTitle ;
-  } /*else  if (what.CompareTo("Clusterizer") == 0){ 
+  }
+  else  if (what.CompareTo("Clusterizer") == 0){ 
     if ( name.IsNull() )
       name =  fRecPointsTitle ;
     name.Append(":clu") ;
@@ -1817,20 +2317,437 @@ const TTask * AliEMCALGetter::ReturnT(TString what, TString name) const
       name =  fRecParticlesTitle ;
     name.Append(":pid") ;
   }
-  else  if (what.CompareTo("QATasks") == 0){ 
-    if ( name.IsNull() )
-      return emcalT ;
-  }*/
-  
   TIter it(list) ;
   TTask * task = 0 ; 
+
   while((task = static_cast<TTask *>(it.Next()) )){
     TString taskname(task->GetName()) ;
-    if(taskname.BeginsWith(name))
-      return task ;
+    if(taskname.BeginsWith(name)){
+      return task ;}
   }
   
   if(fDebug)
-    cout << "WARNING: AliEMCALGetter::ReturnT -> Task " << search << "/" << name << " not found!" << endl ; 
+    Warning("ReturnT", "-> Task %s/%s not found!", search.Data(), name.Data());
   return 0 ;
 }
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::RemoveTask(TString opt, TString name) const 
+
+{
+  // remove a task from the folder
+  // path is fTasksFolder/SDigitizer/EMCAL/name
+
+  TTask * task  = 0 ; 
+  TTask * emcal = 0 ; 
+  TList * lofTasks = 0 ; 
+
+  if (opt == "S") { // SDigitizer
+    task = dynamic_cast<TTask*>(fTasksFolder->FindObject("SDigitizer")) ;
+    if (!task) 
+      return ; 
+  } 
+  else if (opt == "D") { // Digitizer
+    task = dynamic_cast<TTask*>(fTasksFolder->FindObject("Digitizer")) ;
+    if (!task) 
+      return ; 
+  }
+  else if (opt == "C" || opt == "T" ) { // Clusterizer, TrackSegmentMaker
+    task = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ;
+    if (!task) 
+      return ; 
+  }
+  else {
+    Warning("RemoveTask", "-> Unknown option %s");
+    return ; 
+  }    
+
+  emcal =  dynamic_cast<TTask*>(task->GetListOfTasks()->FindObject("EMCAL")) ;
+
+  if (!emcal)
+    return ; 
+
+  lofTasks = emcal->GetListOfTasks() ;
+
+  if (!lofTasks) 
+    return ; 
+
+  TObject * obj = lofTasks->FindObject(name) ; 
+  if (obj) 
+
+    lofTasks->Remove(obj) ;
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::RemoveObjects(TString opt, TString name) const 
+{
+  // remove SDigits from the folder
+  // path is fSDigitsFolder/fHeaderFileName/name
+
+  TFolder * emcal     = 0 ; 
+  TFolder * emcalmain = 0 ; 
+
+  if (opt == "H") { // Hits
+    emcal = dynamic_cast<TFolder*>(fHitsFolder->FindObject("EMCAL")) ;
+    if (!emcal) 
+      return ;
+    name = "Hits" ; 
+  }
+  else if ( opt == "S") { // SDigits
+    emcalmain = dynamic_cast<TFolder*>(fSDigitsFolder->FindObject("EMCAL")) ;
+    if (!emcalmain) 
+      return ;
+    emcal = dynamic_cast<TFolder*>(emcalmain->FindObject(fHeaderFile)) ;
+    if (!emcal) 
+      return ;
+  }
+  else if (opt == "D") { // Digits
+    emcal = dynamic_cast<TFolder*>(fDigitsFolder->FindObject("EMCAL")) ;
+    if (!emcal) 
+      return ;
+  }
+  else if (opt == "RT") { // Tower RecPoints
+    emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/TowerRecPoints")) ;
+    if (!emcal) 
+      return ;
+  }
+  else if (opt == "RP") { // Preshower RecPoints
+    emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/PreShowerRecPoints")) ;
+    if (!emcal) 
+      return ;
+  }
+  else if (opt == "T") { // TrackSegments
+    emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/TrackSegments")) ;
+    if (!emcal) 
+      return ;
+  }
+  else if (opt == "P") { // RecParticles
+    emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/RecParticles")) ;
+    if (!emcal) 
+      return ;
+  }
+  else {
+    Warning("RemoveObjects", "-> Unknown option %s", opt.Data());
+    return ; 
+  }
+
+  TObjArray * ar  = dynamic_cast<TObjArray*>(emcal->FindObject(name)) ; 
+
+  if (ar) { 
+    emcal->Remove(ar) ;
+    ar->Delete() ; 
+    delete ar ; 
+  }
+
+  if (opt == "S") 
+    emcalmain->Remove(emcal) ; 
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::RemoveSDigits() const 
+{
+  TFolder * emcal= dynamic_cast<TFolder*>(fSDigitsFolder->FindObject("EMCAL")) ;
+
+  if (!emcal) 
+    return ;
+
+  emcal->SetOwner() ; 
+  emcal->Clear() ; 
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::CleanWhiteBoard(void){
+
+  TFolder * emcalmain = 0 ; 
+  TFolder * emcal ;
+  TObjArray * ar ;
+  TList * lofTasks = 0 ; 
+  TTask * task = 0 ; 
+  TTask * emcalt = 0 ; 
+
+  // Hits  
+
+  emcal = dynamic_cast<TFolder*>(fHitsFolder->FindObject("EMCAL")) ;
+
+  if (emcal){  
+    TObjArray * ar  = dynamic_cast<TObjArray*>(emcal->FindObject("Hits")) ; 
+    if (ar) { 
+      emcal->Remove(ar) ;
+      ar->Delete() ; 
+      delete ar ; 
+    }
+  }
+
+  // SDigits
+
+  emcalmain = dynamic_cast<TFolder*>(fSDigitsFolder->FindObject("EMCAL")) ;
+
+  if (emcalmain){ 
+    emcal = dynamic_cast<TFolder*>(emcalmain->FindObject(fHeaderFile)) ;
+    if (emcal) {
+      ar  = dynamic_cast<TObjArray*>(emcal->FindObject(fSDigitsTitle)) ; 
+      if (ar) { 
+        emcal->Remove(ar) ;
+        ar->Delete() ; 
+        delete ar ; 
+      }
+    }
+    emcalmain->Remove(emcal) ; 
+  }
+
+  // Digits
+
+  emcal = dynamic_cast<TFolder*>(fDigitsFolder->FindObject("EMCAL")) ;
+
+  if (emcal){ 
+    ar  = dynamic_cast<TObjArray*>(emcal->FindObject(fDigitsTitle)) ; 
+    if (ar) { 
+      emcal->Remove(ar) ;
+      ar->Delete() ; 
+      delete ar ; 
+    }
+  }
+
+  // TowerRecPoints
+
+  emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/TowerRecPoints")) ;
+
+  if (emcal){ 
+    ar  = dynamic_cast<TObjArray*>(emcal->FindObject(fRecPointsTitle)) ; 
+    if (ar) { 
+      emcal->Remove(ar) ;
+      ar->Delete() ; 
+      delete ar ; 
+    }
+  }
+
+  // PreShowerRecPoints
+
+  emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/PreShowerRecPoints")) ;
+
+  if (emcal){ 
+    ar  = dynamic_cast<TObjArray*>(emcal->FindObject(fRecPointsTitle)) ; 
+    if (ar) { 
+      emcal->Remove(ar) ;
+      ar->Delete() ; 
+      delete ar ; 
+    }
+  }  
+
+  // TrackSegments
+
+  emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/TrackSegments")) ;
+
+  if (emcal) { 
+    ar  = dynamic_cast<TObjArray*>(emcal->FindObject(fTrackSegmentsTitle)) ; 
+    if (ar) { 
+      emcal->Remove(ar) ;
+      ar->Delete() ; 
+      delete ar ; 
+    }
+  }
+
+  // RecParticles
+
+  emcal = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL/RecParticles")) ;
+
+  if (emcal){ 
+    ar  = dynamic_cast<TObjArray*>(emcal->FindObject(fRecParticlesTitle)) ; 
+    if (ar) { 
+      emcal->Remove(ar) ;
+      ar->Delete() ; 
+      delete ar ; 
+    }
+  }
+
+  //---- Now Tasks ----------- 
+
+  TObject * obj ;
+  TString sdname(fSDigitsTitle);
+
+  // Digitizer
+
+  task = dynamic_cast<TTask*>(fTasksFolder->FindObject("Digitizer")) ;
+
+  if (task){ 
+    emcalt =  dynamic_cast<TTask*>(task->GetListOfTasks()->FindObject("EMCAL")) ;
+    if (emcalt){
+      lofTasks = emcalt->GetListOfTasks() ;
+      if (lofTasks){ 
+        obj = lofTasks->FindObject(sdname.Data()) ; 
+        if (obj) 
+          lofTasks->Remove(obj) ;
+      }
+    }      
+  }
+
+  sdname.Append(":") ;
+
+  // Clusterizer, TrackSegmentMaker, PID
+
+  task = dynamic_cast<TTask*>(fTasksFolder->FindObject("Reconstructioner")) ;
+
+  if (task){ 
+    emcalt =  dynamic_cast<TTask*>(task->GetListOfTasks()->FindObject("EMCAL")) ;
+    if (emcalt){
+      lofTasks = emcalt->GetListOfTasks() ;
+      TIter next(lofTasks);
+      while((obj=next())){ 
+        TString oname(obj->GetName()) ;
+        if (oname.BeginsWith(sdname)){ 
+          lofTasks->Remove(obj) ;
+        }
+      }
+    }  
+  }
+
+  // SDigitizer
+
+  sdname.Append(fHeaderFile) ;
+  task = dynamic_cast<TTask*>(fTasksFolder->FindObject("SDigitizer")) ;
+
+  if (task) {
+    emcalt =  dynamic_cast<TTask*>(task->GetListOfTasks()->FindObject("EMCAL")) ;
+    if (emcalt){
+      lofTasks = emcalt->GetListOfTasks() ;
+      if (lofTasks){ 
+        obj = lofTasks->FindObject(sdname.Data()) ; 
+        if (obj) 
+          lofTasks->Remove(obj) ;
+      }
+    }
+  }  
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::SetTitle(const char * branchTitle ) 
+
+{
+  fBranchTitle        = branchTitle ;
+  fSDigitsTitle       = branchTitle ; 
+  fDigitsTitle        = branchTitle ; 
+  fRecPointsTitle     = branchTitle ; 
+  fRecParticlesTitle  = branchTitle ; 
+  fTrackSegmentsTitle = branchTitle ; 
+
+  if(fToSplit){
+
+    //First - extract full path if necessary
+
+    TString sFileName(fHeaderFile) ;
+    Ssiz_t islash = sFileName.Last('/') ;
+
+    if(islash<sFileName.Length())
+      sFileName.Remove(islash+1,sFileName.Length()) ;
+    else
+      sFileName="" ;
+
+    //Now construct file names
+
+    fSDigitsFileName       = sFileName ;
+    fDigitsFileName        = sFileName ; 
+    fRecPointsFileName     = sFileName ; 
+    fRecParticlesFileName  = sFileName ; 
+    fTrackSegmentsFileName = sFileName ; 
+    fSDigitsFileName      += "EMCAL.SDigits." ;
+    fDigitsFileName       += "EMCAL.Digits." ; 
+    fRecPointsFileName    += "EMCAL.RecData." ; 
+    fTrackSegmentsFileName+= "EMCAL.RecData." ; 
+    fRecParticlesFileName += "EMCAL.RecData." ; 
+
+    if((strcmp(fBranchTitle.Data(),"Default")!=0)&&(strcmp(fBranchTitle.Data(),"")!=0)){
+      fSDigitsFileName      += fBranchTitle ;
+      fSDigitsFileName      += "." ;
+      fDigitsFileName       += fBranchTitle ; 
+      fDigitsFileName       += "." ; 
+      fRecPointsFileName    += fBranchTitle ; 
+      fRecPointsFileName    += "." ; 
+      fRecParticlesFileName += fBranchTitle ; 
+      fRecParticlesFileName += "." ; 
+      fTrackSegmentsFileName+= fBranchTitle ; 
+      fTrackSegmentsFileName+= "." ; 
+    }
+
+    fSDigitsFileName      += "root" ;
+    fDigitsFileName       += "root" ; 
+    fRecPointsFileName    += "root" ; 
+    fRecParticlesFileName += "root" ; 
+    fTrackSegmentsFileName+= "root" ; 
+  }
+  else{
+    fSDigitsFileName       = "" ; 
+    fDigitsFileName        = "" ; 
+    fRecPointsFileName     = "" ; 
+    fRecParticlesFileName  = "" ; 
+    fTrackSegmentsFileName = "" ; 
+  }
+
+  TFolder * emcalFolder ; 
+  emcalFolder = dynamic_cast<TFolder*>(fHitsFolder->FindObject("EMCAL")) ; 
+
+  if ( !emcalFolder ) 
+    emcalFolder = fHitsFolder->AddFolder("EMCAL", "Hits from EMCAL") ; 
+
+  emcalFolder = dynamic_cast<TFolder*>(fSDigitsFolder->FindObject("EMCAL")) ;
+
+  if ( !emcalFolder ) 
+    emcalFolder = fSDigitsFolder->AddFolder("EMCAL", "SDigits from EMCAL") ; 
+
+  //Make folder for SDigits
+
+  TString subdir(fHeaderFile) ;
+  subdir.ReplaceAll("/","_") ;
+
+  emcalFolder->AddFolder(subdir, fSDigitsFileName.Data());
+  emcalFolder  = dynamic_cast<TFolder*>(fDigitsFolder->FindObject("EMCAL")) ;
+
+  if ( !emcalFolder ) 
+    emcalFolder = fDigitsFolder->AddFolder("EMCAL", "Digits from EMCAL") ;  
+
+  emcalFolder  = dynamic_cast<TFolder*>(fRecoFolder->FindObject("EMCAL")) ; 
+
+  if ( !emcalFolder )
+    emcalFolder = fRecoFolder->AddFolder("EMCAL", "Reconstructed data from EMCAL") ;  
+}
+
+//____________________________________________________________________________ 
+
+void AliEMCALGetter::CloseSplitFiles(void){
+
+  TFile * file ;
+  file = static_cast<TFile*>(gROOT->GetFile(fSDigitsFileName.Data() ) ) ;
+
+  if(file)
+    file->Close() ;
+
+  file = static_cast<TFile*>(gROOT->GetFile(fDigitsFileName.Data() ) ) ;
+
+  if(file)
+    file->Close() ;
+
+  file = static_cast<TFile*>(gROOT->GetFile(fRecPointsFileName.Data() ) ) ;
+
+  if(file)
+    file->Close() ;
+
+  file = static_cast<TFile*>(gROOT->GetFile(fTrackSegmentsFileName.Data() ) ) ;
+
+  if(file)
+    file->Close() ;
+
+  file = static_cast<TFile*>(gROOT->GetFile(fRecParticlesFileName.Data() ) ) ;
+
+  if(file)
+    file->Close() ;
+}
+
+
+
+
+
+