]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - EMCAL/AliEMCALDigitizer.cxx
Updated version.
[u/mrichter/AliRoot.git] / EMCAL / AliEMCALDigitizer.cxx
index 1ca93731dc332440e3aaed9679e7e337b140cdc8..57201d7c304abff067661883f9225561b1d1a845 100644 (file)
@@ -18,7 +18,7 @@
 //_________________________________________________________________________
 // 
 //////////////////////////////////////////////////////////////////////////////
-// Class performs digitization of Summable digits 
+// Class performs digitization of Summable digits from simulated data
 //  
 // In addition it performs mixing of summable digits from different events.
 //
 //
 //*-- Author: Sahal Yacoob (LBL)
 // based on : AliEMCALDigitizer
+// Modif: 
+//  August 2002 Yves Schutz: clone PHOS as closely as possible and intoduction
+//                           of new  IO (à la PHOS)
+//  November 2003 Aleksei Pavlinov : adopted for Shish-Kebab geometry 
 //_________________________________________________________________________________
 
 // --- ROOT system ---
-#include "TFile.h"
-#include "TTree.h"
-#include "TSystem.h"
-#include "TROOT.h"
-#include "TFolder.h"
-#include "TObjString.h"
-#include "TGeometry.h"
-#include "TBenchmark.h"
-// --- Standard library ---
-#include <iomanip.h>
+#include <TROOT.h>
+#include <TTree.h>
+#include <TSystem.h>
+#include <TBenchmark.h>
+#include <TBrowser.h>
+#include <TObjectTable.h>
+#include <TRandom.h>
+#include <TF1.h>
+#include <cassert>
 
 // --- AliRoot header files ---
-
+#include "AliLog.h"
 #include "AliRun.h"
-#include "AliHeader.h"
+#include "AliRunDigitizer.h"
+#include "AliRunLoader.h"
+#include "AliCDBManager.h"
+#include "AliCDBEntry.h"
 #include "AliEMCALDigit.h"
-#include "AliEMCALHit.h"
-#include "AliEMCALTick.h"
-#include "AliEMCALv1.h"
+#include "AliEMCAL.h"
+#include "AliEMCALLoader.h"
 #include "AliEMCALDigitizer.h"
 #include "AliEMCALSDigitizer.h"
 #include "AliEMCALGeometry.h"
-#include "AliEMCALGetter.h"
-#include "AliRunDigitizer.h"
+//#include "AliEMCALTick.h"
+#include "AliEMCALCalibData.h"
+#include "AliEMCALSimParam.h"
+#include "AliEMCALRawDigit.h"
+
+namespace
+{
+       Double_t HeavisideTheta(Double_t x)
+       {
+               Double_t signal = 0.;
+               
+               if (x > 0.) signal = 1.;  
+               
+               return signal;  
+       }
+       
+       Double_t AnalogFastORFunction(Double_t *x, Double_t *par)
+       {
+               Double_t v0 = par[0];
+               Double_t t0 = par[1];
+               Double_t tr = par[2];
+               
+               Double_t R1 = 1000.;
+               Double_t C1 = 33e-12;
+               Double_t R2 = 1800;
+               Double_t C2 = 22e-12;
+               
+               Double_t t  =   x[0];
+               
+               return (((0.8*(-((TMath::Power(C1,2)*C2*TMath::Power(TMath::E(),(-t + t0)/(C1*R1))*
+                                                 TMath::Power(R1,2)*R2)/(C1*R1 - C2*R2)) + 
+                                          C1*C2*R1*R2*(1 - (C2*TMath::Power(TMath::E(),(-t + t0)/(C2*R2))*R2)/(-(C1*R1) + C2*R2)))*v0*
+                                 HeavisideTheta(t - t0))/tr 
+                                - (0.8*(C1*C2*R1*R2 - 
+                                                (TMath::Power(C1,2)*C2*TMath::Power(TMath::E(),(-1.*t + t0 + 1.25*tr)/(C1*R1))*
+                                                 TMath::Power(R1,2)*R2)/(C1*R1 - C2*R2) + 
+                                                (C1*TMath::Power(C2,2)*TMath::Power(TMath::E(),(-1.*t + t0 + 1.25*tr)/(C2*R2))*
+                                                 R1*TMath::Power(R2,2))/(C1*R1 - C2*R2))*v0*
+                                       HeavisideTheta(t - t0 - 1.25*tr))/tr)/(C2*R1));
+       }
+}
+
 ClassImp(AliEMCALDigitizer)
 
 
 //____________________________________________________________________________ 
-  AliEMCALDigitizer::AliEMCALDigitizer()
+AliEMCALDigitizer::AliEMCALDigitizer()
+  : AliDigitizer("",""),
+    fDefaultInit(kTRUE),
+    fDigitsInRun(0),
+    fInit(0),
+    fInput(0),
+    fInputFileNames(0x0),
+    fEventNames(0x0),
+    fDigitThreshold(0),
+    fMeanPhotonElectron(0),
+//    fPedestal(0), //Not used, remove?
+//    fSlope(0),    //Not used, remove?
+    fPinNoise(0),
+    fTimeDelay(0),
+    fTimeResolution(0),
+//    fTimeThreshold(0),    //Not used, remove?
+//    fTimeSignalLength(0), //Not used, remove?
+    fADCchannelEC(0),
+    fADCpedestalEC(0),
+    fNADCEC(0),
+    fEventFolderName(""),
+    fFirstEvent(0),
+    fLastEvent(0),
+    fCalibData(0x0)
 {
   // ctor
-
-  fSDigitizer = 0 ;
-  fNinputs = 0 ;
-  fPinNoise = 0.0 ;
-  fTowerDigitThreshold = 0.0 ;
-  fTimeResolution     = 0. ;
-  fTimeSignalLength   = 0. ;
-  fPreShowerDigitThreshold = 0. ;
-  fADCchannelTower = 0.0;      // width of one ADC channel in GeV
-  fADCpedestalTower = 0. ;      // pedestal of ADC
-  fNADCTower = 0;  // number of channels in Tower ADC
-
-  fADCchannelPreSho  = 0.0;          // width of one ADC channel in Pre Shower
-  fADCpedestalPreSho = 0.0 ;         // pedestal of ADC
-  fNADCPreSho = 0;      // number of channels in Pre Shower ADC
-  fTimeThreshold = 0.0; //Means 1 MeV in terms of SDigits amplitude
-  fManager = 0 ;
-
-
-
+  InitParameters() ; 
+  fManager = 0 ;                     // We work in the standalone mode
 }
+
 //____________________________________________________________________________ 
-Bool_t AliEMCALDigitizer::Init()
+AliEMCALDigitizer::AliEMCALDigitizer(TString alirunFileName, TString eventFolderName)
+  : AliDigitizer("EMCAL"+AliConfig::Instance()->GetDigitizerTaskName(), alirunFileName),
+    fDefaultInit(kFALSE),
+    fDigitsInRun(0),
+    fInit(0),
+    fInput(0),
+    fInputFileNames(0), 
+    fEventNames(0), 
+    fDigitThreshold(0),
+    fMeanPhotonElectron(0),
+//    fPedestal(0),//Not used, remove?
+//    fSlope(0),   //Not used, remove?
+    fPinNoise(0),
+       fTimeDelay(0),
+    fTimeResolution(0),
+//    fTimeThreshold(0),    //Not used, remove?
+//    fTimeSignalLength(0), //Not used, remove?
+    fADCchannelEC(0),
+    fADCpedestalEC(0),
+    fNADCEC(0),
+    fEventFolderName(eventFolderName),
+    fFirstEvent(0),
+    fLastEvent(0),
+    fCalibData(0x0)
 {
-  // Makes all memory allocations
-
-  fSDigitizer = 0 ;
-  fNinputs = 1 ;
-  fPinNoise = 0.00001 ;
-  fTowerDigitThreshold = 0.001 ;
-  fTimeResolution     = 0.5e-9 ;
-  fTimeSignalLength   = 1.0e-9 ;
-  fPreShowerDigitThreshold = fTowerDigitThreshold/25. ;
-  fInitialized = kFALSE ;
-  fADCchannelTower = 0.000220;       // width of one ADC channel in GeV
-  fADCpedestalTower = 0.005 ;      // GeV
-  fNADCTower = (Int_t) TMath::Power(2,16) ;  // number of channels in Tower ADC
-
-  fADCchannelPreSho = 0.0000300;          // width of one ADC channel in Pre Shower
-  fADCpedestalPreSho = 0.005 ;         // 
-  fNADCPreSho = (Int_t) TMath::Power(2,12);      // number of channels in Pre ShowerADC
-
-  fTimeThreshold = 0.001*10000000 ; //Means 1 MeV in terms of SDigits amplitude
-
-
-  if(fManager)
-    SetTitle("aliroot") ;
-  else if (strcmp(GetTitle(),"")==0) 
-    SetTitle("galice.root") ;
-  
-  if( strcmp(GetName(), "") == 0 )
-    SetName("Default") ;
-  
-  AliEMCALGetter * gime = AliEMCALGetter::GetInstance(GetTitle(), GetName(), "update") ; 
-  if ( gime == 0 ) {
-    cerr << "ERROR: AliEMCALDigitizer::Init -> Could not obtain the Getter object !" << endl ; 
-    return kFALSE;
-  } 
-  
-  //const AliEMCALGeometry * geom = gime->EMCALGeometry() ;
-  //fEmcCrystals = geom->GetNModules() *  geom->GetNCristalsInModule() ;
-  
-  // Post Digits to the white board
-  gime->PostDigits(GetName() ) ;   
-  
-  // Post Digitizer to the white board
-  gime->PostDigitizer(this) ;
-  
-  //Mark that we will use current header file
-  if(!fManager){
-    gime->PostSDigits(GetName(),GetTitle()) ;
-    gime->PostSDigitizer(GetName(),GetTitle()) ;
-  }
-  return kTRUE ;
-  
-  
+  // ctor
+  InitParameters() ; 
+  Init() ;
+  fManager = 0 ;                     // We work in the standalone mode
 }
 
 //____________________________________________________________________________ 
-AliEMCALDigitizer::AliEMCALDigitizer(const char *headerFile,const char *name)
+AliEMCALDigitizer::AliEMCALDigitizer(const AliEMCALDigitizer & d) 
+  : AliDigitizer(d.GetName(),d.GetTitle()),
+    fDefaultInit(d.fDefaultInit),
+    fDigitsInRun(d.fDigitsInRun),
+    fInit(d.fInit),
+    fInput(d.fInput),
+    fInputFileNames(d.fInputFileNames),
+    fEventNames(d.fEventNames),
+    fDigitThreshold(d.fDigitThreshold),
+    fMeanPhotonElectron(d.fMeanPhotonElectron),
+//    fPedestal(d.fPedestal), //Not used, remove?
+//    fSlope(d.fSlope),       //Not used, remove?
+    fPinNoise(d.fPinNoise),
+    fTimeDelay(d.fTimeDelay),
+    fTimeResolution(d.fTimeResolution),
+//    fTimeThreshold(d.fTimeThreshold),       //Not used, remove?
+//    fTimeSignalLength(d.fTimeSignalLength), //Not used, remove?
+    fADCchannelEC(d.fADCchannelEC),
+    fADCpedestalEC(d.fADCpedestalEC),
+    fNADCEC(d.fNADCEC),
+    fEventFolderName(d.fEventFolderName),
+    fFirstEvent(d.fFirstEvent),
+    fLastEvent(d.fLastEvent),
+    fCalibData(d.fCalibData)
 {
-  SetName(name) ;
-  SetTitle(headerFile) ;
-  fManager = 0 ;                     // We work in the standalong mode
-  Init() ;
-  
+  // copyy ctor 
+ }
 
-  
-}
 //____________________________________________________________________________ 
-AliEMCALDigitizer::AliEMCALDigitizer(AliRunDigitizer * ard):AliDigitizer(ard)
+AliEMCALDigitizer::AliEMCALDigitizer(AliRunDigitizer * rd)
+  : AliDigitizer(rd,"EMCAL"+AliConfig::Instance()->GetDigitizerTaskName()),
+    fDefaultInit(kFALSE),
+    fDigitsInRun(0),
+    fInit(0),
+    fInput(0),
+    fInputFileNames(0),
+    fEventNames(0),
+    fDigitThreshold(0),
+    fMeanPhotonElectron(0),
+//    fPedestal(0), //Not used, remove?
+//    fSlope(0.),   //Not used, remove?
+    fPinNoise(0.),
+    fTimeDelay(0.),
+    fTimeResolution(0.),
+//    fTimeThreshold(0),    //Not used, remove?
+//    fTimeSignalLength(0), //Not used, remove?
+    fADCchannelEC(0),
+    fADCpedestalEC(0),
+    fNADCEC(0),
+    fEventFolderName(0),
+    fFirstEvent(0),
+    fLastEvent(0),
+    fCalibData(0x0)
 {
-  // ctor
-  SetName("");     //Will call init in the digitizing
-  SetTitle("aliroot") ;  
+  // ctor Init() is called by RunDigitizer
+  fManager = rd ; 
+  fEventFolderName = fManager->GetInputFolderName(0) ;
+  SetTitle(dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetFileName(0));
+  InitParameters() ; 
 }
 
 //____________________________________________________________________________ 
   AliEMCALDigitizer::~AliEMCALDigitizer()
 {
-  // dtor
-
-}
-//____________________________________________________________________________
-void AliEMCALDigitizer::Reset() { 
-  //sets current event number to the first simulated event
-if( strcmp(GetName(), "") == 0 )
-  Init() ;
+  //dtor
+  if (AliRunLoader::Instance()) {
+    AliLoader *emcalLoader=0;
+    if ((emcalLoader = AliRunLoader::Instance()->GetDetectorLoader("EMCAL")))
+      emcalLoader->CleanDigitizer();
+  }
+  else
+    AliDebug(1," no runloader present");
+  delete [] fInputFileNames ; 
+  delete [] fEventNames ; 
 
-      // Int_t inputs ;
-      // for(inputs = 0; inputs < fNinputs ;inputs++)
-      //  fIevent->AddAt(-1, inputs ) ;
-  
 }
 
 //____________________________________________________________________________
-void AliEMCALDigitizer::Digitize(const Int_t event) { 
+void AliEMCALDigitizer::Digitize(Int_t event) 
+{ 
 
   // Makes the digitization of the collected summable digits
   // for this it first creates the array of all EMCAL modules
-  // filled with noise (different for EMC, CPV and PPSD) and
-  // after that adds contributions from SDigits. This design 
-  // helps to avoid scanning over the list of digits to add 
-  // contribution of any new SDigit.
+  // filled with noise and after that adds contributions from 
+  // SDigits. This design helps to avoid scanning over the 
+  // list of digits to add  contribution of any new SDigit.
+  //
+  // JLK 26-Jun-2008
+  // Note that SDigit energy info is stored as an amplitude, so we
+  // must call the Calibrate() method of the SDigitizer to convert it
+  // back to an energy in GeV before adding it to the Digit
+  //
+  static int nEMC=0; //max number of digits possible
+
+  AliRunLoader *rl = AliRunLoader::Instance();
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(rl->GetDetectorLoader("EMCAL"));
+  Int_t readEvent = event ; 
+  // fManager is data member from AliDigitizer
+  if (fManager) 
+    readEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetCurrentEventNumber() ; 
+  AliDebug(1,Form("Adding event %d from input stream 0 %s %s", 
+                 readEvent, GetTitle(), fEventFolderName.Data())) ; 
+  rl->GetEvent(readEvent);
+
+  TClonesArray * digits = emcalLoader->Digits() ; 
+  digits->Delete() ;  //correct way to clear array when memory is
+                     //allocated by objects stored in array
+
+  // Load Geometry
+  AliEMCALGeometry *geom = 0;
+  if (rl->GetAliRun()) {
+    AliEMCAL * emcal  = (AliEMCAL*)rl->GetAliRun()->GetDetector("EMCAL");
+    geom = emcal->GetGeometry();
+  }
+  else 
+    AliFatal("Could not get AliRun from runLoader");
 
-  AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ; 
-  TClonesArray * digits = gime->Digits(GetName()) ; 
+  nEMC = geom->GetNCells();
+  AliDebug(1,Form("nEMC %i (number cells in EMCAL) | %s \n", nEMC, geom->GetName()));
   
-  digits->Clear() ;
-
-    const AliEMCALGeometry *geom = gime->EMCALGeometry() ; 
-
-
-  //Making digits with noise, first EMC
-  Int_t nEMC = 2*geom->GetNPhi()*geom->GetNZ();
   Int_t absID ;
-  TString name      =  geom->GetName() ;
-
- // get first the sdigitizer from the tasks list (must have same name as the digitizer)
-  const AliEMCALSDigitizer * sDigitizer = gime->SDigitizer(GetName()); 
-  if ( !sDigitizer) {
-    cerr << "ERROR: AliEMCALDigitizer::Digitize -> SDigitizer with name " << GetName() << " not found " << endl ; 
-    abort() ; 
-  }
-// loop through the sdigits posted to the White Board and add them to the noise
-  TCollection * folderslist = gime->SDigitsFolder()->GetListOfFolders() ; 
-  TIter next(folderslist) ; 
-  TFolder * folder = 0 ; 
-  TClonesArray * sdigits = 0 ;
-  Int_t input = 0 ;
-  TObjArray * sdigArray = new TObjArray(2) ;
-  while ( (folder = (TFolder*)next()) ) 
-    if ( (sdigits = (TClonesArray*)folder->FindObject(GetName()) ) ) {
-      TString fileName(folder->GetName()) ;
-      fileName.ReplaceAll("_","/") ;
-      cout << "INFO: AliEMCALDigitizer::Digitize -> Adding SDigits " 
-          << GetName() << " from " << fileName << endl ; 
-      sdigArray->AddAt(sdigits, input) ;
-      input++ ;
-    }
 
+  digits->Expand(nEMC) ;
 
+  // get first the sdigitizer from the tasks list (must have same name as the digitizer)
+  if ( !emcalLoader->SDigitizer() ) 
+    emcalLoader->LoadSDigitizer();
+  AliEMCALSDigitizer * sDigitizer = dynamic_cast<AliEMCALSDigitizer*>(emcalLoader->SDigitizer()); 
+  
+  if ( !sDigitizer )
+    Fatal("Digitize", "SDigitizer with name %s %s not found", fEventFolderName.Data(), GetTitle() ) ; 
+
+  //take all the inputs to add together and load the SDigits
+  TObjArray * sdigArray = new TObjArray(fInput) ;
+  sdigArray->AddAt(emcalLoader->SDigits(), 0) ;
+  Int_t i ;
+
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+
+    AliRunLoader *  rl2 = AliRunLoader::GetRunLoader(tempo) ; 
+
+    if (rl2==0) 
+      rl2 = AliRunLoader::Open(fInputFileNames[i], tempo) ; 
+
+    if (fManager) 
+      readEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(i))->GetCurrentEventNumber() ; 
+    Info("Digitize", "Adding event %d from input stream %d %s %s", readEvent, i, fInputFileNames[i].Data(), tempo.Data()) ; 
+    rl2->LoadSDigits();
+    rl2->GetEvent(readEvent);
+    AliEMCALLoader *emcalLoader2 = dynamic_cast<AliEMCALLoader*>(rl2->GetDetectorLoader("EMCAL"));
+    sdigArray->AddAt(emcalLoader2->SDigits(), i) ;
+  }
+  
   //Find the first tower with signal
-  Int_t nextSig = 200000 ; 
-  Int_t i;
-  for(i=0; i<input; i++){
-    sdigits = (TClonesArray *)sdigArray->At(i) ;
+  Int_t nextSig = nEMC + 1 ; 
+  TClonesArray * sdigits ;  
+  for(i = 0 ; i < fInput ; i++){
+    sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
     if ( !sdigits->GetEntriesFast() )
       continue ; 
-    Int_t curNext = ((AliEMCALDigit *)sdigits->At(0))->GetId() ;
+    Int_t curNext = dynamic_cast<AliEMCALDigit *>(sdigits->At(0))->GetId() ;
      if(curNext < nextSig) 
        nextSig = curNext ;
+     AliDebug(1,Form("input %i : #sdigits %i \n",
+                    i, sdigits->GetEntriesFast()));
   }
+  AliDebug(1,Form("FIRST tower with signal %i \n", nextSig));
 
-  TArrayI index(input) ;
+  TArrayI index(fInput) ;
   index.Reset() ;  //Set all indexes to zero
 
-  AliEMCALDigit * digit = 0 ;
-  AliEMCALDigit * curSDigit = 0 ;
+  AliEMCALDigit * digit ;
+  AliEMCALDigit * curSDigit ;
 
-  TClonesArray * ticks = new TClonesArray("AliEMCALTick",1000) ;
+  //  TClonesArray * ticks = new TClonesArray("AliEMCALTick",1000) ;
 
   //Put Noise contribution
-  for(absID = 1; absID <= nEMC; absID++){
-    Float_t noise = gRandom->Gaus(0., fPinNoise); 
-    new((*digits)[absID-1]) AliEMCALDigit( -1, -1, absID,sDigitizer->Digitize(noise), TimeOfNoise() ) ;
+  for(absID = 0; absID < nEMC; absID++){ // Nov 30, 2006 by PAI; was from 1 to nEMC
+    Float_t energy = 0 ;
+    // amplitude set to zero, noise will be added later
+    new((*digits)[absID]) AliEMCALDigit( -1, -1, absID, 0., TimeOfNoise(),kFALSE); // absID-1->absID
     //look if we have to add signal?
-    digit = (AliEMCALDigit *) digits->At(absID-1) ;
+    digit = dynamic_cast<AliEMCALDigit *>(digits->At(absID)); // absID-1->absID
+    
     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 beginnign of the signal
-      new((*ticks)[contrib++]) AliEMCALTick(digit->GetTime(),0, b);  
-      //Mark the end of the ignal     
-      new((*ticks)[contrib++]) AliEMCALTick(digit->GetTime()+fTimeSignalLength, -a, -b);
+      //      ticks->Clear() ;
+      //Int_t contrib = 0 ;
+
+      //Follow PHOS and comment out this timing model til a better one
+      //can be developed - JLK 28-Apr-2008
+
+      //Float_t a = digit->GetAmplitude() ;
+      //Float_t b = TMath::Abs( a /fTimeSignalLength) ;
+      //Mark the beginning of the signal
+      //new((*ticks)[contrib++]) AliEMCALTick(digit->GetTime(),0, b);  
+      //Mark the end of the signal     
+      //new((*ticks)[contrib++]) AliEMCALTick(digit->GetTime()+fTimeSignalLength, -a, -b);
+
+      // Calculate time as time of the largest digit
+      Float_t time = digit->GetTime() ;
+      Float_t aTime= digit->GetAmplitude() ;
       
- // loop over input
-  
-      for(i = 0; i< input ; i++){  //loop over (possible) merge sources
-       if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
-         curSDigit = (AliEMCALDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;        
+      // loop over input
+      for(i = 0; i< fInput ; i++){  //loop over (possible) merge sources
+       if(dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+         curSDigit = dynamic_cast<AliEMCALDigit*>(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){           
+       while(curSDigit && (curSDigit->GetId() == absID)){         
          //Shift primary to separate primaries belonging different inputs
          Int_t primaryoffset ;
          if(fManager)
@@ -303,305 +411,629 @@ void AliEMCALDigitizer::Digitize(const Int_t event) {
          else
            primaryoffset = i ;
          curSDigit->ShiftPrimary(primaryoffset) ;
-         
-         a = curSDigit->GetAmp() ;
-         b = a /fTimeSignalLength ;
-         new((*ticks)[contrib++]) AliEMCALTick(curSDigit->GetTime(),0, b);  
-         new((*ticks)[contrib++]) AliEMCALTick(curSDigit->GetTime()+fTimeSignalLength, -a, -b); 
 
-         *digit = *digit + *curSDigit ;  //add energies
+         //Remove old timing model - JLK 28-April-2008
+         //a = curSDigit->GetAmplitude() ;
+         //b = a /fTimeSignalLength ;
+         //new((*ticks)[contrib++]) AliEMCALTick(curSDigit->GetTime(),0, b);  
+         //new((*ticks)[contrib++]) AliEMCALTick(curSDigit->GetTime()+fTimeSignalLength, -a, -b); 
+         if(curSDigit->GetAmplitude()>aTime) {
+           aTime = curSDigit->GetAmplitude();
+           time = curSDigit->GetTime();
+         }
+
+         *digit = *digit + *curSDigit ;  //adds amplitudes of each digit
 
          index[i]++ ;
-         if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
-           curSDigit = (AliEMCALDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;      
+         if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+           curSDigit = dynamic_cast<AliEMCALDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;
          else
            curSDigit = 0 ;
        }
       }
-
-//calculate and set time
-      Float_t time = FrontEdgeTime(ticks) ;
+      //Here we convert the summed amplitude to an energy in GeV
+      energy = sDigitizer->Calibrate(digit->GetAmplitude()) ; // GeV
+      // add fluctuations for photo-electron creation
+      energy *= static_cast<Float_t>(gRandom->Poisson(fMeanPhotonElectron)) / static_cast<Float_t>(fMeanPhotonElectron) ;
+  
+      //calculate and set time
+      //New timing model needed - JLK 28-April-2008
+      //Float_t time = FrontEdgeTime(ticks) ;
       digit->SetTime(time) ;
 
       //Find next signal module
-      nextSig = 200000 ;
-      for(i=0; i<input; i++){
-       sdigits = ((TClonesArray *)sdigArray->At(i)) ;
+      nextSig = nEMC + 1 ;
+      for(i = 0 ; i < fInput ; i++){
+       sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
        Int_t curNext = nextSig ;
        if(sdigits->GetEntriesFast() > index[i] ){
-         curNext = ((AliEMCALDigit *) sdigits->At(index[i]))->GetId() ;
-         
+         curNext = dynamic_cast<AliEMCALDigit *>(sdigits->At(index[i]))->GetId() ;       
        }
        if(curNext < nextSig) nextSig = curNext ;
       }
     }
-  }
+    // add the noise now
+    energy += TMath::Abs(gRandom->Gaus(0., fPinNoise)) ;
+    // JLK 26-June-2008
+    //Now digitize the energy according to the sDigitizer method,
+    //which merely converts the energy to an integer.  Later we will
+    //check that the stored value matches our allowed dynamic ranges
+    digit->SetAmplitude(sDigitizer->Digitize(energy)) ;  
+    AliDebug(10,Form(" absID %5i energy %f nextSig %5i\n",
+                    absID, energy, nextSig));
+  } // for(absID = 0; absID < nEMC; absID++)
   
-  ticks->Delete() ;
-  delete ticks ;
-
-
+  //ticks->Delete() ;
+  //delete ticks ;
 
+  //JLK is it better to call Clear() here?
+  delete sdigArray ; //We should not delete its contents
 
   //remove digits below thresholds
-  for(absID = 0; absID < nEMC/2 ; absID++){
-
-    if(sDigitizer->Calibrate(((AliEMCALDigit*)digits->At(absID))->GetAmp()) < fTowerDigitThreshold)
-      digits->RemoveAt(absID) ;
-    else
-      digit->SetTime(gRandom->Gaus(digit->GetTime(),fTimeResolution) ) ;
-  }
-  
-  for(absID = nEMC/2; absID < nEMC ; absID++){
-
-    if(sDigitizer->Calibrate(((AliEMCALDigit*)digits->At(absID))->GetAmp()) < fPreShowerDigitThreshold)
-      digits->RemoveAt(absID) ;
-    else
+  // until 10-02-2010 remove digits with energy smaller than fDigitThreshold 3*fPinNoise
+  // now, remove digits with Digitized ADC smaller than fDigitThreshold = 3
+  Float_t energy=0;
+  for(i = 0 ; i < nEMC ; i++){
+    digit = dynamic_cast<AliEMCALDigit*>( digits->At(i) ) ;
+    //First get the energy in GeV units.
+    energy = sDigitizer->Calibrate(digit->GetAmplitude()) ;
+    //Then digitize using the calibration constants of the ocdb
+    Float_t ampADC = DigitizeEnergy(energy, digit->GetId())  ;           
+    //if(ampADC>2)printf("Digit energy %f, amp %d, amp cal %d, threshold %d\n",energy,digit->GetAmplitude(),ampADC,fDigitThreshold);
+    if(ampADC < fDigitThreshold)
+      digits->RemoveAt(i) ;
+    else 
       digit->SetTime(gRandom->Gaus(digit->GetTime(),fTimeResolution) ) ;
   }
   
   digits->Compress() ;  
   
-  Int_t ndigits = digits->GetEntriesFast() ;
-  
-  digits->Expand(ndigits) ;
-  
+  Int_t ndigits = digits->GetEntriesFast() ; 
   
-  //Set indexes in list of digits
-  //Int_t i ;
- for (i = 0 ; i < ndigits ; i++) { 
-    AliEMCALDigit * digit = (AliEMCALDigit *) digits->At(i) ; 
+  //JLK 26-June-2008
+  //After we have done the summing and digitizing to create the
+  //digits, now we want to calibrate the resulting amplitude to match
+  //the dynamic range of our real data.  
+  for (i = 0 ; i < ndigits ; i++) { 
+    digit = dynamic_cast<AliEMCALDigit *>( digits->At(i) ) ; 
     digit->SetIndexInList(i) ; 
-    Float_t energy = sDigitizer->Calibrate(digit->GetAmp()) ;
-    digit->SetAmp(DigitizeEnergy(energy,digit->GetId()) ) ;
+    energy = sDigitizer->Calibrate(digit->GetAmplitude()) ;
+    digit->SetAmplitude(DigitizeEnergy(energy, digit->GetId()) ) ;
+       //Add delay to time
+       digit->SetTime(digit->GetTime()+fTimeDelay) ;
+        // printf("digit amplitude set at end: i %d, amp %f\n",i,digit->GetAmplitude());
   }
-}
 
-//____________________________________________________________________________
+}
 
-Int_t AliEMCALDigitizer::DigitizeEnergy(Float_t energy, Int_t absId)
+// //_____________________________________________________________________
+Float_t AliEMCALDigitizer::DigitizeEnergy(Float_t energy, Int_t AbsId)
 { 
-  Int_t channel = -999;
-  Int_t nphi = AliEMCALGetter::GetInstance()->EMCALGeometry()->GetNPhi() ; 
-  Int_t nz   = AliEMCALGetter::GetInstance()->EMCALGeometry()->GetNZ() ;
+  // JLK 26-June-2008
+  // Returns digitized value of the energy in a cell absId
+  // using the calibration constants stored in the OCDB
+  // or default values if no CalibData object is found.
+  // This effectively converts everything to match the dynamic range
+  // of the real data we will collect
+  //
+  // Load Geometry
+  const AliEMCALGeometry * geom = AliEMCALGeometry::GetInstance();
+
+  if (geom==0)
+    AliFatal("Did not get geometry from EMCALLoader");
+
+  Int_t iSupMod = -1;
+  Int_t nModule  = -1;
+  Int_t nIphi   = -1;
+  Int_t nIeta   = -1;
+  Int_t iphi    = -1;
+  Int_t ieta    = -1;
+  Float_t channel = -999; 
+
+  Bool_t bCell = geom->GetCellIndex(AbsId, iSupMod, nModule, nIphi, nIeta) ;
+  if(!bCell)
+    Error("DigitizeEnergy","Wrong cell id number : AbsId %i ", AbsId) ;
+  geom->GetCellPhiEtaIndexInSModule(iSupMod,nModule,nIphi, nIeta,iphi,ieta);
   
-  if(absId <= nphi*nz){  //digitize as tower
-    channel = static_cast<Int_t> (TMath::Ceil( (energy + fADCpedestalTower)/fADCchannelTower ))  ;
-  if(channel > fNADCTower ) 
-    channel =  fNADCTower ;
-  } else {
-    channel =  static_cast<Int_t>(TMath::Ceil( (energy + fADCpedestalPreSho)/fADCchannelPreSho ))  ;
-  if(channel > fNADCPreSho ) 
-    channel =  fNADCPreSho ;
+  if(fCalibData) {
+    fADCpedestalEC = fCalibData->GetADCpedestal(iSupMod,ieta,iphi);
+    fADCchannelEC = fCalibData->GetADCchannel(iSupMod,ieta,iphi);
   }
   
+  //channel = static_cast<Int_t> (TMath::Floor( (energy + fADCpedestalEC)/fADCchannelEC ))  ;
+  channel = (energy + fADCpedestalEC)/fADCchannelEC   ;
+
+  if(channel > fNADCEC ) 
+    channel =  fNADCEC ; 
   return channel ;
+  
 }
 
 //____________________________________________________________________________
-void AliEMCALDigitizer::Exec(Option_t *option) { 
-  // Managing method
-if(strcmp(GetName(), "") == 0 )   
-    Init() ;
-  
+void AliEMCALDigitizer::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
+    Error( "Exec", "Give a version name different from %s", fEventFolderName.Data() ) ;
+    return ;
+  } 
+
   if (strstr(option,"print")) {
-    Print("");
+
+    Print();
     return ; 
   }
   
   if(strstr(option,"tim"))
     gBenchmark->Start("EMCALDigitizer");
 
-  AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
-  
-  Int_t nevents ;
-  
-  TTree * treeD ;
+  AliRunLoader *rl = AliRunLoader::Instance();
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(rl->GetDetectorLoader("EMCAL"));
+
+  // Post Digitizer to the white board
+  emcalLoader->PostDigitizer(this) ;
   
-  if(fManager){
-    treeD = fManager->GetTreeD() ;
-    nevents = 1 ;    // Will process only one event
+  if (fLastEvent == -1)  {
+    fLastEvent = rl->GetNumberOfEvents() - 1 ;
   }
-  else {
-    gAlice->GetEvent(0) ;
-    nevents = (Int_t) gAlice->TreeE()->GetEntries() ;
-    treeD=gAlice->TreeD() ;
-  }
+  else if (fManager) 
+    fLastEvent = fFirstEvent ; // what is this ??
 
-  //Check, if this branch already exits
-  if (treeD) {
-    TObjArray * lob = (TObjArray*)treeD->GetListOfBranches() ;
-    TIter next(lob) ; 
-    TBranch * branch = 0 ;  
-    Bool_t emcalfound = kFALSE, digitizerfound = kFALSE ; 
-    
-    while ( (branch = (TBranch*)next()) && (!emcalfound || !digitizerfound) ) {
-      if ( (strcmp(branch->GetName(), "EMCAL")==0) && 
-          (strcmp(branch->GetTitle(), GetName())==0) ) 
-       emcalfound = kTRUE ;
-      
-      else if ( (strcmp(branch->GetName(), "AliEMCALDigitizer")==0) && 
-               (strcmp(branch->GetTitle(), GetName())==0) ) 
-       digitizerfound = kTRUE ; 
-    }
-    
-    if ( emcalfound ) {
-      cerr << "WARNING: AliEMCALDigitizer -> Digits branch with name " << GetName() 
-          << " already exits" << endl ;
-      return ; 
-    }   
-    if ( digitizerfound ) {
-      cerr << "WARNING: AliEMCALDigitizer -> Digitizer branch with name " << GetName() 
-          << " already exits" << endl ;
-      return ; 
-    }   
-  }
-  Int_t ievent ;
+  Int_t nEvents   = fLastEvent - fFirstEvent + 1;
+  Int_t ievent;
 
-  for(ievent = 0; ievent < nevents; ievent++){
-    
-    if(fManager){
-      Int_t input ;
-      for(input = 0 ; input < fManager->GetNinputs(); input ++){
-       TTree * treeS = fManager->GetInputTreeS(input) ;
-       if(!treeS){
-         cerr << "AliEMCALDigitizer -> No Input " << endl ;
-         return ;
-       }
-       gime->ReadTreeS(treeS,input) ;
-      }
-    }
-    else 
-      gime->Event(ievent,"S") ; 
+  TClonesArray* digitsTRG = new TClonesArray("AliEMCALRawDigit", 32 * 96);
+  TClonesArray* digitsTMP = new TClonesArray("AliEMCALDigit",    32 * 96);
+  rl->LoadSDigits("EMCAL");
+  for (ievent = fFirstEvent; ievent <= fLastEvent; ievent++) {
     
+    rl->GetEvent(ievent);
+
     Digitize(ievent) ; //Add prepared SDigits to digits and add the noise
-    
-    WriteDigits(ievent) ;
-    
+
+    WriteDigits() ;
+         
+       //Trigger Digits
+       //-------------------------------------
+       Digits2FastOR(digitsTMP, digitsTRG);  
+         
+       WriteDigits(digitsTRG);
+         
+       (emcalLoader->TreeD())->Fill();
+         
+       emcalLoader->WriteDigits(   "OVERWRITE");
+       emcalLoader->WriteDigitizer("OVERWRITE");
+         
+       Unload();
+         
+       digitsTRG->Clear();
+       digitsTMP->Clear();
+       //-------------------------------------
+
     if(strstr(option,"deb"))
       PrintDigits(option);
-    
+    if(strstr(option,"table")) gObjectTable->Print();
+
     //increment the total number of Digits per run 
-    fDigitsInRun += gime->Digits()->GetEntriesFast() ;  
+    fDigitsInRun += emcalLoader->Digits()->GetEntriesFast() ;  
   }
   
+  emcalLoader->CleanDigitizer() ;
+
   if(strstr(option,"tim")){
     gBenchmark->Stop("EMCALDigitizer");
-    cout << "AliEMCALDigitizer:" << endl ;
-    cout << "  took " << gBenchmark->GetCpuTime("EMCALDigitizer") << " seconds for Digitizing " 
-        <<  gBenchmark->GetCpuTime("EMCALDigitizer")/nevents << " seconds per event " << endl ;
-    cout << endl ;
+    AliInfo(Form("Exec: took %f seconds for Digitizing %f seconds per event", 
+        gBenchmark->GetCpuTime("EMCALDigitizer"), gBenchmark->GetCpuTime("EMCALDigitizer")/nEvents )) ;
+  } 
+}
+
+//____________________________________________________________________________ 
+void AliEMCALDigitizer::Digits2FastOR(TClonesArray* digitsTMP, TClonesArray* digitsTRG)
+{
+       // FEE digits afterburner to produce TRG digits 
+       // we are only interested in the FEE digit deposited energy
+       // to be converted later into a voltage value
+       
+       // push the FEE digit to its associated FastOR (numbered from 0:95)
+       // TRU is in charge of summing module digits
+       
+       AliRunLoader *runLoader = AliRunLoader::Instance();
+       
+       AliRun* run = runLoader->GetAliRun();
+       
+       AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(runLoader->GetDetectorLoader("EMCAL"));
+       
+       AliEMCALGeometry* geom = dynamic_cast<AliEMCAL*>(run->GetDetector("EMCAL"))->GetGeometry();
+       
+       // build FOR from simulated digits
+       // and xfer to the corresponding TRU input (mapping)
+       
+       TClonesArray* digits = emcalLoader->Digits();
+       
+       TIter NextDigit(digits);
+       while (AliEMCALDigit* digit = (AliEMCALDigit*)NextDigit())
+       {
+               Int_t id = digit->GetId();
+               
+               Int_t iSupMod, nModule, nIphi, nIeta, iphi, ieta, iphim, ietam;
+               
+               geom->GetCellIndex(              id, iSupMod, nModule, nIphi, nIeta );
+               geom->GetModulePhiEtaIndexInSModule( iSupMod, nModule, iphim, ietam );          
+               geom->GetCellPhiEtaIndexInSModule(   iSupMod, nModule, nIphi, nIeta, iphi, ieta); 
+               
+               // identify to which TRU this FEE digit belong
+               //Int_t itru = (iSupMod < 11) ? iphim / 4 + 3 * iSupMod : 31;
+               Int_t itru = -1;
+               if (iSupMod < 11)
+                       itru = (iSupMod % 2) ? (2 - int(iphim / 4)) + 3 * iSupMod : iphim / 4 + 3 * iSupMod;
+               else 
+                       itru = 31;
+               
+               //---------
+               //
+               // FIXME: bad numbering solution to deal w/ the last 2 SM which have only 1 TRU each
+               // using the AliEMCALGeometry official numbering
+               // only 1 TRU/SM in SM 10 & SM 11
+               //
+               //---------
+               if ((itru == 31 && iphim < 2) || (itru == 30 && iphim > 5)) continue;
+               
+               // to be compliant with %4 per TRU
+               if (itru == 31) iphim -= 2;
+               
+               Int_t trgid;
+               Bool_t isOK = geom->GetAbsFastORIndexFromPositionInTRU(itru, ietam, iphim % 4, trgid);
+               
+               AliDebug(2,Form("trigger digit id: %d itru: %d isOK: %d\n",trgid,itru,isOK));
+               
+               if (isOK) 
+               {
+                       AliEMCALDigit* d = static_cast<AliEMCALDigit*>(digitsTMP->At(trgid));
+                       
+                       if (!d)
+                       {
+                               new((*digitsTMP)[trgid]) AliEMCALDigit(*digit);
+                               d = (AliEMCALDigit*)digitsTMP->At(trgid);
+                               d->SetId(trgid);
+                       }       
+                       else
+                       {
+                               *d = *d + *digit;
+                       }
+               }
+       }
+       
+       Int_t    nSamples = 32;
+       Int_t *timeSamples = new Int_t[nSamples];
+       
+       NextDigit = TIter(digitsTMP);
+       while (AliEMCALDigit* digit = (AliEMCALDigit*)NextDigit())
+       {
+               if (digit)
+               {
+                       Int_t     id = digit->GetId();
+                       Float_t time = digit->GetTime();
+                                               
+                       Double_t depositedEnergy = 0.;
+                       for (Int_t j = 1; j <= digit->GetNprimary(); j++) depositedEnergy += digit->GetDEPrimary(j);
+                       
+                       // FIXME: Check digit time!
+                       if (depositedEnergy)
+                       {
+                               DigitalFastOR(time, depositedEnergy, timeSamples, nSamples);
+                               
+                               for (Int_t j=0;j<nSamples;j++) 
+                               {
+                                       timeSamples[j] = ((j << 12) & 0xFF000) | (timeSamples[j] & 0xFFF);
+                               }
+                               
+                               new((*digitsTRG)[digitsTRG->GetEntriesFast()]) AliEMCALRawDigit(id, timeSamples, nSamples);
+                       }
+               }
+       }
+
+       delete [] timeSamples;
+}
+
+//____________________________________________________________________________ 
+void AliEMCALDigitizer::DigitalFastOR( Double_t time, Double_t dE, Int_t timeSamples[], Int_t nSamples )
+{
+       // parameters:  
+       // id: 0..95
+       const Int_t    reso = 11;      // 11-bit resolution ADC
+       const Double_t vFSR = 1;       // Full scale input voltage range
+       const Double_t Ne   = 125;     // signal of the APD per MeV of energy deposit in a tower: 125 photo-e-/MeV @ M=30
+       const Double_t vA   = .136e-6; // CSP output range: 0.136uV/e-
+       const Double_t rise = 40e-9;   // rise time (10-90%) of the FastOR signal before shaping
+       
+       const Double_t kTimeBinWidth = 25E-9; // sampling frequency (40MHz)
+       
+       Double_t vV = 1000. * dE * Ne * vA; // GeV 2 MeV
+       
+       TF1 signalF("signal", AnalogFastORFunction, 0, nSamples * kTimeBinWidth, 3);
+       signalF.SetParameter( 0,   vV ); 
+       signalF.SetParameter( 1, time ); // FIXME: when does the signal arrive? Might account for cable lengths
+       signalF.SetParameter( 2, rise );
+       
+       for (Int_t iTime=0; iTime<nSamples; iTime++) 
+       {
+               // FIXME: add noise (probably not simply Gaussian) according to DA measurements
+               // probably plan an access to OCDB
+               
+               timeSamples[iTime] = int((TMath::Power(2, reso) / vFSR) * signalF.Eval(iTime * kTimeBinWidth) + 0.5);
+       }
+}
+
+
+//____________________________________________________________________________ 
+//Float_t AliEMCALDigitizer::FrontEdgeTime(TClonesArray * ticks) 
+//{ 
+//  //  Returns the shortest time among all time ticks
+//
+//  ticks->Sort() ; //Sort in accordance with times of ticks
+//  TIter it(ticks) ;
+//  AliEMCALTick * ctick = (AliEMCALTick *) it.Next() ;
+//  Float_t time = ctick->CrossingTime(fTimeThreshold) ;    
+//  
+//  AliEMCALTick * t ;  
+//  while((t=(AliEMCALTick*) it.Next())){
+//    if(t->GetTime() < time)  //This tick starts before crossing
+//      *ctick+=*t ;
+//    else
+//      return time ;
+//    
+//    time = ctick->CrossingTime(fTimeThreshold) ;    
+//  }
+//  return time ;
+//}
+//
+
+//____________________________________________________________________________ 
+Bool_t AliEMCALDigitizer::Init()
+{
+  // Makes all memory allocations
+  fInit = kTRUE ; 
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
+
+  if ( emcalLoader == 0 ) {
+    Fatal("Init", "Could not obtain the AliEMCALLoader");  
+    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 bt fManager 
   }
   
+  //to prevent cleaning of this object while GetEvent is called
+  emcalLoader->GetDigitsDataLoader()->GetBaseTaskLoader()->SetDoNotReload(kTRUE);
+
+  //Calibration instance
+  fCalibData = emcalLoader->CalibData();
+  return fInit ;    
 }
 
+//____________________________________________________________________________ 
+void AliEMCALDigitizer::InitParameters()
+{ 
+  // Parameter initialization for digitizer
+  
+  // Get the parameters from the OCDB via the loader
+  AliRunLoader *rl = AliRunLoader::Instance();
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(rl->GetDetectorLoader("EMCAL"));
+  AliEMCALSimParam * simParam = 0x0;
+  if(emcalLoader) simParam = emcalLoader->SimulationParameters();
+       
+  if(!simParam){
+         simParam = AliEMCALSimParam::GetInstance();
+         AliWarning("Simulation Parameters not available in OCDB?");
+  }
+       
+  fMeanPhotonElectron = simParam->GetMeanPhotonElectron();//4400;  // electrons per GeV 
+  fPinNoise           = simParam->GetPinNoise();//0.012; // pin noise in GeV from analysis test beam data 
+  if (fPinNoise < 0.0001 ) 
+    Warning("InitParameters", "No noise added\n") ; 
+  fDigitThreshold     = simParam->GetDigitThreshold(); //fPinNoise * 3; // 3 * sigma
+  fTimeResolution     = simParam->GetTimeResolution(); //0.6e-9 ; // 600 pc
+  fTimeDelay          = simParam->GetTimeDelay(); //600e-9 ; // 600 ns
+
+  // These defaults are normally not used. 
+  // Values are read from calibration database instead
+  fADCchannelEC       = 0.0153; // Update 24 Apr 2007: 250./16/1024 - width of one ADC channel in GeV
+  fADCpedestalEC      = 0.0 ;  // GeV
+
+  fNADCEC          = simParam->GetNADCEC();//(Int_t) TMath::Power(2,16) ;  // number of channels in Tower ADC - 65536
 
+  AliDebug(2,Form("Mean Photon Electron %d, Noise %f, Digit Threshold %d,Time Resolution %g,NADCEC %d",
+               fMeanPhotonElectron,fPinNoise,fDigitThreshold,fTimeResolution,fNADCEC));
+
+  // Not used anymore, remove?
+  // fTimeSignalLength   = 1.0e-9 ;
+  // fTimeThreshold      = 0.001*10000000 ; // Means 1 MeV in terms of SDigits amplitude ??
+
+}
 
 //__________________________________________________________________
-void AliEMCALDigitizer::MixWith(char* headerFile){
-  // Alows produce digits by superimposing background and signal event.
+void AliEMCALDigitizer::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 
-  // constructor, and now we set the BACKGROUND event, with which we 
-  // will mix. Thus we avoid writing (changing) huge and expencive 
+  // 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 wants.
+  // 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(GetName(), "") == 0 )
+  if( strcmp(GetName(), "") == 0 )
     Init() ;
   
- if(fManager){
-    cout << "Can not use this method under AliRunDigitizer " << endl ;
 if(fManager){
+    Error("MixWith", "Cannot use this method under AliRunDigitizer") ;
     return ;
-  } // check if the specified SDigits do not already exist on the White Board:
-  // //Folders/RunMC/Event/Data/EMCAL/SDigits/headerFile/sdigitsname
-
-  TString path = "Folders/RunMC/Event/Data/EMCAL/SDigits" ; 
-  path += headerFile ; 
-  path += "/" ; 
-  path += GetName() ;
-  if ( gROOT->FindObjectAny(path.Data()) ) {
-    cerr << "WARNING: AliEMCALDigitizer::MixWith -> Entry already exists, do not add" << endl ;
-    return;
+  } 
+  // looking for file which contains AliRun
+  if (gSystem->AccessPathName(alirunFileName)) {// file does not exist
+    Error("MixWith", "File %s does not exist!", alirunFileName.Data()) ;
+    return ; 
   }
-
-  AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
-  gime->PostSDigits(GetName(),headerFile) ;
-  
-  // check if the requested file is already open or exist and if SDigits Branch exist
-  TFile * file = (TFile*)gROOT->FindObject(headerFile); 
-  if ( !file ) { 
-    file = new TFile(headerFile, "READ") ; 
-    if (!file) { 
-      cerr << "ERROR: AliEMCALDigitizer::MixWith -> File " << headerFile << " does not exist!" << endl ; 
-      return ; 
+  // looking for the file which contains SDigits
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
+  TString fileName( emcalLoader->GetSDigitsFileName() ) ; 
+    if ( eventFolderName != AliConfig::GetDefaultEventFolderName()) // only if not the default folder name 
+      fileName = fileName.ReplaceAll(".root", "") + "_" + eventFolderName + ".root" ;
+    if ( (gSystem->AccessPathName(fileName)) ) { 
+      Error("MixWith", "The file %s does not exist!", fileName.Data()) ;
+      return ;
     }
-  }
-  
-}
+    // need to increase the arrays
+    // MvL: This code only works when fInput == 1, I think.
+    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 AliEMCALDigitizer::Print(Option_t* option)const {
-  if( strcmp(GetName(), "") != 0) {
+void AliEMCALDigitizer::Print1(Option_t * option)
+{ // 19-nov-04 - just for convinience
+  Print(); 
+  PrintDigits(option);
+}
+
+//__________________________________________________________________
+void AliEMCALDigitizer::Print(Option_t*)const 
+{
+  // Print Digitizer's parameters
+  printf("Print: \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 nStreams ; 
+    if (fManager) 
+      nStreams =  GetNInputStreams() ;
+    else 
+      nStreams = fInput ; 
     
-  TCollection * folderslist = ((TFolder*)gROOT->FindObjectAny("Folders/RunMC/Event/Data/EMCAL/SDigits"))->GetListOfFolders() ; 
-    TIter next(folderslist) ; 
-    TFolder * folder = 0 ;
-    while ( (folder = (TFolder*)next()) ) 
-      if ( folder->FindObject(GetName())  ) 
-       {
-       cout << "Adding SDigits " << GetName() << " from " << folder->GetName() << endl ; 
-      cout << endl ;
-      cout << "Writing digits to " << GetTitle() << endl ;
-      
-      cout << endl ;
-      cout << "With following parameters: " << endl ;
-      cout << "     Electronics noise in EMC (fPinNoise) = " << fPinNoise << endl ;
-      cout << "  Threshold  in EMC  (fTowerDigitThreshold) = " << fTowerDigitThreshold  << endl;
-      cout << "  Threshold  in PreShower  (fPreShowerDigitThreshold) = " << fPreShowerDigitThreshold  << endl ; ;
-      cout << "---------------------------------------------------" << endl ;
-    }
-    else
-      cout << "AliEMCALDigitizer not initialized " << endl ;
+    Int_t index = 0 ;  
+
+    AliRunLoader *rl=0;
+
+    for (index = 0 ; index < nStreams ; index++) {  
+      TString tempo(fEventNames[index]) ; 
+      tempo += index ;
+      if ((rl = AliRunLoader::GetRunLoader(tempo)) == 0)
+       rl = AliRunLoader::Open(fInputFileNames[index], tempo) ; 
+      AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(rl->GetDetectorLoader("EMCAL"));
+      TString fileName( emcalLoader->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()) ; 
     }
+
+    AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
+
+    printf("\nWriting digits to %s", emcalLoader->GetDigitsFileName().Data()) ;
+    
+    printf("\nWith following parameters:\n") ;
+    
+    printf("    Electronics noise in EMC (fPinNoise) = %f\n", fPinNoise) ;
+    printf("    Threshold  in Tower  (fDigitThreshold) = %d\n", fDigitThreshold)  ;
+    printf("---------------------------------------------------\n")  ;
+  }
+  else
+    printf("Print: AliEMCALDigitizer not initialized") ; 
 }
 
 //__________________________________________________________________
-void AliEMCALDigitizer::PrintDigits(Option_t * option){
-    
-  AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ; 
-  TClonesArray * fDigits = gime->Digits() ;
+void AliEMCALDigitizer::PrintDigits(Option_t * option)
+{
+  //utility method for printing digit information
 
-  cout << "AliEMCALDigitiser:"<< endl ;
-  cout << "       Number of entries in Digits list " << fDigits->GetEntriesFast() << endl ;
-  cout << endl ;
-  if(strstr(option,"all")){
-    
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
+  TClonesArray * digits  = emcalLoader->Digits() ;
+  TClonesArray * sdigits = emcalLoader->SDigits() ;
+  
+  printf("\n #Digits: %d : sdigits %d ", digits->GetEntriesFast(), sdigits->GetEntriesFast()) ; 
+  printf("\n event %d", emcalLoader->GetRunLoader()->GetEventNumber());
+  
+  if(strstr(option,"all")){  
     //loop over digits
     AliEMCALDigit * 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 index ;
-    for (index = 0 ; index < fDigits->GetEntries() ; index++) {
-      digit = (AliEMCALDigit * )  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->GetEntries() ; index++) {
+      digit = dynamic_cast<AliEMCALDigit *>(digits->At(index)) ;
+      printf("\n%6d  %8f    %6.5e %4d      %2d : ",
+             digit->GetId(), digit->GetAmplitude(), 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");
+}
+
+//__________________________________________________________________
+Float_t AliEMCALDigitizer::TimeOfNoise(void)
+{  
+  // Calculates the time signal generated by noise
+  //PH  Info("TimeOfNoise", "Change me") ; 
+  return gRandom->Rndm() * 1.28E-5;
+}
+
+//__________________________________________________________________
+void AliEMCALDigitizer::Unload() 
+{  
+  // Unloads the SDigits and Digits
+  AliRunLoader *rl=0;
     
+  Int_t i ; 
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i;
+    if ((rl = AliRunLoader::GetRunLoader(tempo))) 
+      rl->GetDetectorLoader("EMCAL")->UnloadSDigits() ; 
   }
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
+  emcalLoader->UnloadDigits() ; 
 }
+
 //_________________________________________________________________________________________
-void AliEMCALDigitizer::WriteDigits(Int_t event)
+void AliEMCALDigitizer::WriteDigits()
 {
 
   // Makes TreeD in the output file. 
@@ -612,106 +1044,65 @@ void AliEMCALDigitizer::WriteDigits(Int_t event)
   //      and branch "AliEMCALDigitizer", with the same title to keep all the parameters
   //      and names of files, from which digits are made.
 
-  AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ; 
-  const TClonesArray * digits = gime->Digits(GetName()) ; 
- TTree * treeD ;
+  AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
 
- if(fManager)
-   treeD = fManager->GetTreeD() ;
- else {
-   if (!gAlice->TreeD() ) 
-     gAlice->MakeTree("D");
-   treeD = gAlice->TreeD();
- }
- // -- create Digits branch
- Int_t bufferSize = 32000 ;    
- TBranch * digitsBranch = treeD->Branch("EMCAL",&digits,bufferSize);
- digitsBranch->SetTitle(GetName());
- // -- Create Digitizer branch
- Int_t splitlevel = 0 ;
- AliEMCALDigitizer * d = gime->Digitizer(GetName()) ;
- TBranch * digitizerBranch = treeD->Branch("AliEMCALDigitizer", "AliEMCALDigitizer", &d,bufferSize,splitlevel); 
- digitizerBranch->SetTitle(GetName());
- treeD->Fill() ; 
- treeD->AutoSave() ;  
-}
-//____________________________________________________________________________ 
-Float_t AliEMCALDigitizer::FrontEdgeTime(TClonesArray * ticks) 
-{ // 
-  ticks->Sort() ; //Sort in accordance with times of ticks
-  TIter it(ticks) ;
-  AliEMCALTick * ctick = (AliEMCALTick *) it.Next() ;
-  Float_t time = ctick->CrossingTime(fTimeThreshold) ;    
-  
-  AliEMCALTick * t ;  
-  while((t=(AliEMCALTick*) it.Next())){
-    if(t->GetTime() < time)  //This tick starts before crossing
-      *ctick+=*t ;
-    else
-      return time ;
-    
-    time = ctick->CrossingTime(fTimeThreshold) ;    
+  const TClonesArray * digits = emcalLoader->Digits() ; 
+  TTree * treeD = emcalLoader->TreeD(); 
+  if ( !treeD ) {
+    emcalLoader->MakeDigitsContainer();
+    treeD = emcalLoader->TreeD(); 
   }
-  return time ;
-}
-//____________________________________________________________________________ 
-Float_t AliEMCALDigitizer::TimeOfNoise(void)
-{  // Calculates the time signal generated by noise
-  //to be rewritten, now returns just big number
-  return 1. ;
 
-}
-//____________________________________________________________________________
-void AliEMCALDigitizer::SetSDigitsBranch(const char* title)
-{
-  // we set title (comment) of the SDigits branch in the first! header file
-  if( strcmp(GetName(), "") == 0 )
-    Init() ;
+  // -- create Digits branch
+  Int_t bufferSize = 32000 ;    
+  TBranch * digitsBranch = 0;
+  if ((digitsBranch = treeD->GetBranch("EMCAL"))) {
+    digitsBranch->SetAddress(&digits);
+    AliWarning("Digits Branch already exists. Not all digits will be visible");
+  }
+  else
+    treeD->Branch("EMCAL","TClonesArray",&digits,bufferSize);
+  //digitsBranch->SetTitle(fEventFolderName);
+
+//     treeD->Fill() ;
+/*  
+  emcalLoader->WriteDigits("OVERWRITE");
+  emcalLoader->WriteDigitizer("OVERWRITE");
 
-  AliEMCALGetter::GetInstance()->SDigits()->SetName(title) ; 
+  Unload() ; 
+*/
 }
 
 //__________________________________________________________________
-void AliEMCALDigitizer::SetSplitFile(const TString splitFileName) const
+void AliEMCALDigitizer::WriteDigits(TClonesArray* digits, const char* branchName)
 {
-  // Diverts the Digits in a file separate from the hits file
-  
-  // I guess it is not going to work if we do merging
-  if (fManager) {
-    cerr << "ERROR: AliEMCALDigitizer::SetSplitFile -> Not yet available in case of merging activated " << endl ;  
-    return ; 
-  }
+       //
+       AliEMCALLoader *emcalLoader = dynamic_cast<AliEMCALLoader*>(AliRunLoader::Instance()->GetDetectorLoader("EMCAL"));
+       
+       TTree* treeD = emcalLoader->TreeD(); 
+       if (!treeD) 
+       {
+               emcalLoader->MakeDigitsContainer();
+               treeD = emcalLoader->TreeD(); 
+       }
+       
+       // -- create Digits branch
+       Int_t bufferSize = 32000;
+       
+       if (TBranch* triggerBranch = treeD->GetBranch(branchName)) 
+       {
+               triggerBranch->SetAddress(&digits);
+       }
+       else
+       {
+               treeD->Branch(branchName,"TClonesArray",&digits,bufferSize);
+       }
+       
+//     treeD->Fill();
+}
 
-  TDirectory * cwd = gDirectory ;
-  TFile * splitFile = gAlice->InitTreeFile("D",splitFileName.Data());
-  splitFile->cd() ; 
-  gAlice->Write();
-  
-  TTree *treeE  = gAlice->TreeE();
-  if (!treeE) {
-    cerr << "ERROR: AliEMCALDigitizer::SetSplitFile -> No TreeE found "<<endl;
-    abort() ;
-  }      
-  
-  // copy TreeE
-  AliHeader *header = new AliHeader();
-  treeE->SetBranchAddress("Header", &header);
-  treeE->SetBranchStatus("*",1);
-  TTree *treeENew =  treeE->CloneTree();
-  treeENew->Write();
-  
-  // copy AliceGeom
-  TGeometry *AliceGeom = static_cast<TGeometry*>(cwd->Get("AliceGeom"));
-  if (!AliceGeom) {
-    cerr << "ERROR: AliEMCALDigitizer::SetSplitFile -> AliceGeom was not found in the input file "<<endl;
-    abort() ;
-  }
-  AliceGeom->Write();
-  cwd->cd() ; 
-  gAlice->MakeTree("D",splitFile);
-  cout << "INFO: AliEMCALDigitizer::SetSPlitMode -> Digits will be stored in " << splitFileName.Data() << endl ; 
+//__________________________________________________________________
+void AliEMCALDigitizer::Browse(TBrowser* b)
+{
+  TTask::Browse(b);
 }