lars/geant4
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Import Geant4 4.1.0 source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2016-06-08 16:39:52 +02:00
parent 921d3b1cda
commit 330b82b769
4524 changed files with 178689 additions and 43575 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/processes/hadronic/cross_sections/include/G4ElectroNuclearCrossSection.hh
+77 -57
View File
@@ -21,12 +21,13 @@
// ********************************************************************
//
//
// $Id: G4ElectroNuclearCrossSection.hh,v 1.6 2001/11/30 14:58:04 stesting Exp $
// GEANT4 tag $Name: geant4-04-00 $
// $Id: G4ElectroNuclearCrossSection.hh,v 1.7 2002/05/22 11:48:44 mkossov Exp $
// GEANT4 tag $Name: geant4-04-01 $
//
//
// GEANT4 physics class: G4ElectroNuclearCrossSection -- header file
// M.V. Kossov, ITEP(Moscow), 24-OCT-01
// The last update: M.V. Kossov, CERN/ITEP (Moscow) 17-May-02
//
#ifndef G4ElectroNuclearCrossSection_h
@@ -65,32 +66,42 @@ public:
}
G4double GetCrossSection(const G4DynamicParticle* aParticle, const G4Element* anElement,
G4double temperature=0.);
G4double T=0.);
G4double GetEffectivePhotonEnergy();
G4double GetEquivalentPhotonEnergy();
G4double GetVirtualFactor(G4double nu, G4double Q2);
G4double GetEquivalentPhotonQ2(G4double nu);
void BuildPhysicsTable(const G4ParticleDefinition&) {}
void DumpPhysicsTable(const G4ParticleDefinition&) {}
private:
G4int GetFunctions(G4double a, G4double* y, G4double* z);
G4double LinearFit(G4double X, G4int N, const G4double* XN, const G4double* YN);
G4int GetFunctions(G4double a, G4double* x, G4double* y, G4double* z);
//G4double LinearFit(G4double X, G4int N, const G4double* XN, const G4double* YN);
G4double ThresholdEnergy(G4int Z, G4int N);
G4double HighEnergyPhi(G4double lE);
G4double HighEnergyFun(G4double lE);
G4double HighEnergyJ1(G4double lE);
G4double HighEnergyJ2(G4double lE);
G4double HighEnergyJ3(G4double lE);
G4double SolveTheEquation(G4double f);
G4double Fun(G4double x);
G4double DFun(G4double x);
// Body
private:
static G4int lastN; // The last N of calculated nucleus
static G4int lastZ; // The last Z of calculated nucleus
static G4int lastF; // Last used in the cross section TheFirstBin
static G4double* lastPhi; // Pointer to the last array of the Phi function
static G4double* lastFun; // Pointer to the last array of the Fun function
static G4double* lastJ1; // Pointer to the last array of the J1 function
static G4double* lastJ2; // Pointer to the last array of the J2 function
static G4double* lastJ3; // Pointer to the last array of the J3 function
static G4int lastL; // Last used in the cross section TheLastBin
static G4double lastLE; // Last used in the cross section TheLogE
static G4double lastE; // Last used in the cross section Energy
static G4double lastTH; // Last value of the Energy Threshold
static G4double lastSig; // Last value of the Cross Section
static G4double lastG; // Last value of gamma=lnE-ln(me)
static G4double lastH; // Last value of the High energy A-dependence
};
@@ -128,59 +139,68 @@ inline G4double G4ElectroNuclearCrossSection::ThresholdEnergy(G4int Z, G4int N)
return dN;
}
inline G4double G4ElectroNuclearCrossSection::DFun(G4double x)
inline G4double G4ElectroNuclearCrossSection::DFun(G4double x) // Original PhoNuc cross section
{
static const G4double f21=.75;
static const G4double f22=.78;
static const G4double f23=.9;
G4double f2=1.;
if (lastH<.005) f2=f21;
else if(lastH<0.01) f2=f22;
else if(lastH<0.07) f2=f23;
return (lastLE-x)*(0.0116*exp(0.16*x)+f2*exp(-0.26*x));
static const G4double shd=1.0734; // HE PomShadowing(D)
static const G4double poc=0.0375; // HE Pomeron coefficient
static const G4double pos=16.5; // HE Pomeron shift
static const G4double reg=.11; // HE Reggeon slope
static const G4double mel=0.5109989; // Mass of electron in MeV
static const G4double lmel=log(mel); // Log of electron mass
G4double lE=lastG+lmel;
return poc*(lE-pos)+shd*exp(-reg*lE);
}
inline G4double G4ElectroNuclearCrossSection::Fun(G4double x)
{return (lastLE*HighEnergyPhi(x)-HighEnergyFun(x));}
inline G4double G4ElectroNuclearCrossSection::HighEnergyPhi(G4double lEn)
inline G4double G4ElectroNuclearCrossSection::Fun(G4double x) // Integrated PhoNuc cross section
{
static const G4double le=log(2000.);
static const G4double c1=0.16;
static const G4double f1=.0116/c1;
static const G4double e1=exp(c1*le);
static const G4double c2=-0.26;
static const G4double f21=.75/c2;
static const G4double f22=.78/c2;
static const G4double f23=.9/c2;
static const G4double f24=1./c2;
static const G4double e2=exp(c2*le);
G4double f2=f24;
if (lastH<.005) f2=f21;
else if(lastH<0.01) f2=f22;
else if(lastH<0.07) f2=f23;
return f1*(exp(c1*lEn)-e1)+f2*(exp(c2*lEn)-e2);
static const G4double mel=0.5109989; // Mass of electron in MeV
static const G4double lmel=log(mel); // Log of electron mass
G4double dlg1=lastG+lastG-1.;
G4double lgoe=lastG/lastE;
G4double lE=lastG+lmel;
G4double HE2=HighEnergyJ2(lE);
return dlg1*HighEnergyJ1(lE)-lgoe*(HE2+HE2-HighEnergyJ3(lE)/lastE);
}
inline G4double G4ElectroNuclearCrossSection::HighEnergyFun(G4double lEn)
inline G4double G4ElectroNuclearCrossSection::HighEnergyJ1(G4double lEn)
{
static const G4double le=log(2000.);
static const G4double c1=0.16;
static const G4double f1=.0116/c1/c1;
static const G4double e1=(c1*le-1.)*exp(c1*le);
static const G4double c2=-0.26;
static const G4double f21=.75/c2/c2;
static const G4double f22=.78/c2/c2;
static const G4double f23=.9/c2/c2;
static const G4double f24=1./c2/c2;
static const G4double e2=(c2*le-1.)*exp(c2*le);
G4double f2=f24;
if (lastH<.005) f2=f21;
else if(lastH<0.01) f2=f22;
else if(lastH<0.07) f2=f23;
G4double h1=c1*lEn;
G4double h2=c2*lEn;
return f1*((h1-1.)*exp(h1)-e1)+f2*((h2-1.)*exp(h2)-e2);
static const G4double le=log(50000.); // log(E0)
static const G4double le2=le*le; // log(E0)^2
static const G4double a=.0375; // a
static const G4double ha=a*.5; // a/2
static const G4double ab=a*16.5; // a*b
static const G4double d=0.11; // d
static const G4double cd=1.0734/d; // c/d
static const G4double ele=exp(-d*le); // E0^(-d)
return ha*(lEn*lEn-le2)-ab*(lEn-le)-cd*(exp(-d*lEn)-ele);
}
inline G4double G4ElectroNuclearCrossSection::HighEnergyJ2(G4double lEn)
{
static const G4double e=50000.; // E0
static const G4double le=log(e); // log(E0)
static const G4double le1=(le-1.)*e; // (log(E0)-1)*E0
static const G4double a=.0375; // a
static const G4double ab=a*16.5; // a*b
static const G4double d=1.-0.11; // 1-d
static const G4double cd=1.0734/d; // c/(1-d)
static const G4double ele=exp(d*le); // E0^(1-d)
return a*((lEn-1.)*lastE-le1)-ab*(lastE-e)+cd*(exp(d*lEn)-ele);
}
inline G4double G4ElectroNuclearCrossSection::HighEnergyJ3(G4double lEn)
{
static const G4double e=50000.; // E0
static const G4double le=log(e); // log(E0)
static const G4double e2=e*e; // E0^2
static const G4double leh=(le-.5)*e2; // (log(E0)-.5)*E0^2
static const G4double ha=.0375*.5; // a/2
static const G4double hab=ha*16.5; // a*b/2
static const G4double d=2.-.11; // 2-d
static const G4double cd=1.0734/d; // c/(2-d)
static const G4double ele=exp(d*le); // E0^(2-d)
G4double lastE2=lastE*lastE;
return ha*((lEn-.5)*lastE2-leh)-hab*(lastE2-e2)+cd*(exp(d*lEn)-ele);
}
#endif