MistimedStreamMonitorAlgorithm.cxx

Go to the documentation of this file.

/*
  Copyright (C) 2002-2024 CERN for the benefit of the ATLAS collaboration
*/
 
 
#include "MistimedStreamMonitorAlgorithm.h"
#include "AthContainers/ConstAccessor.h"
#include <iostream>
#include <vector>
#include <TMath.h>
 
MistimedStreamMonitorAlgorithm::MistimedStreamMonitorAlgorithm( const std::string& name, ISvcLocator* pSvcLocator )
  : AthMonitorAlgorithm(name,pSvcLocator)
{
}
 
StatusCode MistimedStreamMonitorAlgorithm::initialize() {
 
  ATH_MSG_DEBUG("MistimedStreamMonitorAlgorith::initialize");
  ATH_MSG_DEBUG("Package Name "<< m_packageName);
  ATH_MSG_DEBUG("m_xAODTriggerTowerContainerName "<< m_xAODTriggerTowerContainerName); 
 
  ATH_MSG_INFO("m_eFexEMContainer: "<< m_eFexEMContainerKey); 
  ATH_MSG_INFO("m_eFexEMOutContainer: "<< m_eFexEMOutContainerKey); 
  ATH_MSG_INFO("m_eFexTauContainer: "<< m_eFexTauContainerKey);
 
  // we initialise all the containers that we need
  ATH_CHECK( AthMonitorAlgorithm::initialize() );
  ATH_CHECK( m_xAODTriggerTowerContainerName.initialize() );
  ATH_CHECK( m_cpmTowerLocation.initialize());
  ATH_CHECK( m_jetElementLocation.initialize());
  ATH_CHECK( m_trigDec.retrieve() );
  ATH_CHECK( m_ttTool.retrieve());
  ATH_CHECK( m_runParametersContainer.initialize() );
  ATH_CHECK( m_readoutConfigContainerJSON.initialize() );
  ATH_CHECK( m_ctpRdoReadKey.initialize() );
 
  // eFex Container
  ATH_CHECK( m_eFexEMContainerKey.initialize() );
  ATH_CHECK( m_eFexEMOutContainerKey.initialize() );
  ATH_CHECK( m_eFexTauContainerKey.initialize() );
  
  // jFex Container 
  ATH_CHECK( m_jFexLRJetContainerKey.initialize() );
  ATH_CHECK( m_jFexSRJetContainerKey.initialize() );
  ATH_CHECK( m_jFexTauContainerKey.initialize()   );
  ATH_CHECK( m_jFexDataTowerKey.initialize() );
  ATH_CHECK( m_EmulTowerKey.initialize() );
 
  // gFex Container
  ATH_CHECK( m_gFexJetTobKeyList.initialize() ) ;
  
  return AthMonitorAlgorithm::initialize();
}
 
StatusCode MistimedStreamMonitorAlgorithm::fillHistograms( const EventContext& ctx ) const {
 
  ATH_MSG_DEBUG("MistimedStreamMonitorAlgorith::fillHistograms");
 
  // Retrieve L1CaloRunParametersContainer
  SG::ReadCondHandle<L1CaloRunParametersContainer> runParameters( m_runParametersContainer, ctx);
  ATH_CHECK(runParameters.isValid()); 
  
  unsigned int readoutConfigID   = runParameters->runParameters(1)->readoutConfigID(); 
  ATH_MSG_DEBUG("RunParameters:: readoutConfigID " <<  readoutConfigID);
  
  SG::ReadCondHandle<L1CaloReadoutConfigContainerJSON> readoutConfigJSON(m_readoutConfigContainerJSON,  ctx);
 
  unsigned int channelID = 0;
  unsigned int numFadcSlices = 0; 
  unsigned int l1aFadcSlice = 0; 
  unsigned int readout80ModePpm = 0;
 
  //the readout config ID tells you, which readoutConfig is loaded. now you can retrieve the l1aFadcSlice from this DB entry
  if (  readoutConfigJSON->readoutConfigJSON(readoutConfigID)->channelId() == readoutConfigID){
    ATH_MSG_DEBUG("readoutConfigID " <<  readoutConfigID);
    channelID =  readoutConfigJSON->readoutConfigJSON(readoutConfigID)->channelId();
    numFadcSlices = readoutConfigJSON->readoutConfigJSON(readoutConfigID)->numFadcSlices();
    l1aFadcSlice = readoutConfigJSON->readoutConfigJSON(readoutConfigID)->l1aFadcSlice();
    readout80ModePpm =  readoutConfigJSON->readoutConfigJSON(readoutConfigID)->readout80ModePpm();
    ATH_MSG_DEBUG("channelID :: " << channelID);
    ATH_MSG_DEBUG("numFadcSlices :: " <<  numFadcSlices);
    ATH_MSG_DEBUG("l1aFadcSlice :: " <<  l1aFadcSlice);
    ATH_MSG_DEBUG("readout80ModePpm :: " <<  readout80ModePpm);
  }
  
  // Retrieve jetElementfrom SG
  SG::ReadHandle<xAOD::JetElementContainer> jetElementTES(m_jetElementLocation, ctx);
  if(!jetElementTES.isValid()){
    ATH_MSG_ERROR("No JetElement container found in TES  "<< m_jetElementLocation); 
    return StatusCode::FAILURE;
  }
    
  // Retrieve Core CPM Towers from SG
  SG::ReadHandle<xAOD::CPMTowerContainer> cpmTowerTES(m_cpmTowerLocation, ctx);
  if(!cpmTowerTES.isValid()){
    ATH_MSG_ERROR("No CPMTower container found in TES  "<< m_cpmTowerLocation); 
    return StatusCode::FAILURE;
  }
 
  // Retrieve Trigger Towers from SG
  SG::ReadHandle<xAOD::TriggerTowerContainer> triggerTowerTES(m_xAODTriggerTowerContainerName, ctx);
  if(!triggerTowerTES.isValid()){
    ATH_MSG_ERROR("No Trigger Tower container found in TES  "<< m_xAODTriggerTowerContainerName); 
    return StatusCode::FAILURE;
  }
  
  // Retrieve EventInfo from SG and save lumi block number, global event number and run number
  unsigned int lumiNo = GetEventInfo(ctx)->lumiBlock();
  unsigned int currentRunNo = ctx.eventID().run_number();  
  unsigned int currentEventNo =  ctx.eventID().event_number();
  
  ATH_MSG_DEBUG("Lumi Block :: " << lumiNo);
  ATH_MSG_DEBUG("Run Number :: " << currentRunNo);
  ATH_MSG_DEBUG("Event Number :: " << currentEventNo);
 
  Monitored::Scalar<int> cutFlowX = Monitored::Scalar<int>("cutFlowX", 0);
  
  // fill first bin in cutflow
  cutFlowX=All;
  fill(m_packageName,cutFlowX);
  
  //for the algorithm to run, we need the 2 adc slices before and after the l1a-slice
  //readout compatibility checks of the algo here
  if(readout80ModePpm){
    if(numFadcSlices < 9){
      ATH_MSG_DEBUG("Number of ADC slices < 9 for 80 MHz readout, algorithm cannot run, aborting...");
      return StatusCode::SUCCESS;
    }
    if(l1aFadcSlice < 4){
      ATH_MSG_DEBUG("L1a readout pointer < 4 for 80 MHz readout, algorithm cannot run, aborting...");
      return StatusCode::SUCCESS;
    }
    if(numFadcSlices - l1aFadcSlice < 4){
      ATH_MSG_DEBUG("L1a readout pointer is at "<< l1aFadcSlice << " with "<< numFadcSlices << "slices at 80 MHz readout mode, algorithm cannot run, aborting...");
      return StatusCode::SUCCESS;
    } 
  } 
  else {
    if(numFadcSlices < 5){
      ATH_MSG_DEBUG("Number of ADC slices < 5 for 40 MHz readout, algorithm cannot run, aborting...");
      return StatusCode::SUCCESS;
    }
    if(l1aFadcSlice < 2){
      ATH_MSG_DEBUG("L1a readout pointer < 2 for 40 MHz readout, algorithm cannot run, aborting...");
      return StatusCode::SUCCESS;
    } 
    if(numFadcSlices - l1aFadcSlice < 2){
      ATH_MSG_DEBUG("L1a readout pointer is at "<< l1aFadcSlice << " with "<< numFadcSlices << "slices at 40 MHz readout mode, algorithm cannot run, aborting...");
      return StatusCode::SUCCESS;
    }  
  }   
  cutFlowX=UnsuitableReadout;
  fill(m_packageName,cutFlowX);
 
  //Select events that fired HLT_mistimedmonj400
  if(! (m_trigDec->isPassed("HLT_mistimemonj400_L1All",TrigDefs::requireDecision))){
    ATH_MSG_DEBUG("TrigDec don't pass HLT_mistimemonj400_L1All");
    return StatusCode::SUCCESS;
  }
  
  bool legacyHLT=false, phase1HLT=false; 
  const CTP_RDO* ctpBc = 0;
  ctpBc = SG::get(m_ctpRdoReadKey);
  CTP_Decoder ctp;
  ctp.setRDO(ctpBc);
  uint32_t numberBC = ctpBc->getNumberOfBunches();
  if (numberBC > 0) {
    unsigned int bcPos = ctpBc->getL1AcceptBunchPosition();
    if (currentRunNo < 472553){
      legacyHLT = ((ctp.getBunchCrossing(bcPos-1).getTBP().test(180)) or (ctp.getBunchCrossing(bcPos+1).getTBP().test(180)));
      phase1HLT = ((ctp.getBunchCrossing(bcPos-1).getTBP().test(224)) or (ctp.getBunchCrossing(bcPos+1).getTBP().test(224)));
    }
    else if (currentRunNo < 476718){
      legacyHLT = ((ctp.getBunchCrossing(bcPos-1).getTBP().test(184)) or (ctp.getBunchCrossing(bcPos+1).getTBP().test(184)));
      phase1HLT = ((ctp.getBunchCrossing(bcPos-1).getTBP().test(228)) or (ctp.getBunchCrossing(bcPos+1).getTBP().test(228)));
    }
    else {
      legacyHLT = ((ctp.getBunchCrossing(bcPos-1).getTBP().test(185)) or (ctp.getBunchCrossing(bcPos+1).getTBP().test(185)));
      phase1HLT = ((ctp.getBunchCrossing(bcPos-1).getTBP().test(229)) or (ctp.getBunchCrossing(bcPos+1).getTBP().test(229)));
    }
  }
   
  if ((m_uselegacy) and (legacyHLT==false)) {
    ATH_MSG_DEBUG("TrigDec don't pass HLT_mistimemonj400_L1All");
    return StatusCode::SUCCESS;
  }
  else if ((m_usephaseI) and (phase1HLT==false)) {
    ATH_MSG_DEBUG("TrigDec don't pass HLT_mistimemonj400_L1All");
    return StatusCode::SUCCESS;
  }
  // if all events fail here, check the ctp item number with the right SMUK key
 
  cutFlowX=HLT_mistimemonj400;
  fill(m_packageName,cutFlowX);
  
  //Only select events which passed the L1_J100, L1_jJ160, L1_eEM26M, L1_jJ400 or L1_gJ400p0ETA25
  //Adjustable depending on which trigger we are interested 
  if (m_usephaseI) {
    if(! ( (m_trigDec->isPassed("L1_eEM26M")) or
         (m_trigDec->isPassed("L1_gJ100p0ETA25")) or
         (m_trigDec->isPassed("L1_gJ400p0ETA25")) or
         (m_trigDec->isPassed("L1_jJ160")) or
         (m_trigDec->isPassed("L1_jJ400")) 
         ) ){ 
      ATH_MSG_DEBUG("TrigDec doesn't pass");
      return StatusCode::SUCCESS;
    }
  }
 
  else if (m_uselegacy) {
    if(! (m_trigDec->isPassed("L1_J100")) ){ 
      ATH_MSG_DEBUG("TrigDec doesn't pass");
      return StatusCode::SUCCESS;
    }
  }
 
  else {
    ATH_MSG_ERROR("No trigger selected...aborting"); 
    return StatusCode::FAILURE;
  }
 
  //Define trigger for subsequent cuts
  bool legacyTrigger= false;
  bool phase1Trigger= false;
  std::string trigger = ""; 
 
  if ((m_uselegacy) and (m_trigDec->isPassed("L1_J100")) ) {
    legacyTrigger= true;
  }
  else if (m_usephaseI) {
    if (m_trigDec->isPassed("L1_eEM26M")) {
      phase1Trigger= true;
      trigger = "eFex";
    }
    if ((m_trigDec->isPassed("L1_jJ160"))or (m_trigDec->isPassed("L1_jJ400"))) {
      phase1Trigger= true;
      trigger = "jFex";
    }
    if ( (m_trigDec->isPassed("L1_gJ400p0ETA25")) or (m_trigDec->isPassed("L1_gJ100p0ETA25")) ) {
      phase1Trigger= true;
      trigger = "gFex";
    }
  }
  
  cutFlowX=L1_Trigger;
  fill(m_packageName,cutFlowX);
 
  
   // now classify the tower signals by looking at their FADC counts, if it exceeds 70
  int badCounter = 0; // category 2 really bad
  int bad2Counter = 0; // category 4 bad peak 2 
  int bad3Counter = 0; // category 6 bad peak 3 
  int good3Counter = 0; // category 5 good peak 3 
  int good2Counter = 0; // category 5 good peak 3 
  int eFexintimeCounter = 0; // in-time TOBs
  int eFexoutoftimeCounter = 0; // out-of-time TOBs
  int jFexCounter = 0; // in-time TOBs
  int gFexCounter = 0; // in-time TOBs
  int emActivityCounter = 0; //count number of TT in EM layer with ADC > 70 
 
  double dEta = 0., dPhi = 0., dPhi1 = 0., dR = 0.; 
  double etaIn = 0., phiIn = 0., etIn = 0.;
  double etaOut = 0., phiOut = 0., etOut = 0.; 
  bool overlap = false; 
 
  SG::ReadHandle<xAOD::jFexSRJetRoIContainer> jFexSRJetContainer{m_jFexSRJetContainerKey, ctx};
  if(!jFexSRJetContainer.isValid()) {
    ATH_MSG_WARNING("No jFex SR Jet container found in storegate "<< m_jFexSRJetContainerKey<<". Will be skipped!");
  }
 
  // =====================================================================
  // ================= Container: TriggerTower ===========================
  // =====================================================================
 
    // Creating a new container for saving pulseClassification
  std::unique_ptr<xAOD::TriggerTowerContainer> ttContainer = std::make_unique<xAOD::TriggerTowerContainer>();
  std::unique_ptr<xAOD::TriggerTowerAuxContainer> ttContainerAux = std::make_unique<xAOD::TriggerTowerAuxContainer>();
  ttContainer->setStore(ttContainerAux.get());
  
  static const SG::Accessor<float> pulseClassificationAcc("pulseClassification");
 
  // Creating a new container for TT with pulseClassification 
  for (const xAOD::TriggerTower* tt : *triggerTowerTES) {
  
    float ttPulseCategory = 0;
    const std::vector<uint16_t>& ttADC =  (tt)->adc();
    std::vector<uint16_t> readoutCorrectedADC; //this is the standard readout ADC vector: 5 40MHz samples with l1A in the middle
    if(!readout80ModePpm){//40 MHz
      //just acess the acd vector, as the sanity checks where done above
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice-2));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice-1));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice+1));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice+2));
    }
    else{//80 MHz
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice-4));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice-2));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice+2));
      readoutCorrectedADC.push_back(ttADC.at(l1aFadcSlice+4));
    }
    
    // retrieve max ADC value and position, this seems to be buggy in the DAOD
    auto maxValIterator = std::max_element(readoutCorrectedADC.begin(), readoutCorrectedADC.end());
    int maxADCval = *maxValIterator;
    int adcPeakPositon = std::distance(std::begin(readoutCorrectedADC), maxValIterator);
    
    if(maxADCval < 70){
      ttPulseCategory = 0.1;
    }
    else if(maxADCval == 1023) {
      ttPulseCategory = 1;
      if(! (tt)->layer()) emActivityCounter++;
    }
    else{
      bool goodQual = pulseQuality(readoutCorrectedADC, adcPeakPositon);
      if(! (tt)->layer()) emActivityCounter++;
      //look at any of the five FADC values
      if(adcPeakPositon == 2){ // can be class 3 or 4 now
        if(goodQual){
          //nicely peaking TT in BCID0
          good2Counter++;
          ttPulseCategory = 3;
        }
        else{
          //badly peaking TT in BCID0
          bad2Counter++;
          ttPulseCategory = 4;
        }
      }
      else if(adcPeakPositon == 3){ // can be class 5 or 6 now
        if(goodQual){
          //nicely peaking TT in BCID+1
          good3Counter++;
          ttPulseCategory = 5;
        }
        else{
          //badly peaking TT in BCID+1
          bad3Counter++;
          ttPulseCategory = 6;
        }
      }
      else{
          //TT peaking in BCID-1,-2 or +2
          badCounter++;
          ttPulseCategory = 2;
      }
 
      if (trigger == "jFex") {
        const xAOD::jFexSRJetRoIContainer* jFexSRJetRoI;
        CHECK( evtStore()->retrieve( jFexSRJetRoI, "L1_jFexSRJetRoI" ) );
        for(auto tob : *jFexSRJetRoI) {
          etaIn = tob->eta();
          phiIn = tob->phi();
          etIn = tob->tobEt()/5;
 
          if( (adcPeakPositon == 3) and (goodQual) ) {
            etaOut = tt->eta();
            phiOut = tt->phi()-M_PI;
            dEta = std::abs(etaIn-etaOut);
            dPhi = std::abs(phiIn-phiOut);
            if ((phiIn < 0) and (phiOut > 0)){
              dPhi1 = std::abs((phiIn+2*M_PI)-phiOut);
              if (dPhi1 < dPhi) {
                dPhi = dPhi1;
              }
            }
            else if ((phiIn > 0) and (phiOut < 0)){
              dPhi1 = std::abs(phiIn-(phiOut+2*M_PI));
              if (dPhi1 < dPhi) {
                dPhi = dPhi1;
              }
            }
            dR = TMath::Sqrt(dEta*dEta+dPhi*dPhi);
            if ((dR < .2) and (etIn > 160.))  {
              overlap = true; 
            }
          } // if statement - good tt
        } // for loop - jFex TOBs
      } // if statement - jFex
 
      if (trigger == "gFex") {
 
        for (const auto& key : m_gFexJetTobKeyList){
          SG::ReadHandle<xAOD::gFexJetRoIContainer> jetContainer (key, ctx);
          // Check that this container is present
          if ( !jetContainer.isValid() ) {
            ATH_MSG_WARNING("No gFex jet container found in storegate: "<< key.key());
          }
          else {
            const xAOD::gFexJetRoIContainer* gFexJetRoI;
            CHECK( evtStore()->retrieve( gFexJetRoI, key.key() ) );
            for(auto tob : *gFexJetRoI) {
              etaIn = tob->eta();
              phiIn = tob->phi();
              etIn = tob->gFexTobEt()/10;
 
              if( (adcPeakPositon == 3) and (goodQual) ) {
                etaOut = tt->eta();
                phiOut = tt->phi()-M_PI;
                dEta = std::abs(etaIn-etaOut);
                dPhi = std::abs(phiIn-phiOut);
                if ((phiIn < 0) and (phiOut > 0)){
                  dPhi1 = std::abs((phiIn+2*M_PI)-phiOut);
                  if (dPhi1 < dPhi) {
                    dPhi = dPhi1;
                  }
                }
                else if ((phiIn > 0) and (phiOut < 0)){
                  dPhi1 = std::abs(phiIn-(phiOut+2*M_PI));
                  if (dPhi1 < dPhi) {
                    dPhi = dPhi1;
                  }
                }
                dR = TMath::Sqrt(dEta*dEta+dPhi*dPhi);
                if ((dR < .2) and (etIn > 100.))  {
                  overlap = true; 
                }
              } // if statement - good tt
            } // for loop - gFex TOBs
          } // else stamement - valid container 
        } // for loop - gFex container
      } // if statement - gFex
 
    }
    
    // decorate the TT in order to have to recompute the pulse categorisation
    xAOD::TriggerTower* newTT = new xAOD::TriggerTower; //create a new TT object
    ttContainer->push_back(newTT); // add the newTT to new output TT container (at the end of it)
    *newTT = *(tt);// copy over all information from TT to newTT
    pulseClassificationAcc(*newTT) = ttPulseCategory; //decorate
  }
 
  // count all eFex in-time and out-of-time TOBs with at least 5GeV 
  for(auto key : {"L1_eEMxRoI","L1_eEMxRoIOutOfTime"}) {
 
    const xAOD::eFexEMRoIContainer* emTobs;
    CHECK( evtStore()->retrieve( emTobs, key ) );
 
    for(auto tob : *emTobs) {
      if (tob->et() > 5000) { //eFex TOB energy in MeV  
        if (tob->bcn4() == ((ctx.eventID().bunch_crossing_id()) & 0xf )) {
          eFexintimeCounter++;
        }
        else if (tob->bcn4() == (((ctx.eventID().bunch_crossing_id())+1) & 0xf )) {
          eFexoutoftimeCounter++;
        }
      }
    }
 
  }
 
  // count all gFex in-time TOBs with at least 5GeV 
  const xAOD::gFexJetRoIContainer* gFexLRJetRoI;
  CHECK( evtStore()->retrieve( gFexLRJetRoI, "L1_gFexLRJetRoI" ) );
  for(auto tob : *gFexLRJetRoI) {
    if (tob->et() > 50) { //gFex TOB energy in 0.1GeV 
      gFexCounter++;
    } 
  }
  
  // count all jFex in-time TOBs with at least 5GeV 
  const xAOD::jFexSRJetRoIContainer* jFexJetRoI;
  CHECK( evtStore()->retrieve( jFexJetRoI, "L1_jFexSRJetRoI" ) );
  for(auto tob : *jFexJetRoI) {
    if (tob->et() > 25) { //jFex TOB energy in 0.2GeV
      jFexCounter++;
    } 
  }
 
  if(badCounter > 4){
    //reject events with more than 4 wrongly peaked towers
    return StatusCode::SUCCESS;
  }
  cutFlowX=badpeakTT;
  fill(m_packageName,cutFlowX);
  
  if(bad2Counter > 4){
    //reject events with more than 4 pulses peaking in slice 2 that are badly timed or mis-shapen
    return StatusCode::SUCCESS;
  }
  cutFlowX=badCentralTT;
  fill(m_packageName,cutFlowX);
  
  if(bad3Counter > 4){
    //reject events with more than 4 pulses peaking in slice 3 that are badly timed or mis-shapen
    return StatusCode::SUCCESS;
  }
  cutFlowX=badLateTT;
  fill(m_packageName,cutFlowX);
  
  if(  (good3Counter < 2) or ((trigger == "eFex") and (eFexoutoftimeCounter < 2)) ){
    //reject events with less than 2 pulses nicely peaking in slice 3 
    return StatusCode::SUCCESS;
  }
  cutFlowX=lateTT;
  fill(m_packageName,cutFlowX);
 
  if( (good2Counter > 3)  or 
      ((trigger == "eFex") and (eFexintimeCounter > 3)) or 
      ((trigger == "jFex") and (jFexCounter > 3)) or 
      ((trigger == "gFex") and (gFexCounter > 3)) ){
    //reject events with more than 3 pulses nicely peaking/ 3 TOBs in slice 2 to avoid event being triggered by pileup 
    return StatusCode::SUCCESS;
  }
  cutFlowX= InTime;
  fill(m_packageName,cutFlowX);
  
  if(!emActivityCounter){
    //reject events with no activity in the EM layer
    return StatusCode::SUCCESS;
  }
  cutFlowX=  TTEMLayer;
  fill(m_packageName,cutFlowX);
  
  if (trigger == "eFex") {
    const xAOD::eFexEMRoIContainer* emTobs;
    CHECK( evtStore()->retrieve( emTobs, "L1_eEMxRoI" ) );
    const xAOD::eFexEMRoIContainer* emTobsOut;
    CHECK( evtStore()->retrieve( emTobsOut, "L1_eEMxRoIOutOfTime" ) );
    
    for(auto tob : *emTobs) {
      etaIn = tob->eta();
      phiIn = tob->phi();
      etIn = tob->et()/1000; //eT in GeV
 
      for(auto tobOut : *emTobsOut) {
        etaOut = tobOut->eta();
        phiOut = tobOut->phi();
        etOut = tobOut->et()/1000; //eT in GeV
 
        dEta = std::abs(etaIn-etaOut);
        dPhi = std::abs(phiIn-phiOut);
        if ((phiIn < 0) and (phiOut > 0)){
          dPhi1 = std::abs((phiIn+2*M_PI)-phiOut);
          if (dPhi1 < dPhi) {
            dPhi = dPhi1;
          }
        }
        else if ((phiIn > 0) and (phiOut < 0)){
          dPhi1 = std::abs(phiIn-(phiOut+2*M_PI));
          if (dPhi1 < dPhi) {
            dPhi = dPhi1;
          }
        }
        dR = TMath::Sqrt(dEta*dEta+dPhi*dPhi);
        if ((dR < .2) and (etIn > 26.) and (etOut > 26.)){ 
          overlap = true; 
        }
      }
    }
  }
 
  if ((legacyTrigger) and !(phase1Trigger)){
    overlap = true; 
  }
 
  if(overlap==false){
    //reject events where BCID and BCID+1 are spatially separated
    return StatusCode::SUCCESS;
  }
  cutFlowX= EtaPhiOverlap;
  fill(m_packageName,cutFlowX);
     
  
  // scope for mutable error event per lumi block tt counter
  // it allows only one event per lumiblock
  std::lock_guard<std::mutex> lock(m_mutex);    
  m_event_counter[lumiNo]+=1;
  const int eventCounter = m_eventCounter++;
 
  if( (m_event_counter[lumiNo] <m_maxEvents) && (eventCounter < m_maxEvents) ){ 
    ATH_MSG_DEBUG( "EventID :: " <<  m_event_counter[lumiNo]);
    
    // Saving the lumiblock and event number of the events with mistimed 
    auto  eventMonitor_legacy= Monitored::Scalar<std::string>("eventMonitor_legacy", "Event"+std::to_string(eventCounter)+"="+std::to_string(currentEventNo));
    auto  eventMonitor_phaseI= Monitored::Scalar<std::string>("eventMonitor_phaseI", "Event"+std::to_string(eventCounter)+"_"+trigger+"="+std::to_string(currentEventNo));
    auto  lbMonitor= Monitored::Scalar<std::string>("lbMonitor", std::to_string(lumiNo));
    std::string groupName = "Event_";
    if (legacyTrigger) {
      fill(groupName, eventMonitor_legacy, lbMonitor );
    }
    if (phase1Trigger) {
      fill(groupName, eventMonitor_phaseI, lbMonitor );
    }
  
    // Create a vector of trigger towers with quantities to be monitored
    std::vector<MonitorTT> vecMonTTDecor;     // All towers
    
    // Loop over trigger tower container
    //Create the trigger tower objects and calculate scaled phi
    for (const xAOD::TriggerTower* tt : *ttContainer) {
      ATH_CHECK( makeTowerPPM(tt, vecMonTTDecor) );     
      ATH_MSG_DEBUG( "tt->pulseClassification :: " <<  pulseClassificationAcc(*tt));
    }
    
    groupName = "EventofInterest_" +  std::to_string(eventCounter) + "_";
    auto  bcidWord  = Monitored::Scalar<uint8_t>("bcidWord",  0);
    auto  pulseCat = Monitored::Scalar<float>("pulseCat",  0);
      
    for (auto& myTower : vecMonTTDecor) {
      ATH_MSG_DEBUG(" looping over TTs"); 
      const int layer =   (myTower.tower)->layer();
      pulseCat = pulseClassificationAcc(*myTower.tower);
      bcidWord = (myTower.tower)->bcidVec()[0]; // look at the status bit in the central time slice
      ATH_MSG_DEBUG("groupName :: " <<  groupName);
    
      // Check if TT is in EM or HAD layer:
      if (layer == 0) { //========== ELECTROMAGNETIC LAYER =========================
        ATH_CHECK( fillPPMEtaPhi(myTower, groupName+"TT_EM", "pulseCat",  pulseCat) ); 
        if(pulseCat > 0.5 && bcidWord > 0)  {
          ATH_CHECK( fillPPMEtaPhi(myTower, groupName+"TT_EM", "bcidWord",  bcidWord) );  
        }
      }
      else if(layer == 1 ) { //========== HADRONIC LAYER ===============================
          ATH_CHECK( fillPPMEtaPhi(myTower, groupName+"TT_HAD", "pulseCat",  pulseCat) ); 
          if(pulseCat > 0.5 && bcidWord > 0 )  ATH_CHECK( fillPPMEtaPhi(myTower, groupName+"TT_HAD", "bcidWord",  bcidWord) ); 
      }
    }
 
    //Loop over CPM tower container
    //Create the CPM objects and calculate scaled phi
    std::vector<MonitorCPM> vecMonCPM;     // All towers
    for (const xAOD::CPMTower* cpm : *cpmTowerTES) {
      ATH_CHECK( makeTowerCPM(cpm, vecMonCPM) );     
    }
 
    // Coordinates for CPM tower and JetElement containers 
    auto etalut = Monitored::Scalar<double>("etalut", 0);
    auto philut = Monitored::Scalar<double>("philut", 0);
    
    // lut variables  
    auto  emLUT0 =  Monitored::Scalar<int>("emLUT0", 0);
    auto  emLUT1 =  Monitored::Scalar<int>("emLUT1", 0);
    auto  emLUT2 =  Monitored::Scalar<int>("emLUT2", 0);
    auto  hadLUT0 =  Monitored::Scalar<int>("hadLUT0", 0);
    auto  hadLUT1 =  Monitored::Scalar<int>("hadLUT1", 0);
    auto  hadLUT2 =  Monitored::Scalar<int>("hadLUT2", 0);
 
    //loop over the cpm tower container to fill the lut histos 
    for (auto& myTower : vecMonCPM) {
 
      std::vector<uint8_t> cpmEMenergy = (myTower.tower)->emEnergyVec();
      std::vector<uint8_t> cpmHADenergy = (myTower.tower)->hadEnergyVec();
      // eta scaled 
      etalut = myTower.etaScaled;
 
      for (auto phi:  myTower.phiScaled) {
        // phi scaled
        philut = phi;
 
        if(cpmEMenergy.size() > 2){ // expect 3 slices to be read out
          ATH_MSG_DEBUG("CPM :: emLUT0 :: " <<  static_cast<unsigned>(cpmEMenergy.at(0)) << ":: emLUT1 :: " <<  static_cast<unsigned>(cpmEMenergy.at(1)) << ":: emLUT2 :: "  <<  static_cast<unsigned>(cpmEMenergy.at(2)));
 
          emLUT0 = static_cast<int>(cpmEMenergy.at(0));
          if(cpmEMenergy.at(0) > 0) fill(groupName+"lut_EM0",etalut,philut, emLUT0);
        
          emLUT1 = static_cast<int>(cpmEMenergy.at(1));
          if(cpmEMenergy.at(1) > 0) fill(groupName+"lut_EM1",etalut,philut, emLUT1);
      
          emLUT2 = static_cast<int>(cpmEMenergy.at(2));
          if(cpmEMenergy.at(2) > 0)  fill(groupName+"lut_EM2",etalut,philut, emLUT2);
        }
        if(cpmHADenergy.size() > 2){
          ATH_MSG_DEBUG("CPM :: hadLUT0 :: " <<  static_cast<unsigned>(cpmHADenergy.at(0)) << ":: hadLUT1 :: " <<  static_cast<unsigned>(cpmHADenergy.at(1)) << ":: hadLUT2 :: "  <<  static_cast<unsigned>(cpmHADenergy.at(2)));
        
          hadLUT0 = static_cast<int>(cpmHADenergy.at(0));
          if(cpmHADenergy.at(0) > 0) fill(groupName+"lut_HAD0",etalut,philut, hadLUT0);
          hadLUT1 = static_cast<int>(cpmHADenergy.at(1));
          if(cpmHADenergy.at(1) > 0) fill(groupName+"lut_HAD1",etalut,philut, hadLUT1);
          hadLUT2 = static_cast<int>(cpmHADenergy.at(2));
          if(cpmHADenergy.at(2) > 0)fill(groupName+"lut_HAD2",etalut,philut, hadLUT2);
        }
        }
    }
    
    std::vector<MonitorJE> vecMonJE;     // All elements
 
    //Create the JetElement objects and calculate scaled phi
    for (const xAOD::JetElement* je : *jetElementTES) {
      ATH_CHECK( makeTowerJE(je, vecMonJE) );     
    }
    
    //loop over the jet element container to fill the lut histos 
    for (auto& jet : vecMonJE) {
 
      std::vector<uint16_t> jepEMenergy = (jet.element)->emJetElementETVec();
      std::vector<uint16_t> jepHADenergy = (jet.element)->hadJetElementETVec();
      
      for (auto eta: jet.etaScaled) {
        etalut = eta;
        if ( std::abs(eta) > 2.5){
          for (auto phi:  jet.phiScaled) {
            philut = phi;
            if(jepEMenergy.size() > 2){
              ATH_MSG_DEBUG("JetElement :: emLUT0 :: " <<  static_cast<unsigned>(jepEMenergy.at(0)) << ":: emLUT1 :: " <<  static_cast<unsigned>(jepEMenergy.at(1)) << ":: emLUT2 :: "  <<  static_cast<unsigned>(jepEMenergy.at(2)));
 
              emLUT0 = static_cast<int>(jepEMenergy.at(0));
                if(jepEMenergy.at(0) > 0) fill(groupName+"lut_EM0",etalut,philut, emLUT0);
          
              emLUT1 = static_cast<int>(jepEMenergy.at(1));
              if(jepEMenergy.at(1) > 0) fill(groupName+"lut_EM1",etalut,philut, emLUT1);
                
              emLUT2 = static_cast<int>(jepEMenergy.at(2));
              if(jepEMenergy.at(2) > 0) fill(groupName+"lut_EM2",etalut,philut, emLUT2);
            }
              if(jepHADenergy.size()> 2){
              ATH_MSG_DEBUG("JetElement :: hadLUT0 :: " <<  static_cast<unsigned>(jepHADenergy.at(0)) << ":: hadLUT1 :: " <<  static_cast<unsigned>(jepHADenergy.at(1)) << ":: hadLUT2 :: "  <<  static_cast<unsigned>(jepHADenergy.at(2)));
            
              hadLUT0 = static_cast<int>(jepHADenergy.at(0));
              if(jepHADenergy.at(0) > 0) fill(groupName+"lut_HAD0",etalut,philut, hadLUT0);
              
              hadLUT1 = static_cast<int>(jepHADenergy.at(1));
              if(jepHADenergy.at(1) > 0) fill(groupName+"lut_HAD1",etalut,philut, hadLUT1);
              
              hadLUT2 = static_cast<int>(jepHADenergy.at(2));
              if(jepHADenergy.at(2) > 0)  fill(groupName+"lut_HAD2",etalut,philut, hadLUT2);
            }
          }
        }
      }
    }
    
    SG::ReadHandle<xAOD::eFexEMRoIContainer>eFexContainer(m_eFexEMContainerKey, ctx);
    if ( !eFexContainer.isValid() ) {
      ATH_MSG_WARNING("No eFex EM container found in storegate  "<< eFexContainer.key());
    }
    
    // monitored variables for histograms
    auto TOBeT = Monitored::Scalar<float>("TOBTransverseEnergy",0.0);
    auto TOBeta = Monitored::Scalar<float>("TOBEta",0.0);
    auto TOBphi = Monitored::Scalar<float>("TOBPhi",0.0);
    auto TOBeT_max = Monitored::Scalar<float>("TOBTransverseEnergy_max",0.0);
    auto TOBeta_max = Monitored::Scalar<float>("TOBEta_max",0.0);
    auto TOBphi_max = Monitored::Scalar<float>("TOBPhi_max",0.0);
    auto TOBeT_max_in = Monitored::Scalar<float>("TOBTransverseEnergy_max",0.0);
    auto TOBeta_max_in = Monitored::Scalar<float>("TOBEta_max",0.0);
    auto TOBphi_max_in = Monitored::Scalar<float>("TOBPhi_max",0.0);
 
    TOBeT_max = 0; 
    TOBeT_max_in = 0; 
 
    for(auto key : {"L1_eEMxRoI","L1_eEMxRoIOutOfTime"}) {
 
      const xAOD::eFexEMRoIContainer* emTobs;
      CHECK( evtStore()->retrieve( emTobs, key ) );
      
      for(auto tob : *emTobs) {
        TOBeT = tob->et()/1000; //eT in GeV
        TOBeta = tob->eta();
        
        // adjust the phi to 0 to 2 pi
        if (tob->phi() < 0) {
          TOBphi = tob->phi()+2*M_PI;
        }
        else {
          TOBphi = tob->phi();
        }
 
        // fill the eFex histograms in the right time slice
        if (tob->bcn4() == (((ctx.eventID().bunch_crossing_id())-1) & 0xf )) {
            if (TOBeT > 0.0){
              fill(groupName+"Efex0", TOBeta, TOBphi, TOBeT);
            }
        }
        else if (tob->bcn4() == ((ctx.eventID().bunch_crossing_id()) & 0xf )) {
            if (TOBeT > 0.0){
              if (TOBeT_max_in < TOBeT) {
                TOBeT_max_in = tob->et()/1000;
                TOBeta_max_in = tob->eta();
                if (tob->phi() < 0) {
                  TOBphi_max_in = tob->phi()+2*M_PI;
                }
                else {
                  TOBphi_max_in = tob->phi();
                }
              }
              fill(groupName+"Efex1", TOBeta, TOBphi, TOBeT);
              if (trigger == "eFex") {
                fill("Efex_maxTOB_in", TOBeT);
              }
            }
        }
        else if (tob->bcn4() == (((ctx.eventID().bunch_crossing_id())+1) & 0xf )) {
            if (TOBeT > 0.0){
              if (TOBeT_max < TOBeT) {
                TOBeT_max = tob->et()/1000;
                TOBeta_max = tob->eta();
                if (tob->phi() < 0) {
                  TOBphi_max = tob->phi()+2*M_PI;
                }
                else {
                  TOBphi_max = tob->phi();
                }
              }
              fill(groupName+"Efex2", TOBeta, TOBphi, TOBeT);
              if (trigger == "eFex") {
                fill("Efex_maxTOB_out", TOBeT);
              }
            }
        }
      }
    }
    if (trigger == "eFex") {
      fill("Efex_maxTOB_out", TOBeta_max, TOBphi_max);
      fill("Efex_maxTOB_in", TOBeta_max_in, TOBphi_max_in);
    }
 
    // variables for histograms
    auto jFexEt      = Monitored::Scalar<int>  ("jFexEt",0);
    auto jFexeta     = Monitored::Scalar<float>("jFexEta",0.0);
    auto jFexphi     = Monitored::Scalar<float>("jFexPhi",0.0);
    
    // Access jFex tower container
    SG::ReadHandle<xAOD::jFexTowerContainer> jFexTowerContainer{m_jFexDataTowerKey, ctx};
    if(!jFexTowerContainer.isValid()) {
        ATH_MSG_WARNING("No jFex Tower container valid in storegate with key: "<< m_jFexDataTowerKey<<". Will be skipped!");
    }
    
    //SG::ReadHandle<xAOD::jFexTowerContainer> jFexEmulatedTowerContainer{m_jFexEmulatedTowerKey, ctx};
    SG::ReadHandle<xAOD::jFexTowerContainer> jEmulatedTowerContainer;
    jEmulatedTowerContainer = SG::ReadHandle<xAOD::jFexTowerContainer>(m_EmulTowerKey,ctx);
    if(!jEmulatedTowerContainer.isValid()) {
        ATH_MSG_WARNING("No jFex Tower container valid in storegate with key: "<< jEmulatedTowerContainer.key()<<". Will be skipped!");
    }
    else {
      for(const xAOD::jFexTower* emulTower : *jEmulatedTowerContainer) {
        jFexEt=emulTower->et_count().at(0);
        //Adding 1e-5 for plotting style 
        jFexeta=emulTower->eta()+1e-5;
        if (emulTower->phi() < 0) {
          jFexphi=emulTower->phi()+2*M_PI;
        }
        else {
          jFexphi=emulTower->phi();
        }        
        if (jFexEt > 175) {
          fill(groupName+"JfexEmulated",jFexeta,jFexphi, jFexEt);
        }
      }
    }
 
    TOBeT_max = 0; 
    for(const xAOD::jFexSRJetRoI* jFexSRJetRoI : *jFexSRJetContainer) {
      if(jFexSRJetRoI->tobWord()==0) continue; //remove empty TOBs
      jFexEt=jFexSRJetRoI->tobEt()/5;
      jFexeta=jFexSRJetRoI->eta();
      if (jFexSRJetRoI->phi() < 0) {
        jFexphi=jFexSRJetRoI->phi()+2*M_PI;
      }
      else {
        jFexphi=jFexSRJetRoI->phi();
      }
      if (TOBeT_max < jFexEt) {
        TOBeT_max = jFexSRJetRoI->tobEt()/5;
        TOBeta_max = jFexSRJetRoI->eta();
        if (jFexSRJetRoI->phi() < 0) {
          TOBphi_max =jFexSRJetRoI->phi()+2*M_PI;
        }
        else {
          TOBphi_max =jFexSRJetRoI->phi();
        }
      }
      fill(groupName+"JfexSRJet", jFexeta, jFexphi, jFexEt);
      if (trigger == "jFex") {
        fill("Jfex_maxTOB", jFexEt);
      }
    }
    if (trigger == "jFex") {
      fill("Jfex_maxTOB", TOBeta_max, TOBphi_max);
    }
 
    SG::ReadHandle<xAOD::jFexTauRoIContainer> jFexTauContainer{m_jFexTauContainerKey, ctx};
    if(!jFexTauContainer.isValid()) {
      ATH_MSG_WARNING("No jFex Tau container found in storegate "<< m_jFexTauContainerKey<<". Will be skipped!");
    }
    else {
       for(const xAOD::jFexTauRoI* jFexTauRoI : *jFexTauContainer) {
        if(jFexTauRoI->tobWord()==0) continue; //remove empty TOBs
        jFexEt =jFexTauRoI->tobEt()/5;
        jFexeta=jFexTauRoI->eta();
        if (jFexTauRoI->phi() < 0) {
          jFexphi=jFexTauRoI->phi()+2*M_PI;
        }
        else {
          jFexphi=jFexTauRoI->phi();
        }
        fill(groupName+"JfexTau", jFexeta, jFexphi, jFexEt);
      }
    }
 
    auto gFexEt      = Monitored::Scalar<int>  ("gFexEt",0);
    auto gFexEta     = Monitored::Scalar<float>("gFexEta",0.0);
    auto gFexPhi     = Monitored::Scalar<float>("gFexPhi",0.0);
    int key_index = 0; 
 
    TOBeT_max = 0; 
    // Small-R and large-R jets container loop
    for (const auto& key : m_gFexJetTobKeyList){
      SG::ReadHandle<xAOD::gFexJetRoIContainer> jetContainer (key, ctx);
      // Check that this container is present
      if ( !jetContainer.isValid() ) {
        ATH_MSG_WARNING("No gFex jet container found in storegate: "<< key.key());
      }
      else {
        for(const xAOD::gFexJetRoI* gFexJetRoIContainer : *jetContainer) {
          gFexEt =gFexJetRoIContainer->gFexTobEt()/10;
          gFexEta=gFexJetRoIContainer->eta();
          if (gFexJetRoIContainer->phi() < 0) {
            gFexPhi=gFexJetRoIContainer->phi()+2*M_PI;
          }
          else {
            gFexPhi=gFexJetRoIContainer->phi();
          }
          if (TOBeT_max < gFexEt) {
            TOBeT_max = gFexJetRoIContainer->gFexTobEt()/10;
            TOBeta_max = gFexJetRoIContainer->eta();
            if (gFexJetRoIContainer->phi() < 0) {
              TOBphi_max=gFexJetRoIContainer->phi()+2*M_PI;
            }
            else {
              TOBphi_max=gFexJetRoIContainer->phi();
            }
          }
          if (key_index == 0) {
            fill(groupName+"GfexSRJet",gFexEta, gFexPhi, gFexEt);
          }
          else if (key_index == 1) {
            fill(groupName+"GfexLRJet",gFexEta, gFexPhi, gFexEt);
          }
          if (trigger == "gFex") {
            fill("Gfex_maxTOB", gFexEt);
          }
        }
      }
      key_index++;  
    }
    if (trigger == "gFex") {
        fill("Gfex_maxTOB", TOBeta_max, TOBphi_max);
    }
 
  }
  else { 
    auto  eventMonitor_all_legacy= Monitored::Scalar<std::string>("eventMonitor_all_legacy", std::to_string(currentEventNo));
    auto  eventMonitor_all_phaseI= Monitored::Scalar<std::string>("eventMonitor_all_phaseI", trigger+"="+std::to_string(currentEventNo));
    auto  lbMonitor_all= Monitored::Scalar<std::string>("lbMonitor_all", std::to_string(lumiNo));
    if (legacyTrigger) {
      fill("Event_all_", eventMonitor_all_legacy, lbMonitor_all );
    }
    if (phase1Trigger) {
      fill("Event_all_", eventMonitor_all_phaseI, lbMonitor_all );
    }
  }
 
  return StatusCode::SUCCESS;
}
 
 
StatusCode  MistimedStreamMonitorAlgorithm::makeTowerPPM( const xAOD::TriggerTower* tt, 
                                                    std::vector<MonitorTT> &vecMonTT) const
{
  // Geometry
  const double phi = tt->phi();
  double phiMod = phi * m_phiScaleTT;
 
  
 
  // Fill TT quantities
  MonitorTT monTT;
  monTT.tower = tt;
  monTT.phiScaled = phiMod;
  monTT.phi1d = 0;
  vecMonTT.push_back(monTT);
   
  return StatusCode::SUCCESS; 
}
 
 
StatusCode  MistimedStreamMonitorAlgorithm::makeTowerCPM( const xAOD::CPMTower* cpm, 
                                                    std::vector<MonitorCPM> &vecMonCPM) const
{
  // Geometry
  const double phi = cpm->phi();
  double phiMod = phi * m_phiScaleTT;
  
 
  // Fill CPM quantities
  MonitorCPM monCPM;
  monCPM.tower = cpm;
  
  double etaMod = monCPM.tower->eta();
  const double absEta = std::abs(etaMod);
  
  const std::vector<double> offset32 = {1.5, 0.5, -0.5, -1.5};                                                                             
  const std::vector<double> offset25 = {0.5, -0.5}; 
  std::vector<double> offset = {}; 
  
  if (absEta > 3.2) {
    // Fill four bins in phi
    phiMod = std::floor(phiMod/4)*4. + 2.;
    offset = offset32;
  } 
  else if (absEta > 2.5) {
    // Fill two bins in phi
    phiMod = std::floor(phiMod/2)*2. + 1.;
    offset = offset25;
  }     
  else {
    offset = {0.};
  }
 
  
  
  // Fill the histograms 
  for (auto phiOffset : offset)  {
    monCPM.phiScaled.push_back(phiMod + phiOffset);
  }      
 
  monCPM.etaScaled = etaMod;
 
 
  vecMonCPM.push_back(monCPM);
   
  return StatusCode::SUCCESS; 
}
 
StatusCode  MistimedStreamMonitorAlgorithm::makeTowerJE( const xAOD::JetElement* je, 
                                                    std::vector<MonitorJE> &vecMonJE) const
{
 
  // Use JEP info to fill the forward part of the lut plots, but since this has TT granularity we have to play some tricks
  
  // Geometry
  const double phi = je->phi();
  double phiMod = phi * m_phiScaleTT;
  
  // Fill JE quantities
  MonitorJE monJE;
  monJE.element = je;
 
  double etaMod = monJE.element->eta();
  const double absEta = std::abs(etaMod);
  int signeta = 1;         
  if( etaMod < 0) signeta = -1;
 
  
  const std::vector<double> offset32 = {1.5, 0.5, -0.5, -1.5};                                                                             
  const std::vector<double> offset25 = {0.5, -0.5}; 
  std::vector<double> offset = {}; 
  
  if (absEta > 3.2) {
    // Fill four bins in phi
    phiMod = std::floor(phiMod/4)*4. + 2.;
    offset = offset32;
    monJE.etaScaled.push_back(signeta*4.7);
    monJE.etaScaled.push_back(signeta*3.7);
    monJE.etaScaled.push_back(signeta*3.5);
 
  } 
  else if(absEta > 2.9) {
    phiMod = std::floor(phiMod/2)*2. + 1.;
    offset = offset25;
    monJE.etaScaled.push_back(signeta*3.15);
  }
  
 
  if (absEta > 2.5) {
    // Fill two bins in phi
    phiMod = std::floor(phiMod/2)*2. + 1.;
    offset = offset25;
    monJE.etaScaled.push_back(etaMod);
  }     
  else {
    offset = {0.};
    monJE.etaScaled.push_back(etaMod);
  }
  
  
  // Fill the histograms 
  for (auto phiOffset : offset)  {
    monJE.phiScaled.push_back(phiMod + phiOffset);
  }      
 
  vecMonJE.push_back(monJE);
 
  return StatusCode::SUCCESS; 
}
 
 
StatusCode  MistimedStreamMonitorAlgorithm::fillPPMEtaPhi( MonitorTT &monTT, 
                                           const std::string& groupName, 
                                           const std::string& weightName,
                                           double weight) const {
  
 
  double phiMod = monTT.phiScaled;  // Integer binning for 2D plots 
  double etaMod = monTT.tower->eta();
  const double absEta = std::abs(etaMod);
  
  const std::vector<double> offset32 = {1.5, 0.5, -0.5, -1.5};                                                                             
  const std::vector<double> offset25 = {0.5, -0.5}; 
  std::vector<double> offset = {}; 
    
  if (absEta > 3.2) {
    // Fill four bins in phi
    phiMod = std::floor(phiMod/4)*4. + 2.;
    offset = offset32;
  } 
  else if (absEta > 2.5) {
    // Fill two bins in phi
    phiMod = std::floor(phiMod/2)*2. + 1.;
    offset = offset25;
  }     
  else {
    offset = {0.};
  }
 
  ATH_MSG_DEBUG("absEta: " << absEta << "offset.size(): " << offset.size());
 
  // Fill the histograms 
  for (auto phiOffset : offset)  {
 
    auto etaTT_2D = Monitored::Scalar<double>("etaTT_2D", etaMod);
    auto phiTT_2D = Monitored::Scalar<double>("phiTT_2D", phiMod + phiOffset);
    
    auto weight_2D = Monitored::Scalar<double>(weightName, weight); // Weight for filling 2D profile histograms; name must be included in python histogram definition
    ATH_MSG_DEBUG("groupName: weight_2D" << weight_2D); 
    
    fill(groupName, etaTT_2D, phiTT_2D, weight_2D);
    
  }      
 
  return StatusCode::SUCCESS;
} 
 
 
bool MistimedStreamMonitorAlgorithm::pulseQuality(const std::vector<uint16_t>& ttPulse, int peakSlice) const {
     
    bool goodPulse = true;
    int size = ttPulse.size();
    if (peakSlice > size) {
      ATH_MSG_ERROR("Peak Slice " << peakSlice << " supress the ttPulse vector size "  <<  size ); 
      goodPulse = false; 
      return goodPulse;
    }
    if (size < 1) {
      ATH_MSG_ERROR("The ttPulse vector size "  <<  size << " not valid for Peak Slice " << peakSlice ); 
      goodPulse = false; 
      return goodPulse;
    }
    int a = ttPulse[peakSlice-1];
    int b = ttPulse[peakSlice];
    int c = ttPulse[peakSlice+1];
    double tim = (0.5*a-0.5*c)/(a+c-2*b);
    double wid = (a+c-64.0)/(b-32.0);
    if ( tim < 0.0 ) goodPulse = false;
    else if ( tim > 0.3 ) goodPulse = false;
    if ( wid < 1.0 ) goodPulse = false;
    else if ( wid > 1.6 ) goodPulse = false;             
 
    ATH_MSG_DEBUG("Pulse qual= "<< goodPulse<<" tim = "<<tim<<" wid = "<<wid);
    ATH_MSG_DEBUG("a = "<< a <<" b = "<<b<<" c = "<<c);
    
    return goodPulse;
}