Import Geant4 9.0.0 source tree
This commit is contained in:
Gabriele Cosmo
@@ -24,7 +24,7 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
// $Id: G4BGGNucleonElasticXS.cc,v 1.1 2007/03/13 15:19:30 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
// -------------------------------------------------------------------
|
||||
//
|
||||
|
||||
@@ -24,7 +24,7 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
// $Id: G4BGGNucleonInelasticXS.cc,v 1.1 2007/03/13 15:19:30 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
// -------------------------------------------------------------------
|
||||
//
|
||||
|
||||
@@ -24,7 +24,7 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
// $Id: G4BGGPionElasticXS.cc,v 1.1 2007/03/13 15:19:30 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
// -------------------------------------------------------------------
|
||||
//
|
||||
|
||||
@@ -24,7 +24,7 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
// $Id: G4BGGPionInelasticXS.cc,v 1.1 2007/03/13 15:19:30 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
// -------------------------------------------------------------------
|
||||
//
|
||||
|
||||
@@ -24,8 +24,8 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// $Id: G4ElectroNuclearCrossSection.cc,v 1.26 2006/12/28 04:34:12 dennis Exp $
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// $Id: G4ElectroNuclearCrossSection.cc,v 1.27 2007/06/15 16:36:39 gcosmo Exp $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Physics class: G4ElectroNuclearCrossSection for gamma+A cross sections
|
||||
@@ -43,7 +43,7 @@
|
||||
|
||||
#include "G4ElectroNuclearCrossSection.hh"
|
||||
|
||||
// Initialization of the
|
||||
// Initialization of statics
|
||||
G4double G4ElectroNuclearCrossSection::lastE=0.; // Last used in the cross section TheEnergy
|
||||
G4int G4ElectroNuclearCrossSection::lastF=0; // Last used in the cross section TheFirstBin
|
||||
G4double G4ElectroNuclearCrossSection::lastG=0.; // Last used in the cross section TheGamma
|
||||
@@ -57,6 +57,28 @@ G4int G4ElectroNuclearCrossSection::lastZ=0; // The last Z of calculated n
|
||||
G4double G4ElectroNuclearCrossSection::lastTH=0.; // Last energy threshold
|
||||
G4double G4ElectroNuclearCrossSection::lastSig=0.;// Last value of the Cross Section
|
||||
|
||||
std::vector<G4double*> G4ElectroNuclearCrossSection::J1; // Vector of pointers to the J1 tabulated functions
|
||||
std::vector<G4double*> G4ElectroNuclearCrossSection::J2; // Vector of pointers to the J2 tabulated functions
|
||||
std::vector<G4double*> G4ElectroNuclearCrossSection::J3; // Vector of pointers to the J3 tabulated functions
|
||||
|
||||
G4ElectroNuclearCrossSection::G4ElectroNuclearCrossSection()
|
||||
{
|
||||
}
|
||||
|
||||
G4ElectroNuclearCrossSection::~G4ElectroNuclearCrossSection()
|
||||
{
|
||||
std::vector<G4double*>::iterator pos;
|
||||
for(pos=J1.begin(); pos<J1.end(); pos++)
|
||||
{ delete [] *pos; }
|
||||
J1.clear();
|
||||
for(pos=J2.begin(); pos<J2.end(); pos++)
|
||||
{ delete [] *pos; }
|
||||
J2.clear();
|
||||
for(pos=J3.begin(); pos<J3.end(); pos++)
|
||||
{ delete [] *pos; }
|
||||
J3.clear();
|
||||
}
|
||||
|
||||
// The main member function giving the gamma-A cross section
|
||||
// (E in GeV, CS in mb)
|
||||
|
||||
@@ -113,9 +135,6 @@ G4ElectroNuclearCrossSection::GetIsoZACrossSection(const G4DynamicParticle* aPar
|
||||
static std::vector <G4int> colF; // Vector of Last StartPosition in the Ji-function tables
|
||||
static std::vector <G4double> colTH; // Vector of the energy thresholds for the eA->eX reactions
|
||||
static std::vector <G4double> colH; // Vector of HighEnergyCoefficients (functional calculations)
|
||||
static std::vector <G4double*> J1; // Vector of pointers to the J1 tabulated functions
|
||||
static std::vector <G4double*> J2; // Vector of pointers to the J2 tabulated functions
|
||||
static std::vector <G4double*> J3; // Vector of pointers to the J3 tabulated functions
|
||||
// *** End of Static Definitions (Associative Memory) ***
|
||||
const G4double Energy = aPart->GetKineticEnergy()/MeV; // Energy of the electron
|
||||
const G4int targetAtomicNumber = static_cast<int>(AA+.499); //@@ Nat mixture (?!)
|
||||
|
||||
@@ -148,8 +148,8 @@ GetCrossSection(const G4DynamicParticle* aParticle, const G4Element* anElement,
|
||||
//
|
||||
// Calculates total and inelastic Xsc, derives elastic as total - inelastic accordong to
|
||||
// Glauber model with Gribov correction calculated in the dipole approximation on
|
||||
// light cone. Gaussian density helps to calculate rest integrals of the model.
|
||||
// [1] B.Z. Kopeliovich, nucl-th/0306044
|
||||
// light cone. Gaussian density of point-like nucleons helps to calculate rest integrals of the model.
|
||||
// [1] B.Z. Kopeliovich, nucl-th/0306044 + simplification above
|
||||
|
||||
|
||||
|
||||
@@ -166,16 +166,19 @@ GetIsoZACrossSection(const G4DynamicParticle* aParticle, G4double Z, G4double A,
|
||||
theParticle == thePiPlus ||
|
||||
theParticle == thePiMinus )
|
||||
{
|
||||
sigma = GetHadronNucleaonXscNS(aParticle, A, Z);
|
||||
sigma = GetHadronNucleonXscNS(aParticle, A, Z);
|
||||
cofInelastic = 2.4;
|
||||
cofTotal = 2.0;
|
||||
}
|
||||
else
|
||||
{
|
||||
sigma = GetHadronNucleaonXscPDG(aParticle, A, Z);
|
||||
sigma = GetHadronNucleonXscPDG(aParticle, A, Z);
|
||||
cofInelastic = 2.2;
|
||||
cofTotal = 2.0;
|
||||
}
|
||||
// cofInelastic = 2.0;
|
||||
|
||||
|
||||
nucleusSquare = cofTotal*pi*R*R; // basically 2piRR
|
||||
ratio = sigma/nucleusSquare;
|
||||
|
||||
@@ -183,25 +186,114 @@ GetIsoZACrossSection(const G4DynamicParticle* aParticle, G4double Z, G4double A,
|
||||
|
||||
fTotalXsc = xsection;
|
||||
|
||||
/*
|
||||
fElasticXsc = 0.5*( xsection - nucleusSquare*ratio/(1.+ratio) );
|
||||
|
||||
if (fElasticXsc < 0.) fElasticXsc = 0.;
|
||||
|
||||
fInelasticXsc = fTotalXsc - fElasticXsc;
|
||||
|
||||
if (fInelasticXsc < 0.) fInelasticXsc = 0.;
|
||||
*/
|
||||
|
||||
|
||||
fInelasticXsc = nucleusSquare*std::log( 1. + cofInelastic*ratio )/cofInelastic;
|
||||
|
||||
fElasticXsc = fTotalXsc - fInelasticXsc;
|
||||
|
||||
|
||||
G4double difratio = ratio/(1.+ratio);
|
||||
|
||||
fDiffractionXsc = 0.5*nucleusSquare*( difratio - std::log( 1. + difratio ) );
|
||||
|
||||
|
||||
sigma = GetHNinelasticXsc(aParticle, A, Z);
|
||||
ratio = sigma/nucleusSquare;
|
||||
|
||||
fProductionXsc = nucleusSquare*std::log( 1. + cofInelastic*ratio )/cofInelastic;
|
||||
|
||||
if (fElasticXsc < 0.) fElasticXsc = 0.;
|
||||
|
||||
return xsection;
|
||||
}
|
||||
|
||||
//////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Return single-diffraction/inelastic cross-section ratio
|
||||
|
||||
G4double G4GlauberGribovCrossSection::
|
||||
GetRatioSD(const G4DynamicParticle* aParticle, G4double A, G4double Z)
|
||||
{
|
||||
G4double sigma, cofInelastic, cofTotal, nucleusSquare, ratio;
|
||||
G4double R = GetNucleusRadius(A);
|
||||
|
||||
const G4ParticleDefinition* theParticle = aParticle->GetDefinition();
|
||||
|
||||
if( theParticle == theProton ||
|
||||
theParticle == theNeutron ||
|
||||
theParticle == thePiPlus ||
|
||||
theParticle == thePiMinus )
|
||||
{
|
||||
sigma = GetHadronNucleonXscNS(aParticle, A, Z);
|
||||
cofInelastic = 2.4;
|
||||
cofTotal = 2.0;
|
||||
}
|
||||
else
|
||||
{
|
||||
sigma = GetHadronNucleonXscPDG(aParticle, A, Z);
|
||||
cofInelastic = 2.2;
|
||||
cofTotal = 2.0;
|
||||
}
|
||||
nucleusSquare = cofTotal*pi*R*R; // basically 2piRR
|
||||
ratio = sigma/nucleusSquare;
|
||||
|
||||
fInelasticXsc = nucleusSquare*std::log( 1. + cofInelastic*ratio )/cofInelastic;
|
||||
|
||||
G4double difratio = ratio/(1.+ratio);
|
||||
|
||||
fDiffractionXsc = 0.5*nucleusSquare*( difratio - std::log( 1. + difratio ) );
|
||||
|
||||
if (fInelasticXsc > 0.) ratio = fDiffractionXsc/fInelasticXsc;
|
||||
else ratio = 0.;
|
||||
|
||||
return ratio;
|
||||
}
|
||||
|
||||
//////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Return suasi-elastic/inelastic cross-section ratio
|
||||
|
||||
G4double G4GlauberGribovCrossSection::
|
||||
GetRatioQE(const G4DynamicParticle* aParticle, G4double A, G4double Z)
|
||||
{
|
||||
G4double sigma, cofInelastic, cofTotal, nucleusSquare, ratio;
|
||||
G4double R = GetNucleusRadius(A);
|
||||
|
||||
const G4ParticleDefinition* theParticle = aParticle->GetDefinition();
|
||||
|
||||
if( theParticle == theProton ||
|
||||
theParticle == theNeutron ||
|
||||
theParticle == thePiPlus ||
|
||||
theParticle == thePiMinus )
|
||||
{
|
||||
sigma = GetHadronNucleonXscNS(aParticle, A, Z);
|
||||
cofInelastic = 2.4;
|
||||
cofTotal = 2.0;
|
||||
}
|
||||
else
|
||||
{
|
||||
sigma = GetHadronNucleonXscPDG(aParticle, A, Z);
|
||||
cofInelastic = 2.2;
|
||||
cofTotal = 2.0;
|
||||
}
|
||||
nucleusSquare = cofTotal*pi*R*R; // basically 2piRR
|
||||
ratio = sigma/nucleusSquare;
|
||||
|
||||
fInelasticXsc = nucleusSquare*std::log( 1. + cofInelastic*ratio )/cofInelastic;
|
||||
|
||||
sigma = GetHNinelasticXsc(aParticle, A, Z);
|
||||
ratio = sigma/nucleusSquare;
|
||||
|
||||
fProductionXsc = nucleusSquare*std::log( 1. + cofInelastic*ratio )/cofInelastic;
|
||||
|
||||
if (fInelasticXsc > fProductionXsc) ratio = (fInelasticXsc-fProductionXsc)/fInelasticXsc;
|
||||
else ratio = 0.;
|
||||
if ( ratio < 0. ) ratio = 0.;
|
||||
|
||||
return ratio;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon Xsc according to differnt parametrisations:
|
||||
@@ -210,14 +302,14 @@ GetIsoZACrossSection(const G4DynamicParticle* aParticle, G4double Z, G4double A,
|
||||
// [4] M.J. Longo, et al, Phys.Rev.Lett. 33 (1974) 725
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleaonXsc(const G4DynamicParticle* aParticle,
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXsc(const G4DynamicParticle* aParticle,
|
||||
const G4Element* anElement )
|
||||
{
|
||||
G4double At = anElement->GetN(); // number of nucleons
|
||||
G4double Zt = anElement->GetZ(); // number of protons
|
||||
|
||||
|
||||
return GetHadronNucleaonXsc( aParticle, At, Zt );
|
||||
return GetHadronNucleonXsc( aParticle, At, Zt );
|
||||
}
|
||||
|
||||
|
||||
@@ -231,7 +323,7 @@ G4GlauberGribovCrossSection::GetHadronNucleaonXsc(const G4DynamicParticle* aPart
|
||||
// [4] M.J. Longo, et al, Phys.Rev.Lett. 33 (1974) 725
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleaonXsc(const G4DynamicParticle* aParticle,
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXsc(const G4DynamicParticle* aParticle,
|
||||
G4double At, G4double Zt )
|
||||
{
|
||||
G4double xsection;
|
||||
@@ -302,14 +394,14 @@ G4GlauberGribovCrossSection::GetHadronNucleaonXsc(const G4DynamicParticle* aPart
|
||||
// http://pdg.lbl.gov/2006/reviews/hadronicrpp.pdf
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleaonXscPDG(const G4DynamicParticle* aParticle,
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXscPDG(const G4DynamicParticle* aParticle,
|
||||
const G4Element* anElement )
|
||||
{
|
||||
G4double At = anElement->GetN(); // number of nucleons
|
||||
G4double Zt = anElement->GetZ(); // number of protons
|
||||
|
||||
|
||||
return GetHadronNucleaonXscPDG( aParticle, At, Zt );
|
||||
return GetHadronNucleonXscPDG( aParticle, At, Zt );
|
||||
}
|
||||
|
||||
|
||||
@@ -322,7 +414,7 @@ G4GlauberGribovCrossSection::GetHadronNucleaonXscPDG(const G4DynamicParticle* aP
|
||||
// At = number of nucleons, Zt = number of protons
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleaonXscPDG(const G4DynamicParticle* aParticle,
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXscPDG(const G4DynamicParticle* aParticle,
|
||||
G4double At, G4double Zt )
|
||||
{
|
||||
G4double xsection;
|
||||
@@ -426,20 +518,22 @@ G4GlauberGribovCrossSection::GetHadronNucleaonXscPDG(const G4DynamicParticle* aP
|
||||
xsection *= millibarn; // parametrised in mb
|
||||
return xsection;
|
||||
}
|
||||
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon cross-section based on N. Starkov parametrisation of
|
||||
// data from mainly http://wwwppds.ihep.su:8001/c5-6A.html database
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleaonXscNS(const G4DynamicParticle* aParticle,
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXscNS(const G4DynamicParticle* aParticle,
|
||||
const G4Element* anElement )
|
||||
{
|
||||
G4double At = anElement->GetN(); // number of nucleons
|
||||
G4double Zt = anElement->GetZ(); // number of protons
|
||||
|
||||
|
||||
return GetHadronNucleaonXscNS( aParticle, At, Zt );
|
||||
return GetHadronNucleonXscNS( aParticle, At, Zt );
|
||||
}
|
||||
|
||||
|
||||
@@ -451,7 +545,7 @@ G4GlauberGribovCrossSection::GetHadronNucleaonXscNS(const G4DynamicParticle* aPa
|
||||
// data from mainly http://wwwppds.ihep.su:8001/c5-6A.html database
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleaonXscNS(const G4DynamicParticle* aParticle,
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXscNS(const G4DynamicParticle* aParticle,
|
||||
G4double At, G4double Zt )
|
||||
{
|
||||
G4double xsection(0), Delta, A0, B0;
|
||||
@@ -755,6 +849,577 @@ G4GlauberGribovCrossSection::GetHadronNucleaonXscNS(const G4DynamicParticle* aPa
|
||||
return xsection;
|
||||
}
|
||||
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon inelastic cross-section based on proper parametrisation
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHNinelasticXsc(const G4DynamicParticle* aParticle,
|
||||
const G4Element* anElement )
|
||||
{
|
||||
G4double At = anElement->GetN(); // number of nucleons
|
||||
G4double Zt = anElement->GetZ(); // number of protons
|
||||
|
||||
|
||||
return GetHNinelasticXsc( aParticle, At, Zt );
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon inelastic cross-section based on FTF-parametrisation
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHNinelasticXsc(const G4DynamicParticle* aParticle,
|
||||
G4double At, G4double Zt )
|
||||
{
|
||||
G4ParticleDefinition* hadron = aParticle->GetDefinition();
|
||||
G4double sumInelastic, Nt = At - Zt;
|
||||
if(Nt < 0.) Nt = 0.;
|
||||
|
||||
if( hadron == theKPlus )
|
||||
{
|
||||
sumInelastic = GetHNinelasticXscVU(aParticle, At, Zt);
|
||||
}
|
||||
else
|
||||
{
|
||||
sumInelastic = Zt*GetHadronNucleonXscMK(aParticle, theProton);
|
||||
sumInelastic += Nt*GetHadronNucleonXscMK(aParticle, theNeutron);
|
||||
}
|
||||
return sumInelastic;
|
||||
}
|
||||
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon inelastic cross-section based on FTF-parametrisation
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHNinelasticXscVU(const G4DynamicParticle* aParticle,
|
||||
G4double At, G4double Zt )
|
||||
{
|
||||
G4int PDGcode = aParticle->GetDefinition()->GetPDGEncoding();
|
||||
G4int absPDGcode = std::abs(PDGcode);
|
||||
|
||||
G4double Elab = aParticle->GetTotalEnergy();
|
||||
// (s - 2*0.88*GeV*GeV)/(2*0.939*GeV)/GeV;
|
||||
G4double Plab = aParticle->GetMomentum().mag();
|
||||
// std::sqrt(Elab * Elab - 0.88);
|
||||
|
||||
Elab /= GeV;
|
||||
Plab /= GeV;
|
||||
|
||||
G4double LogPlab = std::log( Plab );
|
||||
G4double sqrLogPlab = LogPlab * LogPlab;
|
||||
|
||||
//G4cout<<"Plab = "<<Plab<<G4endl;
|
||||
|
||||
G4double NumberOfTargetProtons = Zt;
|
||||
G4double NumberOfTargetNucleons = At;
|
||||
G4double NumberOfTargetNeutrons = NumberOfTargetNucleons - NumberOfTargetProtons;
|
||||
|
||||
if(NumberOfTargetNeutrons < 0.) NumberOfTargetNeutrons = 0.;
|
||||
|
||||
G4double Xtotal, Xelastic, Xinelastic;
|
||||
|
||||
if( absPDGcode > 1000 ) //------Projectile is baryon --------
|
||||
{
|
||||
G4double XtotPP = 48.0 + 0. *std::pow(Plab, 0. ) +
|
||||
0.522*sqrLogPlab - 4.51*LogPlab;
|
||||
|
||||
G4double XtotPN = 47.3 + 0. *std::pow(Plab, 0. ) +
|
||||
0.513*sqrLogPlab - 4.27*LogPlab;
|
||||
|
||||
G4double XelPP = 11.9 + 26.9*std::pow(Plab,-1.21) +
|
||||
0.169*sqrLogPlab - 1.85*LogPlab;
|
||||
|
||||
G4double XelPN = 11.9 + 26.9*std::pow(Plab,-1.21) +
|
||||
0.169*sqrLogPlab - 1.85*LogPlab;
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotPP +
|
||||
NumberOfTargetNeutrons * XtotPN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelPP +
|
||||
NumberOfTargetNeutrons * XelPN );
|
||||
}
|
||||
else if( PDGcode == 211 ) //------Projectile is PionPlus -------
|
||||
{
|
||||
G4double XtotPiP = 16.4 + 19.3 *std::pow(Plab,-0.42) +
|
||||
0.19 *sqrLogPlab - 0.0 *LogPlab;
|
||||
|
||||
G4double XtotPiN = 33.0 + 14.0 *std::pow(Plab,-1.36) +
|
||||
0.456*sqrLogPlab - 4.03*LogPlab;
|
||||
|
||||
G4double XelPiP = 0.0 + 11.4*std::pow(Plab,-0.40) +
|
||||
0.079*sqrLogPlab - 0.0 *LogPlab;
|
||||
|
||||
G4double XelPiN = 1.76 + 11.2*std::pow(Plab,-0.64) +
|
||||
0.043*sqrLogPlab - 0.0 *LogPlab;
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotPiP +
|
||||
NumberOfTargetNeutrons * XtotPiN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelPiP +
|
||||
NumberOfTargetNeutrons * XelPiN );
|
||||
}
|
||||
else if( PDGcode == -211 ) //------Projectile is PionMinus -------
|
||||
{
|
||||
G4double XtotPiP = 33.0 + 14.0 *std::pow(Plab,-1.36) +
|
||||
0.456*sqrLogPlab - 4.03*LogPlab;
|
||||
|
||||
G4double XtotPiN = 16.4 + 19.3 *std::pow(Plab,-0.42) +
|
||||
0.19 *sqrLogPlab - 0.0 *LogPlab;
|
||||
|
||||
G4double XelPiP = 1.76 + 11.2*std::pow(Plab,-0.64) +
|
||||
0.043*sqrLogPlab - 0.0 *LogPlab;
|
||||
|
||||
G4double XelPiN = 0.0 + 11.4*std::pow(Plab,-0.40) +
|
||||
0.079*sqrLogPlab - 0.0 *LogPlab;
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotPiP +
|
||||
NumberOfTargetNeutrons * XtotPiN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelPiP +
|
||||
NumberOfTargetNeutrons * XelPiN );
|
||||
}
|
||||
else if( PDGcode == 111 ) //------Projectile is PionZero -------
|
||||
{
|
||||
G4double XtotPiP =(16.4 + 19.3 *std::pow(Plab,-0.42) +
|
||||
0.19 *sqrLogPlab - 0.0 *LogPlab + //Pi+
|
||||
33.0 + 14.0 *std::pow(Plab,-1.36) +
|
||||
0.456*sqrLogPlab - 4.03*LogPlab)/2; //Pi-
|
||||
|
||||
G4double XtotPiN =(33.0 + 14.0 *std::pow(Plab,-1.36) +
|
||||
0.456*sqrLogPlab - 4.03*LogPlab + //Pi+
|
||||
16.4 + 19.3 *std::pow(Plab,-0.42) +
|
||||
0.19 *sqrLogPlab - 0.0 *LogPlab)/2; //Pi-
|
||||
|
||||
G4double XelPiP =( 0.0 + 11.4*std::pow(Plab,-0.40) +
|
||||
0.079*sqrLogPlab - 0.0 *LogPlab + //Pi+
|
||||
1.76 + 11.2*std::pow(Plab,-0.64) +
|
||||
0.043*sqrLogPlab - 0.0 *LogPlab)/2; //Pi-
|
||||
|
||||
G4double XelPiN =( 1.76 + 11.2*std::pow(Plab,-0.64) +
|
||||
0.043*sqrLogPlab - 0.0 *LogPlab + //Pi+
|
||||
0.0 + 11.4*std::pow(Plab,-0.40) +
|
||||
0.079*sqrLogPlab - 0.0 *LogPlab)/2; //Pi-
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotPiP +
|
||||
NumberOfTargetNeutrons * XtotPiN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelPiP +
|
||||
NumberOfTargetNeutrons * XelPiN );
|
||||
}
|
||||
else if( PDGcode == 321 ) //------Projectile is KaonPlus -------
|
||||
{
|
||||
G4double XtotKP = 18.1 + 0. *std::pow(Plab, 0. ) +
|
||||
0.26 *sqrLogPlab - 1.0 *LogPlab;
|
||||
G4double XtotKN = 18.7 + 0. *std::pow(Plab, 0. ) +
|
||||
0.21 *sqrLogPlab - 0.89*LogPlab;
|
||||
|
||||
G4double XelKP = 5.0 + 8.1*std::pow(Plab,-1.8 ) +
|
||||
0.16 *sqrLogPlab - 1.3 *LogPlab;
|
||||
|
||||
G4double XelKN = 7.3 + 0. *std::pow(Plab,-0. ) +
|
||||
0.29 *sqrLogPlab - 2.4 *LogPlab;
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotKP +
|
||||
NumberOfTargetNeutrons * XtotKN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelKP +
|
||||
NumberOfTargetNeutrons * XelKN );
|
||||
}
|
||||
else if( PDGcode ==-321 ) //------Projectile is KaonMinus ------
|
||||
{
|
||||
G4double XtotKP = 32.1 + 0. *std::pow(Plab, 0. ) +
|
||||
0.66 *sqrLogPlab - 5.6 *LogPlab;
|
||||
G4double XtotKN = 25.2 + 0. *std::pow(Plab, 0. ) +
|
||||
0.38 *sqrLogPlab - 2.9 *LogPlab;
|
||||
|
||||
G4double XelKP = 7.3 + 0. *std::pow(Plab,-0. ) +
|
||||
0.29 *sqrLogPlab - 2.4 *LogPlab;
|
||||
|
||||
G4double XelKN = 5.0 + 8.1*std::pow(Plab,-1.8 ) +
|
||||
0.16 *sqrLogPlab - 1.3 *LogPlab;
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotKP +
|
||||
NumberOfTargetNeutrons * XtotKN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelKP +
|
||||
NumberOfTargetNeutrons * XelKN );
|
||||
}
|
||||
else if( PDGcode == 311 ) //------Projectile is KaonZero ------
|
||||
{
|
||||
G4double XtotKP = ( 18.1 + 0. *std::pow(Plab, 0. ) +
|
||||
0.26 *sqrLogPlab - 1.0 *LogPlab + //K+
|
||||
32.1 + 0. *std::pow(Plab, 0. ) +
|
||||
0.66 *sqrLogPlab - 5.6 *LogPlab)/2; //K-
|
||||
|
||||
G4double XtotKN = ( 18.7 + 0. *std::pow(Plab, 0. ) +
|
||||
0.21 *sqrLogPlab - 0.89*LogPlab + //K+
|
||||
25.2 + 0. *std::pow(Plab, 0. ) +
|
||||
0.38 *sqrLogPlab - 2.9 *LogPlab)/2; //K-
|
||||
|
||||
G4double XelKP = ( 5.0 + 8.1*std::pow(Plab,-1.8 )
|
||||
+ 0.16 *sqrLogPlab - 1.3 *LogPlab + //K+
|
||||
7.3 + 0. *std::pow(Plab,-0. ) +
|
||||
0.29 *sqrLogPlab - 2.4 *LogPlab)/2; //K-
|
||||
|
||||
G4double XelKN = ( 7.3 + 0. *std::pow(Plab,-0. ) +
|
||||
0.29 *sqrLogPlab - 2.4 *LogPlab + //K+
|
||||
5.0 + 8.1*std::pow(Plab,-1.8 ) +
|
||||
0.16 *sqrLogPlab - 1.3 *LogPlab)/2; //K-
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotKP +
|
||||
NumberOfTargetNeutrons * XtotKN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelKP +
|
||||
NumberOfTargetNeutrons * XelKN );
|
||||
}
|
||||
else //------Projectile is undefined, Nucleon assumed
|
||||
{
|
||||
G4double XtotPP = 48.0 + 0. *std::pow(Plab, 0. ) +
|
||||
0.522*sqrLogPlab - 4.51*LogPlab;
|
||||
|
||||
G4double XtotPN = 47.3 + 0. *std::pow(Plab, 0. ) +
|
||||
0.513*sqrLogPlab - 4.27*LogPlab;
|
||||
|
||||
G4double XelPP = 11.9 + 26.9*std::pow(Plab,-1.21) +
|
||||
0.169*sqrLogPlab - 1.85*LogPlab;
|
||||
G4double XelPN = 11.9 + 26.9*std::pow(Plab,-1.21) +
|
||||
0.169*sqrLogPlab - 1.85*LogPlab;
|
||||
|
||||
Xtotal = ( NumberOfTargetProtons * XtotPP +
|
||||
NumberOfTargetNeutrons * XtotPN );
|
||||
|
||||
Xelastic = ( NumberOfTargetProtons * XelPP +
|
||||
NumberOfTargetNeutrons * XelPN );
|
||||
}
|
||||
Xinelastic = Xtotal - Xelastic;
|
||||
|
||||
if(Xinelastic < 0.) Xinelastic = 0.;
|
||||
|
||||
return Xinelastic*= millibarn;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon cross-section based on Mikhail Kossov CHIPS parametrisation of
|
||||
// data from G4QuasiFreeRatios class
|
||||
|
||||
G4double
|
||||
G4GlauberGribovCrossSection::GetHadronNucleonXscMK(const G4DynamicParticle* aParticle,
|
||||
const G4ParticleDefinition* nucleon )
|
||||
{
|
||||
G4int I = -1;
|
||||
G4int PDG = aParticle->GetDefinition()->GetPDGEncoding();
|
||||
G4double totalXsc = 0;
|
||||
G4double elasticXsc = 0;
|
||||
G4double inelasticXsc;
|
||||
// G4int absPDG = std::abs(PDG);
|
||||
|
||||
G4double p = aParticle->GetMomentum().mag()/GeV;
|
||||
|
||||
G4bool F = false;
|
||||
if(nucleon == theProton) F = true;
|
||||
else if(nucleon == theNeutron) F = false;
|
||||
else
|
||||
{
|
||||
G4cout << "nucleon is not proton or neutron, return xsc for proton" << G4endl;
|
||||
F = true;
|
||||
}
|
||||
|
||||
G4bool kfl = true; // Flag of K0/aK0 oscillation
|
||||
G4bool kf = false;
|
||||
|
||||
if( PDG == 130 || PDG == 310 )
|
||||
{
|
||||
kf = true;
|
||||
if( G4UniformRand() > .5 ) kfl = false;
|
||||
}
|
||||
if ( PDG == 2212 && F || PDG == 2112 && !F ) I = 0; // pp/nn
|
||||
else if( PDG == 2112 && F || PDG == 2212 && !F ) I = 1; // np/pn
|
||||
|
||||
else if( PDG == -211 && F || PDG == 211 && !F ) I = 2; // pimp/pipn
|
||||
else if( PDG == 211 && F || PDG ==-211 && !F ) I = 3; // pipp/pimn
|
||||
|
||||
else if( PDG == -321 || PDG == -311 || ( kf && !kfl ) ) I = 4; // KmN/K0N
|
||||
else if( PDG == 321 || PDG == 311 || ( kf && kfl ) ) I = 5; // KpN/aK0N
|
||||
|
||||
else if( PDG > 3000 && PDG < 3335) I = 6; // @@ for all hyperons - take Lambda
|
||||
else if( PDG < -2000 && PDG > -3335) I = 7; // @@ for all anti-baryons - anti-p/anti-n
|
||||
else
|
||||
{
|
||||
G4cout<<"MK PDG = "<<PDG
|
||||
<<", while it is defined only for p,n,hyperons,anti-baryons,pi,K/antiK"<<G4endl;
|
||||
G4Exception("G4QuasiFreeRatio::FetchElTot:","22",FatalException,"CHIPScrash");
|
||||
}
|
||||
|
||||
// Each parameter set can have not more than nPoints = 128 parameters
|
||||
|
||||
static const G4double lmi = 3.5; // min of (lnP-lmi)^2 parabola
|
||||
static const G4double pbe = .0557; // elastic (lnP-lmi)^2 parabola coefficient
|
||||
static const G4double pbt = .3; // total (lnP-lmi)^2 parabola coefficient
|
||||
static const G4double pmi = .1; // Below that fast LE calculation is made
|
||||
static const G4double pma = 1000.; // Above that fast HE calculation is made
|
||||
|
||||
if( p <= 0.)
|
||||
{
|
||||
G4cout<<" p = "<<p<<" is zero or negative"<<G4endl;
|
||||
|
||||
elasticXsc = 0.;
|
||||
inelasticXsc = 0.;
|
||||
totalXsc = 0.;
|
||||
|
||||
return totalXsc;
|
||||
}
|
||||
if (!I) // pp/nn
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
elasticXsc = 1./(.00012 + p2*.2);
|
||||
totalXsc = elasticXsc;
|
||||
}
|
||||
else if(p>pma)
|
||||
{
|
||||
G4double lp = std::log(p)-lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
elasticXsc = pbe*lp2 + 6.72;
|
||||
totalXsc = pbt*lp2 + 38.2;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
G4double LE = 1./( .00012 + p2*.2);
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double rp2 = 1./p2;
|
||||
elasticXsc = LE + ( pbe*lp2 + 6.72+32.6/p)/( 1. + rp2/p);
|
||||
totalXsc = LE + ( pbt*lp2 + 38.2+52.7*rp2)/( 1. + 2.72*rp2*rp2);
|
||||
}
|
||||
}
|
||||
else if( I==1 ) // np/pn
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
elasticXsc = 1./( .00012 + p2*( .051 + .1*p2));
|
||||
totalXsc = elasticXsc;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
elasticXsc = pbe*lp2 + 6.72;
|
||||
totalXsc = pbt*lp2 + 38.2;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
G4double LE = 1./( .00012 + p2*( .051 + .1*p2 ) );
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double rp2 = 1./p2;
|
||||
elasticXsc = LE + (pbe*lp2 + 6.72 + 30./p)/( 1. + .49*rp2/p);
|
||||
totalXsc = LE + (pbt*lp2 + 38.2)/( 1. + .54*rp2*rp2);
|
||||
}
|
||||
}
|
||||
else if( I == 2 ) // pimp/pipn
|
||||
{
|
||||
G4double lp = std::log(p);
|
||||
|
||||
if(p<pmi)
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
elasticXsc = 1.53/( lr*lr + .0676);
|
||||
totalXsc = elasticXsc*3;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double sp = std::sqrt(p);
|
||||
elasticXsc = pbe*ld2 + 2.4 + 7./sp;
|
||||
totalXsc = pbt*ld2 + 22.3 + 12./sp;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
G4double LE = 1.53/( lr*lr + .0676);
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double lm = lp + .36;
|
||||
G4double md = lm*lm + .04;
|
||||
G4double lh = lp - .017;
|
||||
G4double hd = lh*lh + .0025;
|
||||
elasticXsc = LE + (pbe*ld2 + 2.4 + 7./sp)/( 1. + .7/p4) + .6/md + .05/hd;
|
||||
totalXsc = LE*3 + (pbt*ld2 + 22.3 + 12./sp)/(1. + .4/p4) + 1./md + .06/hd;
|
||||
}
|
||||
}
|
||||
else if( I == 3 ) // pipp/pimn
|
||||
{
|
||||
G4double lp = std::log(p);
|
||||
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
G4double lr2 = lr*lr;
|
||||
elasticXsc = 13./( lr2 + lr2*lr2 + .0676);
|
||||
totalXsc = elasticXsc;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double sp = std::sqrt(p);
|
||||
elasticXsc = pbe*ld2 + 2.4 + 6./sp;
|
||||
totalXsc = pbt*ld2 + 22.3 + 5./sp;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
G4double lr2 = lr*lr;
|
||||
G4double LE = 13./(lr2 + lr2*lr2 + .0676);
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double lm = lp - .32;
|
||||
G4double md = lm*lm + .0576;
|
||||
elasticXsc = LE + (pbe*ld2 + 2.4 + 6./sp)/(1. + 3./p4) + .7/md;
|
||||
totalXsc = LE + (pbt*ld2 + 22.3 + 5./sp)/(1. + 1./p4) + .8/md;
|
||||
}
|
||||
}
|
||||
else if( I == 4 ) // Kmp/Kmn/K0p/K0n
|
||||
{
|
||||
if( p < pmi)
|
||||
{
|
||||
G4double psp = p*std::sqrt(p);
|
||||
elasticXsc = 5.2/psp;
|
||||
totalXsc = 14./psp;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
elasticXsc = pbe*ld2 + 2.23;
|
||||
totalXsc = pbt*ld2 + 19.5;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double psp = p*sp;
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double lm = p - .39;
|
||||
G4double md = lm*lm + .000156;
|
||||
G4double lh = p - 1.;
|
||||
G4double hd = lh*lh + .0156;
|
||||
elasticXsc = 5.2/psp + (pbe*ld2 + 2.23)/(1. - .7/sp + .075/p4) + .004/md + .15/hd;
|
||||
totalXsc = 14./psp + (pbt*ld2 + 19.5)/(1. - .21/sp + .52/p4) + .006/md + .30/hd;
|
||||
}
|
||||
}
|
||||
else if( I == 5 ) // Kpp/Kpn/aKp/aKn
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double lr = p - .38;
|
||||
G4double lm = p - 1.;
|
||||
G4double md = lm*lm + .372;
|
||||
elasticXsc = .7/(lr*lr + .0676) + 2./md;
|
||||
totalXsc = elasticXsc + .6/md;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
elasticXsc = pbe*ld2 + 2.23;
|
||||
totalXsc = pbt*ld2 + 19.5;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double lr = p - .38;
|
||||
G4double LE = .7/(lr*lr + .0676);
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double lm = p - 1.;
|
||||
G4double md = lm*lm + .372;
|
||||
elasticXsc = LE + (pbe*ld2 + 2.23)/(1. - .7/sp + .1/p4) + 2./md;
|
||||
totalXsc = LE + (pbt*ld2 + 19.5)/(1. + .46/sp + 1.6/p4) + 2.6/md;
|
||||
}
|
||||
}
|
||||
else if( I == 6 ) // hyperon-N
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
elasticXsc = 1./(.002 + p2*(.12 + p2));
|
||||
totalXsc = elasticXsc;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double sp = std::sqrt(p);
|
||||
elasticXsc = (pbe*lp2 + 6.72)/(1. + 2./sp);
|
||||
totalXsc = (pbt*lp2 + 38.2 + 900./sp)/(1. + 27./sp);
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
G4double LE = 1./(.002 + p2*(.12 + p2));
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double p4 = p2*p2;
|
||||
G4double sp = std::sqrt(p);
|
||||
elasticXsc = LE + (pbe*lp2 + 6.72 + 99./p2)/(1. + 2./sp + 2./p4);
|
||||
totalXsc = LE + (pbt*lp2 + 38.2 + 900./sp)/(1. + 27./sp + 3./p4);
|
||||
}
|
||||
}
|
||||
else if( I == 7 ) // antibaryon-N
|
||||
{
|
||||
if( p > pma )
|
||||
{
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
elasticXsc = pbe*lp2 + 6.72;
|
||||
totalXsc = pbt*lp2 + 38.2;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double ye = std::pow(p, 1.25);
|
||||
G4double yt = std::pow(p, .35);
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
elasticXsc = 80./(ye + 1.) + pbe*lp2 + 6.72;
|
||||
totalXsc = (80./yt + .3)/yt +pbt*lp2 + 38.2;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
G4cout<<"PDG incoding = "<<I<<" is not defined (0-7)"<<G4endl;
|
||||
|
||||
}
|
||||
if( elasticXsc > totalXsc ) elasticXsc = totalXsc;
|
||||
|
||||
totalXsc *= millibarn;
|
||||
elasticXsc *= millibarn;
|
||||
inelasticXsc = totalXsc - elasticXsc;
|
||||
if (inelasticXsc < 0.) inelasticXsc = 0.;
|
||||
|
||||
return inelasticXsc;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
//
|
||||
@@ -786,6 +1451,10 @@ G4GlauberGribovCrossSection::GetNucleusRadius( const G4DynamicParticle* ,
|
||||
|
||||
R = fRadiusConst*cubicrAt;
|
||||
|
||||
// return R; // !!!!
|
||||
|
||||
|
||||
|
||||
G4double meanA = 21.;
|
||||
|
||||
G4double tauA1 = 40.;
|
||||
@@ -809,9 +1478,9 @@ G4GlauberGribovCrossSection::GetNucleusRadius( const G4DynamicParticle* ,
|
||||
else
|
||||
{
|
||||
R *= ( 1.0 + b3*( 1. - std::exp( (At - meanA)/tauA3) ) );
|
||||
}
|
||||
|
||||
}
|
||||
return R;
|
||||
|
||||
}
|
||||
////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
|
||||
@@ -25,7 +25,7 @@
|
||||
//
|
||||
//
|
||||
// $Id: G4HadronCaptureDataSet.cc,v 1.8 2006/06/29 19:57:35 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Physics class: HadronCaptureDataSet for cross sections
|
||||
|
||||
@@ -24,7 +24,7 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Hadron Physics class G4HadronCrossSections
|
||||
@@ -82,7 +82,7 @@ G4float G4HadronCrossSections::plab[TSIZE] = {
|
||||
// Elastic scattering on free protons
|
||||
//---------------------------------------------------------------------
|
||||
|
||||
G4float G4HadronCrossSections::csel[PSIZE][TSIZE] = {
|
||||
G4float G4HadronCrossSections::csel[NPARTS][TSIZE] = {
|
||||
{0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, //1
|
||||
0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
|
||||
0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
|
||||
@@ -441,7 +441,7 @@ G4float G4HadronCrossSections::csel[PSIZE][TSIZE] = {
|
||||
// Inelastic scattering on free protons
|
||||
//---------------------------------------------------------------------
|
||||
|
||||
G4float G4HadronCrossSections::csin[PSIZE][TSIZE] = {
|
||||
G4float G4HadronCrossSections::csin[NPARTS][TSIZE] = {
|
||||
|
||||
{0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, //1
|
||||
0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
|
||||
@@ -1165,7 +1165,7 @@ G4float G4HadronCrossSections::csfiss[4][NFISS] = {
|
||||
1000.0}
|
||||
};
|
||||
|
||||
G4float G4HadronCrossSections::alpha[PSIZE] = {
|
||||
G4float G4HadronCrossSections::alpha[NPARTS] = {
|
||||
0.7,0.7,0.7,0.7,0.7,0.7,
|
||||
0.75,0.75,0.75,
|
||||
0.76,0.76,0.76,0.76,
|
||||
@@ -1182,13 +1182,13 @@ G4float G4HadronCrossSections::alphac[TSIZE] = {
|
||||
0.982,0.988,0.992,1.010,1.020,1.030,1.040
|
||||
};
|
||||
|
||||
G4float G4HadronCrossSections::partel[PSIZE] = {
|
||||
G4float G4HadronCrossSections::partel[NPARTS] = {
|
||||
0.,0.,0.,0.,0.,0.,
|
||||
1.,1.,1.,1.,1.,1.,1.,1.,1.,1.,
|
||||
1.,1.,1.,1.,1.,1.,1.,1.,1.,1.,
|
||||
1.,1.,1.,1.,1.,1.,1.,1.,1.
|
||||
};
|
||||
G4float G4HadronCrossSections::partin[PSIZE] = {
|
||||
G4float G4HadronCrossSections::partin[NPARTS] = {
|
||||
0.,0.,0.,0.,0.,0.,
|
||||
1.00,0.00,1.05,1.20,1.35,1.30,1.20,1.00,1.30,
|
||||
1.00,1.30,1.00,1.30,1.00,1.00,1.00,1.30,1.30,1.30,
|
||||
@@ -1196,13 +1196,13 @@ G4float G4HadronCrossSections::partin[PSIZE] = {
|
||||
};
|
||||
|
||||
// Enabling flags for corrections for compounds
|
||||
G4int G4HadronCrossSections::icorr[PSIZE] = {
|
||||
G4int G4HadronCrossSections::icorr[NPARTS] = {
|
||||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,
|
||||
0,1,0,1,0,1,1,1,0,0,0,1,1,0,0,1,1,1,1,0,0
|
||||
};
|
||||
|
||||
// Enabling flags for interaction to occur
|
||||
G4int G4HadronCrossSections::intrc[PSIZE] = {
|
||||
G4int G4HadronCrossSections::intrc[NPARTS] = {
|
||||
0,0,0,0,0,0,
|
||||
1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,2,2,0,
|
||||
1,1,1,1,1,1,1,1,1,1,0
|
||||
|
||||
@@ -25,7 +25,7 @@
|
||||
//
|
||||
//
|
||||
// $Id: G4HadronElasticDataSet.cc,v 1.8 2006/06/29 19:57:39 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Physics class: HadronElasticDataSet for cross sections
|
||||
|
||||
@@ -25,7 +25,7 @@
|
||||
//
|
||||
//
|
||||
// $Id: G4HadronFissionDataSet.cc,v 1.8 2006/06/29 19:57:41 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Physics class: HadronFissionDataSet for cross sections
|
||||
|
||||
@@ -25,7 +25,7 @@
|
||||
//
|
||||
//
|
||||
// $Id: G4HadronInelasticDataSet.cc,v 1.8 2006/06/29 19:57:43 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Physics class: HadronInelasticDataSet for cross sections
|
||||
|
||||
@@ -40,7 +40,7 @@
|
||||
|
||||
G4HadronNucleonXsc::G4HadronNucleonXsc()
|
||||
: fUpperLimit( 10000 * GeV ),
|
||||
fLowerLimit( 3 * GeV )
|
||||
fLowerLimit( 0.03 * MeV )
|
||||
{
|
||||
theGamma = G4Gamma::Gamma();
|
||||
theProton = G4Proton::Proton();
|
||||
@@ -201,7 +201,7 @@ G4HadronNucleonXsc::GetHadronNucleonXscEL(const G4DynamicParticle* aParticle,
|
||||
xsection *= millibarn;
|
||||
|
||||
fTotalXsc = xsection;
|
||||
fInelasticXsc = 0.5*xsection;
|
||||
fInelasticXsc = 0.83*xsection;
|
||||
fElasticXsc = fTotalXsc - fInelasticXsc;
|
||||
if (fElasticXsc < 0.)fElasticXsc = 0.;
|
||||
|
||||
@@ -351,7 +351,7 @@ G4HadronNucleonXsc::GetHadronNucleonXscPDG(const G4DynamicParticle* aParticle,
|
||||
xsection *= millibarn; // parametrised in mb
|
||||
|
||||
fTotalXsc = xsection;
|
||||
fInelasticXsc = 0.5*xsection;
|
||||
fInelasticXsc = 0.83*xsection;
|
||||
fElasticXsc = fTotalXsc - fInelasticXsc;
|
||||
if (fElasticXsc < 0.)fElasticXsc = 0.;
|
||||
|
||||
@@ -722,12 +722,13 @@ G4HadronNucleonXsc::GetHadronNucleonXscNS(const G4DynamicParticle* aParticle,
|
||||
fTotalXsc = xsection;
|
||||
}
|
||||
fTotalXsc *= millibarn; // parametrised in mb
|
||||
// xsection *= millibarn; // parametrised in mb
|
||||
|
||||
fInelasticXsc = 0.5*xsection;
|
||||
fInelasticXsc = 0.83*fTotalXsc;
|
||||
fElasticXsc = fTotalXsc - fInelasticXsc;
|
||||
if (fElasticXsc < 0.)fElasticXsc = 0.;
|
||||
|
||||
return xsection;
|
||||
return fTotalXsc;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
@@ -772,7 +773,7 @@ G4HadronNucleonXsc::GetHadronNucleonXscVU(const G4DynamicParticle* aParticle,
|
||||
fElasticXsc = 11.9 + 26.9*std::pow(Plab,-1.21) + 0.169*sqrLogPlab - 1.85*LogPlab;
|
||||
}
|
||||
}
|
||||
else if( PDGcode == 211 && pORn ) //------Projectile is PionPlus ----
|
||||
else if( PDGcode == 211 && pORn ) //------Projectile is PionPlus ----
|
||||
{
|
||||
if(proton)
|
||||
{
|
||||
@@ -843,7 +844,7 @@ G4HadronNucleonXsc::GetHadronNucleonXscVU(const G4DynamicParticle* aParticle,
|
||||
fElasticXsc = 5.0 + 8.1*std::pow(Plab,-1.8 ) + 0.16*sqrLogPlab - 1.3*LogPlab;
|
||||
}
|
||||
}
|
||||
else if( PDGcode == 311 && pORn ) //------Projectile is KaonZero -----
|
||||
else if( PDGcode == 311 && pORn ) //------Projectile is KaonZero -----
|
||||
{
|
||||
if(proton)
|
||||
{
|
||||
@@ -860,7 +861,7 @@ G4HadronNucleonXsc::GetHadronNucleonXscVU(const G4DynamicParticle* aParticle,
|
||||
5.0 + 8.1*std::pow(Plab,-1.8 ) + 0.16 *sqrLogPlab - 1.3 *LogPlab)/2; //K-
|
||||
}
|
||||
}
|
||||
else //------Projectile is undefined, Nucleon assumed
|
||||
else //------Projectile is undefined, Nucleon assumed
|
||||
{
|
||||
if(proton)
|
||||
{
|
||||
@@ -869,7 +870,6 @@ G4HadronNucleonXsc::GetHadronNucleonXscVU(const G4DynamicParticle* aParticle,
|
||||
}
|
||||
if(neutron)
|
||||
{
|
||||
|
||||
fTotalXsc = 47.3 + 0. *std::pow(Plab, 0. ) + 0.513*sqrLogPlab - 4.27*LogPlab;
|
||||
fElasticXsc = 11.9 + 26.9*std::pow(Plab,-1.21) + 0.169*sqrLogPlab - 1.85*LogPlab;
|
||||
}
|
||||
@@ -878,9 +878,331 @@ G4HadronNucleonXsc::GetHadronNucleonXscVU(const G4DynamicParticle* aParticle,
|
||||
fElasticXsc *= millibarn;
|
||||
fInelasticXsc = fTotalXsc - fElasticXsc;
|
||||
if (fInelasticXsc < 0.) fInelasticXsc = 0.;
|
||||
|
||||
return fTotalXsc;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Returns hadron-nucleon cross-section based on Mikhail Kossov parametrisation of
|
||||
// data from G4QuasiFreeRatios class
|
||||
|
||||
G4double
|
||||
G4HadronNucleonXsc::GetHadronNucleonXscMK(const G4DynamicParticle* aParticle,
|
||||
const G4ParticleDefinition* nucleon )
|
||||
{
|
||||
G4int I = -1;
|
||||
G4int PDG = aParticle->GetDefinition()->GetPDGEncoding();
|
||||
|
||||
// G4int absPDG = std::abs(PDG);
|
||||
|
||||
G4double p = aParticle->GetMomentum().mag()/GeV;
|
||||
|
||||
G4bool F = false;
|
||||
if(nucleon == theProton) F = true;
|
||||
else if(nucleon == theNeutron) F = false;
|
||||
else
|
||||
{
|
||||
G4cout << "nucleon is not proton or neutron, return xsc for proton" << G4endl;
|
||||
F = true;
|
||||
}
|
||||
|
||||
G4bool kfl = true; // Flag of K0/aK0 oscillation
|
||||
G4bool kf = false;
|
||||
|
||||
if( PDG == 130 || PDG == 310 )
|
||||
{
|
||||
kf = true;
|
||||
if( G4UniformRand() > .5 ) kfl = false;
|
||||
}
|
||||
if ( PDG == 2212 && F || PDG == 2112 && !F ) I = 0; // pp/nn
|
||||
else if( PDG == 2112 && F || PDG == 2212 && !F ) I = 1; // np/pn
|
||||
|
||||
else if( PDG == -211 && F || PDG == 211 && !F ) I = 2; // pimp/pipn
|
||||
else if( PDG == 211 && F || PDG ==-211 && !F ) I = 3; // pipp/pimn
|
||||
|
||||
else if( PDG == -321 || PDG == -311 || ( kf && !kfl ) ) I = 4; // KmN/K0N
|
||||
else if( PDG == 321 || PDG == 311 || ( kf && kfl ) ) I = 5; // KpN/aK0N
|
||||
|
||||
else if( PDG > 3000 && PDG < 3335) I = 6; // @@ for all hyperons - take Lambda
|
||||
else if( PDG < -2000 && PDG > -3335) I = 7; // @@ for all anti-baryons - anti-p/anti-n
|
||||
else
|
||||
{
|
||||
G4cout<<"MK PDG = "<<PDG
|
||||
<<", while it is defined only for p,n,hyperons,anti-baryons,pi,K/antiK"<<G4endl;
|
||||
G4Exception("G4QuasiFreeRatio::FetchElTot:","22",FatalException,"CHIPScrash");
|
||||
}
|
||||
|
||||
// Each parameter set can have not more than nPoints = 128 parameters
|
||||
|
||||
static const G4double lmi = 3.5; // min of (lnP-lmi)^2 parabola
|
||||
static const G4double pbe = .0557; // elastic (lnP-lmi)^2 parabola coefficient
|
||||
static const G4double pbt = .3; // total (lnP-lmi)^2 parabola coefficient
|
||||
static const G4double pmi = .1; // Below that fast LE calculation is made
|
||||
static const G4double pma = 1000.; // Above that fast HE calculation is made
|
||||
|
||||
if( p <= 0.)
|
||||
{
|
||||
G4cout<<" p = "<<p<<" is zero or negative"<<G4endl;
|
||||
|
||||
fElasticXsc = 0.;
|
||||
fInelasticXsc = 0.;
|
||||
fTotalXsc = 0.;
|
||||
|
||||
return fTotalXsc;
|
||||
}
|
||||
if (!I) // pp/nn
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
fElasticXsc = 1./(.00012 + p2*.2);
|
||||
fTotalXsc = fElasticXsc;
|
||||
}
|
||||
else if(p>pma)
|
||||
{
|
||||
G4double lp = std::log(p)-lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
fElasticXsc = pbe*lp2 + 6.72;
|
||||
fTotalXsc = pbt*lp2 + 38.2;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
G4double LE = 1./( .00012 + p2*.2);
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double rp2 = 1./p2;
|
||||
fElasticXsc = LE + ( pbe*lp2 + 6.72+32.6/p)/( 1. + rp2/p);
|
||||
fTotalXsc = LE + ( pbt*lp2 + 38.2+52.7*rp2)/( 1. + 2.72*rp2*rp2);
|
||||
}
|
||||
}
|
||||
else if( I==1 ) // np/pn
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
fElasticXsc = 1./( .00012 + p2*( .051 + .1*p2));
|
||||
fTotalXsc = fElasticXsc;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
fElasticXsc = pbe*lp2 + 6.72;
|
||||
fTotalXsc = pbt*lp2 + 38.2;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
G4double LE = 1./( .00012 + p2*( .051 + .1*p2 ) );
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double rp2 = 1./p2;
|
||||
fElasticXsc = LE + (pbe*lp2 + 6.72 + 30./p)/( 1. + .49*rp2/p);
|
||||
fTotalXsc = LE + (pbt*lp2 + 38.2)/( 1. + .54*rp2*rp2);
|
||||
}
|
||||
}
|
||||
else if( I == 2 ) // pimp/pipn
|
||||
{
|
||||
G4double lp = std::log(p);
|
||||
|
||||
if(p<pmi)
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
fElasticXsc = 1.53/( lr*lr + .0676);
|
||||
fTotalXsc = fElasticXsc*3;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double sp = std::sqrt(p);
|
||||
fElasticXsc = pbe*ld2 + 2.4 + 7./sp;
|
||||
fTotalXsc = pbt*ld2 + 22.3 + 12./sp;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
G4double LE = 1.53/( lr*lr + .0676);
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double lm = lp + .36;
|
||||
G4double md = lm*lm + .04;
|
||||
G4double lh = lp - .017;
|
||||
G4double hd = lh*lh + .0025;
|
||||
fElasticXsc = LE + (pbe*ld2 + 2.4 + 7./sp)/( 1. + .7/p4) + .6/md + .05/hd;
|
||||
fTotalXsc = LE*3 + (pbt*ld2 + 22.3 + 12./sp)/(1. + .4/p4) + 1./md + .06/hd;
|
||||
}
|
||||
}
|
||||
else if( I == 3 ) // pipp/pimn
|
||||
{
|
||||
G4double lp = std::log(p);
|
||||
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
G4double lr2 = lr*lr;
|
||||
fElasticXsc = 13./( lr2 + lr2*lr2 + .0676);
|
||||
fTotalXsc = fElasticXsc;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double sp = std::sqrt(p);
|
||||
fElasticXsc = pbe*ld2 + 2.4 + 6./sp;
|
||||
fTotalXsc = pbt*ld2 + 22.3 + 5./sp;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double lr = lp + 1.27;
|
||||
G4double lr2 = lr*lr;
|
||||
G4double LE = 13./(lr2 + lr2*lr2 + .0676);
|
||||
G4double ld = lp - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double lm = lp - .32;
|
||||
G4double md = lm*lm + .0576;
|
||||
fElasticXsc = LE + (pbe*ld2 + 2.4 + 6./sp)/(1. + 3./p4) + .7/md;
|
||||
fTotalXsc = LE + (pbt*ld2 + 22.3 + 5./sp)/(1. + 1./p4) + .8/md;
|
||||
}
|
||||
}
|
||||
else if( I == 4 ) // Kmp/Kmn/K0p/K0n
|
||||
{
|
||||
if( p < pmi)
|
||||
{
|
||||
G4double psp = p*std::sqrt(p);
|
||||
fElasticXsc = 5.2/psp;
|
||||
fTotalXsc = 14./psp;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
fElasticXsc = pbe*ld2 + 2.23;
|
||||
fTotalXsc = pbt*ld2 + 19.5;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double psp = p*sp;
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double lm = p - .39;
|
||||
G4double md = lm*lm + .000156;
|
||||
G4double lh = p - 1.;
|
||||
G4double hd = lh*lh + .0156;
|
||||
fElasticXsc = 5.2/psp + (pbe*ld2 + 2.23)/(1. - .7/sp + .075/p4) + .004/md + .15/hd;
|
||||
fTotalXsc = 14./psp + (pbt*ld2 + 19.5)/(1. - .21/sp + .52/p4) + .006/md + .30/hd;
|
||||
}
|
||||
}
|
||||
else if( I == 5 ) // Kpp/Kpn/aKp/aKn
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double lr = p - .38;
|
||||
G4double lm = p - 1.;
|
||||
G4double md = lm*lm + .372;
|
||||
fElasticXsc = .7/(lr*lr + .0676) + 2./md;
|
||||
fTotalXsc = fElasticXsc + .6/md;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
fElasticXsc = pbe*ld2 + 2.23;
|
||||
fTotalXsc = pbt*ld2 + 19.5;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double ld = std::log(p) - lmi;
|
||||
G4double ld2 = ld*ld;
|
||||
G4double lr = p - .38;
|
||||
G4double LE = .7/(lr*lr + .0676);
|
||||
G4double sp = std::sqrt(p);
|
||||
G4double p2 = p*p;
|
||||
G4double p4 = p2*p2;
|
||||
G4double lm = p - 1.;
|
||||
G4double md = lm*lm + .372;
|
||||
fElasticXsc = LE + (pbe*ld2 + 2.23)/(1. - .7/sp + .1/p4) + 2./md;
|
||||
fTotalXsc = LE + (pbt*ld2 + 19.5)/(1. + .46/sp + 1.6/p4) + 2.6/md;
|
||||
}
|
||||
}
|
||||
else if( I == 6 ) // hyperon-N
|
||||
{
|
||||
if( p < pmi )
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
fElasticXsc = 1./(.002 + p2*(.12 + p2));
|
||||
fTotalXsc = fElasticXsc;
|
||||
}
|
||||
else if( p > pma )
|
||||
{
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double sp = std::sqrt(p);
|
||||
fElasticXsc = (pbe*lp2 + 6.72)/(1. + 2./sp);
|
||||
fTotalXsc = (pbt*lp2 + 38.2 + 900./sp)/(1. + 27./sp);
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double p2 = p*p;
|
||||
G4double LE = 1./(.002 + p2*(.12 + p2));
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
G4double p4 = p2*p2;
|
||||
G4double sp = std::sqrt(p);
|
||||
fElasticXsc = LE + (pbe*lp2 + 6.72 + 99./p2)/(1. + 2./sp + 2./p4);
|
||||
fTotalXsc = LE + (pbt*lp2 + 38.2 + 900./sp)/(1. + 27./sp + 3./p4);
|
||||
}
|
||||
}
|
||||
else if( I == 7 ) // antibaryon-N
|
||||
{
|
||||
if( p > pma )
|
||||
{
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
fElasticXsc = pbe*lp2 + 6.72;
|
||||
fTotalXsc = pbt*lp2 + 38.2;
|
||||
}
|
||||
else
|
||||
{
|
||||
G4double ye = std::pow(p, 1.25);
|
||||
G4double yt = std::pow(p, .35);
|
||||
G4double lp = std::log(p) - lmi;
|
||||
G4double lp2 = lp*lp;
|
||||
fElasticXsc = 80./(ye + 1.) + pbe*lp2 + 6.72;
|
||||
fTotalXsc = (80./yt + .3)/yt +pbt*lp2 + 38.2;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
G4cout<<"PDG incoding = "<<I<<" is not defined (0-7)"<<G4endl;
|
||||
|
||||
}
|
||||
if( fElasticXsc > fTotalXsc ) fElasticXsc = fTotalXsc;
|
||||
|
||||
fTotalXsc *= millibarn;
|
||||
fElasticXsc *= millibarn;
|
||||
fInelasticXsc = fTotalXsc - fElasticXsc;
|
||||
if (fInelasticXsc < 0.) fInelasticXsc = 0.;
|
||||
|
||||
|
||||
return fTotalXsc;
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
//
|
||||
|
||||
@@ -670,7 +670,6 @@ GetIsoZACrossSection( const G4DynamicParticle* aParticle,
|
||||
fTotalXsc = Interpolate(Z1, Z2, Z, xt1, xt2);
|
||||
}
|
||||
}
|
||||
|
||||
fElasticXsc = fTotalXsc - result;
|
||||
if( fElasticXsc < 0.) fElasticXsc = 0.;
|
||||
|
||||
|
||||
@@ -25,7 +25,7 @@
|
||||
//
|
||||
//
|
||||
// The lust update: M.V. Kossov, CERN/ITEP(Moscow) 17-June-02
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
//
|
||||
// G4 Physics class: G4PhotoNuclearCrossSection for gamma+A cross sections
|
||||
@@ -40,7 +40,7 @@
|
||||
|
||||
#include "G4PhotoNuclearCrossSection.hh"
|
||||
|
||||
// Initialization of the
|
||||
// Initialization of the statics
|
||||
G4int G4PhotoNuclearCrossSection::lastN=0;
|
||||
// The last N of calculated nucleus
|
||||
G4int G4PhotoNuclearCrossSection::lastZ=0;
|
||||
@@ -58,6 +58,24 @@ G4double G4PhotoNuclearCrossSection::lastTH=0.;
|
||||
G4double G4PhotoNuclearCrossSection::lastSP=0.;
|
||||
// Last value of the ShadowingPomeron (A-dependent)
|
||||
|
||||
std::vector<G4double*> G4PhotoNuclearCrossSection::GDR; // Vector of pointers to the GDRPhotonuclearCrossSection
|
||||
std::vector<G4double*> G4PhotoNuclearCrossSection::HEN; // Vector of pointers to the HighEnPhotonuclearCrossSect
|
||||
|
||||
G4PhotoNuclearCrossSection::G4PhotoNuclearCrossSection()
|
||||
{
|
||||
}
|
||||
|
||||
G4PhotoNuclearCrossSection::~G4PhotoNuclearCrossSection()
|
||||
{
|
||||
std::vector<G4double*>::iterator pos;
|
||||
for(pos=GDR.begin(); pos<GDR.end(); pos++)
|
||||
{ delete [] *pos; }
|
||||
GDR.clear();
|
||||
for(pos=HEN.begin(); pos<HEN.end(); pos++)
|
||||
{ delete [] *pos; }
|
||||
HEN.clear();
|
||||
}
|
||||
|
||||
// The main member function giving the gamma-A cross section
|
||||
// (E in GeV, CS in mb)
|
||||
|
||||
@@ -125,8 +143,6 @@ G4PhotoNuclearCrossSection::GetIsoZACrossSection(const G4DynamicParticle* aPart,
|
||||
static std::vector <G4int> colZ; // Z of calculated nuclei
|
||||
static std::vector <G4double> spA; // shadowing coefficients (A-dependent)
|
||||
static std::vector <G4double> eTH; // energy threshold (A-dependent)
|
||||
static std::vector <G4double*> GDR; // Vector of pointers to the GDRPhotonuclearCrossSection
|
||||
static std::vector <G4double*> HEN; // Vector of pointers to the HighEnPhotonuclearCrossSect
|
||||
//
|
||||
const G4double Energy = aPart->GetKineticEnergy()/MeV;
|
||||
const G4int targetAtomicNumber = static_cast<int>(AA+.499); //@@ Nat mixture (?!)
|
||||
|
||||
@@ -23,7 +23,7 @@
|
||||
// * acceptance of all terms of the Geant4 Software license. *
|
||||
// ********************************************************************
|
||||
//
|
||||
// GEANT4 tag $Name: geant4-08-03 $
|
||||
// GEANT4 tag $Name: geant4-09-00 $
|
||||
//
|
||||
// --------------------------------------------------------------------
|
||||
// by J.P Wellisch, Sun Sep 15 2002.
|
||||
|
||||
@@ -368,8 +368,10 @@ GetIsoZACrossSection(const G4DynamicParticle* particle, G4double ZZ,
|
||||
G4double result = 0;
|
||||
G4int Z=G4lrint(ZZ);
|
||||
debug.push_back(Z);
|
||||
size_t it=0;
|
||||
size_t it = 0;
|
||||
|
||||
while(it<theZ.size() && Z>theZ[it]) it++;
|
||||
|
||||
debug.push_back(theZ[it]);
|
||||
debug.push_back(kineticEnergy);
|
||||
|
||||
@@ -380,13 +382,16 @@ GetIsoZACrossSection(const G4DynamicParticle* particle, G4double ZZ,
|
||||
}
|
||||
G4int Z1, Z2;
|
||||
G4double x1, x2, xt1, xt2;
|
||||
if(charge<0)
|
||||
if( charge < 0 )
|
||||
{
|
||||
if(theZ[it]==Z)
|
||||
if( theZ[it] == Z )
|
||||
{
|
||||
result = thePimData[it]->ReactionXSection(kineticEnergy);
|
||||
fTotalXsc = thePimData[it]->TotalXSection(kineticEnergy);
|
||||
|
||||
debug.push_back("D1 ");
|
||||
debug.push_back(result);
|
||||
debug.push_back(fTotalXsc);
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user