Import Geant4 9.2.0 source tree
This commit is contained in:
@@ -23,8 +23,8 @@
|
||||
// * acceptance of all terms of the Geant4 Software license. *
|
||||
// ********************************************************************
|
||||
//
|
||||
// $Id: G4BGGNucleonInelasticXS.cc,v 1.1 2007/03/13 15:19:30 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-09-01 $
|
||||
// $Id: G4BGGNucleonInelasticXS.cc,v 1.3 2008/12/01 16:50:23 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-09-02 $
|
||||
//
|
||||
// -------------------------------------------------------------------
|
||||
//
|
||||
@@ -45,6 +45,7 @@
|
||||
#include "G4BGGNucleonInelasticXS.hh"
|
||||
#include "G4GlauberGribovCrossSection.hh"
|
||||
#include "G4NucleonNuclearCrossSection.hh"
|
||||
#include "G4HadronNucleonXsc.hh"
|
||||
#include "G4Proton.hh"
|
||||
#include "G4Neutron.hh"
|
||||
#include "G4NistManager.hh"
|
||||
@@ -54,22 +55,14 @@
|
||||
G4BGGNucleonInelasticXS::G4BGGNucleonInelasticXS(const G4ParticleDefinition* p)
|
||||
{
|
||||
verboseLevel = 0;
|
||||
thEnergy = 100.*GeV;
|
||||
if(p == G4Proton::Proton() || p == G4Neutron::Neutron()) {
|
||||
fNucleon = new G4NucleonNuclearCrossSection();
|
||||
fGlauber = new G4GlauberGribovCrossSection();
|
||||
particle = p;
|
||||
Initialise();
|
||||
} else {
|
||||
fNucleon = 0;
|
||||
fGlauber = 0;
|
||||
particle = 0;
|
||||
if(p) G4cout << "### G4BGGNucleonInelasticXS WARNING: is not applicable to "
|
||||
<< p->GetParticleName()
|
||||
<< G4endl;
|
||||
else G4cout << "### G4BGGNucleonInelasticXS WARNING: particle is not defined "
|
||||
<< G4endl;
|
||||
}
|
||||
fGlauberEnergy = 91.*GeV;
|
||||
fLowEnergy = 20.*MeV;
|
||||
fNucleon = 0;
|
||||
fGlauber = 0;
|
||||
fHadron = 0;
|
||||
particle = p;
|
||||
isProton = false;
|
||||
isInitialized = false;
|
||||
}
|
||||
|
||||
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
||||
@@ -78,6 +71,7 @@ G4BGGNucleonInelasticXS::~G4BGGNucleonInelasticXS()
|
||||
{
|
||||
delete fGlauber;
|
||||
delete fNucleon;
|
||||
delete fHadron;
|
||||
}
|
||||
|
||||
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
||||
@@ -89,11 +83,27 @@ G4double G4BGGNucleonInelasticXS::GetIsoZACrossSection(const G4DynamicParticle*
|
||||
{
|
||||
G4double cross = 0.0;
|
||||
G4double ekin = dp->GetKineticEnergy();
|
||||
G4int iz = G4int(Z + 0.5);
|
||||
G4int iz = G4int(Z);
|
||||
if(iz > 92) iz = 92;
|
||||
|
||||
if(ekin > thEnergy) {
|
||||
cross = theFac[iz]*fGlauber->GetInelasticGlauberGribov(dp, Z, A);
|
||||
if(ekin <= fLowEnergy) {
|
||||
cross = theCoulombFac[iz]*CoulombFactor(ekin, A);
|
||||
} else if(iz == 1) {
|
||||
if( A < 1.5) {
|
||||
//fHadron->GetHadronNucleonXscPDG(dp, G4Proton::Proton());
|
||||
//fHadron->GetHadronNucleonXscEL(dp, G4Proton::Proton());
|
||||
//fHadron->GetHadronNucleonXscNS(dp, G4Proton::Proton());
|
||||
//fHadron->GetHadronNucleonXscVU(dp, G4Proton::Proton());
|
||||
fHadron->GetHadronNucleonXscMK(dp, G4Proton::Proton());
|
||||
cross = fHadron->GetInelasticHadronNucleonXsc();
|
||||
} else {
|
||||
fHadron->GetHadronNucleonXscMK(dp, G4Proton::Proton());
|
||||
cross = fHadron->GetInelasticHadronNucleonXsc();
|
||||
fHadron->GetHadronNucleonXscMK(dp, G4Neutron::Neutron());
|
||||
cross += fHadron->GetInelasticHadronNucleonXsc();
|
||||
}
|
||||
} else if(ekin > fGlauberEnergy) {
|
||||
cross = theGlauberFac[iz]*fGlauber->GetInelasticGlauberGribov(dp, Z, A);
|
||||
} else {
|
||||
cross = fNucleon->GetIsoZACrossSection(dp, Z, A);
|
||||
}
|
||||
@@ -111,8 +121,16 @@ G4double G4BGGNucleonInelasticXS::GetIsoZACrossSection(const G4DynamicParticle*
|
||||
|
||||
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
||||
|
||||
void G4BGGNucleonInelasticXS::BuildPhysicsTable(const G4ParticleDefinition&)
|
||||
void G4BGGNucleonInelasticXS::BuildPhysicsTable(const G4ParticleDefinition& p)
|
||||
{
|
||||
if(&p == G4Proton::Proton() || &p == G4Neutron::Neutron()) {
|
||||
particle = &p;
|
||||
Initialise();
|
||||
} else {
|
||||
G4cout << "### G4BGGNucleonInelasticXS WARNING: is not applicable to "
|
||||
<< p.GetParticleName()
|
||||
<< G4endl;
|
||||
}
|
||||
}
|
||||
|
||||
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
||||
@@ -126,9 +144,19 @@ void G4BGGNucleonInelasticXS::DumpPhysicsTable(const G4ParticleDefinition&)
|
||||
|
||||
void G4BGGNucleonInelasticXS::Initialise()
|
||||
{
|
||||
if(isInitialized) return;
|
||||
isInitialized = true;
|
||||
|
||||
fNucleon = new G4NucleonNuclearCrossSection();
|
||||
fGlauber = new G4GlauberGribovCrossSection();
|
||||
fHadron = new G4HadronNucleonXsc();
|
||||
fNucleon->BuildPhysicsTable(*particle);
|
||||
fGlauber->BuildPhysicsTable(*particle);
|
||||
if(particle == G4Proton::Proton()) isProton = true;
|
||||
|
||||
G4ParticleDefinition* part = const_cast<G4ParticleDefinition*>(particle);
|
||||
G4ThreeVector mom(0.0,0.0,1.0);
|
||||
G4DynamicParticle dp(part, mom, thEnergy);
|
||||
G4DynamicParticle dp(part, mom, fGlauberEnergy);
|
||||
|
||||
G4NistManager* nist = G4NistManager::Instance();
|
||||
G4double A = nist->GetAtomicMassAmu(2);
|
||||
@@ -146,12 +174,61 @@ void G4BGGNucleonInelasticXS::Initialise()
|
||||
csup = fGlauber->GetInelasticGlauberGribov(&dp, Z, A);
|
||||
csdn = fNucleon->GetIsoZACrossSection(&dp, Z, A);
|
||||
|
||||
theFac[iz] = csdn/csup;
|
||||
theGlauberFac[iz] = csdn/csup;
|
||||
if(verboseLevel > 0) G4cout << "Z= " << Z << " A= " << A
|
||||
<< " factor= " << theFac[iz] << G4endl;
|
||||
<< " factor= " << theGlauberFac[iz] << G4endl;
|
||||
}
|
||||
dp.SetKineticEnergy(fLowEnergy);
|
||||
fHadron->GetHadronNucleonXscMK(&dp, G4Proton::Proton());
|
||||
theCoulombFac[1] =
|
||||
fHadron->GetInelasticHadronNucleonXsc()/CoulombFactor(fLowEnergy,1.0);
|
||||
|
||||
for(G4int iz=2; iz<93; iz++) {
|
||||
|
||||
G4double Z = G4double(iz);
|
||||
A = nist->GetAtomicMassAmu(iz);
|
||||
|
||||
theCoulombFac[iz] =
|
||||
fNucleon->GetIsoZACrossSection(&dp, Z, A)/CoulombFactor(fLowEnergy,A);
|
||||
|
||||
if(verboseLevel > 0) G4cout << "Z= " << Z << " A= " << A
|
||||
<< " factor= " << theCoulombFac[iz] << G4endl;
|
||||
}
|
||||
}
|
||||
|
||||
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
||||
|
||||
G4double G4BGGNucleonInelasticXS::CoulombFactor(G4double kinEnergy, G4double A)
|
||||
{
|
||||
G4double res= 0.0;
|
||||
if(kinEnergy <= DBL_MIN) return res;
|
||||
else if (A < 1.5) return kinEnergy*kinEnergy;
|
||||
|
||||
G4double elog = std::log10(kinEnergy/GeV);
|
||||
|
||||
// from G4ProtonInelasticCrossSection
|
||||
if(isProton) {
|
||||
G4double f1 = 8.0 - 8.0/A - 0.008*A;
|
||||
G4double f2 = 2.34 - 5.4/A - 0.0028*A;
|
||||
|
||||
res = 1.0/(1.0 + std::exp(-f1*(elog + f2)));
|
||||
|
||||
f1 = 5.6 - 0.016*A;
|
||||
f2 = 1.37 + 1.37/A;
|
||||
res *= ( 1.0 + (0.8 + 18./A - 0.002*A)/(1.0 + std::exp(f1*(elog + f2))));
|
||||
} else {
|
||||
|
||||
G4double p3 = 0.6 + 13./A - 0.0005*A;
|
||||
G4double p4 = 7.2449 - 0.018242*A;
|
||||
G4double p5 = 1.36 + 1.8/A + 0.0005*A;
|
||||
G4double p6 = 1. + 200./A + 0.02*A;
|
||||
G4double p7 = 3.0 - (A-70.)*(A-200.)/11000.;
|
||||
|
||||
res = (1.+p3/(1. + std::exp(p4*(elog+p5))))/(1.+std::exp(-p6*(elog+p7)));
|
||||
|
||||
}
|
||||
return res;
|
||||
}
|
||||
|
||||
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
|
||||
|
||||
|
||||
Reference in New Issue
Block a user