Generates values for the kinematic variables describing QEL neutrino interaction events for Smith-Moniz model. Is a concrete implementation of the EventRecordVisitorI interface. More...

#include <QELEventGeneratorSM.h>

Inheritance diagram for genie::QELEventGeneratorSM:

[legend]

Collaboration diagram for genie::QELEventGeneratorSM:

[legend]

Public Member Functions
	QELEventGeneratorSM ()

	QELEventGeneratorSM (string config)

	~QELEventGeneratorSM ()

void	ProcessEventRecord (GHepRecord *event_rec) const

void	Configure (const Registry &config)

void	Configure (string config)

Public Member Functions inherited from genie::EventRecordVisitorI
virtual	~EventRecordVisitorI ()

Public Member Functions inherited from genie::Algorithm
virtual	~Algorithm ()

virtual void	FindConfig (void)

virtual const Registry &	GetConfig (void) const

Registry *	GetOwnedConfig (void)

virtual const AlgId &	Id (void) const
	Get algorithm ID. More...

virtual AlgStatus_t	GetStatus (void) const
	Get algorithm status. More...

virtual bool	AllowReconfig (void) const

virtual AlgCmp_t	Compare (const Algorithm *alg) const
	Compare with input algorithm. More...

virtual void	SetId (const AlgId &id)
	Set algorithm ID. More...

virtual void	SetId (string name, string config)

const Algorithm *	SubAlg (const RgKey &registry_key) const

void	AdoptConfig (void)

void	AdoptSubstructure (void)

virtual void	Print (ostream &stream) const
	Print algorithm info. More...

Private Member Functions
void	LoadConfig (void)

double	ComputeMaxXSec (const Interaction *in) const

double	ComputeMaxXSec (const Interaction *in, const int nkey) const

void	AddTargetNucleusRemnant (GHepRecord *evrec) const
	add a recoiled nucleus remnant More...

Private Attributes
SmithMonizUtils *	sm_utils

KinePhaseSpace_t	fkps

bool	fGenerateNucleonInNucleus
	generate struck nucleon in nucleus More...

double	fQ2Min
	Q2-threshold for seeking the second maximum. More...

Additional Inherited Members
Static Public Member Functions inherited from genie::Algorithm
static string	BuildParamVectKey (const std::string &comm_name, unsigned int i)

static string	BuildParamVectSizeKey (const std::string &comm_name)

static string	BuildParamMatKey (const std::string &comm_name, unsigned int i, unsigned int j)

static string	BuildParamMatRowSizeKey (const std::string &comm_name)

static string	BuildParamMatColSizeKey (const std::string &comm_name)

Protected Member Functions inherited from genie::KineGeneratorWithCache
	KineGeneratorWithCache ()

	KineGeneratorWithCache (string name)

	KineGeneratorWithCache (string name, string config)

	~KineGeneratorWithCache ()

virtual double	MaxXSec (GHepRecord *evrec, const int nkey=0) const

virtual double	FindMaxXSec (const Interaction *in, const int nkey=0) const

virtual void	CacheMaxXSec (const Interaction *in, double xsec, const int nkey=0) const

virtual double	Energy (const Interaction *in) const

virtual CacheBranchFx *	AccessCacheBranch (const Interaction *in, const int nkey=0) const

virtual void	AssertXSecLimits (const Interaction *in, double xsec, double xsec_max) const

Protected Member Functions inherited from genie::EventRecordVisitorI
	EventRecordVisitorI ()

	EventRecordVisitorI (string name)

	EventRecordVisitorI (string name, string config)

Protected Member Functions inherited from genie::Algorithm
	Algorithm ()

	Algorithm (string name)

	Algorithm (string name, string config)

void	Initialize (void)

void	DeleteConfig (void)

void	DeleteSubstructure (void)

Registry *	ExtractLocalConfig (const Registry &in) const

Registry *	ExtractLowerConfig (const Registry &in, const string &alg_key) const
	Split an incoming configuration Registry into a block valid for the sub-algo identified by alg_key. More...

template<class T >
bool	GetParam (const RgKey &name, T &p, bool is_top_call=true) const

template<class T >
bool	GetParamDef (const RgKey &name, T &p, const T &def) const

template<class T >
int	GetParamVect (const std::string &comm_name, std::vector< T > &v, bool is_top_call=true) const
	Handle to load vectors of parameters. More...

int	GetParamVectKeys (const std::string &comm_name, std::vector< RgKey > &k, bool is_top_call=true) const

template<class T >
int	GetParamMat (const std::string &comm_name, TMatrixT< T > &mat, bool is_top_call=true) const
	Handle to load matrix of parameters. More...

template<class T >
int	GetParamMatSym (const std::string &comm_name, TMatrixTSym< T > &mat, bool is_top_call=true) const

int	GetParamMatKeys (const std::string &comm_name, std::vector< RgKey > &k, bool is_top_call=true) const

int	AddTopRegistry (Registry *rp, bool owns=true)
	add registry with top priority, also update ownership More...

int	AddLowRegistry (Registry *rp, bool owns=true)
	add registry with lowest priority, also update ownership More...

int	MergeTopRegistry (const Registry &r)

int	AddTopRegisties (const vector< Registry * > &rs, bool owns=false)
	Add registries with top priority, also udated Ownerships. More...

Protected Attributes inherited from genie::KineGeneratorWithCache
const XSecAlgorithmI *	fXSecModel

double	fSafetyFactor
	ComputeMaxXSec -> ComputeMaxXSec * fSafetyFactor. More...

std::vector< double >	vSafetyFactors
	MaxXSec -> MaxXSec * fSafetyFactors[nkey]. More...

int	fNumOfSafetyFactors
	Number of given safety factors. More...

std::vector< string >	vInterpolatorTypes
	Type of interpolator for each key in a branch. More...

int	fNumOfInterpolatorTypes
	Number of given interpolators types. More...

double	fMaxXSecDiffTolerance
	max{100(xsec-maxxsec)/.5(xsec+maxxsec)} if xsec>maxxsec More...

double	fEMin
	min E for which maxxsec is cached - forcing explicit calc. More...

bool	fGenerateUniformly
	uniform over allowed phase space + event weight? More...

Protected Attributes inherited from genie::Algorithm
bool	fAllowReconfig

bool	fOwnsSubstruc
	true if it owns its substructure (sub-algs,...) More...

AlgId	fID
	algorithm name and configuration set More...

vector< Registry * >	fConfVect

vector< bool >	fOwnerships
	ownership for every registry in fConfVect More...

AlgStatus_t	fStatus
	algorithm execution status More...

AlgMap *	fOwnedSubAlgMp
	local pool for owned sub-algs (taken out of the factory pool) More...

Detailed Description

Generates values for the kinematic variables describing QEL neutrino interaction events for Smith-Moniz model. Is a concrete implementation of the EventRecordVisitorI interface.

References:: [1] R.A.Smith and E.J.Moniz, Nuclear Physics B43, (1972) 605-622
[2] K.S. Kuzmin, V.V. Lyubushkin, V.A.Naumov Eur. Phys. J. C54, (2008) 517-538

Author: Igor Kakorin kakor.nosp@m.in@j.nosp@m.inr.r.nosp@m.u
Joint Institute for Nuclear Research
adapted from fortran code provided by:

Konstantin Kuzmin kkuzm.nosp@m.in@t.nosp@m.heor..nosp@m.jinr.nosp@m..ru,
Joint Institute for Nuclear Research, Institute for Theoretical and Experimental Physics
Vadim Naumov vnaum.nosp@m.ov@t.nosp@m.heor..nosp@m.jinr.nosp@m..ru,
Joint Institute for Nuclear Research
based on code of: Costas Andreopoulos <c.andreopoulos cern.ch> University of Liverpool

Created:: May 05, 2017

License:: Copyright (c) 2003-2024, The GENIE Collaboration For the full text of the license visit http://copyright.genie-mc.org

Definition at line 47 of file QELEventGeneratorSM.h.

Constructor & Destructor Documentation

QELEventGeneratorSM::QELEventGeneratorSM ( )

Definition at line 65 of file QELEventGeneratorSM.cxx.

                                          :
 KineGeneratorWithCache("genie::QELEventGeneratorSM")
 {
 
 }

QELEventGeneratorSM::QELEventGeneratorSM ( string config )

Definition at line 71 of file QELEventGeneratorSM.cxx.

                                                       :
 KineGeneratorWithCache("genie::QELEventGeneratorSM", config)
 {
 
 }

QELEventGeneratorSM::~QELEventGeneratorSM ( )

Definition at line 77 of file QELEventGeneratorSM.cxx.

 {
 
 }

Member Function Documentation

void QELEventGeneratorSM::AddTargetNucleusRemnant ( GHepRecord * evrec ) const

private

add a recoiled nucleus remnant

Definition at line 339 of file QELEventGeneratorSM.cxx.

Referenced by ProcessEventRecord().

 {
 // add the remnant nuclear target at the GHEP record
 
   LOG("QELEvent", pINFO) << "Adding final state nucleus";
 
   double Px = 0;
   double Py = 0;
   double Pz = 0;
   double E  = 0;
 
   GHepParticle * nucleus = evrec->TargetNucleus();
   int A = nucleus->A();
   int Z = nucleus->Z();
 
   int fd = nucleus->FirstDaughter();
   int ld = nucleus->LastDaughter();
 
   for(int id = fd; id <= ld; id++)
   {
 
      // compute A,Z for final state nucleus & get its PDG code and its mass
      GHepParticle * particle = evrec->Particle(id);
      assert(particle);
      int  pdgc = particle->Pdg();
      bool is_p  = pdg::IsProton (pdgc);
      bool is_n  = pdg::IsNeutron(pdgc);
 
      if (is_p) Z--;
      if (is_p || is_n) A--;
 
      Px += particle->Px();
      Py += particle->Py();
      Pz += particle->Pz();
      E  += particle->E();
 
   }//daughters
 
   TParticlePDG * remn = 0;
   int ipdgc = pdg::IonPdgCode(A, Z);
   remn = PDGLibrary::Instance()->Find(ipdgc);
   if(!remn)
   {
     LOG("HadronicVtx", pFATAL)
           << "No particle with [A = " << A << ", Z = " << Z
                             << ", pdgc = " << ipdgc << "] in PDGLibrary!";
     assert(remn);
   }
 
   double Mi = nucleus->Mass();
   Px *= -1;
   Py *= -1;
   Pz *= -1;
   E = Mi-E;
 
   // Add the nucleus to the event record
   LOG("QELEvent", pINFO)
      << "Adding nucleus [A = " << A << ", Z = " << Z
      << ", pdgc = " << ipdgc << "]";
 
   int imom = evrec->TargetNucleusPosition();
   evrec->AddParticle(
        ipdgc,kIStStableFinalState, imom,-1,-1,-1, Px,Py,Pz,E, 0,0,0,0);
 
   LOG("QELEvent", pINFO) << "Done";
   LOG("QELEvent", pINFO) << *evrec;
 }

double QELEventGeneratorSM::ComputeMaxXSec ( const Interaction * in ) const

privatevirtual

Implements genie::KineGeneratorWithCache.

Definition at line 456 of file QELEventGeneratorSM.cxx.

References genie::Target::A(), e, fkps, fQ2Min, genie::KineGeneratorWithCache::fXSecModel, genie::SmithMonizUtils::GetFermiMomentum(), genie::Interaction::KinePtr(), genie::kKVPn, genie::kKVQ2, genie::kKVv, genie::Range1D_t::max, genie::Range1D_t::min, genie::utils::kinematics::Q2(), genie::SmithMonizUtils::Q2QES_SM_lim(), genie::Kinematics::SetKV(), sm_utils, genie::InitialState::TgtPtr(), genie::SmithMonizUtils::vQES_SM_lim(), genie::SmithMonizUtils::vQES_SM_max(), genie::SmithMonizUtils::vQES_SM_min(), and genie::XSecAlgorithmI::XSec().

Referenced by ComputeMaxXSec().

 {
     double xsec_max = -1;
     double tmp_xsec_max = -1;
     double Q20, v0;
     const int N_Q2 = 32;
     const InitialState & init_state = interaction -> InitState();
     Target * tgt = init_state.TgtPtr();
     bool isHeavyNucleus = tgt->A()>3;
     int N_v = isHeavyNucleus?32:0;
 
     Range1D_t rQ2 = sm_utils->Q2QES_SM_lim();
     const double logQ2min = TMath::Log(TMath::Max(rQ2.min, eps));
     const double logQ2max = TMath::Log(TMath::Min(rQ2.max, fQ2Min));
     Kinematics * kinematics = interaction->KinePtr();
     const double pFmax = sm_utils->GetFermiMomentum();
     // Now scan through kinematical variables Q2,v,kF
     for (int Q2_n=0; Q2_n <= N_Q2; Q2_n++)
     {
        // Scan around Q2
        double Q2 = TMath::Exp(Q2_n*(logQ2max-logQ2min)/N_Q2 + logQ2min);
        kinematics->SetKV(kKVQ2, Q2);
        Range1D_t rv  = sm_utils->vQES_SM_lim(Q2);
        const double logvmin = TMath::Log(TMath::Max(rv.min, eps));
        const double logvmax = TMath::Log(TMath::Max(rv.max, TMath::Max(rv.min, eps)));
        for (int v_n=0; v_n <= N_v; v_n++)
        {
           // Scan around v
           double v = TMath::Exp(v_n*(logvmax-logvmin)/N_v + logvmin);
           kinematics->SetKV(kKVv, v);
           kinematics->SetKV(kKVPn, pFmax);
           // Compute the QE cross section for the current kinematics
           double xs = fXSecModel->XSec(interaction, fkps);
           if (xs > tmp_xsec_max)
           {
              tmp_xsec_max = xs;
              Q20 = Q2;
              v0 =  v;
           }
        } // Done with v scan
     }// Done with Q2 scan
     
     const double Q2min = rQ2.min;
     const double Q2max = TMath::Min(rQ2.max, fQ2Min);
     const double vmin = sm_utils->vQES_SM_min(Q2min, Q2max);
     const double vmax = sm_utils->vQES_SM_max(Q2min, Q2max);
     
     ROOT::Math::Minimizer * min = ROOT::Math::Factory::CreateMinimizer("Minuit", "Minimize");
     ROOT::Math::IBaseFunctionMultiDim * f = isHeavyNucleus?static_cast<ROOT::Math::IBaseFunctionMultiDim*>(new d3XSecSM_dQ2dvdkF_E(fXSecModel, interaction, pFmax)):
                                                            static_cast<ROOT::Math::IBaseFunctionMultiDim*>(new d1XSecSM_dQ2_E(fXSecModel, interaction));
     min->SetFunction( *f );
     min->SetMaxFunctionCalls(10000);  // for Minuit/Minuit2
     min->SetMaxIterations(10000);     // for GSL
     min->SetTolerance(0.001);
     min->SetPrintLevel(0);
     double step = 1e-7;
     min->SetVariable(0, "Q2", Q20, step);
     min->SetVariableLimits(0, Q2min, Q2max);
     if (isHeavyNucleus)
     {
        min->SetVariable(1, "v",  v0,  step);
        min->SetVariableLimits(1, vmin,  vmax);
     }
     min->Minimize();
     xsec_max = -min->MinValue();
     if (tmp_xsec_max > xsec_max)
     {
        xsec_max = tmp_xsec_max;
     }
 
     return xsec_max;
 
 }

double QELEventGeneratorSM::ComputeMaxXSec	(	const Interaction *	in,
		const int	nkey
	)		const

privatevirtual

Reimplemented from genie::KineGeneratorWithCache.

Definition at line 530 of file QELEventGeneratorSM.cxx.

References genie::Target::A(), ComputeMaxXSec(), e, fkps, fQ2Min, genie::KineGeneratorWithCache::fXSecModel, genie::SmithMonizUtils::GetFermiMomentum(), genie::Interaction::KinePtr(), genie::kKVPn, genie::kKVQ2, genie::kKVv, genie::Range1D_t::max, genie::Range1D_t::min, genie::utils::kinematics::Q2(), genie::SmithMonizUtils::Q2QES_SM_lim(), genie::Kinematics::SetKV(), sm_utils, genie::InitialState::TgtPtr(), genie::SmithMonizUtils::vQES_SM_lim(), genie::SmithMonizUtils::vQES_SM_max(), genie::SmithMonizUtils::vQES_SM_min(), and genie::XSecAlgorithmI::XSec().

 {
   switch (nkey){
   case 0:
      return this->ComputeMaxXSec(interaction);
   
   case 1:
   {
      Range1D_t rQ2 = sm_utils->Q2QES_SM_lim();
      if (rQ2.max<fQ2Min)
      {
         return -1.;
      }
      double xsec_max = -1;
      double tmp_xsec_max = -1;
      double Q20, v0;
      const int N_Q2 = 32;
      const InitialState & init_state = interaction -> InitState();
      Target * tgt = init_state.TgtPtr();
      bool isHeavyNucleus = tgt->A()>3;
      int N_v = isHeavyNucleus?32:0;
      
      const double logQ2min = TMath::Log(fQ2Min);
      const double logQ2max = TMath::Log(rQ2.max);
      Kinematics * kinematics = interaction->KinePtr();
      const double pFmax = sm_utils->GetFermiMomentum();
      // Now scan through kinematical variables Q2,v,kF
      for (int Q2_n=0; Q2_n <= N_Q2; Q2_n++)
      {
         // Scan around Q2
         double Q2 = TMath::Exp(Q2_n*(logQ2max-logQ2min)/N_Q2 + logQ2min);
         kinematics->SetKV(kKVQ2, Q2);
         Range1D_t rv  = sm_utils->vQES_SM_lim(Q2);
         const double logvmin = TMath::Log(TMath::Max(rv.min, eps));
         const double logvmax = TMath::Log(TMath::Max(rv.max, TMath::Max(rv.min, eps)));
         for (int v_n=0; v_n <= N_v; v_n++)
         {
            // Scan around v
            double v = TMath::Exp(v_n*(logvmax-logvmin)/N_v + logvmin);
            kinematics->SetKV(kKVv, v);
            kinematics->SetKV(kKVPn, pFmax);
            // Compute the QE cross section for the current kinematics
            double xs = fXSecModel->XSec(interaction, fkps);
            if (xs > tmp_xsec_max)
            {
               tmp_xsec_max = xs;
               Q20 = Q2;
               v0 =  v;
            }
         } // Done with v scan
      }// Done with Q2 scan
      
      const double Q2min = fQ2Min;
      const double Q2max = rQ2.max;
      const double vmin = sm_utils->vQES_SM_min(Q2min, Q2max);
      const double vmax = sm_utils->vQES_SM_max(Q2min, Q2max);
      ROOT::Math::Minimizer * min = ROOT::Math::Factory::CreateMinimizer("Minuit", "Minimize");
      ROOT::Math::IBaseFunctionMultiDim * f = isHeavyNucleus?static_cast<ROOT::Math::IBaseFunctionMultiDim*>(new d3XSecSM_dQ2dvdkF_E(fXSecModel, interaction, pFmax)):
                                                             static_cast<ROOT::Math::IBaseFunctionMultiDim*>(new d1XSecSM_dQ2_E(fXSecModel, interaction));
      min->SetFunction( *f );
      min->SetMaxFunctionCalls(10000);  // for Minuit/Minuit2
      min->SetMaxIterations(10000);     // for GSL
      min->SetTolerance(0.001);
      min->SetPrintLevel(0);
      double step = 1e-7;
      min->SetVariable(0, "Q2", Q20, step);
      min->SetVariableLimits(0, Q2min, Q2max);
      if (isHeavyNucleus)
      {
         min->SetVariable(1, "v",  v0,  step);
         min->SetVariableLimits(1, vmin,  vmax);
      }
      min->Minimize();
      xsec_max = -min->MinValue();
      if (tmp_xsec_max > xsec_max)
      {
         xsec_max = tmp_xsec_max;
      }
      return xsec_max;
   }
   case 2:
   {
      double diffv_max = -1;
      double tmp_diffv_max = -1;
      const int N_Q2 = 100;
      double Q20;
      Range1D_t rQ2 = sm_utils->Q2QES_SM_lim();
      for (int Q2_n = 0; Q2_n<=N_Q2; Q2_n++) // Scan around Q2
      {
         double Q2 = rQ2.min + 1.*Q2_n * (rQ2.max-rQ2.min)/N_Q2;
         Range1D_t rv  = sm_utils->vQES_SM_lim(Q2);
         if (rv.max-rv.min > tmp_diffv_max)
         {
            tmp_diffv_max = rv.max-rv.min;
            Q20 = Q2;
         }
      } // Done with Q2 scan
      
      ROOT::Math::Minimizer * min = ROOT::Math::Factory::CreateMinimizer("Minuit", "Minimize");
      ROOT::Math::IBaseFunctionMultiDim * f = new dv_dQ2_E(interaction);
      min->SetFunction( *f );
      min->SetMaxFunctionCalls(10000);  // for Minuit/Minuit2
      min->SetMaxIterations(10000);     // for GSL
      min->SetTolerance(0.001);
      min->SetPrintLevel(0);
      double step = 1e-7;
      min->SetVariable(0, "Q2", Q20, step);
      min->SetVariableLimits(0, rQ2.min, rQ2.max);
      min->Minimize();
      diffv_max = -min->MinValue();
        
      if (tmp_diffv_max > diffv_max)
      {
         diffv_max = tmp_diffv_max;
      }
      return diffv_max;
   }
   default:
      return -1.;
   }
 }

void QELEventGeneratorSM::Configure ( const Registry & config )

virtual

Configure the algorithm with an external registry The registry is merged with the top level registry if it is owned, Otherwise a copy of it is added with the highest priority

Reimplemented from genie::Algorithm.

Definition at line 407 of file QELEventGeneratorSM.cxx.

References genie::Algorithm::Configure(), and LoadConfig().

 {
   Algorithm::Configure(config);
   this->LoadConfig();
 }

void QELEventGeneratorSM::Configure ( string config )

virtual

Configure the algorithm from the AlgoConfigPool based on param_set string given in input An algorithm contains a vector of registries coming from different xml configuration files, which are loaded according a very precise prioriy This methods will load a number registries in order of priority: 1) "Tunable" parameter set from CommonParametes. This is loaded with the highest prioriry and it is designed to be used for tuning procedure Usage not expected from the user. 2) For every string defined in "CommonParame" the corresponding parameter set will be loaded from CommonParameter.xml 3) parameter set specified by the config string and defined in the xml file of the algorithm 4) if config is not "Default" also the Default parameter set from the same xml file will be loaded Effectively this avoids the repetion of a parameter when it is not changed in the requested configuration

Reimplemented from genie::Algorithm.

Definition at line 413 of file QELEventGeneratorSM.cxx.

References genie::Algorithm::Configure(), LoadConfig(), and genie::Registry::Set().

 {
   Algorithm::Configure(config);
 
   Registry r( "QELEventGeneratorSM_specific", false ) ;
   r.Set( "sm_utils_algo", RgAlg("genie::SmithMonizUtils","Default") ) ;
 
   Algorithm::Configure(r) ;
 
   this->LoadConfig();
 }

void QELEventGeneratorSM::LoadConfig ( void )

private

Definition at line 425 of file QELEventGeneratorSM.cxx.

References genie::KineGeneratorWithCache::fEMin, fGenerateNucleonInNucleus, genie::KineGeneratorWithCache::fGenerateUniformly, genie::KineGeneratorWithCache::fMaxXSecDiffTolerance, genie::KineGeneratorWithCache::fNumOfInterpolatorTypes, genie::KineGeneratorWithCache::fNumOfSafetyFactors, fQ2Min, genie::Algorithm::GetParamDef(), genie::Algorithm::GetParamVect(), sm_utils, genie::Algorithm::SubAlg(), genie::KineGeneratorWithCache::vInterpolatorTypes, and genie::KineGeneratorWithCache::vSafetyFactors.

Referenced by Configure().

 {
 
   // Safety factors for the maximum differential cross section 
   fNumOfSafetyFactors = GetParamVect("Safety-Factors", vSafetyFactors, false);
   
   // Interpolator types for the maximum differential cross section 
   fNumOfInterpolatorTypes = GetParamVect("Interpolator-Types", vInterpolatorTypes, false);
   
 
   // Minimum energy for which max xsec would be cached, forcing explicit
   // calculation for lower eneries
   GetParamDef( "Cache-MinEnergy", fEMin, 1.00) ;
   GetParamDef( "Threshold-Q2", fQ2Min, 2.00);
 
   // Maximum allowed fractional cross section deviation from maxim cross
   // section used in rejection method
   GetParamDef( "MaxXSec-DiffTolerance", fMaxXSecDiffTolerance, 999999.);
   assert(fMaxXSecDiffTolerance>=0);
 
   //-- Generate kinematics uniformly over allowed phase space and compute
   //   an event weight?
   GetParamDef( "UniformOverPhaseSpace", fGenerateUniformly, false);
 
   // Generate nucleon in nucleus?
   GetParamDef( "IsNucleonInNucleus", fGenerateNucleonInNucleus, true);
 
 
   sm_utils = const_cast<genie::SmithMonizUtils *>(dynamic_cast<const genie::SmithMonizUtils *>( this -> SubAlg("sm_utils_algo") ) ) ;
 }

void QELEventGeneratorSM::ProcessEventRecord ( GHepRecord * event_rec ) const

virtual

Implements genie::EventRecordVisitorI.

Definition at line 82 of file QELEventGeneratorSM.cxx.

References genie::Target::A(), genie::GHepRecord::AddParticle(), AddTargetNucleusRemnant(), genie::KineGeneratorWithCache::AssertXSecLimits(), genie::Kinematics::ClearRunningValues(), genie::EventGeneratorI::CrossSectionAlg(), genie::GHepRecord::EventFlags(), fGenerateNucleonInNucleus, genie::KineGeneratorWithCache::fGenerateUniformly, genie::PDGLibrary::Find(), fkps, fQ2Min, genie::Interaction::FSPrimLeptonPdg(), genie::KineGeneratorWithCache::fXSecModel, genie::gAbortingInErr, genie::SmithMonizUtils::GetBindingEnergy(), genie::SmithMonizUtils::GetFermiMomentum(), genie::GHepParticle::GetP4(), genie::GHepRecord::HitNucleon(), genie::GHepRecord::HitNucleonPosition(), genie::Target::HitNucP4(), genie::Target::HitNucP4Ptr(), genie::Interaction::InitState(), genie::RunningThreadInfo::Instance(), genie::RandomGen::Instance(), genie::PDGLibrary::Instance(), genie::Target::IsNucleus(), genie::SmithMonizUtils::kFQES_SM_lim(), genie::Interaction::KinePtr(), genie::kISkipKinematicChk, genie::kISkipProcessChk, genie::kIStHadronInTheNucleus, genie::kIStStableFinalState, genie::kKineGenErr, genie::kKVPn, genie::kKVQ2, genie::kKVv, genie::kPSQ2fE, genie::kPSQ2vpfE, genie::kRfHitNucRest, genie::controls::kRjMaxIterations, LOG, genie::Range1D_t::max, genie::KineGeneratorWithCache::MaxXSec(), genie::Range1D_t::min, pFATAL, genie::SmithMonizUtils::PhaseSpaceVolume(), pINFO, pNOTICE, genie::GHepRecord::Probe(), genie::InitialState::ProbeE(), genie::GHepRecord::ProbePosition(), pWARN, genie::utils::kinematics::Q2(), genie::SmithMonizUtils::Q2QES_SM_lim(), genie::Interaction::RecoilNucleonPdg(), genie::RandomGen::RndGen(), genie::RandomGen::RndKine(), genie::RunningThreadInfo::RunningThread(), genie::GHepRecord::SetDiffXSec(), genie::Target::SetHitNucPosition(), genie::SmithMonizUtils::SetInteraction(), genie::Kinematics::SetKV(), genie::GHepParticle::SetMomentum(), genie::utils::SetPrimaryLeptonPolarization(), genie::Kinematics::SetQ2(), genie::exceptions::EVGThreadException::SetReason(), genie::GHepParticle::SetRemovalEnergy(), genie::Kinematics::SetW(), genie::GHepRecord::SetWeight(), genie::Kinematics::Setx(), genie::Kinematics::Sety(), sm_utils, genie::GHepRecord::Summary(), genie::exceptions::EVGThreadException::SwitchOnFastForward(), genie::InitialState::Tgt(), genie::InitialState::TgtPtr(), genie::SmithMonizUtils::vQES_SM_lim(), genie::utils::kinematics::W(), genie::GHepRecord::Weight(), genie::utils::kinematics::WQ2toXY(), genie::GHepParticle::X4(), genie::XSecAlgorithmI::XSec(), and genie::GHepRecord::XSec().

 {
   LOG("QELEvent", pINFO) << "Generating QE event kinematics...";
 
   if(fGenerateUniformly) {
     LOG("QELEvent", pNOTICE)
           << "Generating kinematics uniformly over the allowed phase space";
   }
   // Get the interaction and set the 'trust' bits
   Interaction * interaction = evrec->Summary();
   const InitialState & init_state = interaction -> InitState();
   interaction->SetBit(kISkipProcessChk);
   interaction->SetBit(kISkipKinematicChk);
 
   // Skip if no hit nucleon is set
   if(! evrec->HitNucleon())
   {
     LOG("QELEvent", pFATAL) << "No hit nucleon was set";
     gAbortingInErr = true;
     exit(1);
   }
 
   // Access the target from the interaction summary
   Target * tgt = init_state.TgtPtr();
   GHepParticle * nucleon = evrec->HitNucleon();
   // Store position of nucleon
   double hitNucPos = nucleon->X4()->Vect().Mag();
   tgt->SetHitNucPosition( hitNucPos );
 
   // Get the random number generators
   RandomGen * rnd = RandomGen::Instance();
 
   // Access cross section algorithm for running thread
   RunningThreadInfo * rtinfo = RunningThreadInfo::Instance();
   const EventGeneratorI * evg = rtinfo->RunningThread();
   fXSecModel = evg->CrossSectionAlg();
 
   // heavy nucleus is nucleus that heavier than tritium or 3He.
   bool isHeavyNucleus = tgt->A()>3;
 
   sm_utils->SetInteraction(interaction);
   // phase space for heavy nucleus is different from light one
   fkps = isHeavyNucleus?kPSQ2vpfE:kPSQ2fE;
   Range1D_t rQ2 = sm_utils->Q2QES_SM_lim();
   // Try to calculate the maximum cross-section in kinematical limits
   // if not pre-computed already
   double xsec_max1  = fGenerateUniformly ? -1 : this->MaxXSec(evrec);
   // this make correct calculation of probability
   double xsec_max2  = fGenerateUniformly ? -1 : (rQ2.max<fQ2Min)? 0:this->MaxXSec(evrec, 1);
   double dvmax= isHeavyNucleus ? this->MaxXSec(evrec, 2) : 0.;
 
 
   // generate Q2, v, pF
   double Q2, v, kF, xsec;
   unsigned int iter = 0;
   bool accept = false;
   TLorentzVector q;
   while(1)
   {
      LOG("QELEvent", pINFO) << "Attempt #: " << iter;
      if(iter > 100*kRjMaxIterations)
      {
         LOG("QELEvent", pWARN)
           << "Couldn't select a valid kinematics after " << iter << " iterations";
         evrec->EventFlags()->SetBitNumber(kKineGenErr, true);
         genie::exceptions::EVGThreadException exception;
         exception.SetReason("Couldn't select kinematics");
         exception.SwitchOnFastForward();
         throw exception;
      }
 
       // Pick Q2, v and pF
      double xsec_max = 0.;
      double pth = rnd->RndKine().Rndm();
      //pth < prob1/(prob1+prob2), where prob1,prob2 - probabilities to generate event in area1 (Q2<fQ2Min) and area2 (Q2>fQ2Min) which are not normalized
      if (pth <= xsec_max1*(TMath::Min(rQ2.max, fQ2Min)-rQ2.min)/(xsec_max1*(TMath::Min(rQ2.max, fQ2Min)-rQ2.min)+xsec_max2*(rQ2.max-fQ2Min)))
      {
        xsec_max = xsec_max1;
        Q2 = (rnd->RndKine().Rndm() * (TMath::Min(rQ2.max, fQ2Min)-rQ2.min)) + rQ2.min;
      }
      else
      {
         xsec_max = xsec_max2;
         Q2 = (rnd->RndKine().Rndm() * (rQ2.max-fQ2Min)) + fQ2Min;
      }
      Range1D_t rv  = sm_utils->vQES_SM_lim(Q2);
      // for nuclei heavier than deuterium generate energy transfer in defined energy interval
      double dv = 0.;
      if (isHeavyNucleus)
      {
        dv = dvmax * rnd->RndKine().Rndm(); 
        if (dv > (rv.max-rv.min))
        {
           continue;
        }
      }
      v = rv.min + dv;
      
      Range1D_t rkF = sm_utils->kFQES_SM_lim(Q2, v);
      // rkF.max = Fermi momentum
      kF = rnd->RndKine().Rndm()*sm_utils->GetFermiMomentum();
      if (kF < rkF.min)
      {
         continue;
      }
 
      Kinematics * kinematics = interaction->KinePtr();
      kinematics->SetKV(kKVQ2, Q2);
      kinematics->SetKV(kKVv, v);
      kinematics->SetKV(kKVPn, kF);
      xsec = fXSecModel->XSec(interaction, fkps);
      //-- Decide whether to accept the current kinematics
      if(!fGenerateUniformly)
      {
        this->AssertXSecLimits(interaction, xsec, xsec_max);
        double t = xsec_max * rnd->RndKine().Rndm();
 
        accept = (t < xsec);
      }
      else
      {
         accept = (xsec>0);
      }
 
      // If the generated kinematics are accepted, finish-up module's job
      if(accept)
      {
        interaction->ResetBit(kISkipProcessChk);
        interaction->ResetBit(kISkipKinematicChk);
        break;
      }
      iter++;
   }
 
   // Z-frame is frame where momentum transfer is (v,0,0,qv)
   double qv = TMath::Sqrt(v*v+Q2);
   TLorentzVector transferMom(0, 0, qv, v);
 
   // Momentum of initial neutrino in LAB frame
   TLorentzVector * tempTLV = evrec->Probe()->GetP4();
   TLorentzVector neutrinoMom = *tempTLV;
   delete tempTLV;
 
   // define all angles in Z frame
   double theta = neutrinoMom.Vect().Theta();
   double phi =   neutrinoMom.Vect().Phi();
   double theta_k = sm_utils-> GetTheta_k(v, qv);
   double costheta_k = TMath::Cos(theta_k);
   double sintheta_k = TMath::Sin(theta_k);
   double E_p; //energy of initial nucleon
   double theta_p = sm_utils-> GetTheta_p(kF, v, qv, E_p);
   double costheta_p = TMath::Cos(theta_p);
   double sintheta_p = TMath::Sin(theta_p);
   double fi_p       = 2 * TMath::Pi() * rnd->RndGen().Rndm();
   double cosfi_p    = TMath::Cos(fi_p);
   double sinfi_p    = TMath::Sin(fi_p);
   double psi       = 2 * TMath::Pi() * rnd->RndGen().Rndm();
 
   // 4-momentum of initial neutrino in Z-frame
   TLorentzVector neutrinoMomZ(neutrinoMom.P()*sintheta_k, 0, neutrinoMom.P()*costheta_k, neutrinoMom.E());
 
   // 4-momentum of final lepton in Z-frame
   TLorentzVector outLeptonMom = neutrinoMomZ-transferMom;
 
   // 4-momentum of initial nucleon in Z-frame
   TLorentzVector inNucleonMom(kF*sintheta_p*cosfi_p, kF*sintheta_p*sinfi_p, kF*costheta_p, E_p);
 
   // 4-momentum of final nucleon in Z-frame
   TLorentzVector outNucleonMom = inNucleonMom+transferMom;
 
   // Rotate all vectors from Z frame to LAB frame
   TVector3 yvec (0.0, 1.0, 0.0);
   TVector3 zvec (0.0, 0.0, 1.0);
   TVector3 unit_nudir = neutrinoMom.Vect().Unit();
 
   outLeptonMom.Rotate(theta-theta_k, yvec);
   outLeptonMom.Rotate(phi, zvec);
 
   inNucleonMom.Rotate(theta-theta_k, yvec);
   inNucleonMom.Rotate(phi, zvec);
 
   outNucleonMom.Rotate(theta-theta_k, yvec);
   outNucleonMom.Rotate(phi, zvec);
 
   outLeptonMom.Rotate(psi, unit_nudir);
   inNucleonMom.Rotate(psi, unit_nudir);
   outNucleonMom.Rotate(psi, unit_nudir);
 
   // set 4-momentum of struck nucleon
   TLorentzVector * p4 = tgt->HitNucP4Ptr();
   p4->SetPx( inNucleonMom.Px() );
   p4->SetPy( inNucleonMom.Py() );
   p4->SetPz( inNucleonMom.Pz() );
   p4->SetE ( inNucleonMom.E() );
 
   int rpdgc = interaction->RecoilNucleonPdg();
   assert(rpdgc);
   double W = PDGLibrary::Instance()->Find(rpdgc)->Mass();
   LOG("QELEvent", pNOTICE) << "Selected: W = "<< W;
   double M = init_state.Tgt().HitNucP4().M();
   double E  = init_state.ProbeE(kRfHitNucRest);
 
   // (W,Q2) -> (x,y)
   double x=0, y=0;
   kinematics::WQ2toXY(E,M,W,Q2,x,y);
 
   // lock selected kinematics & clear running values
   interaction->KinePtr()->SetQ2(Q2, true);
   interaction->KinePtr()->SetW (W,  true);
   interaction->KinePtr()->Setx (x,  true);
   interaction->KinePtr()->Sety (y,  true);
   interaction->KinePtr()->ClearRunningValues();
 
   // set the cross section for the selected kinematics
   evrec->SetDiffXSec(xsec,fkps);
   if(fGenerateUniformly)
   {
      double vol     = sm_utils->PhaseSpaceVolume(fkps);
      double totxsec = evrec->XSec();
      double wght    = (vol/totxsec)*xsec;
      LOG("QELEvent", pNOTICE)  << "Kinematics wght = "<< wght;
 
      // apply computed weight to the current event weight
      wght *= evrec->Weight();
      LOG("QELEvent", pNOTICE) << "Current event wght = " << wght;
      evrec->SetWeight(wght);
   }
   TLorentzVector x4l(*(evrec->Probe())->X4());
 
   // Add the final-state lepton to the event record
   evrec->AddParticle(interaction->FSPrimLeptonPdg(), kIStStableFinalState, evrec->ProbePosition(),-1,-1,-1, outLeptonMom, x4l);
 
   // Set its polarization
   utils::SetPrimaryLeptonPolarization( evrec );
 
   GHepStatus_t ist;
   if (!fGenerateNucleonInNucleus)
      ist = kIStStableFinalState;
   else
      ist = (tgt->IsNucleus() && isHeavyNucleus) ? kIStHadronInTheNucleus : kIStStableFinalState;
 
   GHepParticle outNucleon(interaction->RecoilNucleonPdg(), ist, evrec->HitNucleonPosition(),-1,-1,-1, outNucleonMom , x4l);
   evrec->AddParticle(outNucleon);
 
   // Store struck nucleon momentum
   LOG("QELEvent",pNOTICE) << "pn: " << inNucleonMom.X() << ", " <<inNucleonMom.Y() << ", " <<inNucleonMom.Z() << ", " <<inNucleonMom.E();
   nucleon->SetMomentum(inNucleonMom);
   nucleon->SetRemovalEnergy(sm_utils->GetBindingEnergy());
 
   // skip if not a nuclear target
   if(evrec->Summary()->InitState().Tgt().IsNucleus())
     // add a recoiled nucleus remnant
     this->AddTargetNucleusRemnant(evrec);
 
   LOG("QELEvent", pINFO) << "Done generating QE event kinematics!";
 }