Gabriele Cosmo
896 lines
28 KiB
C++
896 lines
28 KiB
C++
//
|
|
// ********************************************************************
|
|
// * License and Disclaimer *
|
|
// * *
|
|
// * The Geant4 software is copyright of the Copyright Holders of *
|
|
// * the Geant4 Collaboration. It is provided under the terms and *
|
|
// * conditions of the Geant4 Software License, included in the file *
|
|
// * LICENSE and available at http://cern.ch/geant4/license . These *
|
|
// * include a list of copyright holders. *
|
|
// * *
|
|
// * Neither the authors of this software system, nor their employing *
|
|
// * institutes,nor the agencies providing financial support for this *
|
|
// * work make any representation or warranty, express or implied, *
|
|
// * regarding this software system or assume any liability for its *
|
|
// * use. Please see the license in the file LICENSE and URL above *
|
|
// * for the full disclaimer and the limitation of liability. *
|
|
// * *
|
|
// * This code implementation is the result of the scientific and *
|
|
// * technical work of the GEANT4 collaboration. *
|
|
// * By using, copying, modifying or distributing the software (or *
|
|
// * any work based on the software) you agree to acknowledge its *
|
|
// * use in resulting scientific publications, and indicate your *
|
|
// * acceptance of all terms of the Geant4 Software license. *
|
|
// ********************************************************************
|
|
//
|
|
//
|
|
// 17.07.06 V. Grichine - first implementation
|
|
// 22.01.07 V.Ivanchenko - add interface with Z and A
|
|
// 05.03.07 V.Ivanchenko - add IfZAApplicable
|
|
//
|
|
|
|
#include "G4GlauberGribovCrossSection.hh"
|
|
|
|
#include "G4ParticleTable.hh"
|
|
#include "G4IonTable.hh"
|
|
#include "G4ParticleDefinition.hh"
|
|
|
|
//////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
|
|
G4GlauberGribovCrossSection::G4GlauberGribovCrossSection()
|
|
: fUpperLimit( 10000 * GeV ),
|
|
fLowerLimit( 3 * GeV ),
|
|
fRadiusConst( 1.08*fermi ) // 1.1, 1.3 ?
|
|
{
|
|
theGamma = G4Gamma::Gamma();
|
|
theProton = G4Proton::Proton();
|
|
theNeutron = G4Neutron::Neutron();
|
|
theAProton = G4AntiProton::AntiProton();
|
|
theANeutron = G4AntiNeutron::AntiNeutron();
|
|
thePiPlus = G4PionPlus::PionPlus();
|
|
thePiMinus = G4PionMinus::PionMinus();
|
|
thePiZero = G4PionZero::PionZero();
|
|
theKPlus = G4KaonPlus::KaonPlus();
|
|
theKMinus = G4KaonMinus::KaonMinus();
|
|
theK0S = G4KaonZeroShort::KaonZeroShort();
|
|
theK0L = G4KaonZeroLong::KaonZeroLong();
|
|
theL = G4Lambda::Lambda();
|
|
theAntiL = G4AntiLambda::AntiLambda();
|
|
theSPlus = G4SigmaPlus::SigmaPlus();
|
|
theASPlus = G4AntiSigmaPlus::AntiSigmaPlus();
|
|
theSMinus = G4SigmaMinus::SigmaMinus();
|
|
theASMinus = G4AntiSigmaMinus::AntiSigmaMinus();
|
|
theS0 = G4SigmaZero::SigmaZero();
|
|
theAS0 = G4AntiSigmaZero::AntiSigmaZero();
|
|
theXiMinus = G4XiMinus::XiMinus();
|
|
theXi0 = G4XiZero::XiZero();
|
|
theAXiMinus = G4AntiXiMinus::AntiXiMinus();
|
|
theAXi0 = G4AntiXiZero::AntiXiZero();
|
|
theOmega = G4OmegaMinus::OmegaMinus();
|
|
theAOmega = G4AntiOmegaMinus::AntiOmegaMinus();
|
|
theD = G4Deuteron::Deuteron();
|
|
theT = G4Triton::Triton();
|
|
theA = G4Alpha::Alpha();
|
|
theHe3 = G4He3::He3();
|
|
}
|
|
|
|
///////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
G4GlauberGribovCrossSection::~G4GlauberGribovCrossSection()
|
|
{
|
|
}
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
|
|
G4bool
|
|
G4GlauberGribovCrossSection::IsApplicable(const G4DynamicParticle* aDP,
|
|
const G4Element* anElement)
|
|
{
|
|
return IsZAApplicable(aDP, anElement->GetZ(), anElement->GetN());
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
G4bool
|
|
G4GlauberGribovCrossSection::IsZAApplicable(const G4DynamicParticle* aDP,
|
|
G4double Z, G4double)
|
|
{
|
|
G4bool applicable = false;
|
|
// G4int baryonNumber = aDP->GetDefinition()->GetBaryonNumber();
|
|
G4double kineticEnergy = aDP->GetKineticEnergy();
|
|
|
|
const G4ParticleDefinition* theParticle = aDP->GetDefinition();
|
|
|
|
if ( ( kineticEnergy >= fLowerLimit &&
|
|
Z > 1.5 && // >= He
|
|
( theParticle == theAProton ||
|
|
theParticle == theGamma ||
|
|
theParticle == theKPlus ||
|
|
theParticle == theKMinus ||
|
|
theParticle == theSMinus) ) ||
|
|
|
|
( kineticEnergy >= 0.1*fLowerLimit &&
|
|
Z > 1.5 && // >= He
|
|
( theParticle == theProton ||
|
|
theParticle == theNeutron ||
|
|
theParticle == thePiPlus ||
|
|
theParticle == thePiMinus ) ) ) applicable = true;
|
|
|
|
return applicable;
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// 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
|
|
|
|
|
|
G4double G4GlauberGribovCrossSection::
|
|
GetCrossSection(const G4DynamicParticle* aParticle, const G4Element* anElement, G4double T)
|
|
{
|
|
return GetIsoZACrossSection(aParticle, anElement->GetZ(), anElement->GetN(), T);
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// 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
|
|
|
|
|
|
|
|
G4double G4GlauberGribovCrossSection::
|
|
GetIsoZACrossSection(const G4DynamicParticle* aParticle, G4double Z, G4double A, G4double)
|
|
{
|
|
G4double xsection, sigma, cofInelastic, cofTotal, nucleusSquare, ratio;
|
|
G4double R = GetNucleusRadius(A);
|
|
|
|
const G4ParticleDefinition* theParticle = aParticle->GetDefinition();
|
|
|
|
if( theParticle == theProton ||
|
|
theParticle == theNeutron ||
|
|
theParticle == thePiPlus ||
|
|
theParticle == thePiMinus )
|
|
{
|
|
sigma = GetHadronNucleaonXscNS(aParticle, A, Z);
|
|
cofInelastic = 2.4;
|
|
cofTotal = 2.0;
|
|
}
|
|
else
|
|
{
|
|
sigma = GetHadronNucleaonXscPDG(aParticle, A, Z);
|
|
cofInelastic = 2.2;
|
|
cofTotal = 2.0;
|
|
}
|
|
nucleusSquare = cofTotal*pi*R*R; // basically 2piRR
|
|
ratio = sigma/nucleusSquare;
|
|
|
|
xsection = nucleusSquare*std::log( 1. + ratio );
|
|
|
|
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;
|
|
|
|
if (fElasticXsc < 0.) fElasticXsc = 0.;
|
|
|
|
return xsection;
|
|
}
|
|
|
|
/////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Returns hadron-nucleon Xsc according to differnt parametrisations:
|
|
// [2] E. Levin, hep-ph/9710546
|
|
// [3] U. Dersch, et al, hep-ex/9910052
|
|
// [4] M.J. Longo, et al, Phys.Rev.Lett. 33 (1974) 725
|
|
|
|
G4double
|
|
G4GlauberGribovCrossSection::GetHadronNucleaonXsc(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 );
|
|
}
|
|
|
|
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Returns hadron-nucleon Xsc according to differnt parametrisations:
|
|
// [2] E. Levin, hep-ph/9710546
|
|
// [3] U. Dersch, et al, hep-ex/9910052
|
|
// [4] M.J. Longo, et al, Phys.Rev.Lett. 33 (1974) 725
|
|
|
|
G4double
|
|
G4GlauberGribovCrossSection::GetHadronNucleaonXsc(const G4DynamicParticle* aParticle,
|
|
G4double At, G4double Zt )
|
|
{
|
|
G4double xsection;
|
|
|
|
|
|
G4double targ_mass = G4ParticleTable::GetParticleTable()->
|
|
GetIonTable()->GetIonMass( G4int(Zt+0.5) , G4int(At+0.5) );
|
|
|
|
targ_mass = 0.939*GeV; // ~mean neutron and proton ???
|
|
|
|
G4double proj_mass = aParticle->GetMass();
|
|
G4double proj_momentum = aParticle->GetMomentum().mag();
|
|
G4double sMand = CalcMandelstamS ( proj_mass , targ_mass , proj_momentum );
|
|
|
|
sMand /= GeV*GeV; // in GeV for parametrisation
|
|
proj_momentum /= GeV;
|
|
|
|
const G4ParticleDefinition* theParticle = aParticle->GetDefinition();
|
|
|
|
|
|
if(theParticle == theGamma)
|
|
{
|
|
xsection = At*(0.0677*std::pow(sMand,0.0808) + 0.129*std::pow(sMand,-0.4525));
|
|
}
|
|
else if(theParticle == theNeutron) // as proton ???
|
|
{
|
|
xsection = At*(21.70*std::pow(sMand,0.0808) + 56.08*std::pow(sMand,-0.4525));
|
|
}
|
|
else if(theParticle == theProton)
|
|
{
|
|
xsection = At*(21.70*std::pow(sMand,0.0808) + 56.08*std::pow(sMand,-0.4525));
|
|
// xsection = At*( 49.51*std::pow(sMand,-0.097) + 0.314*std::log(sMand)*std::log(sMand) );
|
|
// xsection = At*( 38.4 + 0.85*std::abs(std::pow(log(sMand),1.47)) );
|
|
}
|
|
else if(theParticle == theAProton)
|
|
{
|
|
xsection = At*( 21.70*std::pow(sMand,0.0808) + 98.39*std::pow(sMand,-0.4525));
|
|
}
|
|
else if(theParticle == thePiPlus)
|
|
{
|
|
xsection = At*(13.63*std::pow(sMand,0.0808) + 27.56*std::pow(sMand,-0.4525));
|
|
}
|
|
else if(theParticle == thePiMinus)
|
|
{
|
|
// xsection = At*( 55.2*std::pow(sMand,-0.255) + 0.346*std::log(sMand)*std::log(sMand) );
|
|
xsection = At*(13.63*std::pow(sMand,0.0808) + 36.02*std::pow(sMand,-0.4525));
|
|
}
|
|
else if(theParticle == theKPlus)
|
|
{
|
|
xsection = At*(11.82*std::pow(sMand,0.0808) + 8.15*std::pow(sMand,-0.4525));
|
|
}
|
|
else if(theParticle == theKMinus)
|
|
{
|
|
xsection = At*(11.82*std::pow(sMand,0.0808) + 26.36*std::pow(sMand,-0.4525));
|
|
}
|
|
else // as proton ???
|
|
{
|
|
xsection = At*(21.70*std::pow(sMand,0.0808) + 56.08*std::pow(sMand,-0.4525));
|
|
}
|
|
xsection *= millibarn;
|
|
return xsection;
|
|
}
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Returns hadron-nucleon Xsc according to PDG parametrisation (2005):
|
|
// http://pdg.lbl.gov/2006/reviews/hadronicrpp.pdf
|
|
|
|
G4double
|
|
G4GlauberGribovCrossSection::GetHadronNucleaonXscPDG(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 );
|
|
}
|
|
|
|
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Returns hadron-nucleon Xsc according to PDG parametrisation (2005):
|
|
// http://pdg.lbl.gov/2006/reviews/hadronicrpp.pdf
|
|
// At = number of nucleons, Zt = number of protons
|
|
|
|
G4double
|
|
G4GlauberGribovCrossSection::GetHadronNucleaonXscPDG(const G4DynamicParticle* aParticle,
|
|
G4double At, G4double Zt )
|
|
{
|
|
G4double xsection;
|
|
|
|
G4double Nt = At-Zt; // number of neutrons
|
|
if (Nt < 0.) Nt = 0.;
|
|
|
|
|
|
G4double targ_mass = G4ParticleTable::GetParticleTable()->
|
|
GetIonTable()->GetIonMass( G4int(Zt+0.5) , G4int(At+0.5) );
|
|
|
|
targ_mass = 0.939*GeV; // ~mean neutron and proton ???
|
|
|
|
G4double proj_mass = aParticle->GetMass();
|
|
G4double proj_momentum = aParticle->GetMomentum().mag();
|
|
|
|
G4double sMand = CalcMandelstamS ( proj_mass , targ_mass , proj_momentum );
|
|
|
|
sMand /= GeV*GeV; // in GeV for parametrisation
|
|
|
|
// General PDG fit constants
|
|
|
|
G4double s0 = 5.38*5.38; // in Gev^2
|
|
G4double eta1 = 0.458;
|
|
G4double eta2 = 0.458;
|
|
G4double B = 0.308;
|
|
|
|
|
|
const G4ParticleDefinition* theParticle = aParticle->GetDefinition();
|
|
|
|
|
|
if(theParticle == theNeutron) // proton-neutron fit
|
|
{
|
|
xsection = Zt*( 35.80 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 40.15*std::pow(sMand,-eta1) - 30.*std::pow(sMand,-eta2));
|
|
xsection += Nt*( 35.45 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 42.53*std::pow(sMand,-eta1) - 33.34*std::pow(sMand,-eta2)); // pp for nn
|
|
}
|
|
else if(theParticle == theProton)
|
|
{
|
|
|
|
xsection = Zt*( 35.45 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 42.53*std::pow(sMand,-eta1) - 33.34*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 35.80 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 40.15*std::pow(sMand,-eta1) - 30.*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theAProton)
|
|
{
|
|
xsection = Zt*( 35.45 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 42.53*std::pow(sMand,-eta1) + 33.34*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 35.80 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 40.15*std::pow(sMand,-eta1) + 30.*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == thePiPlus)
|
|
{
|
|
xsection = At*( 20.86 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 19.24*std::pow(sMand,-eta1) - 6.03*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == thePiMinus)
|
|
{
|
|
xsection = At*( 20.86 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 19.24*std::pow(sMand,-eta1) + 6.03*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theKPlus)
|
|
{
|
|
xsection = Zt*( 17.91 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 7.14*std::pow(sMand,-eta1) - 13.45*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 17.87 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 5.17*std::pow(sMand,-eta1) - 7.23*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theKMinus)
|
|
{
|
|
xsection = Zt*( 17.91 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 7.14*std::pow(sMand,-eta1) + 13.45*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 17.87 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 5.17*std::pow(sMand,-eta1) + 7.23*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theSMinus)
|
|
{
|
|
xsection = At*( 35.20 + B*std::pow(std::log(sMand/s0),2.)
|
|
- 199.*std::pow(sMand,-eta1) + 264.*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theGamma) // modify later on
|
|
{
|
|
xsection = At*( 0.0 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 0.032*std::pow(sMand,-eta1) - 0.0*std::pow(sMand,-eta2));
|
|
|
|
}
|
|
else // as proton ???
|
|
{
|
|
xsection = Zt*( 35.45 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 42.53*std::pow(sMand,-eta1) - 33.34*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 35.80 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 40.15*std::pow(sMand,-eta1) - 30.*std::pow(sMand,-eta2));
|
|
}
|
|
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,
|
|
const G4Element* anElement )
|
|
{
|
|
G4double At = anElement->GetN(); // number of nucleons
|
|
G4double Zt = anElement->GetZ(); // number of protons
|
|
|
|
|
|
return GetHadronNucleaonXscNS( aParticle, At, Zt );
|
|
}
|
|
|
|
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// 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,
|
|
G4double At, G4double Zt )
|
|
{
|
|
G4double xsection(0), Delta, A0, B0;
|
|
G4double hpXsc(0);
|
|
G4double hnXsc(0);
|
|
|
|
G4double Nt = At-Zt; // number of neutrons
|
|
if (Nt < 0.) Nt = 0.;
|
|
|
|
|
|
G4double targ_mass = G4ParticleTable::GetParticleTable()->
|
|
GetIonTable()->GetIonMass( G4int(Zt+0.5) , G4int(At+0.5) );
|
|
|
|
targ_mass = 0.939*GeV; // ~mean neutron and proton ???
|
|
|
|
G4double proj_mass = aParticle->GetMass();
|
|
G4double proj_energy = aParticle->GetTotalEnergy();
|
|
G4double proj_momentum = aParticle->GetMomentum().mag();
|
|
|
|
G4double sMand = CalcMandelstamS ( proj_mass , targ_mass , proj_momentum );
|
|
|
|
sMand /= GeV*GeV; // in GeV for parametrisation
|
|
proj_momentum /= GeV;
|
|
proj_energy /= GeV;
|
|
proj_mass /= GeV;
|
|
|
|
// General PDG fit constants
|
|
|
|
G4double s0 = 5.38*5.38; // in Gev^2
|
|
G4double eta1 = 0.458;
|
|
G4double eta2 = 0.458;
|
|
G4double B = 0.308;
|
|
|
|
|
|
const G4ParticleDefinition* theParticle = aParticle->GetDefinition();
|
|
|
|
|
|
if(theParticle == theNeutron)
|
|
{
|
|
if( proj_momentum >= 10.)
|
|
// if( proj_momentum >= 2.)
|
|
{
|
|
Delta = 1.;
|
|
|
|
if( proj_energy < 40. ) Delta = 0.916+0.0021*proj_energy;
|
|
|
|
if(proj_momentum >= 10.)
|
|
{
|
|
B0 = 7.5;
|
|
A0 = 100. - B0*std::log(3.0e7);
|
|
|
|
xsection = A0 + B0*std::log(proj_energy) - 11
|
|
+ 103*std::pow(2*0.93827*proj_energy + proj_mass*proj_mass+
|
|
0.93827*0.93827,-0.165); // mb
|
|
}
|
|
xsection *= Zt + Nt;
|
|
}
|
|
else
|
|
{
|
|
// nn to be pp
|
|
|
|
if( proj_momentum < 0.73 )
|
|
{
|
|
hnXsc = 23 + 50*( std::pow( std::log(0.73/proj_momentum), 3.5 ) );
|
|
}
|
|
else if( proj_momentum < 1.05 )
|
|
{
|
|
hnXsc = 23 + 40*(std::log(proj_momentum/0.73))*
|
|
(std::log(proj_momentum/0.73));
|
|
}
|
|
else // if( proj_momentum < 10. )
|
|
{
|
|
hnXsc = 39.0+
|
|
75*(proj_momentum - 1.2)/(std::pow(proj_momentum,3.0) + 0.15);
|
|
}
|
|
// pn to be np
|
|
|
|
if( proj_momentum < 0.8 )
|
|
{
|
|
hpXsc = 33+30*std::pow(std::log(proj_momentum/1.3),4.0);
|
|
}
|
|
else if( proj_momentum < 1.4 )
|
|
{
|
|
hpXsc = 33+30*std::pow(std::log(proj_momentum/0.95),2.0);
|
|
}
|
|
else // if( proj_momentum < 10. )
|
|
{
|
|
hpXsc = 33.3+
|
|
20.8*(std::pow(proj_momentum,2.0)-1.35)/
|
|
(std::pow(proj_momentum,2.50)+0.95);
|
|
}
|
|
xsection = hpXsc*Zt + hnXsc*Nt;
|
|
}
|
|
}
|
|
else if(theParticle == theProton)
|
|
{
|
|
if( proj_momentum >= 10.)
|
|
// if( proj_momentum >= 2.)
|
|
{
|
|
Delta = 1.;
|
|
|
|
if( proj_energy < 40. ) Delta = 0.916+0.0021*proj_energy;
|
|
|
|
if(proj_momentum >= 10.)
|
|
{
|
|
B0 = 7.5;
|
|
A0 = 100. - B0*std::log(3.0e7);
|
|
|
|
xsection = A0 + B0*std::log(proj_energy) - 11
|
|
+ 103*std::pow(2*0.93827*proj_energy + proj_mass*proj_mass+
|
|
0.93827*0.93827,-0.165); // mb
|
|
}
|
|
xsection *= Zt + Nt;
|
|
}
|
|
else
|
|
{
|
|
// pp
|
|
|
|
if( proj_momentum < 0.73 )
|
|
{
|
|
hpXsc = 23 + 50*( std::pow( std::log(0.73/proj_momentum), 3.5 ) );
|
|
}
|
|
else if( proj_momentum < 1.05 )
|
|
{
|
|
hpXsc = 23 + 40*(std::log(proj_momentum/0.73))*
|
|
(std::log(proj_momentum/0.73));
|
|
}
|
|
else // if( proj_momentum < 10. )
|
|
{
|
|
hpXsc = 39.0+
|
|
75*(proj_momentum - 1.2)/(std::pow(proj_momentum,3.0) + 0.15);
|
|
}
|
|
// pn to be np
|
|
|
|
if( proj_momentum < 0.8 )
|
|
{
|
|
hnXsc = 33+30*std::pow(std::log(proj_momentum/1.3),4.0);
|
|
}
|
|
else if( proj_momentum < 1.4 )
|
|
{
|
|
hnXsc = 33+30*std::pow(std::log(proj_momentum/0.95),2.0);
|
|
}
|
|
else // if( proj_momentum < 10. )
|
|
{
|
|
hnXsc = 33.3+
|
|
20.8*(std::pow(proj_momentum,2.0)-1.35)/
|
|
(std::pow(proj_momentum,2.50)+0.95);
|
|
}
|
|
xsection = hpXsc*Zt + hnXsc*Nt;
|
|
// xsection = hpXsc*(Zt + Nt);
|
|
// xsection = hnXsc*(Zt + Nt);
|
|
}
|
|
// xsection *= 0.95;
|
|
}
|
|
else if(theParticle == theAProton)
|
|
{
|
|
xsection = Zt*( 35.45 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 42.53*std::pow(sMand,-eta1) + 33.34*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 35.80 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 40.15*std::pow(sMand,-eta1) + 30.*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == thePiPlus)
|
|
{
|
|
if(proj_momentum < 0.4)
|
|
{
|
|
G4double Ex3 = 180*std::exp(-(proj_momentum-0.29)*(proj_momentum-0.29)/0.085/0.085);
|
|
hpXsc = Ex3+20.0;
|
|
}
|
|
else if(proj_momentum < 1.15)
|
|
{
|
|
G4double Ex4 = 88*(std::log(proj_momentum/0.75))*(std::log(proj_momentum/0.75));
|
|
hpXsc = Ex4+14.0;
|
|
}
|
|
else if(proj_momentum < 3.5)
|
|
{
|
|
G4double Ex1 = 3.2*std::exp(-(proj_momentum-2.55)*(proj_momentum-2.55)/0.55/0.55);
|
|
G4double Ex2 = 12*std::exp(-(proj_momentum-1.47)*(proj_momentum-1.47)/0.225/0.225);
|
|
hpXsc = Ex1+Ex2+27.5;
|
|
}
|
|
else // if(proj_momentum > 3.5) // mb
|
|
{
|
|
hpXsc = 10.6+2.*std::log(proj_energy)+25*std::pow(proj_energy,-0.43);
|
|
}
|
|
// pi+n = pi-p??
|
|
|
|
if(proj_momentum < 0.37)
|
|
{
|
|
hnXsc = 28.0 + 40*std::exp(-(proj_momentum-0.29)*(proj_momentum-0.29)/0.07/0.07);
|
|
}
|
|
else if(proj_momentum<0.65)
|
|
{
|
|
hnXsc = 26+110*(std::log(proj_momentum/0.48))*(std::log(proj_momentum/0.48));
|
|
}
|
|
else if(proj_momentum<1.3)
|
|
{
|
|
hnXsc = 36.1+
|
|
10*std::exp(-(proj_momentum-0.72)*(proj_momentum-0.72)/0.06/0.06)+
|
|
24*std::exp(-(proj_momentum-1.015)*(proj_momentum-1.015)/0.075/0.075);
|
|
}
|
|
else if(proj_momentum<3.0)
|
|
{
|
|
hnXsc = 36.1+0.079-4.313*std::log(proj_momentum)+
|
|
3*std::exp(-(proj_momentum-2.1)*(proj_momentum-2.1)/0.4/0.4)+
|
|
1.5*std::exp(-(proj_momentum-1.4)*(proj_momentum-1.4)/0.12/0.12);
|
|
}
|
|
else // mb
|
|
{
|
|
hnXsc = 10.6+2*std::log(proj_energy)+30*std::pow(proj_energy,-0.43);
|
|
}
|
|
xsection = hpXsc*Zt + hnXsc*Nt;
|
|
}
|
|
else if(theParticle == thePiMinus)
|
|
{
|
|
// pi-n = pi+p??
|
|
|
|
if(proj_momentum < 0.4)
|
|
{
|
|
G4double Ex3 = 180*std::exp(-(proj_momentum-0.29)*(proj_momentum-0.29)/0.085/0.085);
|
|
hnXsc = Ex3+20.0;
|
|
}
|
|
else if(proj_momentum < 1.15)
|
|
{
|
|
G4double Ex4 = 88*(std::log(proj_momentum/0.75))*(std::log(proj_momentum/0.75));
|
|
hnXsc = Ex4+14.0;
|
|
}
|
|
else if(proj_momentum < 3.5)
|
|
{
|
|
G4double Ex1 = 3.2*std::exp(-(proj_momentum-2.55)*(proj_momentum-2.55)/0.55/0.55);
|
|
G4double Ex2 = 12*std::exp(-(proj_momentum-1.47)*(proj_momentum-1.47)/0.225/0.225);
|
|
hnXsc = Ex1+Ex2+27.5;
|
|
}
|
|
else // if(proj_momentum > 3.5) // mb
|
|
{
|
|
hnXsc = 10.6+2.*std::log(proj_energy)+25*std::pow(proj_energy,-0.43);
|
|
}
|
|
// pi-p
|
|
|
|
if(proj_momentum < 0.37)
|
|
{
|
|
hpXsc = 28.0 + 40*std::exp(-(proj_momentum-0.29)*(proj_momentum-0.29)/0.07/0.07);
|
|
}
|
|
else if(proj_momentum<0.65)
|
|
{
|
|
hpXsc = 26+110*(std::log(proj_momentum/0.48))*(std::log(proj_momentum/0.48));
|
|
}
|
|
else if(proj_momentum<1.3)
|
|
{
|
|
hpXsc = 36.1+
|
|
10*std::exp(-(proj_momentum-0.72)*(proj_momentum-0.72)/0.06/0.06)+
|
|
24*std::exp(-(proj_momentum-1.015)*(proj_momentum-1.015)/0.075/0.075);
|
|
}
|
|
else if(proj_momentum<3.0)
|
|
{
|
|
hpXsc = 36.1+0.079-4.313*std::log(proj_momentum)+
|
|
3*std::exp(-(proj_momentum-2.1)*(proj_momentum-2.1)/0.4/0.4)+
|
|
1.5*std::exp(-(proj_momentum-1.4)*(proj_momentum-1.4)/0.12/0.12);
|
|
}
|
|
else // mb
|
|
{
|
|
hpXsc = 10.6+2*std::log(proj_energy)+30*std::pow(proj_energy,-0.43);
|
|
}
|
|
xsection = hpXsc*Zt + hnXsc*Nt;
|
|
}
|
|
else if(theParticle == theKPlus)
|
|
{
|
|
xsection = Zt*( 17.91 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 7.14*std::pow(sMand,-eta1) - 13.45*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 17.87 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 5.17*std::pow(sMand,-eta1) - 7.23*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theKMinus)
|
|
{
|
|
xsection = Zt*( 17.91 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 7.14*std::pow(sMand,-eta1) + 13.45*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 17.87 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 5.17*std::pow(sMand,-eta1) + 7.23*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theSMinus)
|
|
{
|
|
xsection = At*( 35.20 + B*std::pow(std::log(sMand/s0),2.)
|
|
- 199.*std::pow(sMand,-eta1) + 264.*std::pow(sMand,-eta2));
|
|
}
|
|
else if(theParticle == theGamma) // modify later on
|
|
{
|
|
xsection = At*( 0.0 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 0.032*std::pow(sMand,-eta1) - 0.0*std::pow(sMand,-eta2));
|
|
|
|
}
|
|
else // as proton ???
|
|
{
|
|
xsection = Zt*( 35.45 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 42.53*std::pow(sMand,-eta1) - 33.34*std::pow(sMand,-eta2));
|
|
|
|
xsection += Nt*( 35.80 + B*std::pow(std::log(sMand/s0),2.)
|
|
+ 40.15*std::pow(sMand,-eta1) - 30.*std::pow(sMand,-eta2));
|
|
}
|
|
xsection *= millibarn; // parametrised in mb
|
|
return xsection;
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
G4double
|
|
G4GlauberGribovCrossSection::GetNucleusRadius( const G4DynamicParticle* ,
|
|
const G4Element* anElement)
|
|
{
|
|
G4double At = anElement->GetN();
|
|
G4double oneThird = 1.0/3.0;
|
|
G4double cubicrAt = std::pow (At, oneThird);
|
|
|
|
|
|
G4double R; // = fRadiusConst*cubicrAt;
|
|
/*
|
|
G4double tmp = std::pow( cubicrAt-1., 3.);
|
|
tmp += At;
|
|
tmp *= 0.5;
|
|
|
|
if (At > 20.) // 20.
|
|
{
|
|
R = fRadiusConst*std::pow (tmp, oneThird);
|
|
}
|
|
else
|
|
{
|
|
R = fRadiusConst*cubicrAt;
|
|
}
|
|
*/
|
|
|
|
R = fRadiusConst*cubicrAt;
|
|
|
|
G4double meanA = 21.;
|
|
|
|
G4double tauA1 = 40.;
|
|
G4double tauA2 = 10.;
|
|
G4double tauA3 = 5.;
|
|
|
|
G4double a1 = 0.85;
|
|
G4double b1 = 1. - a1;
|
|
|
|
G4double b2 = 0.3;
|
|
G4double b3 = 4.;
|
|
|
|
if (At > 20.) // 20.
|
|
{
|
|
R *= ( a1 + b1*std::exp( -(At - meanA)/tauA1) );
|
|
}
|
|
else if (At > 3.5)
|
|
{
|
|
R *= ( 1.0 + b2*( 1. - std::exp( (At - meanA)/tauA2) ) );
|
|
}
|
|
else
|
|
{
|
|
R *= ( 1.0 + b3*( 1. - std::exp( (At - meanA)/tauA3) ) );
|
|
}
|
|
|
|
return R;
|
|
}
|
|
////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
G4double
|
|
G4GlauberGribovCrossSection::GetNucleusRadius(G4double At)
|
|
{
|
|
G4double oneThird = 1.0/3.0;
|
|
G4double cubicrAt = std::pow (At, oneThird);
|
|
|
|
|
|
G4double R; // = fRadiusConst*cubicrAt;
|
|
|
|
/*
|
|
G4double tmp = std::pow( cubicrAt-1., 3.);
|
|
tmp += At;
|
|
tmp *= 0.5;
|
|
|
|
if (At > 20.)
|
|
{
|
|
R = fRadiusConst*std::pow (tmp, oneThird);
|
|
}
|
|
else
|
|
{
|
|
R = fRadiusConst*cubicrAt;
|
|
}
|
|
*/
|
|
|
|
R = fRadiusConst*cubicrAt;
|
|
|
|
G4double meanA = 20.;
|
|
G4double tauA = 20.;
|
|
|
|
if (At > 20.) // 20.
|
|
{
|
|
R *= ( 0.8 + 0.2*std::exp( -(At - meanA)/tauA) );
|
|
}
|
|
else
|
|
{
|
|
R *= ( 1.0 + 0.1*( 1. - std::exp( (At - meanA)/tauA) ) );
|
|
}
|
|
|
|
return R;
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
G4double G4GlauberGribovCrossSection::CalculateEcmValue( const G4double mp ,
|
|
const G4double mt ,
|
|
const G4double Plab )
|
|
{
|
|
G4double Elab = std::sqrt ( mp * mp + Plab * Plab );
|
|
G4double Ecm = std::sqrt ( mp * mp + mt * mt + 2 * Elab * mt );
|
|
// G4double Pcm = Plab * mt / Ecm;
|
|
// G4double KEcm = std::sqrt ( Pcm * Pcm + mp * mp ) - mp;
|
|
|
|
return Ecm ; // KEcm;
|
|
}
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
//
|
|
|
|
G4double G4GlauberGribovCrossSection::CalcMandelstamS( const G4double mp ,
|
|
const G4double mt ,
|
|
const G4double Plab )
|
|
{
|
|
G4double Elab = std::sqrt ( mp * mp + Plab * Plab );
|
|
G4double sMand = mp*mp + mt*mt + 2*Elab*mt ;
|
|
|
|
return sMand;
|
|
}
|
|
|
|
|
|
//
|
|
//
|
|
///////////////////////////////////////////////////////////////////////////////////////
|