#include <GRV98LO.h>

Inheritance diagram for genie::GRV98LO:

Collaboration diagram for genie::GRV98LO:

Public Member Functions
	GRV98LO ()

	GRV98LO (string config)

	~GRV98LO ()

double	UpValence (double x, double Q2) const

double	DownValence (double x, double Q2) const

double	UpSea (double x, double Q2) const

double	DownSea (double x, double Q2) const

double	Strange (double x, double Q2) const

double	Charm (double x, double Q2) const

double	Bottom (double x, double Q2) const

double	Top (double x, double Q2) const

double	Gluon (double x, double Q2) const

PDF_t	AllPDFs (double x, double Q2) const

void	Configure (const Registry &config)

void	Configure (string config)

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

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	Initialize (void)

Private Attributes
bool	fInitialized

double	fGridQ2 [kNQ2]

double	fGridLogQ2 [kNQ2]

double	fGridXbj [kNXbj]

double	fGridLogXbj [kNXbj]

double	fParton [kNParton][kNQ2][kNXbj-1]

Interpolator2D *	fXUVF

Interpolator2D *	fXDVF

Interpolator2D *	fXDEF

Interpolator2D *	fXUDF

Interpolator2D *	fXSF

Interpolator2D *	fXGF

Static Private Attributes
static const int	kNQ2 = 27

static const int	kNXbj = 68

static const int	kNParton = 6

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::PDFModelI
	PDFModelI ()

	PDFModelI (string name)

	PDFModelI (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::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

Definition at line 37 of file GRV98LO.h.

Constructor & Destructor Documentation

GRV98LO::GRV98LO ( )

Definition at line 25 of file GRV98LO.cxx.

References Initialize().

                  :
 PDFModelI("genie::GRV98LO"),
  fXUVF(NULL),
  fXDVF(NULL),
  fXDEF(NULL),
  fXUDF(NULL),
  fXSF (NULL),
  fXGF (NULL)
 {
   this->Initialize();
 }

GRV98LO::GRV98LO ( string config )

Definition at line 37 of file GRV98LO.cxx.

References genie::Algorithm::GetConfig(), Initialize(), LOG, and pDEBUG.

                               :
 PDFModelI("genie::GRV98LO", config),
  fXUVF(NULL),
  fXDVF(NULL),
  fXDEF(NULL),
  fXUDF(NULL),
  fXSF (NULL),
  fXGF (NULL)
 {
   LOG("GRV98LO", pDEBUG) << "GRV98LO configuration:\n " << GetConfig() ;
 
   this->Initialize();
 }

GRV98LO::~GRV98LO ( )

Definition at line 51 of file GRV98LO.cxx.

References fXDEF, fXDVF, fXGF, fXSF, fXUDF, and fXUVF.

 {
   if (fXUVF) {delete fXUVF; fXUVF = NULL;}
   if (fXDVF) {delete fXDVF; fXDVF = NULL;}
   if (fXDEF) {delete fXDEF; fXDEF = NULL;}
   if (fXUDF) {delete fXUDF; fXUDF = NULL;}
   if (fXSF ) {delete fXSF ; fXSF  = NULL;}
   if (fXGF ) {delete fXGF ; fXGF  = NULL;}
 }

Member Function Documentation

PDF_t GRV98LO::AllPDFs	(	double	x,
		double	Q2
	)		const

virtual

Implements genie::PDFModelI.

Definition at line 106 of file GRV98LO.cxx.

References genie::Interpolator2D::Eval(), fGridQ2, fGridXbj, fInitialized, fXDEF, fXDVF, fXGF, fXSF, fXUDF, fXUVF, kNQ2, kNXbj, LOG, pDEBUG, pWARN, genie::utils::kinematics::Q2(), and genie::units::us.

Referenced by Bottom(), Charm(), DownSea(), DownValence(), Gluon(), Strange(), Top(), UpSea(), and UpValence().

 {
   PDF_t pdf;
 
   if(!fInitialized) {
     LOG("GRV98LO", pWARN)
       << "GRV98LO algorithm was not initialized succesfully";
     pdf.uval = 0.;
     pdf.dval = 0.;
     pdf.usea = 0.;
     pdf.dsea = 0.;
     pdf.str  = 0.;
     pdf.chm  = 0.;
     pdf.bot  = 0.;
     pdf.top  = 0.;
     pdf.gl   = 0.;
     return pdf;
   }
 
   LOG("GRV98LO", pDEBUG)
     << "Inputs x = " << x << ", Q2 = " << Q2;
 
   // apply kinematical limits
 //Q2 = TMath::Max(Q2, fGridQ2[0]);
   if(Q2 <= 0.8) Q2 = 0.80001;
   Q2 = std::min(Q2, fGridQ2[kNQ2-1]);
   x  = std::max(x,  fGridXbj[0]);
   x  = std::min(x,  fGridXbj[kNXbj-1]);
 
   double logx  = std::log(x);
   double logQ2 = std::log(Q2);
   double x1    = 1-x;
   double xv    = std::sqrt(x);
   double xs    = std::pow(x, -0.2);
   double x1p3  = x1*x1*x1;
   double x1p4  = x1*x1p3;
   double x1p5  = x1*x1p4;
   double x1p7  = x1p3*x1p4;
 
   double uv = fXUVF->Eval(logx,logQ2) * x1p3 * xv;
   double dv = fXDVF->Eval(logx,logQ2) * x1p4 * xv;
   double de = fXDEF->Eval(logx,logQ2) * x1p7 * xv;
   double ud = fXUDF->Eval(logx,logQ2) * x1p7 * xs;
   double us = 0.5 * (ud - de);
   double ds = 0.5 * (ud + de);
   double ss = fXSF->Eval(logx,logQ2)  * x1p7 * xs;
   double gl = fXGF->Eval(logx,logQ2)  * x1p5 * xs;
 
   pdf.uval = uv;
   pdf.dval = dv;
   pdf.usea = us;
   pdf.dsea = ds;
   pdf.str  = ss;
   pdf.chm  = 0.;
   pdf.bot  = 0.;
   pdf.top  = 0.;
   pdf.gl   = gl;
 
   return pdf;
 }

double GRV98LO::Bottom	(	double	x,
		double	Q2
	)		const

virtual

Implements genie::PDFModelI.

Definition at line 91 of file GRV98LO.cxx.

References AllPDFs().

 {
   return AllPDFs(x,Q2).bot;
 }

double GRV98LO::Charm	(	double	x,
		double	Q2
	)		const

virtual

Implements genie::PDFModelI.

Definition at line 86 of file GRV98LO.cxx.

References AllPDFs().

 {
   return AllPDFs(x,Q2).chm;
 }

void GRV98LO::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 167 of file GRV98LO.cxx.

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

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

void GRV98LO::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 173 of file GRV98LO.cxx.

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

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

double GRV98LO::DownSea	(	double	x,
		double	Q2
	)		const

virtual

Implements genie::PDFModelI.

Definition at line 76 of file GRV98LO.cxx.

References AllPDFs().

 {
   return AllPDFs(x,Q2).dsea;
 }

double GRV98LO::DownValence	(	double	x,
		double	Q2
	)		const

virtual

Implements genie::PDFModelI.

Definition at line 66 of file GRV98LO.cxx.

References AllPDFs().

 {
   return AllPDFs(x,Q2).dval;
 }

double GRV98LO::Gluon	(	double	x,
		double	Q2
	)		const

virtual

Implements genie::PDFModelI.

Definition at line 101 of file GRV98LO.cxx.

References AllPDFs().

 {
   return AllPDFs(x,Q2).gl;
 }

void GRV98LO::Initialize ( void )

private

Definition at line 179 of file GRV98LO.cxx.

References fGridLogQ2, fGridLogXbj, fGridQ2, fGridXbj, fInitialized, fParton, fXDEF, fXDVF, fXGF, fXSF, fXUDF, fXUVF, genie_dir(), kNQ2, kNXbj, LOG, pDEBUG, pNOTICE, and genie::utils::kinematics::Q2().

Referenced by Configure(), and GRV98LO().

 {
   fInitialized = false;
 
   const char * genie_dir = gSystem->Getenv("GENIE");
   if(!genie_dir) return;
 
   string grid_file_name =
      string(gSystem->Getenv("GENIE")) + string("/data/evgen/pdfs/GRV98lo_patched.LHgrid");
 
   LOG("GRV98LO", pNOTICE)
     << "Reading grid file from:\n " << grid_file_name;
 
   ifstream grid_file;
   grid_file.open (grid_file_name.c_str());
 
   char rubbish[1000];
 
   const int nskip = 21;
   for(int i=0; i<nskip; i++) {
    grid_file.getline(rubbish,1000);
    LOG("GRV98LO", pDEBUG) << "Skipping: " << rubbish;
   }
 
   // x's
   //
 
   LOG("GRV98LO", pDEBUG) << "Reading x_bj grid values";
   for(int j=0; j < kNXbj; j++) {
     double xbj = -1;
     grid_file >> xbj;
     // check against known limits
     // ...
     fGridXbj[j] = xbj;
     fGridLogXbj[j] = TMath::Log(xbj);
   }
   ostringstream grid_values;
   grid_values << "(";
   for(int j=0; j < kNXbj; j++) {
     grid_values << fGridXbj[j];
     if(j == kNXbj - 1) { grid_values << ")";  }
     else               { grid_values << ", "; }
   }
   LOG("GRV98LO", pDEBUG)
     << "x_bj grid values: " << grid_values.str();
 
   // Q^2s
   //
 
   LOG("GRV98LO", pDEBUG) << "Reading Q^2 grid values.";
   for(int i=0; i < kNQ2; i++) {
     double Q2 = -1;
     grid_file >> Q2;
     // check against known limits
     // ...
     fGridQ2[i] = Q2;
     fGridLogQ2[i] = TMath::Log(Q2);
   }
   grid_values.str("");
   grid_values << "(";
   for(int i=0; i < kNQ2; i++) {
     grid_values << fGridQ2[i];
     if(i == kNQ2 - 1) { grid_values << ")";  }
     else              { grid_values << ", "; }
   }
   LOG("GRV98LO", pDEBUG)
     << "Q^2 grid values: " << grid_values.str() << "GeV^2";
 
   // skip again
   grid_file.getline(rubbish,1000);
   LOG("GRV98LO", pDEBUG) << "Skipping: " << rubbish;
   grid_file.getline(rubbish,1000);
   LOG("GRV98LO", pDEBUG) << "Skipping: " << rubbish;
 
   // pdf values on grid points
   //
 
   LOG("GRV98LO", pDEBUG) << "Reading PDF values on grid points";
 
   int k=0;
   for(int j=0; j < kNXbj-1; j++) {
     for(int i=0; i < kNQ2; i++) {
       double p0 = 0;
       double p1 = 0;
       double p2 = 0;
       double p3 = 0;
       double p4 = 0;
       double p5 = 0;
       grid_file >> p0 >> p1 >> p2 >> p3 >> p4 >> p5;
       LOG("GRV98LO", pDEBUG)
          << "Row: " << k << ", grid point: (" << i << ", " << j << ") ->"
          << "  p0 = " << p0
          << ", p1 = " << p1
          << ", p2 = " << p2
          << ", p3 = " << p3
          << ", p4 = " << p4
          << ", p5 = " << p5;
       fParton [0][i][j]  = p0;
       fParton [1][i][j]  = p1;
       fParton [2][i][j]  = p2;
       fParton [3][i][j]  = p3;
       fParton [4][i][j]  = p4;
       fParton [5][i][j]  = p5;
       k++;
     }
   }
 
   grid_file.close();
 
   // arrays for interpolation routines
   //
 
   vector<double> gridLogQ2 (kNQ2);
   vector<double> gridLogXbj(kNXbj);
   vector<double> knotsXUVF(kNQ2*kNXbj);
   vector<double> knotsXDVF(kNQ2*kNXbj);
   vector<double> knotsXDEF(kNQ2*kNXbj);
   vector<double> knotsXUDF(kNQ2*kNXbj);
   vector<double> knotsXSF (kNQ2*kNXbj);
   vector<double> knotsXGF (kNQ2*kNXbj);
 
   k=0;
   for(int i=0; i < kNQ2; i++) {
     double logQ2 = std::log(fGridQ2[i]);
     gridLogQ2[i] = logQ2;
     for(int j=0; j < kNXbj - 1; j++) {
        double logx  = std::log(fGridXbj[j]);
        gridLogXbj[j] = logx;
        double xb0v  = std::sqrt(fGridXbj[j]);
        double xb0s  = std::pow(fGridXbj[j], -0.2);
        double xb1   = 1 - fGridXbj[j];
        double xb1p3 = std::pow(xb1, 3.);
        double xb1p4 = std::pow(xb1, 4.);
        double xb1p5 = std::pow(xb1, 5.);
        double xb1p7 = std::pow(xb1, 7.);
        knotsXUVF[k] = fParton[0][i][j] / (xb1p3 * xb0v);
        knotsXDVF[k] = fParton[1][i][j] / (xb1p4 * xb0v);
        knotsXDEF[k] = fParton[2][i][j] / (xb1p7 * xb0v);
        knotsXUDF[k] = fParton[3][i][j] / (xb1p7 * xb0s);
        knotsXSF [k] = fParton[4][i][j] / (xb1p7 * xb0s);
        knotsXGF [k] = fParton[5][i][j] / (xb1p5 * xb0s);
        k++;
     }
     double logxmax = TMath::Log(fGridXbj[kNXbj-1]);
     gridLogXbj[kNXbj-1] = logxmax;
     knotsXUVF[k] = 0;
     knotsXDVF[k] = 0;
     knotsXDEF[k] = 0;
     knotsXUDF[k] = 0;
     knotsXSF [k] = 0;
     knotsXGF [k] = 0;
     k++;
   }
 
   fXUVF = new Interpolator2D(gridLogXbj.size(),&gridLogXbj[0],gridLogQ2.size(),&gridLogQ2[0],&knotsXUVF[0]);
   fXDVF = new Interpolator2D(gridLogXbj.size(),&gridLogXbj[0],gridLogQ2.size(),&gridLogQ2[0],&knotsXDVF[0]);
   fXDEF = new Interpolator2D(gridLogXbj.size(),&gridLogXbj[0],gridLogQ2.size(),&gridLogQ2[0],&knotsXDEF[0]);
   fXUDF = new Interpolator2D(gridLogXbj.size(),&gridLogXbj[0],gridLogQ2.size(),&gridLogQ2[0],&knotsXUDF[0]);
   fXSF  = new Interpolator2D(gridLogXbj.size(),&gridLogXbj[0],gridLogQ2.size(),&gridLogQ2[0],&knotsXSF [0]);
   fXGF  = new Interpolator2D(gridLogXbj.size(),&gridLogXbj[0],gridLogQ2.size(),&gridLogQ2[0],&knotsXGF [0]);
 
   fInitialized = true;
 }