]> 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 a35c0af74a2efda071c788b4a15c843db42199ed..d55fb662f8a861e920298e4eb67b3497473b6041 100644 (file)
 
 /* $Id$ */
 
+
 //_________________________________________________________________________
-// This is a TTask that constructs SDigits out of Hits
-// A Summable Digits is the sum of all hits in a cell
-// A threshold is applied 
-//
 //*-- Author :  Dmitri Peressounko (SUBATECH & Kurchatov Institute) 
 //////////////////////////////////////////////////////////////////////////////
-// Class performs digitization of Summable digits (in the PHOS case this is just
-// sum of contributions of all primary particles into give cell). 
+// 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.
-// Examples of use:
+// 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
+//   "AliPHOSDigitizer" - AliPHOSDigitizer with all parameters used in digitization
+//
+// Note, that one can set a title for new digits branch, and repeat digitization with
+// another set of parameters.
+//
+// Use case:
 // root[0] AliPHOSDigitizer * d = new AliPHOSDigitizer() ;
 // root[1] d->ExecuteTask()             
 // Warning in <TDatabasePDG::TDatabasePDG>: object already instantiated
 //                       //Digitizes SDigitis in all events found in file galice.root 
-//                       //Depending on variable "CONFIG_SPLIT_FILE" reads branches stored in galice.root
-//                       //or in PHOS.SDigits.root
-// root[2] AliPHOSDigitizer * d1 = new AliPHOSDigitizer("galice1.root") ;  // Will read sdigits from galice1.root
-// root[3] d1->MixWith("galice2.root",1)       // Reads another portion of sdigits from galice2.root
-//                                             // says, that this will be output file
-// Warning in <TDatabasePDG::TDatabasePDG>: object already instantiated
-// root[3] d1->MixWith("galice3.root",1)       // Reads another portion of sdigits from galice3.root
-//                                             // overwrides previous definition of output file
-// root[4] d->ExecuteTask()    // Reads SDigits from files galice1.root, galice2.root ....
-//                             // mixes them and stores produced Digits in file galice3.root          
 //
+// root[2] AliPHOSDigitizer * d1 = new AliPHOSDigitizer("galice1.root") ;  
+//                       // Will read sdigits from galice1.root
+// root[3] d1->MixWith("galice2.root")       
+// Warning in <TDatabasePDG::TDatabasePDG>: object already instantiated
+//                       // Reads another set of sdigits from galice2.root
+// root[3] d1->MixWith("galice3.root")       
+//                       // Reads another set of sdigits from galice3.root
+// root[4] d->ExecuteTask("deb timing")    
+//                       // Reads SDigits from files galice1.root, galice2.root ....
+//                       // mixes them and stores produced Digits in file galice1.root          
+//                       // deb - prints number of produced digits
+//                       // deb all - prints list of produced digits
+//                       // timing  - prints time used for digitization
 //
-// 
 
 // --- ROOT system ---
-#include "TTask.h"
 #include "TTree.h"
 #include "TSystem.h"
+#include "TBenchmark.h"
+#include "TRandom.h"
+
 // --- Standard library ---
 
 // --- AliRoot header files ---
-
+#include "AliLog.h"
+#include "AliRunDigitizer.h"
 #include "AliPHOSDigit.h"
-#include "AliPHOSHit.h"
-#include "AliPHOSv1.h"
+#include "AliPHOSGetter.h"
 #include "AliPHOSDigitizer.h"
 #include "AliPHOSSDigitizer.h"
-#include "TROOT.h"
-#include "TFolder.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 ;
-  // add Task to //root/Tasks folder
-  TTask * roottasks = (TTask*)gROOT->GetRootFolder()->FindObject("Tasks") ; 
-  roottasks->Add(this) ; 
-
+  InitParameters() ; 
+  fDefaultInit = kTRUE ;
+  fManager = 0 ;                     // We work in the standalong mode
+  fEventFolderName = "" ; 
 }
-//____________________________________________________________________________ 
-void AliPHOSDigitizer::Init(Int_t isOutFile){
-// Mades all memory allocations and defiles, 
-// whether first (default) file will be output file (isOutFile !=0) 
-
-  if(!fInitialized){
-
-    fHeaderFiles  = new TClonesArray("TObjString",1) ;
-    new((*fHeaderFiles)[0]) TObjString("galice.root") ;
-    TFile * file ;
-
-    if(isOutFile)
-      file = new TFile(((TObjString *) fHeaderFiles->At(0))->GetString(),"update") ;
-    else
-      file = new TFile(((TObjString *) fHeaderFiles->At(0))->GetString()) ;
-
-    file->cd() ;
-  
-    fSDigitsFiles = new TClonesArray("TObjString",1);
-    if(gSystem->Getenv("CONFIG_SPLIT_FILE")) 
-      new((*fSDigitsFiles)[0]) TObjString("./PHOS.SDigits.root") ;   
-    else
-      new((*fSDigitsFiles)[0]) TObjString("") ;   
-    
-    fSDigits      = new TClonesArray("TClonesArray",1) ;
-    new((*fSDigits)[0]) TClonesArray("AliPHOSDigit",1000) ;
-    
-    fDigits = new TClonesArray("AliPHOSDigit",200000) ;
-    
-    fIevent    = new TArrayI(1) ;
-    fIevent->AddAt(-1,0 ) ; 
-    fIeventMax = new TArrayI(1) ;
-
-    //Store digits in this file
-    if(isOutFile){
-      gAlice = (AliRun *) file->Get("gAlice") ;
-      fIeventMax->AddAt((Int_t) gAlice->TreeE()->GetEntries(), 0 );
-      fOutFileNumber = 0 ;
-    }
-    else{
-      TTree * te = (TTree *) file->Get("TE") ;
-      fIeventMax->AddAt((Int_t) te->GetEntries(), 0 );
-      fOutFileNumber = -1 ;
-    }
-
-    fInitialized = kTRUE ;
-  }
 
+//____________________________________________________________________________ 
+AliPHOSDigitizer::AliPHOSDigitizer(TString alirunFileName, 
+                                  TString eventFolderName):
+  AliDigitizer("PHOS"+AliConfig::Instance()->GetDigitizerTaskName(), 
+              alirunFileName), 
+  fInputFileNames(0), fEventNames(0), fEventFolderName(eventFolderName)
+{
+  // ctor
+  InitParameters() ; 
+  Init() ;
+  fDefaultInit = kFALSE ; 
+  fManager = 0 ;                     // We work in the standalong mode
 }
 
-
 //____________________________________________________________________________ 
-AliPHOSDigitizer::AliPHOSDigitizer(char *HeaderFile,char *DigitsFile):TTask("AliPHOSDigitizer","")
+AliPHOSDigitizer::AliPHOSDigitizer(const AliPHOSDigitizer & d)
+  : AliDigitizer(d)
 {
-  // ctor
-  fHeaderFiles  = new TClonesArray("TFile",1) ;          
-  new((*fHeaderFiles)[0]) TObjString(HeaderFile) ;
-  TFile * file = new TFile(((TObjString *) fHeaderFiles->At(0))->GetString(),"update") ;      // Header file, where result will be stored
+  // 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;
+}
 
-  file->cd() ;
-  
-  fSDigitsFiles = new TClonesArray("TObjString",1);         // File name of the SDigits branch
-  if(DigitsFile)
-    new((*fSDigitsFiles)[0]) TObjString(DigitsFile) ;   
-  else
-    if(gSystem->Getenv("CONFIG_SPLIT_FILE")) 
-      new((*fSDigitsFiles)[0]) TObjString("./PHOS.SDigits.root") ;   
-    else
-      new((*fSDigitsFiles)[0]) TObjString("") ;   
-    
-  fSDigits      = new TClonesArray("TClonesArray",1) ;      // here list of SDigits wil be stored
-  new((*fSDigits)[0]) TClonesArray("AliPHOSDigit",1000) ;
-    
-  fDigits = new TClonesArray("AliPHOSDigit",200000) ;
-  fDigitsFile="PHOS.Digits" ; 
-    
-  fIevent    = new TArrayI(1) ;
-  fIevent->AddAt(-1,0 ) ; 
-  fIeventMax = new TArrayI(1) ;
-  //Should be check whether gAlice in memory is the same as in file
-  //However, there is no such method (?) ==> we are forced to read it
-  // if(gAlice->TreeE()==0)
-
-  gAlice = (AliRun *) file->Get("gAlice") ;  //If not read yet
-
-  // Get number of events to process
-  fIeventMax->AddAt((Int_t) gAlice->TreeE()->GetEntries(), 0 );
-  fOutFileNumber = 0 ;
-
-  fNinputs = 1 ;
-
-  fPinNoise = 0.01 ;
-  fEMCDigitThreshold = 0.01 ;
-  fCPVNoise = 0.01;
-  fCPVDigitThreshold = 0.09 ;
-  fPPSDNoise = 0.0000001;
-  fPPSDDigitThreshold = 0.0000002 ;  
-
-  // add Task to //root/Tasks folder
-  TTask * roottasks = (TTask*)gROOT->GetRootFolder()->FindObject("Tasks") ; 
-  roottasks->Add(this) ; 
-  fInitialized = kTRUE ;
-    
+//____________________________________________________________________________ 
+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 ; 
 }
 
 //____________________________________________________________________________ 
   AliPHOSDigitizer::~AliPHOSDigitizer()
 {
   // dtor
-  delete fHeaderFiles ;
-  delete fSDigitsFiles ;
-  delete fSDigits ;
-  delete fDigits ;
-}
-//____________________________________________________________________________
-Bool_t AliPHOSDigitizer::Combinator() { 
-
-  //Makes all desirable combinations Signal+Background,
-  // returns kFALSE when all combinations are made
-  // May be useful to introduce some options like "One-to-One", "All-to-One" and "All-to-All" ?
-
-  //realizing "One-to-One" option...
-
-  if(!fInitialized)
-    Init(1) ;
-
-  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
-      endNotReached = kFALSE ;
-  }
-  return endNotReached ;
-
+  delete [] fInputFileNames ; 
+  delete [] fEventNames ; 
 }
 
 //____________________________________________________________________________
-void AliPHOSDigitizer::Digitize(Option_t *option) { 
-
-  //Makes the digitization of the collected summable digits
-
-  if(!fInitialized)
-    Init(1) ;
-
-  //Collects all hits in the same active volume into digit
-  //if(option == "raw")    // add simulated data to row data -- to be implemented
-
-
-  fDigits->Clear() ;
-
-  AliPHOS * PHOS = (AliPHOS *) gAlice->GetDetector("PHOS") ;   
-  AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance( PHOS->GetGeometry()->GetName(), PHOS->GetGeometry()->GetTitle() );
-
+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, and CPV) and
+  //  then adds contributions from SDigits. 
+  // This design avoids scanning over the list of digits to add 
+  // contribution to new SDigits only.
+
+  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(); 
+
+  if ( !sDigitizer )
+    AliFatal(Form("SDigitizer with name %s %s not found", 
+                 GetTitle(), fEventFolderName.Data() )) ; 
+
+  //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) ;
+  }
+
+  //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 ;
+  }
+  
+  TArrayI index(fInput) ;
+  index.Reset() ;  //Set all indexes to zero
   
-  for(absID = 1; absID <= nEMC; absID++){
+  AliPHOSDigit * digit ;
+  AliPHOSDigit * curSDigit ;
+  
+  TClonesArray * ticks = new TClonesArray("AliPHOSTick",1000) ;
+  
+  //Put Noise contribution
+  for(absID = 1 ; absID <= nEMC ; absID++){
     Float_t noise = gRandom->Gaus(0., fPinNoise) ; 
-    new((*fDigits)[absID-1]) AliPHOSDigit( -1,absID,fSDigitizer->Digitize(noise) ) ;
+    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(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 ;
+  
+  //Now CPV digits (different noise and no timing)
   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) ) ;
-  }
-  
+    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 ;
+       }
+      }
 
-  // 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 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 
+  
+  //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) ) ;
+  }
 
 
-  //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() ;  
+  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 = fDigits->GetEntries() ;
-  fDigits->Expand(ndigits) ;
-
+  Int_t ndigits = digits->GetEntriesFast() ;
+  digits->Expand(ndigits) ;
 
-  //Set indexes in list of digits
-  Int_t i ;
+  //Set indexes in list of digits and make true digitization of the energy
   for (i = 0 ; i < ndigits ; i++) { 
-    AliPHOSDigit * digit = (AliPHOSDigit *) fDigits->At(i) ; 
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ; 
     digit->SetIndexInList(i) ;     
+    Float_t energy = sDigitizer->Calibrate(digit->GetAmp()) ;
+    digit->SetAmp(DigitizeEnergy(energy,digit->GetId()) ) ;
   }
 }
+
 //____________________________________________________________________________
-void AliPHOSDigitizer::WriteDigits(){
+Int_t AliPHOSDigitizer::DigitizeEnergy(Float_t energy, Int_t absId)
+{
+  // Returns digitized value of the energy in a cell absId
 
-  //Made TreeD in the output file if necessary and writes digiths there.
+  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 ;
+}
 
-  gAlice->GetEvent(fIevent->At(fOutFileNumber)) ;  // Suitable only for One-To-One mixing
-  gAlice->SetEvent(fIevent->At(fOutFileNumber)) ;  // for all-to-all will produce a lot of branches in TreeD
+//____________________________________________________________________________
+void AliPHOSDigitizer::Exec(Option_t *option) 
+{ 
+  // 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(gAlice->TreeD()==0)
-    gAlice->MakeTree("D") ;
+  if (strstr(option,"print")) {
+    Print();
+    return ; 
+  }
   
-  //Make branches in TreeD for digits and Digitizer
-  char branchname[20];
-  sprintf(branchname,"PHOS");  
-
-  Int_t bufferSize = 16000 ;
-  char * filename = 0;
-  if(!fDigitsFile.IsNull())
-    filename = (char*) fDigitsFile.Data() ; //ievent ;
-  else
-    if(gSystem->Getenv("CONFIG_SPLIT_FILE")!=0){ //generating file name
-      filename = new char[30] ;
-      //       sprintf(filename,"PHOS.Digits%d.root",ievent) ;
-      sprintf(filename,"PHOS.Digits.root") ;
-    }
-    else
-      filename = 0 ;
+  if(strstr(option,"tim"))
+    gBenchmark->Start("PHOSDigitizer");
   
-  //Link digits  
-  gAlice->MakeBranchInTree(gAlice->TreeD(),branchname,&fDigits,bufferSize,filename);  
-  //Link Digitizer
-  AliPHOSDigitizer * d = this ;
-  Int_t splitlevel = 0 ;
-  sprintf(branchname,"AliPHOSDigitizer");   
-  gAlice->MakeBranchInTree(gAlice->TreeD(),branchname,"AliPHOSDigitizer",&d, bufferSize, splitlevel,filename); 
-
-  gAlice->TreeD()->Fill() ;
-   
-  gAlice->TreeD()->Write(0,kOverwrite) ;  
-}
-
-//____________________________________________________________________________
-void AliPHOSDigitizer::Exec(Option_t *option) { 
-  //manager
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle()) ;
 
-  if(!fInitialized)    Init(1) ;
+  // 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
-    WriteDigits() ;
-  }
+  if (fLastEvent == -1) 
+    fLastEvent = gime->MaxEvent() - 1 ;
+  else if (fManager) 
+    fLastEvent = fFirstEvent ; 
+  Int_t nEvents   = fLastEvent - fFirstEvent + 1;
+  
+  Int_t ievent ;
 
-//   //Close all opened files
-//   Int_t input ;
-//   for(input = 0; input < fNinputs ; input ++){
-//     TFile * file = (TFile*) gROOT->GetFile(((TObjString *) fHeaderFiles->At(input))->GetString() ) ;
-//     file->Close() ;
-//   }
+  for (ievent = fFirstEvent; ievent <= fLastEvent; ievent++) {
+    gime->Event(ievent,"S") ;
 
-  
-}
+    Digitize(ievent) ; //Add prepared SDigits to digits and add the noise
 
-//__________________________________________________________________
-Bool_t AliPHOSDigitizer::ReadSDigits(){
-// Reads summable digits from the opened files for the particular set of events given by fIevent
+    WriteDigits() ;
 
-  if(!fInitialized)    Init(1) ;
+    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");
+    TString message ; 
+    message = "  took %f seconds for Digitizing %f seconds per event\n" ; 
+    AliInfo(Form( message.Data(), 
+        gBenchmark->GetCpuTime("PHOSDigitizer"), 
+        gBenchmark->GetCpuTime("PHOSDigitizer")/nEvents )); 
+  } 
+}
 
-  Int_t inputs ;
-  for(inputs = fNinputs-1; inputs >= 0; inputs --){
+//____________________________________________________________________________ 
+Float_t AliPHOSDigitizer::FrontEdgeTime(TClonesArray * ticks) const
+{
+  // Returns the shortest time among all time ticks
 
-    Int_t event = fIevent->At(inputs) ;
+  ticks->Sort() ; //Sort in accordance with times of ticks
+  TIter it(ticks) ;
+  AliPHOSTick * ctick = (AliPHOSTick *) it.Next() ;
+  Float_t time = ctick->CrossingTime(fTimeThreshold) ;    
 
-    TFile * file = (TFile*) gROOT->GetFile(((TObjString *) fHeaderFiles->At(inputs))->GetString() ) ;
-    file->cd() ;
+  AliPHOSTick * t ;  
+  while((t=(AliPHOSTick*) it.Next())){
+    if(t->GetTime() < time)  //This tick starts before crossing
+      *ctick+=*t ;
+    else
+      return time ;
 
-    // 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 ;
-    }
+    time = ctick->CrossingTime(fTimeThreshold) ;    
+  }
+  return time ;
+}
 
-    TBranch * sdigitsBranch = 0;
-    TBranch * sdigitizerBranch = 0;
+//____________________________________________________________________________ 
+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() ;
 
-    TObjArray * branches = treeS->GetListOfBranches() ;
-    Int_t ibranch;
-    Bool_t phosNotFound = kTRUE ;
-    Bool_t sdigitizerNotFound = kTRUE ;
+  fEmcCrystals = geom->GetNModules() * geom->GetNCristalsInModule() ;
   
-    for(ibranch = 0;ibranch <branches->GetEntries();ibranch++){
-
-      if(phosNotFound){
-       sdigitsBranch=(TBranch *) branches->At(ibranch) ;
-       if( ((TObjString*)fSDigitsFiles->At(inputs))->GetString().CompareTo(sdigitsBranch->GetFileName())==0 ){
-         if( strcmp(sdigitsBranch->GetName(),"PHOS") == 0) {
-           phosNotFound = kFALSE ;
-         }
-       }
-      }
+  TString opt("Digits") ; 
+  if(gime->VersionExists(opt) ) { 
+    AliError(Form("Give a version name different from %s", 
+                 fEventFolderName.Data() )) ;
+    fInit = kFALSE ; 
+  }
 
-      if(sdigitizerNotFound){
-       sdigitizerBranch = (TBranch *) branches->At(ibranch) ;
-       if( ((TObjString*)fSDigitsFiles->At(inputs))->GetString().CompareTo(sdigitizerBranch->GetFileName()) == 0){
-         if( strcmp(sdigitizerBranch->GetName(),"AliPHOSSDigitizer") == 0) {
-           sdigitizerNotFound = 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
+  }
 
-    if(sdigitizerNotFound || phosNotFound){
-      cout << "Can't find Branch with sdigits or SDigitizer in the file " ;
-      if( ((TObjString*)fSDigitsFiles->At(inputs))->GetString().IsNull() )
-       cout << file->GetName() << endl ;       
-      else
-       cout << ((TObjString*)fSDigitsFiles->At(inputs))->GetString().Data() << endl ;
-      cout << "Do nothing" <<endl  ;
-      return kFALSE ;
-    }
+  //to prevent cleaning of this object while GetEvent is called
+  gime->PhosLoader()->GetDigitsDataLoader()->GetBaseTaskLoader()->SetDoNotReload(kTRUE);
 
+  return fInit ; 
+}
 
-    TClonesArray * sdigits = (TClonesArray*) fSDigits->At(inputs) ;  
-    sdigitsBranch->SetAddress(&sdigits) ;
+//____________________________________________________________________________ 
+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) ;
     
-    AliPHOSSDigitizer *sDigitizer = new AliPHOSSDigitizer();
-    sdigitizerBranch->SetAddress(&sDigitizer) ;
-    treeS->GetEvent(0) ;
+}
 
-    if(fSDigitizer == 0)
-      fSDigitizer = sDigitizer ;
-    else
-      if(!((*fSDigitizer)==(*sDigitizer)) ){
-       cout << "ERROR: you are using sdigits made with different SDigitizers" << endl ;
-       fSDigitizer->Print("") ;
-       sDigitizer->Print("") ;
-       cout << "Do Nothing " << endl ;
-       return kFALSE ;
-      }
-    
+//__________________________________________________________________
+void AliPHOSDigitizer::MixWith(TString alirunFileName, TString eventFolderName)
+{
+  // 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 
+  // Thus we avoid writing (changing) huge and expensive 
+  // backgound files: all output will be writen into SIGNAL, i.e. 
+  // 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( strcmp(fEventFolderName, "") == 0 )
+    Init() ;
+
+  if(fManager){
+    Warning("MixWith", "Cannot use this method with AliRunDigitizer\n" ) ;
+    return ;
   }
-  
-
-  return kTRUE ;
-
+  // 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::MixWith(char* HeaderFile,Int_t isOutFile, char* SDigitsFile){
-//
 
-  if(!fInitialized)
-    if(isOutFile)
-      Init(0) ;     //Do not read gAlice from Background file
-    else
-      Init(1) ;     //read gAlice from background file
-
-  if(HeaderFile == 0){
-    cout << "Specify at least header file to merge"<< endl ;
-    return ;
+//__________________________________________________________________
+void AliPHOSDigitizer::Print()const 
+{
+  // Print Digitizer's parameters
+  AliInfo(Form("\n------------------- %s -------------", GetName() )) ; 
+  if( strcmp(fEventFolderName.Data(), "") != 0 ){
+    printf(" Writing Digits to branch with title  %s\n", fEventFolderName.Data()) ;
+    
+    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()) ; 
+    }
+    AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+    printf("\nWriting digits to %s", gime->GetDigitsFileName().Data()) ;
+    
+    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
+    AliInfo(Form("AliPHOSDigitizer not initialized" )) ;
   
-  Int_t inputs ;
-  for(inputs = 0; inputs < fNinputs ; inputs++){
-    if(strcmp(((TObjString *)fHeaderFiles->At(inputs))->GetString(),HeaderFile) == 0 ){
-      if(SDigitsFile == 0){ 
-       if(((TObjString*)fSDigitsFiles->At(inputs))->GetString().CompareTo("")  == 0){
-         cout << "Entry already exists, do not add" << endl ;
-         return ;
-       }
-      }
-      else
-       if(((TObjString*)fSDigitsFiles->At(inputs))->GetString().CompareTo(SDigitsFile) == 0){
-       cout << "Entry already exists, do not add" << endl ;
-       return;
-      }
-    }  
-  }  
-  
-  fHeaderFiles->Expand(fNinputs+1) ;
-  new((*fHeaderFiles)[fNinputs]) TObjString(HeaderFile) ;
+}
 
+//__________________________________________________________________
+ void AliPHOSDigitizer::PrintDigits(Option_t * option)
+{
+  // Print a table of digits
   
-  TFile * file ;
-  if(isOutFile)
-    file = new TFile(((TObjString *) fHeaderFiles->At(fNinputs))->GetString(),"update") ;  
-  else
-    file = new TFile(((TObjString *) fHeaderFiles->At(fNinputs))->GetString()) ;  
-
-  file->cd() ;
-
-  fSDigitsFiles->Expand(fNinputs+1) ;
-  new((*fSDigitsFiles)[fNinputs]) TObjString(SDigitsFile) ;
-
-  fSDigits->Expand(fNinputs+1) ;
-  new((*fSDigits)[fNinputs]) TClonesArray("AliPHOSDigit",1000) ;
-
-  fIevent->Set(fNinputs+1) ;
-  fIevent->AddAt(-1, fNinputs) ;
-
-  fIeventMax->Set(fNinputs+1) ;  
+  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() )  ;  
 
-  if(isOutFile){
-    gAlice = (AliRun*) file->Get("gAlice") ;
-    fIeventMax->AddAt((Int_t) gAlice->TreeE()->GetEntries(), fNinputs );
-    fOutFileNumber = fNinputs ;
+  if(strstr(option,"all")||strstr(option,"EMC")){  
+    //loop over digits
+    AliPHOSDigit * digit;
+    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 < 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++) {
+       printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
+      }    
+      printf("\n") ;
+    }
   }
-  else{
-    TTree * te = (TTree *) file->Get("TE") ;
-    fIeventMax->AddAt((Int_t) te->GetEntries(), fNinputs );
+  
+  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") ;
+      }
+    }
   }
 
-  fNinputs++ ;
+}
 
+//__________________________________________________________________
+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::Print(Option_t* option){
+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() ; 
+}
 
-  if(!fInitialized)    Init(1) ;
+//____________________________________________________________________________
+void AliPHOSDigitizer::WriteDigits()
+{
 
-  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: " << ((TObjString *) fSDigitsFiles->At(input))->GetString() << endl ;
-  }
-  cout << endl ;
-  cout << "Writing digits to " << ((TObjString *) fHeaderFiles->At(fOutFileNumber))->GetString() << endl ;
-
-  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 ;
+  // 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() ;
+  
+  gime->WriteDigits("OVERWRITE");
+  gime->WriteDigitizer("OVERWRITE");
 
+  Unload() ; 
 
 }