Import Geant4 1.1.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-08 15:34:16 +02:00
parent ca1c8cb059
commit 103bda00c8
2654 changed files with 29719 additions and 20203 deletions
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4PAIxSection.cc,v 1.3.6.1 1999/12/07 20:51:00 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
// $Id: G4PAIxSection.cc,v 1.3.6.1.2.1 1999/12/08 17:34:24 gunter Exp $
// GEANT4 tag $Name: geant4-01-01 $
//
//
// G4PAIxSection.cc -- class implementation file
@@ -70,7 +70,7 @@ G4PAIxSection::G4PAIxSection(G4int materialIndex,
GetElectronDensity() ;
fIntervalNumber = (*theMaterialTable)[materialIndex]->
GetSandiaTable()->GetMatNbOfIntervals() ;
G4cout<<fDensity<<"\t"<<fElectronDensity<<"\t"<<fIntervalNumber<<endl ;
G4cout<<fDensity<<"\t"<<fElectronDensity<<"\t"<<fIntervalNumber<<G4endl ;
// G4double maxEnergyTransfer = 100*keV ;
fEnergyInterval = new G4double[fIntervalNumber+2] ;
@@ -91,7 +91,7 @@ G4PAIxSection::G4PAIxSection(G4int materialIndex,
fA4[i] = (*theMaterialTable)[materialIndex]->
GetSandiaTable()->GetSandiaCofForMaterial(i-1,4);
// G4cout<<fEnergyInterval[i]<<"\t"<<fA1[i]<<"\t"<<fA2[i]<<"\t"
// <<fA3[i]<<"\t"<<fA4[i]<<"\t"<<endl ;
// <<fA3[i]<<"\t"<<fA4[i]<<"\t"<<G4endl ;
if(fEnergyInterval[i] >= maxEnergyTransfer)
{
fEnergyInterval[i] = maxEnergyTransfer ;
@@ -180,7 +180,7 @@ G4PAIxSection::G4PAIxSection( G4int materialIndex,
// (*theMaterialTable)[materialIndex]->GetSandiaTable()->GetMatNbOfIntervals() ;
// G4cout<<fDensity<<"\t"<<fElectronDensity<<"\t"<<fIntervalNumber<<endl ;
// G4cout<<fDensity<<"\t"<<fElectronDensity<<"\t"<<fIntervalNumber<<G4endl ;
// G4double maxEnergyTransfer = 100*keV ;
fEnergyInterval = new G4double[fIntervalNumber+2] ;
@@ -208,7 +208,7 @@ G4PAIxSection::G4PAIxSection( G4int materialIndex,
if( i == 1 || i == fIntervalNumber)
{
// G4cout<<fEnergyInterval[i]<<"\t"<<fA1[i]<<"\t"<<fA2[i]<<"\t"
// <<fA3[i]<<"\t"<<fA4[i]<<"\t"<<endl ;
// <<fA3[i]<<"\t"<<fA4[i]<<"\t"<<G4endl ;
}
if(fEnergyInterval[i] >= maxEnergyTransfer)
{
@@ -338,7 +338,7 @@ G4PAIxSection::G4PAIxSection( G4int materialIndex,
if( i == 1 || i == fIntervalNumber)
{
// G4cout<<fEnergyInterval[i]<<"\t"<<fA1[i]<<"\t"<<fA2[i]<<"\t"
// <<fA3[i]<<"\t"<<fA4[i]<<"\t"<<endl ;
// <<fA3[i]<<"\t"<<fA4[i]<<"\t"<<G4endl ;
}
if(fEnergyInterval[i] >= maxEnergyTransfer)
{
@@ -528,12 +528,12 @@ void G4PAIxSection::NormShift(G4double betaGammaSq)
RutherfordIntegral(j,fEnergyInterval[j],
fSplineEnergy[i] ) ;
}
// G4cout<<i<<"\t"<<fSplineEnergy[i]<<"\t"<<fIntegralTerm[i]<<"\n"<<endl;
// G4cout<<i<<"\t"<<fSplineEnergy[i]<<"\t"<<fIntegralTerm[i]<<"\n"<<G4endl;
}
fNormalizationCof = 2*pi*pi*hbarc*hbarc*fine_structure_const/electron_mass_c2 ;
fNormalizationCof *= fElectronDensity/fIntegralTerm[fSplineNumber] ;
// G4cout<<"fNormalizationCof = "<<fNormalizationCof<<endl ;
// G4cout<<"fNormalizationCof = "<<fNormalizationCof<<G4endl ;
// Calculation of PAI differrential cross-section (1/(keV*cm))
// in the energy points near borders of energy intervals
@@ -923,14 +923,14 @@ G4double G4PAIxSection::GetStepEnergyLoss( G4double step )
G4double loss = 0.0 ;
G4double meanNumber, position ;
// G4cout<<" G4PAIxSection::GetStepEnergyLoss "<<endl ;
// G4cout<<" G4PAIxSection::GetStepEnergyLoss "<<G4endl ;
meanNumber = fIntegralPAIxSection[1]*step ;
numOfCollisions = RandPoisson::shoot(meanNumber) ;
// G4cout<<"numOfCollisions = "<<numOfCollisions<<endl ;
// G4cout<<"numOfCollisions = "<<numOfCollisions<<G4endl ;
while(numOfCollisions)
{
@@ -943,7 +943,7 @@ G4double G4PAIxSection::GetStepEnergyLoss( G4double step )
loss += fSplineEnergy[iTransfer] ;
numOfCollisions-- ;
}
// G4cout<<"PAI energy loss = "<<loss/keV<<" keV"<<endl ;
// G4cout<<"PAI energy loss = "<<loss/keV<<" keV"<<G4endl ;
return loss ;
}