]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - PHOS/AliPHOSDigitizer.cxx
Changes needed on Sun with Root v4-03-04
[u/mrichter/AliRoot.git] / PHOS / AliPHOSDigitizer.cxx
index 7dca6e9ec8ca3c4f447405647139285d5d7c550c..d55fb662f8a861e920298e4eb67b3497473b6041 100644 (file)
 
 /* $Id$ */
 
+
 //_________________________________________________________________________
 //*-- Author :  Dmitri Peressounko (SUBATECH & Kurchatov Institute) 
 //////////////////////////////////////////////////////////////////////////////
 // This TTask performs digitization of Summable digits (in the PHOS case it is just
 // the sum of contributions from all primary particles into a given cell). 
 // In addition it performs mixing of summable digits from different events.
+// The name of the TTask is also the title of the branch that will contain 
+// the created SDigits
+// The title of the TTAsk is the name of the file that contains the hits from
+// which the SDigits are created
 //
 // For each event two branches are created in TreeD:
 //   "PHOS" - list of digits
 //
 
 // --- ROOT system ---
-#include "TFile.h"
 #include "TTree.h"
 #include "TSystem.h"
-#include "TROOT.h"
-#include "TFolder.h"
-#include "TObjString.h"
 #include "TBenchmark.h"
+#include "TRandom.h"
+
 // --- Standard library ---
-#include <iomanip.h>
 
 // --- AliRoot header files ---
-
-#include "AliRun.h"
+#include "AliLog.h"
+#include "AliRunDigitizer.h"
 #include "AliPHOSDigit.h"
-#include "AliPHOS.h"
+#include "AliPHOSGetter.h"
 #include "AliPHOSDigitizer.h"
 #include "AliPHOSSDigitizer.h"
 #include "AliPHOSGeometry.h"
+#include "AliPHOSTick.h"
 
 ClassImp(AliPHOSDigitizer)
 
 
 //____________________________________________________________________________ 
-  AliPHOSDigitizer::AliPHOSDigitizer():TTask("AliPHOSDigitizer","") 
+  AliPHOSDigitizer::AliPHOSDigitizer():AliDigitizer("",""),
+                                      fInput(0),
+                                      fInputFileNames(0x0),
+                                      fEventNames(0x0)
 {
   // ctor
-
-  fSDigitizer         = 0 ;
-
-  fNinputs            = 1 ;
-  fPinNoise           = 0.01 ;
-  fEMCDigitThreshold  = 0.01 ;
-  fCPVNoise           = 0.01;
-  fCPVDigitThreshold  = 0.09 ;
-  fPPSDNoise          = 0.0000001;
-  fPPSDDigitThreshold = 0.0000002 ;  
-  fInitialized        = kFALSE ;
-
-  fHeaderFiles        = 0;
-  fSDigitsTitles      = 0;
-  fSDigits            = 0 ;
-  fDigits             = 0;
-
-}
-//____________________________________________________________________________ 
-void AliPHOSDigitizer::Init()
-{
-  // Makes all memory allocations
-  // Adds Digitizer task to the folder of PHOS tasks
-  
-  if(!fInitialized){
-    
-    if (fHeaderFiles == 0) {
-      fHeaderFiles  = new TClonesArray("TObjString",1) ;
-      new((*fHeaderFiles)[0]) TObjString("galice.root") ;
-    }
-    
-    //Test, if this file already open
-    
-    TFile *file = (TFile*) gROOT->GetFile(((TObjString *) fHeaderFiles->At(0))->GetString() ) ;
-    
-    if(file==0){
-      if(((TObjString *) fHeaderFiles->At(0))->GetString().Contains("rfio"))
-       file =  TFile::Open(((TObjString *) fHeaderFiles->At(0))->GetString(),"update") ;
-      else
-       file = new TFile(((TObjString *) fHeaderFiles->At(0))->GetString(),"update") ;      
-      gAlice = (AliRun *) file->Get("gAlice") ;  //If not read yet
-    }
-    else
-      file = new TFile(((TObjString *) fHeaderFiles->At(0))->GetString()) ;
-    
-    file->cd() ;
-    
-    if (fSDigitsTitles == 0) {
-      fSDigitsTitles = new TClonesArray("TObjString",1);
-      new((*fSDigitsTitles)[0]) TObjString("") ;   
-    }
-    
-    fSDigits      = new TClonesArray("TClonesArray",1) ;
-    new((*fSDigits)[0]) TClonesArray("AliPHOSDigit",1000) ;
-
-    fSDigitizer = 0 ;
-    
-    fDigitsTitle = "" ;
-    
-    fDigits = new TClonesArray("AliPHOSDigit",200000) ;
-    
-    fIevent    = new TArrayI(1) ;
-    fIevent->AddAt(-1,0 ) ; 
-    fIeventMax = new TArrayI(1) ;
-    
-    fIeventMax->AddAt((Int_t) gAlice->TreeE()->GetEntries(), 0 );
-    
-    //add Task to //YSAlice/tasks/(S)Diditizer/PHOS
-    TFolder * alice  = (TFolder*)gROOT->GetListOfBrowsables()->FindObject("YSAlice") ; 
-    TTask * aliceSD  = (TTask*)alice->FindObject("tasks/(S)Digitizer") ; 
-    TTask * phosSD   = (TTask*)aliceSD->GetListOfTasks()->FindObject("PHOS") ;
-    phosSD->Add(this) ; 
-    
-    fInitialized = kTRUE ;
-  }
+  InitParameters() ; 
+  fDefaultInit = kTRUE ;
+  fManager = 0 ;                     // We work in the standalong mode
+  fEventFolderName = "" ; 
 }
 
 //____________________________________________________________________________ 
-AliPHOSDigitizer::AliPHOSDigitizer(const char *headerFile,const char *sDigitsTitle):
-  TTask("AliPHOSDigitizer","")
+AliPHOSDigitizer::AliPHOSDigitizer(TString alirunFileName, 
+                                  TString eventFolderName):
+  AliDigitizer("PHOS"+AliConfig::Instance()->GetDigitizerTaskName(), 
+              alirunFileName), 
+  fInputFileNames(0), fEventNames(0), fEventFolderName(eventFolderName)
 {
   // ctor
-  fHeaderFiles  = new TClonesArray("TObjString",1) ;          
-  new((*fHeaderFiles)[0]) TObjString(headerFile) ;
-  
-  fSDigitsTitles = new TClonesArray("TObjString",1);         // Title name of the SDigits branch
-  new((*fSDigitsTitles)[0]) TObjString(sDigitsTitle) ;  
-    
-  fNinputs            = 1 ;
-  fPinNoise           = 0.01 ;
-  fEMCDigitThreshold  = 0.01 ;
-  fCPVNoise           = 0.01;
-  fCPVDigitThreshold  = 0.09 ;
-  fPPSDNoise          = 0.0000001;
-  fPPSDDigitThreshold = 0.0000002 ;  
-  fInitialized        = kFALSE ;
-
+  InitParameters() ; 
   Init() ;
-  
+  fDefaultInit = kFALSE ; 
+  fManager = 0 ;                     // We work in the standalong mode
 }
 
 //____________________________________________________________________________ 
-  AliPHOSDigitizer::~AliPHOSDigitizer()
+AliPHOSDigitizer::AliPHOSDigitizer(const AliPHOSDigitizer & d)
+  : AliDigitizer(d)
 {
-  // dtor
-
-  if(fHeaderFiles)  delete fHeaderFiles ;
-  if(fSDigitsTitles) delete fSDigitsTitles ;
-  if(fSDigits)      delete fSDigits ;
-  if(fDigits)       delete fDigits ;
+  // copyy ctor 
+
+  SetName(d.GetName()) ; 
+  SetTitle(d.GetTitle()) ; 
+  fPinNoise = d.fPinNoise ; 
+  fEMCDigitThreshold = d.fEMCDigitThreshold ; 
+  fCPVNoise          = d.fCPVNoise ; 
+  fCPVDigitThreshold = d.fCPVDigitThreshold ; 
+  fTimeResolution    = d.fTimeResolution ; 
+  fTimeThreshold     = d.fTimeThreshold ; 
+  fTimeSignalLength  = d.fTimeSignalLength ; 
+  fADCchanelEmc      = d.fADCchanelEmc ; 
+  fADCpedestalEmc    = d.fADCpedestalEmc ; 
+  fNADCemc           = d.fNADCemc ;
+  fADCchanelCpv      = d.fADCchanelCpv ;
+  fADCpedestalCpv    = d.fADCpedestalCpv ;
+  fNADCcpv           = d.fNADCcpv ; 
+  fEventFolderName   = d.fEventFolderName;
 }
-//____________________________________________________________________________
-void AliPHOSDigitizer::Reset() 
-{ 
-  // sets current event number to the first simulated event
-
-  if(!fInitialized)
-    Init() ;
 
-  Int_t inputs ;
-  for(inputs = 0; inputs < fNinputs ;inputs++)
-      fIevent->AddAt(-1, inputs ) ;
-  
+//____________________________________________________________________________ 
+AliPHOSDigitizer::AliPHOSDigitizer(AliRunDigitizer * rd):
+ AliDigitizer(rd,"PHOS"+AliConfig::Instance()->GetDigitizerTaskName()),
+ fEventFolderName(0)
+{
+  // ctor Init() is called by RunDigitizer
+  fManager = rd ; 
+  fEventFolderName = fManager->GetInputFolderName(0) ;
+  SetTitle(dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetFileName(0));
+  InitParameters() ; 
+  fDefaultInit = kFALSE ; 
 }
-//____________________________________________________________________________
-Bool_t AliPHOSDigitizer::Combinator() 
-{ 
-  // Makes all desirable combinations of Signal+Background,
-  // returns kFALSE when all combinations are made.
-  // May be useful to introduce options like "One-to-One", "All-to-One" and "All-to-All" ?
-  //realizing "One-to-One" option...
-
-  if(!fInitialized)
-    Init() ;
-
-  Int_t inputs ;
-  Bool_t endNotReached = kTRUE ;
 
-  for(inputs = 0; (inputs < fNinputs) && endNotReached ;inputs++){
-    if(fIevent->At(inputs)+1 < fIeventMax->At(inputs))
-      fIevent->AddAt(fIevent->At(inputs)+1, inputs ) ;
-    else
-      if(inputs == 0)
-       endNotReached = kFALSE ;
-      else //for inputs other than base one start from the beginning
-       fIevent->AddAt(0, inputs ) ;
-    
-  }
-  return endNotReached ;
-  
+//____________________________________________________________________________ 
+  AliPHOSDigitizer::~AliPHOSDigitizer()
+{
+  // dtor
+  delete [] fInputFileNames ; 
+  delete [] fEventNames ; 
 }
 
 //____________________________________________________________________________
-void AliPHOSDigitizer::Digitize(Option_t *option
+void AliPHOSDigitizer::Digitize(Int_t event
 { 
   
   // Makes the digitization of the collected summable digits.
   //  It first creates the array of all PHOS modules
-  //  filled with noise (different for EMC, CPV and PPSD) and
+  //  filled with noise (different for EMC, and CPV) and
   //  then adds contributions from SDigits. 
   // This design avoids scanning over the list of digits to add 
   // contribution to new SDigits only.
 
-  if(!fInitialized)
-    Init() ;
-
-  fDigits->Clear() ;
-
-  AliPHOS * phos = (AliPHOS *) gAlice->GetDetector("PHOS") ;   
-  AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance( phos->GetGeometry()->GetName(), phos->GetGeometry()->GetTitle() );
-
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+  Int_t ReadEvent = event ; 
+  if (fManager) 
+    ReadEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetCurrentEventNumber() ; 
+  AliInfo(Form("Adding event %d from input stream 0 %s %s", 
+              ReadEvent, GetTitle(), fEventFolderName.Data())) ; 
+  gime->Event(ReadEvent, "S") ;
+  TClonesArray * digits = gime->Digits() ; 
+  digits->Clear() ;
+
+  const AliPHOSGeometry *geom = gime->PHOSGeometry() ; 
   //Making digits with noise, first EMC
   Int_t nEMC = geom->GetNModules()*geom->GetNPhi()*geom->GetNZ();
   
   Int_t nCPV ;
-  Int_t nPPSD ;
   Int_t absID ;
-  TString name      =  geom->GetName() ;
   
-  if ( name == "IHEP" || name == "MIXT" )    
-    nCPV =nEMC + geom->GetNumberOfCPVPadsZ()*geom->GetNumberOfCPVPadsPhi()*
-      geom->GetNCPVModules()*geom->GetNumberOfCPVLayers() ;
-  else
-    nCPV = nEMC; 
+  nCPV = nEMC + geom->GetNumberOfCPVPadsZ() * geom->GetNumberOfCPVPadsPhi() * geom->GetNModules() ;
   
-  if ( name == "GPS2" || name == "MIXT" )    
-    nPPSD =nCPV+2*geom->GetNPPSDModules()*geom->GetNumberOfModulesPhi()*geom->GetNumberOfModulesZ()*
-      geom->GetNumberOfPadsPhi()*geom->GetNumberOfPadsZ() ;
-  else
-    nPPSD = nCPV; 
+  digits->Expand(nCPV) ;
 
+  // get first the sdigitizer from the tasks list 
+  if ( !gime->SDigitizer() ) 
+    gime->LoadSDigitizer();
+  AliPHOSSDigitizer * sDigitizer = gime->SDigitizer(); 
 
-  fDigits->Expand(nPPSD) ;
+  if ( !sDigitizer )
+    AliFatal(Form("SDigitizer with name %s %s not found", 
+                 GetTitle(), fEventFolderName.Data() )) ; 
 
-  
-  for(absID = 1; absID <= nEMC; absID++){
-    Float_t noise = gRandom->Gaus(0., fPinNoise) ; 
-    new((*fDigits)[absID-1]) AliPHOSDigit( -1,absID,fSDigitizer->Digitize(noise) ) ;
-  }
-  
-  for(absID = nEMC+1; absID <= nCPV; absID++){
-    Float_t noise = gRandom->Gaus(0., fCPVNoise) ; 
-    new((*fDigits)[absID-1]) AliPHOSDigit( -1,absID,fSDigitizer->Digitize(noise) ) ;
-  }
-  
-  for(absID = nCPV+1; absID <= nPPSD; absID++){
-    Float_t noise = gRandom->Gaus(0., fPPSDNoise) ; 
-    new((*fDigits)[absID-1]) AliPHOSDigit( -1,absID,fSDigitizer->Digitize(noise) ) ;
+  //take all the inputs to add together and load the SDigits
+  TObjArray * sdigArray = new TObjArray(fInput) ;
+  sdigArray->AddAt(gime->SDigits(), 0) ;
+  Int_t i ;
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+    AliPHOSGetter * gime = AliPHOSGetter::Instance(fInputFileNames[i], tempo) ;
+    if (fManager) 
+      ReadEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(i))->GetCurrentEventNumber() ; 
+    AliInfo(Form("Adding event %d from input stream %d %s %s", 
+                ReadEvent, i, fInputFileNames[i].Data(), tempo.Data())) ; 
+    gime->Event(ReadEvent,"S");
+    sdigArray->AddAt(gime->SDigits(), i) ;
   }
-  
 
-  // Now look throught (unsorted) list of SDigits and add corresponding digits  
-  AliPHOSDigit *curSDigit ;
-  AliPHOSDigit *digit ;
-    
-  Int_t inputs;
-  for(inputs = 0; inputs< fNinputs ; inputs++){  //loop over (possible) merge sources
-    
-    TClonesArray * sdigits= (TClonesArray *)fSDigits->At(inputs) ;
-    Int_t isdigit ;
-
-    Int_t nSDigits = sdigits->GetEntries() ;     
-    for(isdigit=0;isdigit< nSDigits; isdigit++){
-      curSDigit = (AliPHOSDigit *)sdigits->At(isdigit) ;
-      if(inputs)                                       //Shift primaries for non-background sdigits
-       curSDigit->ShiftPrimary(inputs) ;
-      digit = (AliPHOSDigit *)fDigits->At(curSDigit->GetId() - 1);
-      *digit = *digit + *curSDigit ;
-    }  
+  //Find the first crystall with signal
+  Int_t nextSig = 200000 ; 
+  TClonesArray * sdigits ;  
+  for(i = 0 ; i < fInput ; i++){
+    sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
+    if ( !sdigits->GetEntriesFast() )
+      continue ; 
+    Int_t curNext = dynamic_cast<AliPHOSDigit *>(sdigits->At(0))->GetId() ;
+    if(curNext < nextSig) 
+      nextSig = curNext ;
   }
-
-
-  //remove digits below thresholds
-  for(absID = 0; absID < nEMC ; absID++)
-    if(fSDigitizer->Calibrate(((AliPHOSDigit*)fDigits->At(absID))->GetAmp()) < fEMCDigitThreshold)
-      fDigits->RemoveAt(absID) ;
-  for(absID = nEMC; absID < nCPV ; absID++)
-    if(fSDigitizer->Calibrate(((AliPHOSDigit*)fDigits->At(absID))->GetAmp()) < fCPVDigitThreshold)
-      fDigits->RemoveAt(absID) ;
-  for(absID = nCPV; absID < nPPSD ; absID++)
-    if(fSDigitizer->Calibrate(((AliPHOSDigit *)fDigits->At(absID))->GetAmp()) < fPPSDDigitThreshold)
-      fDigits->RemoveAt(absID) ;
   
-  fDigits->Compress() ;  
+  TArrayI index(fInput) ;
+  index.Reset() ;  //Set all indexes to zero
   
-  Int_t ndigits = fDigits->GetEntriesFast() ;
-
-  fDigits->Expand(ndigits) ;
-
-
-  //Set indexes in list of digits
-  Int_t i ;
-  for (i = 0 ; i < ndigits ; i++) { 
-    AliPHOSDigit * digit = (AliPHOSDigit *) fDigits->At(i) ; 
-    digit->SetIndexInList(i) ;     
-  }
-}
-//____________________________________________________________________________
-void AliPHOSDigitizer::WriteDigits()
-{
-
-  // Makes TreeD in the output file. 
-  // Check if branch already exists: 
-  //   if yes, exit without writing: ROOT TTree does not support overwriting/updating of 
-  //      already existing branches. 
-  //   else creates branch with Digits, named "PHOS", title "...",
-  //      and branch "AliPHOSDigitizer", with the same title to keep all the parameters
-  //      and names of files, from which digits are made.
-
-  gAlice->GetEvent(fIevent->At(0)) ;  // Suitable only for One-To-One mixing
-  gAlice->SetEvent(fIevent->At(0)) ;  // for all-to-all will produce a lot of branches in TreeD
-
-  if(gAlice->TreeD()==0)
-    gAlice->MakeTree("D") ;  
-
-  //Check, if this branch already exits?
-  TBranch * digitsBranch = 0;
-  TBranch * digitizerBranch = 0;
+  AliPHOSDigit * digit ;
+  AliPHOSDigit * curSDigit ;
   
-  TObjArray * branches = gAlice->TreeD()->GetListOfBranches() ;
-  Int_t ibranch;
-  Bool_t phosNotFound = kTRUE ;
-  Bool_t digitizerNotFound = kTRUE ;
+  TClonesArray * ticks = new TClonesArray("AliPHOSTick",1000) ;
   
-  for(ibranch = 0;ibranch <branches->GetEntries();ibranch++){
+  //Put Noise contribution
+  for(absID = 1 ; absID <= nEMC ; absID++){
+    Float_t noise = gRandom->Gaus(0., fPinNoise) ; 
+    new((*digits)[absID-1]) AliPHOSDigit( -1, absID, sDigitizer->Digitize(noise), TimeOfNoise() ) ;
+    //look if we have to add signal?
+    digit = dynamic_cast<AliPHOSDigit *>(digits->At(absID-1)) ;
     
-    if(phosNotFound){
-      digitsBranch=(TBranch *) branches->At(ibranch) ;
-      if( (strcmp("PHOS",digitsBranch->GetName())==0 ) &&
-         (fDigitsTitle.CompareTo(digitsBranch->GetTitle()) == 0) )
-       phosNotFound = kFALSE ;
-    }
-    if(digitizerNotFound){
-      digitizerBranch = (TBranch *) branches->At(ibranch) ;
-      if( (strcmp(digitizerBranch->GetName(),"AliPHOSDigitizer") == 0) &&
-         (fDigitsTitle.CompareTo(digitizerBranch->GetTitle()) == 0))
-       digitizerNotFound = kFALSE ;
+    if(absID==nextSig){
+      //Add SDigits from all inputs 
+      ticks->Clear() ;
+      Int_t contrib = 0 ;
+      Float_t a = digit->GetAmp() ;
+      Float_t b = TMath::Abs( a / fTimeSignalLength) ;
+      //Mark the beginning of the signal
+      new((*ticks)[contrib++]) AliPHOSTick(digit->GetTime(),0, b);  
+      //Mark the end of the ignal     
+      new((*ticks)[contrib++]) AliPHOSTick(digit->GetTime()+fTimeSignalLength, -a, -b); 
+      
+      //loop over inputs
+      for(i = 0 ; i < fInput ; i++){
+       if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+         curSDigit = dynamic_cast<AliPHOSDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;       
+       else
+         curSDigit = 0 ;
+       //May be several digits will contribute from the same input
+       while(curSDigit && curSDigit->GetId() == absID){           
+         //Shift primary to separate primaries belonging different inputs
+         Int_t primaryoffset ;
+         if(fManager)
+           primaryoffset = fManager->GetMask(i) ; 
+         else
+           primaryoffset = 10000000*i ;
+         curSDigit->ShiftPrimary(primaryoffset) ;
+         
+         a = curSDigit->GetAmp() ;
+         b = a /fTimeSignalLength ;
+         new((*ticks)[contrib++]) AliPHOSTick(curSDigit->GetTime(),0, b);  
+         new((*ticks)[contrib++]) AliPHOSTick(curSDigit->GetTime()+fTimeSignalLength, -a, -b); 
+         
+         *digit = *digit + *curSDigit ;  //add energies
+         
+         index[i]++ ;
+         if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+           curSDigit = dynamic_cast<AliPHOSDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;     
+         else
+           curSDigit = 0 ;
+       }
+      }
+      
+      //calculate and set time
+      Float_t time = FrontEdgeTime(ticks) ;
+      digit->SetTime(time) ;
+      
+      //Find next signal module
+      nextSig = 200000 ;
+      for(i = 0 ; i < fInput ; i++){
+       sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
+       Int_t curNext = nextSig ;
+       if(sdigits->GetEntriesFast() > index[i] ){
+         curNext = dynamic_cast<AliPHOSDigit *>(sdigits->At(index[i]))->GetId() ;
+       }
+       if(curNext < nextSig) nextSig = curNext ;
+      }
     }
   }
   
+  ticks->Delete() ;
+  delete ticks ;
   
-  if(!(digitizerNotFound && phosNotFound)){ 
-    cout << "AliPHOSDigitizer error: " << endl ;
-    cout << "       can not update/overwrite existing branches "<< endl ;
-    cout << "       do not write " << endl ;
-    return ;
-  }
-
-  // create new branches
+  //Now CPV digits (different noise and no timing)
+  for(absID = nEMC+1; absID <= nCPV; absID++){
+    Float_t noise = gRandom->Gaus(0., fCPVNoise) ; 
+    new((*digits)[absID-1]) AliPHOSDigit( -1,absID,sDigitizer->Digitize(noise), TimeOfNoise() ) ;
+    //look if we have to add signal?
+    if(absID==nextSig){
+      digit = dynamic_cast<AliPHOSDigit *>(digits->At(absID-1)) ;
+      //Add SDigits from all inputs
+      for(i = 0 ; i < fInput ; i++){
+       if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+         curSDigit = dynamic_cast<AliPHOSDigit*>( dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;      
+       else
+         curSDigit = 0 ;
+
+       //May be several digits will contribute from the same input
+       while(curSDigit && curSDigit->GetId() == absID){           
+         //Shift primary to separate primaries belonging different inputs
+         Int_t primaryoffset ;
+         if(fManager)
+           primaryoffset = fManager->GetMask(i) ; 
+         else
+           primaryoffset = 10000000*i ;
+         curSDigit->ShiftPrimary(primaryoffset) ;
+
+         //add energies
+         *digit = *digit + *curSDigit ;  
+         index[i]++ ;
+         if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+           curSDigit = dynamic_cast<AliPHOSDigit*>( dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i]) ) ;   
+         else
+           curSDigit = 0 ;
+       }
+      }
 
-  //First generate file name
-  char * file =0;
-  if(gSystem->Getenv("CONFIG_SPLIT_FILE")){ //generating file name
-    file = new char[strlen(gAlice->GetBaseFile())+20] ;
-    sprintf(file,"%s/PHOS.Digits.root",gAlice->GetBaseFile()) ;
+      //Find next signal module
+      nextSig = 200000 ;
+      for(i = 0 ; i < fInput ; i++){
+       sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
+       Int_t curNext = nextSig ;
+       if(sdigits->GetEntriesFast() > index[i] )
+         curNext = dynamic_cast<AliPHOSDigit *>( sdigits->At(index[i]) )->GetId() ;
+       if(curNext < nextSig) nextSig = curNext ;
+      }
+      
+    }
   }
+
+  delete sdigArray ; //We should not delete its contents 
   
-  TDirectory *cwd = gDirectory;
-  
-  //First create list of sdigits
-  Int_t bufferSize = 32000 ;    
-  digitsBranch = gAlice->TreeD()->Branch("PHOS",&fDigits,bufferSize);
-  digitsBranch->SetTitle(fDigitsTitle.Data());
-  if (file) {
-    digitsBranch->SetFile(file);
-    TIter next( digitsBranch->GetListOfBranches());
-    TBranch * sbr ;
-    while ((sbr=(TBranch*)next())) {
-      sbr->SetFile(file);
-    }   
-    cwd->cd();
-  } 
-    
-  //second - create Digitizer
-  Int_t splitlevel = 0 ;
-  AliPHOSDigitizer * d = this ;
-  digitizerBranch = gAlice->TreeD()->Branch("AliPHOSDigitizer","AliPHOSDigitizer",
-                                           &d,bufferSize,splitlevel); 
-  digitizerBranch->SetTitle(fDigitsTitle.Data());
-  if (file) {
-    digitizerBranch->SetFile(file);
-    TIter next( digitizerBranch->GetListOfBranches());
-    TBranch * sbr;
-    while ((sbr=(TBranch*)next())) {
-      sbr->SetFile(file);
-    }   
-    cwd->cd();
+  //remove digits below thresholds
+  for(i = 0 ; i < nEMC ; i++){
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
+    if(sDigitizer->Calibrate( digit->GetAmp() ) < fEMCDigitThreshold)
+      digits->RemoveAt(i) ;
+    else
+      digit->SetTime(gRandom->Gaus(digit->GetTime(),fTimeResolution) ) ;
   }
 
-  digitsBranch->Fill() ;      
-  digitizerBranch->Fill() ;
 
-  gAlice->TreeD()->Write(0,kOverwrite) ;  
+  for(i = nEMC; i < nCPV ; i++)
+    if( sDigitizer->Calibrate( dynamic_cast<AliPHOSDigit*>(digits->At(i))->GetAmp() ) < fCPVDigitThreshold )
+      digits->RemoveAt(i) ;
+    
+  digits->Compress() ;  
+  
+  Int_t ndigits = digits->GetEntriesFast() ;
+  digits->Expand(ndigits) ;
 
-  //remove fSDigitizer before new event.  
-  if(fSDigitizer){
-    delete fSDigitizer ;
-    fSDigitizer = 0 ;
+  //Set indexes in list of digits and make true digitization of the energy
+  for (i = 0 ; i < ndigits ; i++) { 
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ; 
+    digit->SetIndexInList(i) ;     
+    Float_t energy = sDigitizer->Calibrate(digit->GetAmp()) ;
+    digit->SetAmp(DigitizeEnergy(energy,digit->GetId()) ) ;
   }
+}
 
+//____________________________________________________________________________
+Int_t AliPHOSDigitizer::DigitizeEnergy(Float_t energy, Int_t absId)
+{
+  // Returns digitized value of the energy in a cell absId
 
+  Int_t chanel ;
+  if(absId <= fEmcCrystals){ //digitize as EMC 
+    chanel = (Int_t) TMath::Ceil((energy - fADCpedestalEmc)/fADCchanelEmc) ;       
+    if(chanel > fNADCemc ) chanel =  fNADCemc ;
+  }
+  else{ //Digitize as CPV
+    chanel = (Int_t) TMath::Ceil((energy - fADCpedestalCpv)/fADCchanelCpv) ;       
+    if(chanel > fNADCcpv ) chanel =  fNADCcpv ;
+  }
+  return chanel ;
 }
 
 //____________________________________________________________________________
 void AliPHOSDigitizer::Exec(Option_t *option) 
 { 
-  // Managing method
-
-  if(!fInitialized)    Init() ;
+  // Steering method to process digitization for events
+  // in the range from fFirstEvent to fLastEvent.
+  // This range is optionally set by SetEventRange().
+  // if fLastEvent=-1, then process events until the end.
+  // by default fLastEvent = fFirstEvent (process only one event)
+
+  if (!fInit) { // to prevent overwrite existing file
+    AliError(Form("Give a version name different from %s", 
+                 fEventFolderName.Data() )) ;
+    return ;
+  }   
 
+  if (strstr(option,"print")) {
+    Print();
+    return ; 
+  }
+  
   if(strstr(option,"tim"))
     gBenchmark->Start("PHOSDigitizer");
+  
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle()) ;
 
-  //reset events numbers to start from the beginnig
-  Reset() ;
+  // Post Digitizer to the white board
+  gime->PostDigitizer(this) ;
   
-  while(Combinator()){  
-    
-    if(!ReadSDigits()) //read sdigits event(s) evaluated by Combinator() from file(s)
-      return ;    
-    
-    Digitize(option) ; //Add prepared SDigits to digits and add the noise
+  if (fLastEvent == -1) 
+    fLastEvent = gime->MaxEvent() - 1 ;
+  else if (fManager) 
+    fLastEvent = fFirstEvent ; 
+  Int_t nEvents   = fLastEvent - fFirstEvent + 1;
+  
+  Int_t ievent ;
+
+  for (ievent = fFirstEvent; ievent <= fLastEvent; ievent++) {
+    gime->Event(ievent,"S") ;
+
+    Digitize(ievent) ; //Add prepared SDigits to digits and add the noise
+
     WriteDigits() ;
-    
+
     if(strstr(option,"deb"))
       PrintDigits(option);
-
-  }
+    
+    //increment the total number of Digits per run 
+    fDigitsInRun += gime->Digits()->GetEntriesFast() ;  
+ }
+  
+  gime->PhosLoader()->CleanDigitizer();
 
   if(strstr(option,"tim")){
     gBenchmark->Stop("PHOSDigitizer");
-    cout << "AliPHOSDigitizer:" << endl ;
-    cout << "  took " << gBenchmark->GetCpuTime("PHOSDigitizer") << " seconds for SDigitizing " 
-        <<  gBenchmark->GetCpuTime("PHOSDigitizer")/(fIeventMax->At(0)) << " seconds per event " << endl ;
-    cout << endl ;
-  }
-  
+    TString message ; 
+    message = "  took %f seconds for Digitizing %f seconds per event\n" ; 
+    AliInfo(Form( message.Data(), 
+        gBenchmark->GetCpuTime("PHOSDigitizer"), 
+        gBenchmark->GetCpuTime("PHOSDigitizer")/nEvents )); 
+  } 
 }
 
-//__________________________________________________________________
-Bool_t AliPHOSDigitizer::ReadSDigits()
+//____________________________________________________________________________ 
+Float_t AliPHOSDigitizer::FrontEdgeTime(TClonesArray * ticks) const
 {
-  // Reads summable digits from the opened files for the particular set of events given by fIevent
+  // Returns the shortest time among all time ticks
 
-  if(!fInitialized)    Init() ;
+  ticks->Sort() ; //Sort in accordance with times of ticks
+  TIter it(ticks) ;
+  AliPHOSTick * ctick = (AliPHOSTick *) it.Next() ;
+  Float_t time = ctick->CrossingTime(fTimeThreshold) ;    
 
+  AliPHOSTick * t ;  
+  while((t=(AliPHOSTick*) it.Next())){
+    if(t->GetTime() < time)  //This tick starts before crossing
+      *ctick+=*t ;
+    else
+      return time ;
 
-  Int_t inputs ;
-  for(inputs = fNinputs-1; inputs >= 0; inputs --){
+    time = ctick->CrossingTime(fTimeThreshold) ;    
+  }
+  return time ;
+}
 
-    Int_t event = fIevent->At(inputs) ;
+//____________________________________________________________________________ 
+Bool_t AliPHOSDigitizer::Init()
+{
+  // Makes all memory allocations
+  fInit = kTRUE ; 
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+  if ( gime == 0 ) {
+    AliFatal(Form("Could not obtain the Getter object for file %s and event %s !", 
+                 GetTitle(), fEventFolderName.Data()));  
+    return kFALSE;
+  } 
+  
+  const AliPHOSGeometry * geom = gime->PHOSGeometry() ;
 
-    TFile * file = (TFile*) gROOT->GetFile(((TObjString *) fHeaderFiles->At(inputs))->GetString() ) ;
-    file->cd() ;
+  fEmcCrystals = geom->GetNModules() * geom->GetNCristalsInModule() ;
+  
+  TString opt("Digits") ; 
+  if(gime->VersionExists(opt) ) { 
+    AliError(Form("Give a version name different from %s", 
+                 fEventFolderName.Data() )) ;
+    fInit = kFALSE ; 
+  }
 
-    // Get SDigits Tree header from file
-    char treeName[20]; 
-    sprintf(treeName,"TreeS%d",event);
-    TTree * treeS = (TTree*)file->Get(treeName);
-   
-    if(treeS==0){
-      cout << "Error at AliPHOSDigitizer: no "<<treeName << "   in file " << file->GetName() << endl ;
-      cout << "Do nothing " << endl ;
-      return kFALSE ;
-    }
+  fFirstEvent = 0 ; 
+  fLastEvent = fFirstEvent ; 
+  if (fManager) 
+    fInput = fManager->GetNinputs() ; 
+  else 
+    fInput           = 1 ;
+  
+  fInputFileNames  = new TString[fInput] ; 
+  fEventNames      = new TString[fInput] ; 
+  fInputFileNames[0] = GetTitle() ; 
+  fEventNames[0]     = fEventFolderName.Data() ; 
+  Int_t index ; 
+  for (index = 1 ; index < fInput ; index++) {
+    fInputFileNames[index] = dynamic_cast<AliStream*>(fManager->GetInputStream(index))->GetFileName(0); 
+    TString tempo = fManager->GetInputFolderName(index) ;
+    fEventNames[index] = tempo.Remove(tempo.Length()-1) ; // strip of the stream number added by fManager
+  }
 
-    TBranch * sdigitsBranch = 0;
-    TBranch * sdigitizerBranch = 0;
+  //to prevent cleaning of this object while GetEvent is called
+  gime->PhosLoader()->GetDigitsDataLoader()->GetBaseTaskLoader()->SetDoNotReload(kTRUE);
 
-    TObjArray * branches = treeS->GetListOfBranches() ;
-    Int_t ibranch;
-    Bool_t phosNotFound = kTRUE ;
-    Bool_t sdigitizerNotFound = kTRUE ;
-  
-    for(ibranch = 0;ibranch <branches->GetEntries();ibranch++){
-            
-      if(phosNotFound){
-       sdigitsBranch=(TBranch *) branches->At(ibranch) ;
-       if(( strcmp("PHOS",sdigitsBranch->GetName())==0 ) &&
-          ((TObjString*) fSDigitsTitles->At(inputs))->GetString().CompareTo(sdigitsBranch->GetTitle())== 0 )
-             phosNotFound = kFALSE ;
-       
-      }
-      
-      if(sdigitizerNotFound){
-       sdigitizerBranch = (TBranch *) branches->At(ibranch) ;
-       if(( strcmp(sdigitizerBranch->GetName(),"AliPHOSSDigitizer") == 0) &&
-          ((TObjString*) fSDigitsTitles->At(inputs))->GetString().CompareTo(sdigitizerBranch->GetTitle())== 0 )
-             sdigitizerNotFound = kFALSE ;
-       
-      }
-    }
-    
-    if(sdigitizerNotFound || phosNotFound){
-      cout << "Can't find Branch with sdigits or SDigitizer in the file " ;
-      if( ((TObjString*)fSDigitsTitles->At(inputs))->GetString().IsNull() )
-       cout << file->GetName() << endl ;       
-      else
-       cout << ((TObjString*)fSDigitsTitles->At(inputs))->GetString().Data() << endl ;
-      cout << "Do nothing" <<endl  ;
-      return kFALSE ;
-    }
-    
-    TClonesArray * sdigits = (TClonesArray*) fSDigits->At(inputs) ;  
-    sdigitsBranch->SetAddress(&sdigits) ;
-    
-    AliPHOSSDigitizer *sDigitizer = new AliPHOSSDigitizer();
-    sdigitizerBranch->SetAddress(&sDigitizer) ;
+  return fInit ; 
+}
 
-    sdigitsBranch->GetEntry(0) ;
-    sdigitizerBranch->GetEntry(0) ;
-    
-    if(fSDigitizer == 0)
-      fSDigitizer = sDigitizer ;
-    else
-      if(!((*fSDigitizer)==(*sDigitizer)) ){
-       cout << "AliPHOSDigitizer ERROR:" << endl ;
-       cout << "       you are using sdigits made with different SDigitizers" << endl ;
-       cout << "fSD " << fSDigitizer << "  SD" << sDigitizer << endl ;
-       fSDigitizer->Print("") ;
-       sDigitizer->Print("") ;
-       cout << "Do Nothing " << endl ;
-       return kFALSE ;
-      }
-    
-  }
-  fPedestal = fSDigitizer->GetPedestalParameter() ;
-  fSlope    = fSDigitizer->GetCalibrationParameter() ;
-  
-  return kTRUE ;
+//____________________________________________________________________________ 
+void AliPHOSDigitizer::InitParameters()
+{
+  // Set initial parameters Digitizer
 
+  fPinNoise           = 0.004 ;
+  fEMCDigitThreshold  = 0.012 ;
+  fCPVNoise           = 0.01;
+  fCPVDigitThreshold  = 0.09 ;
+  fTimeResolution     = 0.5e-9 ;
+  fTimeSignalLength   = 1.0e-9 ;
+  fDigitsInRun  = 0 ; 
+  fADCchanelEmc = 0.0015;        // width of one ADC channel in GeV
+  fADCpedestalEmc = 0.005 ;      //
+  fNADCemc = (Int_t) TMath::Power(2,16) ;  // number of channels in EMC ADC
+
+  fADCchanelCpv = 0.0012 ;          // width of one ADC channel in CPV 'popugais'
+  fADCpedestalCpv = 0.012 ;         // 
+  fNADCcpv = (Int_t) TMath::Power(2,12);      // number of channels in CPV ADC
+
+  fTimeThreshold = 0.001*10000000 ; //Means 1 MeV in terms of SDigits amplitude
+  SetEventRange(0,-1) ;
+    
 }
+
 //__________________________________________________________________
-void AliPHOSDigitizer::MixWith(char* HeaderFile, char* sDigitsTitle)
+void AliPHOSDigitizer::MixWith(TString alirunFileName, TString eventFolderName)
 {
-  // Alows to produce digits by superimposing background and signal event.
+  // Allows to produce digits by superimposing background and signal event.
   // It is assumed, that headers file with SIGNAL events is opened in 
   // the constructor. 
   // Sets the BACKGROUND event, with which the SIGNAL event is to be mixed 
@@ -581,132 +559,192 @@ void AliPHOSDigitizer::MixWith(char* HeaderFile, char* sDigitsTitle)
   // opened in constructor file. 
   //
   // One can open as many files to mix with as one needs.
+  // However only Sdigits with the same name (i.e. constructed with the same SDigitizer)
+  // can be mixed.
 
-
-  if(!fInitialized)
+  if( strcmp(fEventFolderName, "") == 0 )
     Init() ;
 
-
-  if(HeaderFile == 0){
-    cout << "Specify at least header file to merge"<< endl ;
+  if(fManager){
+    Warning("MixWith", "Cannot use this method with AliRunDigitizer\n" ) ;
     return ;
   }
-  
-  Int_t inputs ;
-  for(inputs = 0; inputs < fNinputs ; inputs++){
-    if(strcmp(((TObjString *)fHeaderFiles->At(inputs))->GetString(),HeaderFile) == 0 ){
-      if(sDigitsTitle == 0){ 
-       if(((TObjString*)fSDigitsTitles->At(inputs))->GetString().CompareTo("")  == 0){
-         cout << "Entry already exists, do not add" << endl ;
-         return ;
-       }
-      }
-      else
-       if(((TObjString*)fSDigitsTitles->At(inputs))->GetString().CompareTo(sDigitsTitle)){
-         cout << "Entry already exists, do not add" << endl ;
-         return;
-       }
-    }  
-  }  
-  
-  fHeaderFiles->Expand(fNinputs+1) ;
-  new((*fHeaderFiles)[fNinputs]) TObjString(HeaderFile) ;
-  
-  
-  TFile * file = new TFile(((TObjString *) fHeaderFiles->At(fNinputs))->GetString()) ;  
-  
-  file->cd() ;
-  
-  fSDigitsTitles->Expand(fNinputs+1) ;
-  new((*fSDigitsTitles)[fNinputs]) TObjString(sDigitsTitle) ;
-  
-  fSDigits->Expand(fNinputs+1) ;
-  new((*fSDigits)[fNinputs]) TClonesArray("AliPHOSDigit",1000) ;
-  
-  fIevent->Set(fNinputs+1) ;
-  fIevent->AddAt(-1, fNinputs) ;
-  
-  fIeventMax->Set(fNinputs+1) ;  
-  
-  TTree * te = (TTree *) file->Get("TE") ;
-  fIeventMax->AddAt((Int_t) te->GetEntries(), fNinputs );
-  
-  fNinputs++ ;
-  
+  // looking for file which contains AliRun
+  if (gSystem->AccessPathName(alirunFileName)) {// file does not exist
+    AliError(Form("File %s does not exist!", alirunFileName.Data())) ;
+    return ; 
+  }
+  // looking for the file which contains SDigits
+  AliPHOSGetter * gime = AliPHOSGetter::Instance() ; 
+  TString fileName( gime->GetSDigitsFileName() ) ; 
+    if ( eventFolderName != AliConfig::GetDefaultEventFolderName()) // only if not the default folder name 
+      fileName = fileName.ReplaceAll(".root", "") + "_" + eventFolderName + ".root" ;
+    if ( (gSystem->AccessPathName(fileName)) ) { 
+      AliError(Form("The file %s does not exist!", fileName.Data())) ;
+      return ;
+    }
+    // need to increase the arrays
+    TString tempo = fInputFileNames[fInput-1] ; 
+    delete [] fInputFileNames ; 
+    fInputFileNames = new TString[fInput+1] ; 
+    fInputFileNames[fInput-1] = tempo ; 
+    tempo = fEventNames[fInput-1] ; 
+    delete [] fEventNames ; 
+    fEventNames = new TString[fInput+1] ; 
+    fEventNames[fInput-1] = tempo ; 
+
+    fInputFileNames[fInput] = alirunFileName ; 
+    fEventNames[fInput]     = eventFolderName ;
+    fInput++ ;
 }
+
 //__________________________________________________________________
-void AliPHOSDigitizer::Print(Option_t* option)const {
+void AliPHOSDigitizer::Print()const 
+{
   // Print Digitizer's parameters
-  if(fInitialized){
+  AliInfo(Form("\n------------------- %s -------------", GetName() )) ; 
+  if( strcmp(fEventFolderName.Data(), "") != 0 ){
+    printf(" Writing Digits to branch with title  %s\n", fEventFolderName.Data()) ;
     
-    cout << "------------------- "<< GetName() << " -------------" << endl ;
-    cout << "Digitizing sDigits from file(s): " <<endl ;
-    Int_t input ;
-    for(input = 0; input < fNinputs ; input++) {
-      cout << "          " << ((TObjString *) fHeaderFiles->At(input))->GetString() << 
-       "   Branch title:" << ((TObjString *) fSDigitsTitles->At(input))->GetString() << endl ;
+    Int_t nStreams ; 
+    if (fManager) 
+      nStreams =  GetNInputStreams() ;
+    else 
+      nStreams = fInput ; 
+    
+    Int_t index = 0 ;  
+    for (index = 0 ; index < nStreams ; index++) {  
+      TString tempo(fEventNames[index]) ; 
+      tempo += index ;
+      AliPHOSGetter * gime = AliPHOSGetter::Instance(fInputFileNames[index], tempo) ; 
+      TString fileName( gime->GetSDigitsFileName() ) ; 
+      if ( fEventNames[index] != AliConfig::GetDefaultEventFolderName()) // only if not the default folder name 
+       fileName = fileName.ReplaceAll(".root", "") + "_" + fEventNames[index]  + ".root" ;
+      printf ("Adding SDigits from %s %s\n", fInputFileNames[index].Data(), fileName.Data()) ; 
     }
-    cout << endl ;
-    cout << "Writing digits to " << ((TObjString *) fHeaderFiles->At(0))->GetString() << endl ;
+    AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+    printf("\nWriting digits to %s", gime->GetDigitsFileName().Data()) ;
     
-    cout << endl ;
-    cout << "With following parameters: " << endl ;
-    cout << "     Electronics noise in EMC (fPinNoise) = " << fPinNoise << endl ;
-    cout << "  Threshold  in EMC  (fEMCDigitThreshold) = " << fEMCDigitThreshold  << endl ; ;
-    cout << "                 Noise in CPV (fCPVNoise) = " << fCPVNoise << endl ; 
-    cout << "    Threshold in CPV (fCPVDigitThreshold) = " << fCPVDigitThreshold << endl ; 
-    cout << "               Noise in PPSD (fPPSDNoise) = " << fPPSDNoise << endl ;
-    cout << "  Threshold in PPSD (fPPSDDigitThreshold) = " << fPPSDDigitThreshold << endl ;
-    cout << "---------------------------------------------------" << endl ;
+    printf("\nWith following parameters:\n") ;
+    printf("  Electronics noise in EMC (fPinNoise) = %f\n", fPinNoise ) ; 
+    printf("  Threshold  in EMC  (fEMCDigitThreshold) = %f\n", fEMCDigitThreshold ) ;  
+    printf("  Noise in CPV (fCPVNoise) = %f\n", fCPVNoise ) ; 
+    printf("  Threshold in CPV (fCPVDigitThreshold) = %f\n",fCPVDigitThreshold ) ;  
+    printf(" ---------------------------------------------------\n") ;   
   }
   else
-    cout << "AliPHOSDigitizer not initialized " << endl ;
+    AliInfo(Form("AliPHOSDigitizer not initialized" )) ;
   
 }
+
 //__________________________________________________________________
-void AliPHOSDigitizer::PrintDigits(Option_t * option){
+ void AliPHOSDigitizer::PrintDigits(Option_t * option)
+{
   // Print a table of digits
+  
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+  TClonesArray * digits = gime->Digits() ; 
+  
+  AliInfo(Form("%d", digits->GetEntriesFast())) ; 
+  printf("\nevent %d", gAlice->GetEvNumber()) ;
+  printf("\n       Number of entries in Digits list %d", digits->GetEntriesFast() )  ;  
 
-  cout << "AliPHOSDigitiser:"<< endl ;
-  cout << "       Number of entries in Digits list " << fDigits->GetEntriesFast() << endl ;
-  cout << endl ;
-  if(strstr(option,"all")){
-    
+  if(strstr(option,"all")||strstr(option,"EMC")){  
     //loop over digits
     AliPHOSDigit * digit;
-    cout << "Digit Id " << " Amplitude " <<  " Index "  <<  " Nprim " << " Primaries list " <<  endl;      
+    printf("\nEMC digits (with primaries):\n")  ;
+    printf("\n   Id  Amplitude    Time          Index Nprim: Primaries list \n") ;    
+    Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
-    for (index = 0 ; index < fDigits->GetEntries() ; index++) {
-      digit = (AliPHOSDigit * )  fDigits->At(index) ;
-      cout << setw(8)  <<  digit->GetId() << " "  <<   setw(3)  <<  digit->GetAmp() <<   "  "  
-          << setw(6)  <<  digit->GetIndexInList() << "  "   
-          << setw(5)  <<  digit->GetNprimary() <<"  ";
-      
+    for (index = 0 ; (index < digits->GetEntriesFast()) && 
+          (dynamic_cast<AliPHOSDigit *>(digits->At(index))->GetId() <= maxEmc) ; index++) {
+      digit = (AliPHOSDigit * )  digits->At(index) ;
+      if(digit->GetNprimary() == 0) 
+       continue;
+      printf("%6d  %8d    %6.5e %4d      %2d :",
+             digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
       Int_t iprimary;
-      for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++)
-       cout << setw(5)  <<  digit->GetPrimary(iprimary+1) << " ";
-      cout << endl;     
+      for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
+       printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
+      }    
+      printf("\n") ;
     }
+  }
+  
+  if(strstr(option,"all")||strstr(option,"CPV")){
     
+    //loop over CPV digits
+    AliPHOSDigit * digit;
+    printf("\nCPV digits (with primaries):\n")  ;
+    printf("\n   Id  Amplitude    Time          Index Nprim: Primaries list \n") ;    
+    Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
+    Int_t index ;
+    for (index = 0 ; index < digits->GetEntriesFast(); index++) {
+      digit = (AliPHOSDigit * )  digits->At(index) ;
+      if(digit->GetId() > maxEmc){
+       printf("%6d  %8d    %4d      %2d :",
+               digit->GetId(), digit->GetAmp(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+       Int_t iprimary;
+       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
+         printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
+       }    
+       printf("\n") ;
+      }
+    }
   }
-}
-//__________________________________________________________________
-void AliPHOSDigitizer::SetSDigitsBranch(const char* title)
-{
-  // we set title (comment) of the SDigits branch in the first! header file
-  if(!fInitialized)    Init() ;
 
-  ((TObjString*) fSDigitsTitles->At(0) )->SetString((char*)title) ;
+}
 
+//__________________________________________________________________
+Float_t AliPHOSDigitizer::TimeOfNoise(void) const
+{  // Calculates the time signal generated by noise
+  //PH  Info("TimeOfNoise", "Change me") ; 
+  return gRandom->Rndm() * 1.28E-5;
 }
+
 //__________________________________________________________________
-void AliPHOSDigitizer::SetDigitsBranch(const char* title)
+void AliPHOSDigitizer::Unload() 
+{  
+  
+  Int_t i ; 
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+    AliPHOSGetter * gime = AliPHOSGetter::Instance(fInputFileNames[i], tempo) ; 
+    gime->PhosLoader()->UnloadSDigits() ; 
+  }
+  
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+  gime->PhosLoader()->UnloadDigits() ; 
+}
+
+//____________________________________________________________________________
+void AliPHOSDigitizer::WriteDigits()
 {
-  //Sets the title (comment) of the branch to which Digits branch
-  if(!fInitialized)    Init() ;
+
+  // Makes TreeD in the output file. 
+  // Check if branch already exists: 
+  //   if yes, exit without writing: ROOT TTree does not support overwriting/updating of 
+  //      already existing branches. 
+  //   else creates branch with Digits, named "PHOS", title "...",
+  //      and branch "AliPHOSDigitizer", with the same title to keep all the parameters
+  //      and names of files, from which digits are made.
+
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+  const TClonesArray * digits = gime->Digits() ; 
+  TTree * treeD = gime->TreeD();
+
+  // -- create Digits branch
+  Int_t bufferSize = 32000 ;    
+  TBranch * digitsBranch = treeD->Branch("PHOS","TClonesArray",&digits,bufferSize);
+  digitsBranch->SetTitle(fEventFolderName);
+  digitsBranch->Fill() ;
   
-  fDigitsTitle = title ;
+  gime->WriteDigits("OVERWRITE");
+  gime->WriteDigitizer("OVERWRITE");
+
+  Unload() ; 
 
 }
-//__________________________________________________________________