]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - EMCAL/AliEMCALQADataMakerRec.cxx
Adding extra check for GPU_FORCE_64BIT_PTR env var
[u/mrichter/AliRoot.git] / EMCAL / AliEMCALQADataMakerRec.cxx
index a7e0d9e8b6af658fc4776d1820c362c9f0975c4b..49c4ad0e50d8483ebf1732eee761ea82cc1b9230 100644 (file)
@@ -37,6 +37,7 @@ Also calculate the ratio of amplitude from LED Monitor system (current/Reference
 #include <TLine.h>
 #include <TText.h>
 #include <TProfile.h> 
+#include <TProfile2D.h> 
 #include <TStyle.h>
 // --- Standard library ---
 
@@ -65,9 +66,14 @@ Also calculate the ratio of amplitude from LED Monitor system (current/Reference
 #include "AliCaloFitResults.h"
 #include "AliCaloRawAnalyzerFastFit.h"
 #include "AliCaloRawAnalyzerNN.h"
-#include "AliCaloRawAnalyzerLMS.h"
+//#include "AliCaloRawAnalyzerLMS.h"
+#include "AliCaloRawAnalyzerKStandard.h"
 #include "AliCaloRawAnalyzerPeakFinder.h"
 #include "AliCaloRawAnalyzerCrude.h"
+#include "AliEMCALGeometry.h"
+#include "AliEMCALTriggerSTURawStream.h"
+
+#include "AliCaloRawAnalyzerFactory.h"
 
 using namespace std;
 
@@ -79,7 +85,8 @@ AliEMCALQADataMakerRec::AliEMCALQADataMakerRec(fitAlgorithm fitAlgo) :
   fFittingAlgorithm(0),
   fRawAnalyzer(0),
   fRawAnalyzerTRU(0),
-  fSuperModules(4), // FIXME!!! number of SuperModules; 4 for 2009; update default to 12 for later runs..
+       fGeom(0),
+  fSuperModules(12), // FIXME!!! number of SuperModules; 12 for 2012; update default for later runs 
   fFirstPedestalSample(0),
   fLastPedestalSample(3),
   fFirstPedestalSampleTRU(0),
@@ -105,9 +112,15 @@ AliEMCALQADataMakerRec::AliEMCALQADataMakerRec(fitAlgorithm fitAlgo) :
 {
   // ctor
   SetFittingAlgorithm(fitAlgo);
-  fRawAnalyzerTRU = new AliCaloRawAnalyzerLMS();
+  
+  //fRawAnalyzerTRU = new AliCaloRawAnalyzerLMS();
+  
+  fRawAnalyzerTRU =  ( AliCaloRawAnalyzerKStandard*)AliCaloRawAnalyzerFactory::CreateAnalyzer(kLMS);
+  
   fRawAnalyzerTRU->SetFixTau(kTRUE); 
   fRawAnalyzerTRU->SetTau(2.5); // default for TRU shaper
+
+       fGeom = new AliEMCALGeometry("EMCAL_COMPLETE12SMV1", "EMCAL");
 //  for (Int_t sm = 0 ; sm < fSuperModules ; sm++){
 //    fTextSM[sm] = NULL ;
 //  }
@@ -119,6 +132,7 @@ AliEMCALQADataMakerRec::AliEMCALQADataMakerRec(const AliEMCALQADataMakerRec& qad
   fFittingAlgorithm(0),
   fRawAnalyzer(0),
   fRawAnalyzerTRU(0),
+       fGeom(0),
   fSuperModules(qadm.GetSuperModules()), 
   fFirstPedestalSample(qadm.GetFirstPedestalSample()), 
   fLastPedestalSample(qadm.GetLastPedestalSample()),  
@@ -146,7 +160,9 @@ AliEMCALQADataMakerRec::AliEMCALQADataMakerRec(const AliEMCALQADataMakerRec& qad
   SetName((const char*)qadm.GetName()) ; 
   SetTitle((const char*)qadm.GetTitle()); 
   SetFittingAlgorithm(qadm.GetFittingAlgorithm());
-  fRawAnalyzerTRU = new AliCaloRawAnalyzerLMS();
+  
+  //fRawAnalyzerTRU = new AliCaloRawAnalyzerLMS();
+  fRawAnalyzerTRU = (AliCaloRawAnalyzerKStandard*)AliCaloRawAnalyzerFactory::CreateAnalyzer(kLMS);
   fRawAnalyzerTRU->SetFixTau(kTRUE); 
   fRawAnalyzerTRU->SetTau(2.5); // default for TRU shaper
 //  for (Int_t sm = 0 ; sm < fSuperModules ; sm++){
@@ -177,6 +193,7 @@ void AliEMCALQADataMakerRec::EndOfDetectorCycle(AliQAv1::TASKINDEX_t task, TObjA
 //       GetRawsData(kNEventsPerTower)->Scale(1./fCycleCounter);
 
   // do the QA checking
+  ResetEventTrigClasses(); // reset triggers list to select all histos
   AliQAChecker::Instance()->Run(AliQAv1::kEMCAL, task, list) ;  
 }
 
@@ -255,7 +272,8 @@ void AliEMCALQADataMakerRec::InitESDs()
   TH1I * h4 = new TH1I("hESDCaloCellM", "ESDs CaloCell multiplicity in EMCAL;# of Clusters;Entries", 200, 0,  1000) ; 
   h4->Sumw2() ;
   Add2ESDsList(h4, kESDCaloCellM, !expert, image) ;
-       
+  //
+  ClonePerTrigClass(AliQAv1::kESDS); // this should be the last line   
 }
 
 //____________________________________________________________________________ 
@@ -271,6 +289,8 @@ void AliEMCALQADataMakerRec::InitDigits()
   TH1I * h1 = new TH1I("hEmcalDigitsMul", "Digits multiplicity distribution in EMCAL;# of Digits;Entries", 200, 0, 2000) ; 
   h1->Sumw2() ;
   Add2DigitsList(h1, 1, !expert, image) ;
+  //
+  ClonePerTrigClass(AliQAv1::kDIGITS); // this should be the last line
 }
 
 //____________________________________________________________________________ 
@@ -291,7 +311,8 @@ void AliEMCALQADataMakerRec::InitRecPoints()
   TH1I* h2 = new TH1I("hEMCALRpDigM","EMCAL RecPoint Digit Multiplicities;# of Digits;Entries",20,0,20);
   h2->Sumw2();
   Add2RecPointsList(h2,kRecPDigM, !expert, image);
-
+  //
+  ClonePerTrigClass(AliQAv1::kRECPOINTS); // this should be the last line
 }
 
 //____________________________________________________________________________ 
@@ -305,13 +326,14 @@ void AliEMCALQADataMakerRec::InitRaws()
 
   Int_t nTowersPerSM = AliEMCALGeoParams::fgkEMCALRows * AliEMCALGeoParams::fgkEMCALCols; // number of towers in a SuperModule; 24x48
   Int_t nTot = fSuperModules * nTowersPerSM; // max number of towers in all SuperModules
-  
-  
+    
   //Defining histograms binning, each 2D histogram covers all SMs
   Int_t nSMSectors = fSuperModules / 2; // 2 SMs per sector
   Int_t nbinsZ = 2*AliEMCALGeoParams::fgkEMCALCols;
   Int_t nbinsPhi = nSMSectors * AliEMCALGeoParams::fgkEMCALRows;
-   
+       
+  Int_t nTRUCols = 2*AliEMCALGeoParams::fgkEMCALTRUCols; //total TRU columns for 2D TRU histos
+  Int_t nTRURows = nSMSectors*AliEMCALGeoParams::fgkEMCALTRUsPerSM*AliEMCALGeoParams::fgkEMCALTRURows; //total TRU rows for 2D TRU histos
    // counter info: number of channels per event (bins are SM index)
   TProfile * h0 = new TProfile("hLowEmcalSupermodules", "Low Gain EMC: # of towers vs SuperMod;SM Id;# of towers",
                               fSuperModules, -0.5, fSuperModules-0.5, profileOption) ;
@@ -331,10 +353,10 @@ void AliEMCALQADataMakerRec::InitRaws()
   // how much above pedestal was the max sample?  (bins are towers)
   TProfile * h4 = new TProfile("hLowEmcalRawMaxMinusMin", "Low Gain EMC: Max - Min vs towerId;Tower Id;Max-Min [ADC counts]", 
                               nTot, -0.5, nTot-0.5, profileOption) ;
-  Add2RawsList(h4, kSigLG, expert, image, !saveCorr) ;
+  Add2RawsList(h4, kSigLG, expert, !image, !saveCorr) ;
   TProfile * h5 = new TProfile("hHighEmcalRawMaxMinusMin", "High Gain EMC: Max - Min vs towerId;Tower Id;Max-Min [ADC counts]",
                               nTot, -0.5, nTot-0.5, profileOption) ;
-  Add2RawsList(h5, kSigHG, expert, image, !saveCorr) ;
+  Add2RawsList(h5, kSigHG, expert, !image, !saveCorr) ;
 
   // total counter: channels per event
   TH1I * h6 = new TH1I("hLowNtot", "Low Gain EMC: Total Number of found towers;# of Towers;Counts", 200, 0, nTot) ;
@@ -352,32 +374,6 @@ void AliEMCALQADataMakerRec::InitRaws()
                               nTot, -0.5, nTot-0.5, profileOption) ;
   Add2RawsList(h9, kPedHG, expert, !image, !saveCorr) ;
        
-  //temp 2D amplitude histogram for the current run
-  fHighEmcHistoH2F = new TH2F("h2DHighEC2", "High Gain EMC:Max - Min [ADC counts]", nbinsZ, -0.5 , nbinsZ-0.5, nbinsPhi, -0.5, nbinsPhi-0.5);
-   fHighEmcHistoH2F->SetDirectory(0) ; // this histo must be memory resident
-  //add ratio histograms: to comapre the current run with the reference data 
-  TH2F * h15 = new TH2F("h2DRatioAmp", "High Gain Ratio to Reference:Amplitude_{current run}/Amplitude_{reference run}", nbinsZ, -0.5 , nbinsZ-0.5, 
-                        nbinsPhi, -0.5, nbinsPhi-0.5);
-  //settings for display in amore
-  h15->SetTitle("Amplitude_{current run}/Amplitude_{reference run}"); 
-  h15->SetMaximum(2.0);
-  h15->SetMinimum(0.1);
-  h15->SetOption("COLZ");
-  gStyle->SetOptStat(0);
-  Int_t color[] = {4,3,2} ;
-  gStyle->SetPalette(3,color);
-  h15->GetZaxis()->SetNdivisions(3);
-  h15->UseCurrentStyle();
-  h15->SetDirectory(0);
-  Add2RawsList(h15, k2DRatioAmp, !expert, image, !saveCorr) ;
-
-       TH1F * h16 = new TH1F("hRatioDist", "Amplitude_{current run}/Amplitude_{reference run} ratio distribution", nTot, 0., 2.);
-  h16->SetMinimum(0.1); 
-  h16->SetMaximum(100.);
-  gStyle->SetOptStat(0);
-  h16->UseCurrentStyle();
-  h16->SetDirectory(0);
-  Add2RawsList(h16, kRatioDist, !expert, image, !saveCorr) ;
  
   // now repeat the same for TRU and LEDMon data
   Int_t nTot2x2 = fSuperModules * AliEMCALGeoParams::fgkEMCALTRUsPerSM * AliEMCALGeoParams::fgkEMCAL2x2PerTRU; // max number of TRU channels for all SuperModules
@@ -387,34 +383,35 @@ void AliEMCALQADataMakerRec::InitRaws()
                                fSuperModules, -0.5, fSuperModules-0.5, profileOption) ;
   Add2RawsList(hT0, kNsmodTRU, expert, !image, !saveCorr) ;
 
-  // where did max sample occur? (bins are TRU channels)
-  TProfile * hT1 = new TProfile("hTRUEmcalRawtime", "TRU EMC: Time at Max vs 2x2Id;2x2 Id;Time [ticks]", 
-                               nTot2x2, -0.5, nTot2x2-0.5, profileOption) ;
-  Add2RawsList(hT1, kTimeTRU, expert, !image, !saveCorr) ;
-
   // how much above pedestal was the max sample?  (bins are TRU channels)
-  TProfile * hT2 = new TProfile("hTRUEmcalRawMaxMinusMin", "TRU EMC: Max - Min vs 2x2Id;2x2 Id;Max-Min [ADC counts]", 
+  TProfile * hT1 = new TProfile("hTRUEmcalRawMaxMinusMin", "TRU EMC: Max - Min vs 2x2Id;2x2 Id;Max-Min [ADC counts]", 
                                nTot2x2, -0.5, nTot2x2-0.5, profileOption) ;
-  Add2RawsList(hT2, kSigTRU, expert, !image, !saveCorr) ;
+  Add2RawsList(hT1, kSigTRU, expert, !image, !saveCorr) ;
 
   // total counter: channels per event
-  TH1I * hT3 = new TH1I("hTRUNtot", "TRU EMC: Total Number of found TRU channels;# of TRU Channels;Counts", 200, 0, nTot2x2) ;
-  hT3->Sumw2() ;
-  Add2RawsList(hT3, kNtotTRU, expert, !image, !saveCorr) ;
-
-  // pedestal (bins are TRU channels)
-  TProfile * hT4 = new TProfile("hTRUEmcalRawPed", "TRU EMC: Pedestal vs 2x2Id;2x2 Id;Pedestal [ADC counts]", 
-                               nTot2x2, -0.5, nTot2x2-0.5, profileOption) ;
-  Add2RawsList(hT4, kPedTRU, expert, !image, !saveCorr) ;
+  TH1I * hT2 = new TH1I("hTRUNtot", "TRU EMC: Total Number of found TRU channels;# of TRU Channels;Counts", 200, 0, nTot2x2) ;
+  hT2->Sumw2() ;
+  Add2RawsList(hT2, kNtotTRU, expert, !image, !saveCorr) ;
 
   // L0 trigger hits: # of hits (bins are TRU channels)
-  TH1I * hT5 = new TH1I("hTRUEmcalL0hits", "L0 trigger hits: Total number of 2x2 L0 generated", nTot2x2, -0.5, nTot2x2);
-  hT5->Sumw2();
-  Add2RawsList(hT5, kNL0TRU, expert, !image, !saveCorr);
+  TH2I * hT3 = new TH2I("hTRUEmcalL0hits", "L0 trigger hits: Total number of 2x2 L0 generated",  nTRUCols, -0.5, nTRUCols - 0.5, nTRURows, -0.5, nTRURows-0.5);
+  hT3->SetOption("COLZ");
+  //hT3->Sumw2();
+  Add2RawsList(hT3, kNL0TRU, expert, image, !saveCorr);
 
   // L0 trigger hits: average time (bins are TRU channels)
-  TProfile * hT6 = new TProfile("hTRUEmcalL0hitsAvgTime", "L0 trigger hits: average time bin", nTot2x2, -0.5, nTot2x2, profileOption); 
-  Add2RawsList(hT6, kTimeL0TRU, expert, !image, !saveCorr);
+  TProfile2D * hT4 = new TProfile2D("hTRUEmcalL0hitsAvgTime", "L0 trigger hits: average time bin", nTRUCols, -0.5, nTRUCols - 0.5, nTRURows, -0.5, nTRURows-0.5, profileOption);
+  hT4->SetOption("COLZ");
+  Add2RawsList(hT4, kTimeL0TRU, expert, image, !saveCorr);
+
+  // L0 trigger hits: first in the event (bins are TRU channels)
+  TH1I * hT5 = new TH1I("hTRUEmcalL0hitsFirst", "L0 trigger hits: First hit in the event", nTot2x2, -0.5, nTot2x2);
+  hT5->Sumw2();
+  Add2RawsList(hT5, kNL0FirstTRU, expert, !image, !saveCorr);
+       
+  // L0 trigger hits: average time of first hit in the event (bins are TRU channels)
+  TProfile * hT6 = new TProfile("hTRUEmcalL0hitsFirstAvgTime", "L0 trigger hits: average time of first hit", nTot2x2, -0.5, nTot2x2, profileOption); 
+  Add2RawsList(hT6, kTimeL0FirstTRU, expert, !image, !saveCorr);
 
   // and also LED Mon..
   // LEDMon has both high and low gain channels, just as regular FEE/towers
@@ -460,6 +457,33 @@ void AliEMCALQADataMakerRec::InitRaws()
                               nTotLEDMon, -0.5, nTotLEDMon-0.5, profileOption) ;
   Add2RawsList(hL9, kPedHGLEDMon, expert, !image, !saveCorr) ;
   
+  //temp 2D amplitude histogram for the current run
+  fHighEmcHistoH2F = new TH2F("h2DHighEC2", "High Gain EMC:Max - Min [ADC counts]", nbinsZ, -0.5 , nbinsZ-0.5, nbinsPhi, -0.5, nbinsPhi-0.5);
+   fHighEmcHistoH2F->SetDirectory(0) ; // this histo must be memory resident
+  //add ratio histograms: to comapre the current run with the reference data 
+  TH2F * h15 = new TH2F("h2DRatioAmp", "High Gain Ratio to Reference:Amplitude_{current run}/Amplitude_{reference run}", nbinsZ, -0.5 , nbinsZ-0.5, 
+                        nbinsPhi, -0.5, nbinsPhi-0.5);
+  //settings for display in amore
+  h15->SetTitle("Amplitude_{current run}/Amplitude_{reference run}"); 
+  h15->SetMaximum(2.0);
+  h15->SetMinimum(0.1);
+  h15->SetOption("COLZ");
+  gStyle->SetOptStat(0);
+  Int_t color[] = {4,3,2} ;
+  gStyle->SetPalette(3,color);
+  h15->GetZaxis()->SetNdivisions(3);
+  h15->UseCurrentStyle();
+  h15->SetDirectory(0);
+  Add2RawsList(h15, k2DRatioAmp, expert, image, !saveCorr) ;
+
+  TH1F * h16 = new TH1F("hRatioDist", "Amplitude_{current run}/Amplitude_{reference run} ratio distribution", nTot, 0., 2.);
+  // h16->SetMinimum(0.1); 
+  // h16->SetMaximum(100.);
+  gStyle->SetOptStat(0);
+  h16->UseCurrentStyle();
+  h16->SetDirectory(0);
+  Add2RawsList(h16, kRatioDist, !expert, image, !saveCorr) ;
+
   //add two histograms for shifter from the LED monitor system: comapre LED monitor with the reference run
   //to be used for decision whether we need to change reference data
   TH1F * hL10 = new TH1F("hMaxMinusMinLEDMonRatio", "LEDMon amplitude, Ratio to reference run", nTotLEDMon, -0.5, nTotLEDMon-0.5) ;
@@ -471,17 +495,52 @@ void AliEMCALQADataMakerRec::InitRaws()
   hL10->UseCurrentStyle();
   hL10->SetDirectory(0);
 //  hL10->SetOption("E");
-  Add2RawsList(hL10, kLEDMonRatio, !expert, image, !saveCorr) ;
+  Add2RawsList(hL10, kLEDMonRatio, expert, image, !saveCorr) ;
 
-  TH1F * hL11 = new TH1F("hMaxMinusMinLEDMonRatioDist", "LEDMon amplitude, Ratio distribution", nTot, 0, 2);
-  hL11->SetMinimum(0.1) ;
-  hL11->SetMaximum(100.);
+  TH1F * hL11 = new TH1F("hMaxMinusMinLEDMonRatioDist", "LEDMon amplitude, Ratio distribution", nTotLEDMon, 0, 2);
+  // hL11->SetMinimum(0.1) ;
   gStyle->SetOptStat(0);
   hL11->UseCurrentStyle();
   hL11->SetDirectory(0);
-  Add2RawsList(hL11, kLEDMonRatioDist, !expert, image, !saveCorr) ;
+  Add2RawsList(hL11, kLEDMonRatioDist, expert, image, !saveCorr) ;
   
-  GetCalibRefFromOCDB() ;   
+  GetCalibRefFromOCDB();   
+
+
+       //STU histgrams
+
+ //histos
+ Int_t nSTUCols = AliEMCALGeoParams::fgkEMCALSTUCols;
+ Int_t nSTURows = AliEMCALGeoParams::fgkEMCALSTURows;
+//             kAmpL1, kGL1, kJL1,
+//             kGL1V0, kJL1V0, kSTUTRU  
+       
+ TProfile2D *hS0 = new TProfile2D("hL1Amp", "Mean STU signal per Row and Column", nSTUCols, -0.5, nSTUCols-0.5, nSTURows, -0.5, nSTURows-0.5);
+ Add2RawsList(hS0, kAmpL1, expert, !image, !saveCorr) ;
+       
+ TH2F *hS1 = new TH2F("hL1Gamma", "L1 Gamma patch position (FastOR top-left)", nSTUCols, -0.50, nSTUCols-0.5, nSTURows + 5, -0.5, nSTURows-0.5 + 5); //+5 for better visible error box
+ Add2RawsList(hS1, kGL1, !expert, image, !saveCorr) ;
+       
+ TH2F *hS2 = new TH2F("hL1Jet", "L1 Jet patch position (FastOR top-left)", 12, -0.5, nSTUCols-0.5, 16, 0, nSTURows-0.5);
+ Add2RawsList(hS2, kJL1, !expert, image, !saveCorr) ;
+       
+ TH2I *hS3 = new TH2I("hL1GV0", "L1 Gamma patch amplitude versus V0 signal", 500, 0, 50000, 1500, 0, 1500);
+ Add2RawsList(hS3, kGL1V0, expert, image, !saveCorr) ;
+       
+ TH2I *hS4 = new TH2I("hL1JV0", "L1 Jet patch amplitude versus V0 signal", 500, 0, 50000, 1000, 0, 1000);
+ Add2RawsList(hS4, kJL1V0, expert, !image, !saveCorr) ;
+
+ TH1I *hS5 = new TH1I("hFrameR","Link between TRU and STU", 32, 0, 32);
+ Add2RawsList(hS5, kSTUTRU, !expert, image, !saveCorr) ;
+
+ hS0->SetOption("COLZ");
+ hS1->SetOption("COLZ");
+ hS2->SetOption("COLZ");
+ hS3->SetOption("COLZ");
+ hS4->SetOption("COLZ");
+
+  //
+  ClonePerTrigClass(AliQAv1::kRAWS); // this should be the last line
 }
 
 //____________________________________________________________________________
@@ -493,25 +552,33 @@ void AliEMCALQADataMakerRec::MakeESDs(AliESDEvent * esd)
   for ( Int_t index = 0; index < esd->GetNumberOfCaloClusters() ; index++ ) {
     AliESDCaloCluster * clu = esd->GetCaloCluster(index) ;
     if( clu->IsEMCAL() ) {
-      GetESDsData(kESDCaloClusE)->Fill(clu->E()) ;
+      FillESDsData(kESDCaloClusE,clu->E()) ;
       nTot++ ;
     } 
   }
-  GetESDsData(kESDCaloClusM)->Fill(nTot) ;
+  FillESDsData(kESDCaloClusM,nTot) ;
 
   //fill calo cells
   AliESDCaloCells* cells = esd->GetEMCALCells();
-  GetESDsData(kESDCaloCellM)->Fill(cells->GetNumberOfCells()) ;
+  FillESDsData(kESDCaloCellM,cells->GetNumberOfCells()) ;
 
   for ( Int_t index = 0; index < cells->GetNumberOfCells() ; index++ ) {
-    GetESDsData(kESDCaloCellA)->Fill(cells->GetAmplitude(index)) ;
+    FillESDsData(kESDCaloCellA,cells->GetAmplitude(index)) ;
   }
-
+  //
+  IncEvCountCycleESDs();
+  IncEvCountTotalESDs();
 }
 
 //____________________________________________________________________________
 void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
 {
+  // Check that all the reference histograms exist before we try to use them - otherwise call InitRaws
+  // RS: Attention: the counters are increments after custom modification of eventSpecie
+  if (!fCalibRefHistoPro || !fCalibRefHistoH2F || !fLEDMonRefHistoPro || !fHighEmcHistoH2F) {
+    InitRaws();
+  }
+
   // make sure EMCal was readout during the event
   Int_t emcID = AliDAQ::DetectorID("EMCAL"); // bit 18..
   const UInt_t *detPattern = rawReader->GetDetectorPattern(); 
@@ -524,16 +591,16 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
   rawReader->Select("EMCAL", 0, AliEMCALGeoParams::fgkLastAltroDDL) ; //select EMCAL DDL's 
 
   AliRecoParam::EventSpecie_t saveSpecie = fEventSpecie ;
-
   if (rawReader->GetType() == AliRawEventHeaderBase::kCalibrationEvent) { 
-    SetEventSpecie(AliRecoParam::kCalib) ;
+    SetEventSpecie(AliRecoParam::kCalib) ;     
   }
+
   const Int_t nTowersPerSM = AliEMCALGeoParams::fgkEMCALRows * AliEMCALGeoParams::fgkEMCALCols; // number of towers in a SuperModule; 24x48
   const Int_t nRows        = AliEMCALGeoParams::fgkEMCALRows; // number of rows per SuperModule
   const Int_t nStripsPerSM = AliEMCALGeoParams::fgkEMCALLEDRefs; // number of strips per SuperModule
   const Int_t n2x2PerSM    = AliEMCALGeoParams::fgkEMCALTRUsPerSM * AliEMCALGeoParams::fgkEMCAL2x2PerTRU; // number of TRU 2x2's per SuperModule
   const Int_t n2x2PerTRU   = AliEMCALGeoParams::fgkEMCAL2x2PerTRU;
+  const Int_t nTot2x2     = fSuperModules * n2x2PerSM; // total TRU channel
 
   // SM counters; decl. should be safe, assuming we don't get more than expected SuperModules..
   Int_t nTotalSMLG[AliEMCALGeoParams::fgkEMCALModules]       = {0};
@@ -543,13 +610,20 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
   Int_t nTotalSMHGLEDMon[AliEMCALGeoParams::fgkEMCALModules] = {0};
 
   const Int_t nTRUL0ChannelBits = 10; // used for L0 trigger bits checks
+       int firstL0TimeBin = 999;
+  int triggers[nTot2x2][24]; //auxiliary array for L0 trigger - TODO remove hardcoded 24
+       memset(triggers, 0, sizeof(int) * 24 * nTot2x2);
+
   Int_t iSM = 0; // SuperModule index 
   // start loop over input stream  
   while (in.NextDDL()) {
     Int_t iRCU = in.GetDDLNumber() % 2; // RCU0 or RCU1, within SuperModule
+    Int_t iDDL = in.GetDDLNumber();
     fRawAnalyzer->SetIsZeroSuppressed( in.GetZeroSupp() ); 
-
+    
     while (in.NextChannel()) {
+      Int_t iBranch = in.GetBranch();
+      
       iSM = in.GetModule(); // SuperModule
       //prInt_tf("iSM %d DDL %d", iSM, in.GetDDLNumber()); 
       if (iSM>=0 && iSM<fSuperModules) { // valid module reading
@@ -582,7 +656,7 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
            time = fitResults.GetTof(); 
            firstPedSample = fFirstPedestalSampleTRU;
            lastPedSample  = fLastPedestalSampleTRU;
-           if (in.GetColumn() > n2x2PerTRU) {
+           if (in.GetColumn() >= n2x2PerTRU) {
              isTRUL0IdData = true;
            }
          }
@@ -629,39 +703,45 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
                  if(iTRUIdInSM < n2x2PerTRU) {
                    Int_t iTRUAbsId = iTRUIdInSM + n2x2PerTRU * iTRUId;
                    // Fill the histograms
-                   GetRawsData(kNL0TRU)->Fill(iTRUAbsId);
-                   GetRawsData(kTimeL0TRU)->Fill(iTRUAbsId, startBin);
+                   Int_t globTRUCol, globTRURow;
+                   GetTruChannelPosition(globTRURow, globTRUCol, iSM, iDDL, iBranch, iTRUIdInSM );
+                   
+                   FillRawsData(kNL0TRU, globTRUCol, globTRURow);
+                   FillRawsData(kTimeL0TRU, globTRUCol, globTRURow, startBin);
+                   triggers[iTRUAbsId][startBin] = 1;
+                   
+                   if((int)startBin < firstL0TimeBin) firstL0TimeBin = startBin;
                  }
                }
              }
              startBin--;
            } // i      
          } // TRU L0 Id data                   
-
+         
          // fill histograms
          if ( in.IsLowGain() || in.IsHighGain() ) { // regular towers
            Int_t towerId = iSM*nTowersPerSM + in.GetColumn()*nRows + in.GetRow();
            if ( in.IsLowGain() ) { 
              nTotalSMLG[iSM]++; 
              if ( (amp > fMinSignalLG) && (amp < fMaxSignalLG) ) { 
-               GetRawsData(kSigLG)->Fill(towerId, amp);
-               GetRawsData(kTimeLG)->Fill(towerId, time);
+               FillRawsData(kSigLG,towerId, amp);
+               FillRawsData(kTimeLG,towerId, time);
              }
              if (nPed > 0) {
                for (Int_t i=0; i<nPed; i++) {
-                 GetRawsData(kPedLG)->Fill(towerId, pedSamples[i]);
+                 FillRawsData(kPedLG,towerId, pedSamples[i]);
                }
              }
            } // gain==0
            else if ( in.IsHighGain() ) {               
              nTotalSMHG[iSM]++; 
              if ( (amp > fMinSignalHG) && (amp < fMaxSignalHG) ) { 
-               GetRawsData(kSigHG)->Fill(towerId, amp);
-               GetRawsData(kTimeHG)->Fill(towerId, time);
+               FillRawsData(kSigHG,towerId, amp);
+               FillRawsData(kTimeHG,towerId, time);
              } 
              if (nPed > 0) {
                for (Int_t i=0; i<nPed; i++) {
-                 GetRawsData(kPedHG)->Fill(towerId, pedSamples[i]);
+                 FillRawsData(kPedHG,towerId, pedSamples[i]);
                }
              }
            } // gain==1
@@ -674,14 +754,14 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
              + in.GetColumn();
            nTotalSMTRU[iSM]++; 
            if ( (amp > fMinSignalTRU) && (amp < fMaxSignalTRU) ) { 
-             GetRawsData(kSigTRU)->Fill(iTRU2x2Id, amp);
-             GetRawsData(kTimeTRU)->Fill(iTRU2x2Id, time);
-           }
-           if (nPed > 0) {
-             for (Int_t i=0; i<nPed; i++) {
-               GetRawsData(kPedTRU)->Fill(iTRU2x2Id, pedSamples[i]);
-             }
+             FillRawsData(kSigTRU,iTRU2x2Id, amp);
+             //FillRawsData(kTimeTRU,iTRU2x2Id, time);
            }
+           //if (nPed > 0) {
+             //for (Int_t i=0; i<nPed; i++) {
+               //FillRawsData(kPedTRU,iTRU2x2Id, pedSamples[i]);
+             //}
+           //}
          }
          // LED Mon
          else if ( in.IsLEDMonData() ) {
@@ -692,25 +772,25 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
          
            if ( gain == 0 ) { 
              nTotalSMLGLEDMon[iSM]++; 
-             if ( (amp > fMinSignalLGLEDMon) && (amp < fMaxSignalLGLEDMon) ) { 
-               GetRawsData(kSigLGLEDMon)->Fill(stripId, amp);
-               GetRawsData(kTimeLGLEDMon)->Fill(stripId, time);
+             if ( (amp > fMinSignalLGLEDMon) && (amp < fMaxSignalLGLEDMon) ) {
+               FillRawsData(kSigLGLEDMon,stripId, amp);
+               FillRawsData(kTimeLGLEDMon,stripId, time);
              }
              if (nPed > 0) {
                for (Int_t i=0; i<nPed; i++) {
-                 GetRawsData(kPedLGLEDMon)->Fill(stripId, pedSamples[i]);
+                 FillRawsData(kPedLGLEDMon,stripId, pedSamples[i]);
                }
              }
            } // gain==0
            else if ( gain == 1 ) {             
              nTotalSMHGLEDMon[iSM]++; 
              if ( (amp > fMinSignalHGLEDMon) && (amp < fMaxSignalHGLEDMon) ) { 
-               GetRawsData(kSigHGLEDMon)->Fill(stripId, amp);
-               GetRawsData(kTimeHGLEDMon)->Fill(stripId, time);
+               FillRawsData(kSigHGLEDMon,stripId, amp);
+               FillRawsData(kTimeHGLEDMon,stripId, time);
              }
              if (nPed > 0) {
                for (Int_t i=0; i<nPed; i++) {
-                 GetRawsData(kPedHGLEDMon)->Fill(stripId, pedSamples[i]);
+                 FillRawsData(kPedHGLEDMon,stripId, pedSamples[i]);
                }
              }
            } // low or high gain
@@ -722,59 +802,81 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
     }// end while over channel 
    
   }//end while over DDL's, of input stream 
-
- // TProfile * p = dynamic_cast<TProfile *>(GetRawsData(kSigHG)) ;
-  ConvertProfile2H(dynamic_cast<TProfile *>(GetRawsData(kSigHG)), fHighEmcHistoH2F) ;  
-  Double_t binContent = 0. ;
-  
-  //reset ratio histograms
-  GetRawsData(k2DRatioAmp)->Reset("ICE"); 
-  GetRawsData(kRatioDist)->Reset("ICE"); 
-  GetRawsData(kLEDMonRatio)->Reset("ICE");     
-  GetRawsData(kLEDMonRatioDist)->Reset("ICE");
-  GetRawsData(k2DRatioAmp)->ResetStats(); 
-  GetRawsData(kRatioDist)->ResetStats();
-  GetRawsData(kLEDMonRatio)->ResetStats();
-  GetRawsData(kLEDMonRatioDist)->ResetStats();
+  //filling some L0 trigger histos
+  if( firstL0TimeBin < 999 ){
+    for(Int_t i = 0; i < nTot2x2; i++) {       
+      if( triggers[i][firstL0TimeBin] > 0 ) {
+       //histo->Fill(i,j);
+       FillRawsData(kNL0FirstTRU, i);
+       FillRawsData(kTimeL0FirstTRU, i, firstL0TimeBin);
+      }
+    }
+  }
   
   //calculate the ratio of the amplitude and fill the histograms, only if the events type is Calib
- if (rawReader->GetType() == AliRawEventHeaderBase::kCalibrationEvent) { 
+  // RS: operation on the group of histos kSigHG,k2DRatioAmp,kRatioDist,kLEDMonRatio,kLEDMonRatio,kSigLGLEDMon
+  const int hGrp[] = {kSigHG,k2DRatioAmp,kRatioDist,kLEDMonRatio,kLEDMonRatioDist,kSigLGLEDMon};
+  if ( rawReader->GetType() == AliRawEventHeaderBase::kCalibrationEvent &&
+       CheckCloningConsistency(fRawsQAList, hGrp, sizeof(hGrp)/sizeof(int)) ) {  // RS converting original code to loop over all matching triggers
+    int nTrig =IsClonedPerTrigClass(kSigHG,fRawsQAList) ? GetNEventTrigClasses() : 0; // loop over triggers only if histos were cloned
+    //
+    for (int itr=-1;itr<nTrig;itr++) { // start from -1 to acknowledge original histos if they were kept
+      TObjArray* trArr = GetMatchingRawsHistosSet(hGrp, sizeof(hGrp)/sizeof(int) ,itr);
+      if (!trArr) continue;  // no histos for current trigger
+      //
+      Double_t binContent = 0.;
+      TProfile* prSigHG      = (TProfile *)trArr->At(0); //kSigHG
+      TH1* th2DRatioAmp      = (TH1*) trArr->At(1); //k2DRatioAmp
+      TH1* thRatioDist       = (TH1*) trArr->At(2); //kRatioDist
+      TH1* thLEDMonRatio     = (TH1*) trArr->At(3); //kLEDMonRatio
+      TH1* thLEDMonRatioDist = (TH1*) trArr->At(4); //kLEDMonRatio
+      TH1* hSigLGLEDMon      = (TH1*) trArr->At(5); //kSigLGLEDMon
+      th2DRatioAmp->Reset("ICE");
+      thRatioDist->Reset("ICE");
+      thLEDMonRatio->Reset("ICE");
+      thLEDMonRatioDist->Reset("ICE");
+      th2DRatioAmp->ResetStats();
+      thRatioDist->ResetStats();
+      thLEDMonRatio->ResetStats();
+      thLEDMonRatioDist->ResetStats();
+      ConvertProfile2H(prSigHG, fHighEmcHistoH2F);  
+      //
       for(Int_t ix = 1; ix <= fHighEmcHistoH2F->GetNbinsX(); ix++) {
-       for(Int_t iy = 1; iy <= fHighEmcHistoH2F->GetNbinsY(); iy++) {
-         if(fCalibRefHistoH2F->GetBinContent(ix, iy))binContent = fHighEmcHistoH2F->GetBinContent(ix, iy)/fCalibRefHistoH2F->GetBinContent(ix, iy) ;
-         GetRawsData(k2DRatioAmp)->SetBinContent(ix, iy, binContent);
-         GetRawsData(kRatioDist)->Fill(GetRawsData(k2DRatioAmp)->GetBinContent(ix, iy));
-       }
-     } 
-   
- }
-  //Now for LED monitor system, to calculate the ratio as well
-  Double_t binError = 0. ;
-  // for the binError, we add the relative errors, squared
-  Double_t relativeErrorSqr = 0. ;
-  
-  for(int ib = 1; ib <= fLEDMonRefHistoPro->GetNbinsX(); ib++) {
-    
-    if(fLEDMonRefHistoPro->GetBinContent(ib) != 0) {
-      binContent = GetRawsData(kSigLGLEDMon)->GetBinContent(ib) / fLEDMonRefHistoPro->GetBinContent(ib);
-      relativeErrorSqr = TMath::Power(fLEDMonRefHistoPro->GetBinError(ib) / fLEDMonRefHistoPro->GetBinContent(ib), 2);
-    }
-    else {
-      binContent = 0;
-      relativeErrorSqr = 0;
-    }
-    GetRawsData(kLEDMonRatio)->SetBinContent(ib, binContent);
-    
-    if(fLEDMonRefHistoPro->GetBinContent(ib) != 0) {
-      relativeErrorSqr += TMath::Power(GetRawsData(kSigLGLEDMon)->GetBinError(ib)/GetRawsData(kLEDMonRatio)->GetBinContent(ib), 2);
-    }
-
-    binError = sqrt(relativeErrorSqr) * binContent;
-    GetRawsData(kLEDMonRatio)->SetBinError(ib, binError);
-    GetRawsData(kLEDMonRatioDist)->Fill(GetRawsData(kLEDMonRatio)->GetBinContent(ib));
-    }
-  
-  
+       for(Int_t iy = 1; iy <= fHighEmcHistoH2F->GetNbinsY(); iy++) { 
+         if(fCalibRefHistoH2F->GetBinContent(ix, iy)) 
+           binContent = fHighEmcHistoH2F->GetBinContent(ix, iy)/fCalibRefHistoH2F->GetBinContent(ix, iy);
+         th2DRatioAmp->SetBinContent(ix, iy, binContent);
+         thRatioDist->Fill(binContent);
+       }
+      } 
+      //
+      //Now for LED monitor system, to calculate the ratio as well
+      Double_t binError = 0. ;
+      // for the binError, we add the relative errors, squared
+      Double_t relativeErrorSqr = 0. ;
+      //
+      for(int ib = 1; ib <= fLEDMonRefHistoPro->GetNbinsX(); ib++) {
+       //
+       if(fLEDMonRefHistoPro->GetBinContent(ib) != 0) {
+         binContent = hSigLGLEDMon->GetBinContent(ib) / fLEDMonRefHistoPro->GetBinContent(ib);
+
+         relativeErrorSqr = TMath::Power( (fLEDMonRefHistoPro->GetBinError(ib) / fLEDMonRefHistoPro->GetBinContent(ib)), 2);
+         if( hSigLGLEDMon->GetBinContent(ib) != 0) {
+           relativeErrorSqr += TMath::Power( (hSigLGLEDMon->GetBinError(ib)/hSigLGLEDMon->GetBinContent(ib)), 2);
+         }
+       }
+       else { // ref. run info is zero
+         binContent = -1;
+         relativeErrorSqr = 1;
+       }
+       thLEDMonRatio->SetBinContent(ib, binContent);
+       
+       binError = sqrt(relativeErrorSqr) * binContent;
+       thLEDMonRatio->SetBinError(ib, binError);
+       thLEDMonRatioDist->Fill(thLEDMonRatio->GetBinContent(ib));
+      }
+    } // loop over eventual trigger clones
+  } 
   // let's also fill the SM and event counter histograms
   Int_t nTotalHG = 0;
   Int_t nTotalLG = 0;
@@ -787,24 +889,27 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
     nTotalTRU += nTotalSMTRU[iSM]; 
     nTotalLGLEDMon += nTotalSMLGLEDMon[iSM]; 
     nTotalHGLEDMon += nTotalSMHGLEDMon[iSM]; 
-    GetRawsData(kNsmodLG)->Fill(iSM, nTotalSMLG[iSM]); 
-    GetRawsData(kNsmodHG)->Fill(iSM, nTotalSMHG[iSM]); 
-    GetRawsData(kNsmodTRU)->Fill(iSM, nTotalSMTRU[iSM]); 
-    GetRawsData(kNsmodLGLEDMon)->Fill(iSM, nTotalSMLGLEDMon[iSM]); 
-    GetRawsData(kNsmodHGLEDMon)->Fill(iSM, nTotalSMHGLEDMon[iSM]); 
+    FillRawsData(kNsmodLG,iSM, nTotalSMLG[iSM]); 
+    FillRawsData(kNsmodHG,iSM, nTotalSMHG[iSM]); 
+    FillRawsData(kNsmodTRU,iSM, nTotalSMTRU[iSM]); 
+    FillRawsData(kNsmodLGLEDMon,iSM, nTotalSMLGLEDMon[iSM]); 
+    FillRawsData(kNsmodHGLEDMon,iSM, nTotalSMHGLEDMon[iSM]); 
   }
-  
-  GetRawsData(kNtotLG)->Fill(nTotalLG);
-  GetRawsData(kNtotHG)->Fill(nTotalHG);
-  GetRawsData(kNtotTRU)->Fill(nTotalTRU);
-  GetRawsData(kNtotLGLEDMon)->Fill(nTotalLGLEDMon);
-  GetRawsData(kNtotHGLEDMon)->Fill(nTotalHGLEDMon);
  
-
+  FillRawsData(kNtotLG,nTotalLG);
+  FillRawsData(kNtotHG,nTotalHG);
+  FillRawsData(kNtotTRU,nTotalTRU);
+  FillRawsData(kNtotLGLEDMon,nTotalLGLEDMon);
+  FillRawsData(kNtotHGLEDMon,nTotalHGLEDMon);
+  IncEvCountCycleESDs();
+  IncEvCountTotalESDs();
   SetEventSpecie(saveSpecie) ; 
+  
+       MakeRawsSTU(rawReader);
+
   // just in case the next rawreader consumer forgets to reset; let's do it here again..
   rawReader->Reset() ;
-
   return;
 }
 
@@ -812,34 +917,35 @@ void AliEMCALQADataMakerRec::MakeRaws(AliRawReader* rawReader)
 void AliEMCALQADataMakerRec::MakeDigits()
 {
   // makes data from Digits
-
-  GetDigitsData(1)->Fill(fDigitsArray->GetEntriesFast()) ; 
+  FillDigitsData(1,fDigitsArray->GetEntriesFast()) ; 
   TIter next(fDigitsArray) ; 
   AliEMCALDigit * digit ; 
   while ( (digit = dynamic_cast<AliEMCALDigit *>(next())) ) {
-    GetDigitsData(0)->Fill( digit->GetAmplitude()) ;
+    FillDigitsData(0, digit->GetAmplitude()) ;
   }  
-  
+  //
 }
 
 //____________________________________________________________________________
 void AliEMCALQADataMakerRec::MakeDigits(TTree * digitTree)
 {
   // makes data from Digit Tree
+  // RS: Attention: the counters are increments in the MakeDigits()
   if (fDigitsArray) 
-    fDigitsArray->Clear() ; 
+    fDigitsArray->Clear("C") ; 
   else
     fDigitsArray = new TClonesArray("AliEMCALDigit", 1000) ; 
   
   TBranch * branch = digitTree->GetBranch("EMCAL") ;
-  if ( ! branch ) {
-    AliWarning("EMCAL branch in Digit Tree not found") ; 
-  } else {
-    branch->SetAddress(&fDigitsArray) ;
-    branch->GetEntry(0) ; 
-    MakeDigits() ; 
-  }
-  
+  if ( ! branch ) { AliWarning("EMCAL branch in Digit Tree not found"); return; }
+  //
+  branch->SetAddress(&fDigitsArray) ;
+  branch->GetEntry(0) ; 
+  MakeDigits() ; 
+  //
+  IncEvCountCycleDigits();
+  IncEvCountTotalDigits();  
+  //  
 }
 
 //____________________________________________________________________________
@@ -856,16 +962,17 @@ void AliEMCALQADataMakerRec::MakeRecPoints(TTree * clustersTree)
   emcbranch->SetAddress(&emcRecPoints);
   emcbranch->GetEntry(0);
   
-  GetRecPointsData(kRecPM)->Fill(emcRecPoints->GetEntriesFast()) ; 
+  FillRecPointsData(kRecPM,emcRecPoints->GetEntriesFast()) ; 
   TIter next(emcRecPoints) ; 
   AliEMCALRecPoint * rp ; 
   while ( (rp = dynamic_cast<AliEMCALRecPoint *>(next())) ) {
-    GetRecPointsData(kRecPE)->Fill(rp->GetEnergy()) ;
-    GetRecPointsData(kRecPDigM)->Fill(rp->GetMultiplicity());
+    FillRecPointsData(kRecPE,rp->GetEnergy()) ;
+    FillRecPointsData(kRecPDigM,rp->GetMultiplicity());
   }
   emcRecPoints->Delete();
   delete emcRecPoints;
-  
+  IncEvCountCycleRecPoints();
+  IncEvCountTotalRecPoints();
 }
 
 //____________________________________________________________________________ 
@@ -880,7 +987,12 @@ void AliEMCALQADataMakerRec::SetFittingAlgorithm(Int_t fitAlgo)
 {
   //Set fitting algorithm and initialize it if this same algorithm was not set before.
   //printf("**** Set Algorithm , number %d ****\n",fitAlgo);
+
   
+  fRawAnalyzer =  AliCaloRawAnalyzerFactory::CreateAnalyzer(fitAlgo);
+  fFittingAlgorithm = fitAlgo; 
+
+  /*
   if(fitAlgo == fFittingAlgorithm && fRawAnalyzer) {
     //Do nothing, this same algorithm already set before.
     //printf("**** Algorithm already set before, number %d, %s ****\n",fitAlgo, fRawAnalyzer->GetName());
@@ -914,14 +1026,16 @@ void AliEMCALQADataMakerRec::SetFittingAlgorithm(Int_t fitAlgo)
 
   }
   return;
+  */
 }
 
 //_____________________________________________________________________________________
 void AliEMCALQADataMakerRec::ConvertProfile2H(TProfile * p, TH2 * histo) 
 {  
-  // set some histogram defaults
-  //histo->Reset() ; 
-  //histo->SetStats(kFALSE); // no statistics box shown
+  // reset histogram
+  histo->Reset("ICE") ; 
+  histo->ResetStats(); 
+
   Int_t nbinsProf = p->GetNbinsX();
   
   // loop through the TProfile p and fill the TH2F histo 
@@ -965,3 +1079,178 @@ void AliEMCALQADataMakerRec::ConvertProfile2H(TProfile * p, TH2 * histo)
     histo->SetBinContent(col2d+1, row2d+1, binContent);
   }
 } 
+//____________________________________________________________________________ 
+void AliEMCALQADataMakerRec::GetTruChannelPosition( Int_t &globRow, Int_t &globColumn, Int_t module, Int_t ddl, Int_t branch, Int_t column ) const
+{ // from local to global indices
+  Int_t mrow;
+  Int_t mcol;
+  Int_t trow;
+  Int_t tcol;
+  Int_t drow;
+  Int_t rcu;
+  // RCU 0 or 1
+  rcu = ddl % 2;
+
+  // 12 rows of 2x2s in a module (3 TRUs by 4 rows)
+  mrow = (module/2) * 12;
+  // 24 columns per module, odd module numbers increased by 24
+  mcol = (module%2) * 24;
+
+  // position within TRU coordinates
+  tcol = column / 4;
+  trow = column % 4;
+
+  //.combine
+  if( module%2 == 0 ){   // A side
+    // mirror rows
+    trow = 3 - trow;
+
+    // TRU in module row addition
+    drow = (rcu*branch+rcu) * 4;
+
+  }
+  else{   // C side
+    // mirror columns
+    tcol = 23 - tcol;
+
+    // TRU in module row addition
+    drow = (2 - (rcu*branch+rcu)) * 4;
+  }
+
+  // output global row/collumn position (0,0 = SMA0, phi = 0, |eta| = max)
+  globRow = mrow + drow + trow;
+  globColumn = mcol + tcol;
+  return;
+
+}
+//____________________________________________________________________________ 
+void AliEMCALQADataMakerRec::MakeRawsSTU(AliRawReader* rawReader)
+{ // STU specifics
+  AliEMCALTriggerSTURawStream* inSTU = new AliEMCALTriggerSTURawStream(rawReader);
+       
+  rawReader->Reset();
+  rawReader->Select("EMCAL", 44);
+
+  //L1 segmentation
+  Int_t sizeL1gsubr = 1;
+  Int_t sizeL1gpatch = 2; 
+  Int_t sizeL1jsubr = 4; 
+
+  Int_t iEMCALtrig[AliEMCALGeoParams::fgkEMCALSTUCols][AliEMCALGeoParams::fgkEMCALSTURows];
+  memset(iEMCALtrig, 0, sizeof(int) * AliEMCALGeoParams::fgkEMCALSTUCols * AliEMCALGeoParams::fgkEMCALSTURows);
+               
+  if (inSTU->ReadPayLoad()) 
+    {
+      //Fw version (use in case of change in L1 jet 
+      Int_t fw = inSTU->GetFwVersion();
+      Int_t sizeL1jpatch = 2+(fw >> 16);
+
+      //To check link
+      Int_t mask = inSTU->GetFrameReceived() ^ inSTU->GetRegionEnable();
+
+      for (int i = 0; i < 32; i++)
+       {
+               if (!((mask >> i) &  0x1)) FillRawsData(kSTUTRU, i);
+       }
+
+      //V0 signal in STU
+      Int_t iV0Sig = inSTU->GetV0A()+inSTU->GetV0C();
+      
+      //FastOR amplitude receive from TRU
+      for (Int_t i = 0; i < 32; i++)
+       {
+         UInt_t adc[96];
+         for (Int_t j = 0; j < 96; j++) adc[j] = 0;
+         
+         inSTU->GetADC(i, adc);
+         
+         Int_t iTRU = fGeom->GetTRUIndexFromSTUIndex(i);
+                               
+         for (Int_t j = 0; j < 96; j++)
+           {
+             Int_t idx;
+             fGeom->GetAbsFastORIndexFromTRU(iTRU, j, idx);
+                               
+             Int_t px, py;
+             fGeom->GetPositionInEMCALFromAbsFastORIndex(idx, px, py);
+                                       
+             iEMCALtrig[px][py] = adc[j];
+           }
+       }
+                       
+      //L1 Gamma patches
+      Int_t iTRUSTU, x, y;
+      for (Int_t i = 0; i < inSTU->GetNL1GammaPatch(0); i++)
+       {
+         if (inSTU->GetL1GammaPatch(i, 0, iTRUSTU, x, y)) // col (0..23), row (0..3)
+           {
+             Int_t iTRU;
+             iTRU = fGeom->GetTRUIndexFromSTUIndex(iTRUSTU);
+             
+             Int_t etaG = 23-x, phiG = y + 4 * int(iTRU/2); //position in EMCal
+             if (iTRU%2) etaG += 24; //C-side
+                                       
+             etaG = etaG - sizeL1gsubr * sizeL1gpatch + 1;
+                               
+             //Position of patch L1G (bottom-left FastOR of the patch)
+             FillRawsData(kGL1, etaG, phiG);
+                                       
+             //loop to sum amplitude of FOR in the gamma patch
+             Int_t iL1GPatchAmp = 0;
+             for (Int_t L1Gx = 0; L1Gx < sizeL1gpatch; L1Gx ++)
+               {
+                 for (Int_t L1Gy = 0; L1Gy < sizeL1gpatch; L1Gy ++)
+                   {
+                     if (etaG+L1Gx < 48 && phiG+L1Gy < 64) iL1GPatchAmp += iEMCALtrig[etaG+L1Gx][phiG+L1Gy];
+                     //cout << iEMCALtrig[etaG+L1Gx][phiG+L1Gy] << endl;
+                   }
+               }
+             
+             //if (iL1GPatchAmp > 500) cout << "L1G amp =" << iL1GPatchAmp << endl;
+             FillRawsData(kGL1V0, iV0Sig, iL1GPatchAmp);
+             
+           }
+       }
+               
+      //L1 Jet patches
+      for (Int_t i = 0; i < inSTU->GetNL1JetPatch(0); i++)
+       {
+         if (inSTU->GetL1JetPatch(i, 0, x, y)) // col (0,15), row (0,11)
+           {
+             
+             Int_t etaJ = sizeL1jsubr * (11-y-sizeL1jpatch + 1);
+             Int_t phiJ = sizeL1jsubr * (15-x-sizeL1jpatch + 1);
+             
+             //position of patch L1J (FOR bottom-left)
+             FillRawsData(kJL1, etaJ, phiJ);
+                                       
+             //loop the sum aplitude of FOR in the jet patch
+             Int_t iL1JPatchAmp = 0;
+             for (Int_t L1Jx = 0; L1Jx < sizeL1jpatch*4; L1Jx ++)
+               {
+                 for (Int_t L1Jy = 0; L1Jy < sizeL1jpatch*4; L1Jy ++)
+                   {
+                     if (etaJ+L1Jx < 48 && phiJ+L1Jy < 64) iL1JPatchAmp += iEMCALtrig[etaJ+L1Jx][phiJ+L1Jy];
+                   }
+               }
+               
+             //cout << "L1J amp =" << iL1JPatchAmp << endl;
+             FillRawsData(kJL1V0, iV0Sig, iL1JPatchAmp);
+           }
+       }
+    }
+               
+  //Fill FOR amplitude histo
+  for (Int_t i = 0; i < 48; i++)
+    {
+      for (Int_t j = 0; j < 60; j++)
+       {
+         if (iEMCALtrig[i][j] != 0) FillRawsData(kAmpL1, i, j, iEMCALtrig[i][j]);
+       }
+    }
+  
+  delete inSTU;
+  return;
+}
+
+