PowhegBB4L.cxx

Go to the documentation of this file.

/*
  Copyright (C) 2002-2023 CERN for the benefit of the ATLAS collaboration
*/
// PowhegHooksBB4L.h 
 
// Author: Tomas Jezo, Markus Seidel and Ben Nachman based on 
// PowhegHooks.h by Richard Corke
 
#include "Pythia8_i/UserHooksFactory.h"
#include "UserSetting.h"
 
namespace Pythia8 {
 
// Create the user hook
  class PowhegBB4L;
  Pythia8_UserHooks::UserHooksFactory::Creator<Pythia8::PowhegBB4L> powhegBB4LCreator("PowhegBB4L");
 
//==========================================================================
 
// Use userhooks to veto PYTHIA emissions above the POWHEG scale.
 
class PowhegBB4L : public UserHooks {
//class PowhegHooksBB4L : public PowhegHooks {
 
public:
 
    // Constructor and destructor.
    PowhegBB4L(): m_topresscale(-1.), m_atopresscale(-1.),
                      m_onlyDistance1("Powheg:bb4l:onlyDistance1", 0),
                      m_useScaleResonanceInstead("Powheg:bb4l:useScaleResonanceInstead", 0){}
    ~PowhegBB4L() {}
//--------------------------------------------------------------------------
 
//--------------------------------------------------------------------------
 
    // Calculates the scale of the hardest emission from within the resonance system
    // translated by Markus Seidel modified by Tomas Jezo
    inline double findresscale( const int iRes, const Event& event) {
        double scale = 0.;
    
        int nDau = event[iRes].daughterList().size();
    
        if (nDau == 0) {
            // No resonance found, set scale to high value
            // Pythia will shower any MC generated resonance unrestricted
            scale = 1e30;
        }
        else if (nDau < 3) {
            // No radiating resonance found
            scale = 0.8;
        }
        else if (std::abs(event[iRes].id()) == 6) {
            // Find top daughters
            int idw = -1, idb = -1, idg = -1;
            
            for (int i = 0; i < nDau; i++) {
                int iDau = event[iRes].daughterList()[i];
                if (std::abs(event[iDau].id()) == 24) idw = iDau;
                if (std::abs(event[iDau].id()) ==  5) idb = iDau;
                if (std::abs(event[iDau].id()) == 21) idg = iDau;
            }
            
            // Get daughter 4-vectors in resonance frame
            Vec4 pw(event[idw].p());
            pw.bstback(event[iRes].p());
            
            Vec4 pb(event[idb].p());
            pb.bstback(event[iRes].p());
            
            Vec4 pg(event[idg].p());
            pg.bstback(event[iRes].p());
            
            // Calculate scale
            scale = std::sqrt(2*pg*pb*pg.e()/pb.e());
        }
        else {
            scale = 1e30;
        }
 
        return scale;
    }
 
//--------------------------------------------------------------------------
 
    // The following routine will match daughters of particle `e[iparticle]` to an expected pattern specified via the list of expected particle PDG ID's `ids`, 
    // id wildcard is specified as 0 if match is obtained, the positions and the momenta of these particles are returned in vectors `positions` and `momenta` 
    // respectively
    // if exitOnExtraLegs==true, it will exit if the decay has more particles than expected, but not less
    inline bool match_decay(int iparticle, const Event &e, const std::vector<int> &ids, std::vector<int> &positions, std::vector<Vec4> &momenta, bool exitOnExtraLegs = true){
        // compare sizes
        if (e[iparticle].daughterList().size() != ids.size()) {
            if (exitOnExtraLegs && e[iparticle].daughterList().size() > ids.size()) exit(-1);
            return false; 
        }
        // compare content
        for (size_t i = 0; i < e[iparticle].daughterList().size(); i++) {
            int di = e[iparticle].daughterList()[i];
            if (ids[i] != 0 && e[di].id() != ids[i]) 
                return false;
        }
        // reset the positions and momenta vectors (because they may be reused)
        positions.clear();
        momenta.clear();
        // construct the array of momenta
        for (size_t i = 0; i < e[iparticle].daughterList().size(); i++) {
            int di = e[iparticle].daughterList()[i];
            positions.push_back(di);
            momenta.push_back(e[di].p());
        }
        return true;
    }
 
    inline double qSplittingScale(Vec4 pt, Vec4 p1, Vec4 p2){
        p1.bstback(pt);
        p2.bstback(pt);
        return std::sqrt( 2*p1*p2*p2.e()/p1.e() );
    }
 
    inline double gSplittingScale(Vec4 pt, Vec4 p1, Vec4 p2){
        p1.bstback(pt);
        p2.bstback(pt);     
        return std::sqrt( 2*p1*p2*p1.e()*p2.e()/(std::pow(p1.e(),2)+std::pow(p2.e(),2)) );
    }
 
 
    inline double getdechardness(int topcharge, const Event &e){
        int tid = 6*topcharge, wid = 24*topcharge, bid = 5*topcharge, gid = 21, wildcard = 0;
        // find last top in the record
        int i_top = -1;
        Vec4 p_top, p_b, p_g, p_g1, p_g2;
        for (int i = 0; i < e.size(); i++) 
            if (e[i].id() == tid) {             
                i_top = i;
                p_top = e[i].p();
            }
        if (i_top == -1) return -1.0;
                
        // summary of cases
        // 1.) t > W b
        //   a.) b > 3     ... error
        //   b.) b > b g   ... h = sqrt(2*p_g*p_b*p_g.e()/p_b.e())
        //   c.) b > other ... h = -1
        //   return h
        // 2.) t > W b g
        //   a.)   b > 3     ... error
        //   b.)   b > b g   ... h1 = sqrt(2*p_g*p_b*p_g.e()/p_b.e())
        //   c.)   b > other ... h1 = -1
        //   i.)   g > 3     ... error
        //   ii.)  g > 2     ... h2 = sqrt(2*p_g1*p_g2*p_g1.e()*p_g2.e()/(pow(p_g1.e(),2)+pow(p_g2.e(),2))) );
        //   iii.) g > other ... h2 = -1
        //   return max(h1,h2)
        // 3.) else ... error
 
        vector<Vec4> momenta;
        vector<int> positions;
 
        // 1.) t > b W
        if ( match_decay(i_top, e, std::vector<int> {wid, bid}, positions, momenta, false) ) {
            double h;
            int i_b = positions[1];
            // a.+b.) b > 3 or b > b g 
            if ( match_decay(i_b, e, std::vector<int> {bid, gid}, positions, momenta) )
                h = qSplittingScale(e[i_top].p(), momenta[0], momenta[1]);
            // c.) b > other
            else 
                h = -1;
            return h;
        } 
        // 2.) t > b W g
        else if ( match_decay(i_top, e, std::vector<int> {wid, bid, gid}, positions, momenta, false) ) {
            double h1, h2;
            int i_b = positions[1], i_g = positions[2];
            // a.+b.) b > 3 or b > b g
            if ( match_decay(i_b, e, std::vector<int> {bid, gid}, positions, momenta) )
                h1 = qSplittingScale(e[i_top].p(), momenta[0], momenta[1]);
            // c.) b > other
            else 
                h1 = -1;
            // i.+ii.) g > 3 or g > 2
            if ( match_decay(i_g, e, std::vector<int> {wildcard, wildcard}, positions, momenta) )
                h2 = gSplittingScale(e[i_top].p(), momenta[0], momenta[1]);
            // c.) b > other
            else 
                h2 = -1;
            return max(h1, h2);
        }
        // 3.) else
        else { 
            exit(-1);
        }
    }   
 
//--------------------------------------------------------------------------
 
    // called after shower -- cannot be used for veto, because the event will get discarded
    inline bool canVetoPartonLevel() { return true; }
    inline bool doVetoPartonLevel(const Event &e) {
        double topdechardness = getdechardness(1, e),  atopdechardness = getdechardness(-1, e);
        if ((topdechardness > m_topresscale) or (atopdechardness > m_atopresscale)) {
 
#if PYTHIA_VERSION_INTEGER >= 8310
            loggerPtr->ERROR_MSG("Warning in PowhegHooksBB4L::doVetoPartonLevel: passed doVetoFSREmission veto, but wouldn't have passed veto based on the full event listing");
#else
            infoPtr->errorMsg("Warning in PowhegHooksBB4L::doVetoPartonLevel: passed doVetoFSREmission veto, but wouldn't have passed veto based on the full event listing");
#endif
        }
//      cout << " veto scales: " << fixed << setprecision(17) << setw(30) << topresscale << setw(30) << atopresscale << endl;
        m_topresscale = -1;
        m_atopresscale = -1;
 
        return false;
    }
 
    // called before each resonance decay shower
    inline bool canSetResonanceScale() { return true; }
    inline double scaleResonance(int iRes, const Event &e) {     
      double scale = 0.;
      
      if (e[iRes].id() == 6){ 
        scale = m_topresscale = findresscale(iRes, e);
      }else if (e[iRes].id() == -6){ 
        scale = m_atopresscale = findresscale(iRes, e);
      }
      
      if (m_useScaleResonanceInstead(settingsPtr)) return scale;
      
      return 1e30;
    }
 
//--------------------------------------------------------------------------
 
    // FSR veto
    inline bool canVetoFSREmission() { 
        if (m_useScaleResonanceInstead(settingsPtr)) 
            return false;
        else 
            return true; 
    }
  
  
  
    inline bool doVetoFSREmission(int, const Event &e, int, bool inResonance) {
 
        if (inResonance) {
 
            // get the participants of the splitting: the radiator and the emitted
            int iEmt = e.size() - 2;
            int iRadAft = e.size() - 3;
            int iRadBef = e[iEmt].mother1();
 
            // find the top resonance the radiator originates from
            int iTop = e[iRadBef].mother1();
            int distance = 1;
            while (std::abs(e[iTop].id()) != 6 && iTop > 0) {
                iTop = e[iTop].mother1();
                distance ++;
            }
            if (iTop == 0) {
#if PYTHIA_VERSION_INTEGER >= 8310
                loggerPtr->ERROR_MSG("Warning in PowhegHooksBB4L::doVetoFSREmission: emission in resonance not from top quark, not vetoing");
#else
                infoPtr->errorMsg("Warning in PowhegHooksBB4L::doVetoFSREmission: emission in resonance not from top quark, not vetoing");
#endif
                return false;
            }
            int iTopCharge = (e[iTop].id()>0)?1:-1;
 
 
            // calculate the scale of the emission
            Vec4 pr(e[iRadAft].p()), pe(e[iEmt].p()), pt(e[iTop].p());
            double scale;
            // gluon splitting into two partons
            if (e[iRadBef].id() == 21)
                scale = gSplittingScale(pt, pr, pe);
            // quark emitting a gluon
            else if (std::abs(e[iRadBef].id()) <= 5)
                scale = qSplittingScale(pt, pr, pe);
            // other stuff (which we should not veto)
            else {
                scale = 0;
            }
 
            if (iTopCharge > 0) {
                if (m_onlyDistance1(settingsPtr))
                    return (distance == 1) && scale > m_topresscale;
                else
                    return scale > m_topresscale;
            }
            else {
                if (m_onlyDistance1(settingsPtr))
                    return (distance == 1) && scale > m_atopresscale;
                else
                    return scale > m_atopresscale;
            }
        } else {
            return false;
        }
    
    return false;
    }
 
//--------------------------------------------------------------------------
 
  // Functions to return information
 
//  inline int    getNFSRveto() { return nFSRveto; }
 
//--------------------------------------------------------------------------
 
private:
  
  double m_topresscale;
  double m_atopresscale;
  Pythia8_UserHooks::UserSetting<int> m_onlyDistance1;
  Pythia8_UserHooks::UserSetting<int> m_useScaleResonanceInstead;
};
 
//==========================================================================
 
} // end namespace Pythia8