Import Geant4 1.0.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-08 15:28:20 +02:00
parent aaa409b6ee
commit ca1c8cb059
2995 changed files with 106830 additions and 299600 deletions
@@ -1,12 +1,12 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4hIonisation.cc,v 1.3 1999/04/13 09:05:42 urban Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4hIonisation.cc,v 1.6.8.1 1999/12/07 20:51:03 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// -------------------------------------------------------------
// GEANT 4 class implementation file
@@ -26,6 +26,7 @@
// 07-04-98: remove 'tracking cut' of the ionizing particle, MMa
// 22/10/98: cleanup L.Urban
// 02/02/99: bugs fixed , L.Urban
// 29/07/99: correction in BuildLossTable for low energy, L.Urban
// --------------------------------------------------------------
@@ -37,9 +38,6 @@
G4hIonisation::G4hIonisation(const G4String& processName)
: G4hEnergyLoss(processName),
theMeanFreePathTable(NULL),
LowestKineticEnergy(1.00*keV),
HighestKineticEnergy(100.*TeV),
TotBin(100),
theProton (G4Proton::Proton()),
theAntiProton (G4AntiProton::AntiProton()),
theElectron ( G4Electron::Electron() )
@@ -65,6 +63,13 @@ void G4hIonisation::SetPhysicsTableBining(G4double lowE, G4double highE,
void G4hIonisation::BuildPhysicsTable(const G4ParticleDefinition& aParticleType)
// just call BuildLossTable+BuildLambdaTable
{
if(&aParticleType == G4Proton::Proton())
{
LowestKineticEnergy= 1.00*keV;
HighestKineticEnergy= 100.*TeV;
TotBin=100 ;
}
ParticleMass = aParticleType.GetPDGMass() ;
Charge = aParticleType.GetPDGCharge();
@@ -109,6 +114,7 @@ void G4hIonisation::BuildLossTable(const G4ParticleDefinition& aParticleType)
DeltaCutInKineticEnergy = theElectron->GetCutsInEnergy() ;
G4double LowEdgeEnergy , ionloss ;
G4double deltaloss ;
G4double RateMass ;
G4bool isOutRange ;
static const G4MaterialTable* theMaterialTable=
@@ -182,10 +188,18 @@ void G4hIonisation::BuildLossTable(const G4ParticleDefinition& aParticleType)
LowEdgeEnergy = aVector->GetLowEdgeEnergy(i) ;
tau = LowEdgeEnergy/proton_mass_c2 ;
gamma = tau +1. ;
bg2 = tau*(tau+2.) ;
beta2 = bg2/(gamma*gamma) ;
Tmax = 2.*electron_mass_c2*bg2
/(1.+2.*gamma*RateMass+RateMass*RateMass) ;
if ( tau < taul )
// low energy part , parametrized energy loss formulae
{
ionloss = 0. ;
deltaloss = 0. ;
// loop for the elements in the material
for (G4int iel=0; iel<NumberOfElements; iel++)
{
@@ -199,16 +213,21 @@ void G4hIonisation::BuildLossTable(const G4ParticleDefinition& aParticleType)
ionloss += theAtomicNumDensityVector[iel]
* element->GetIonisation()->GetClow()/sqrt(tau) ;
}
if ( DeltaCutInKineticEnergyNow < Tmax)
{
deltaloss = log(Tmax/DeltaCutInKineticEnergyNow)-
beta2*(1.-DeltaCutInKineticEnergyNow/Tmax) ;
if(aParticleType.GetPDGSpin() == 0.5)
deltaloss += 0.25*(Tmax-DeltaCutInKineticEnergyNow)*
(Tmax-DeltaCutInKineticEnergyNow)/
(LowEdgeEnergy*LowEdgeEnergy+proton_mass_c2*proton_mass_c2) ;
deltaloss *= Factor*ElectronDensity/beta2 ;
}
ionloss -= deltaloss ;
}
else
// high energy part , Bethe-Bloch formula
{
gamma = tau +1. ;
bg2 = tau*(tau+2.) ;
beta2 = bg2/(gamma*gamma) ;
Tmax = 2.*electron_mass_c2*bg2
/(1.+2.*gamma*RateMass+RateMass*RateMass) ;
if ( DeltaCutInKineticEnergyNow < Tmax)
rcut = DeltaCutInKineticEnergyNow/Tmax ;
else