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: G4NucleiPropertiesTable.hh,v 1.5 1999/05/26 14:05:15 larazb Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4NucleiPropertiesTable.hh,v 1.7.4.1 1999/12/07 20:49:51 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// -------------------------------------------------------------------
// GEANT 4 class file --- Copyright CERN 1997
@@ -36,6 +36,7 @@
#ifndef G4NucleiPropertiesTable_h
#define G4NucleiPropertiesTable_h 1
// Class Description
// Class: G4NucleiPropertiesTable
// Encapsulates Data from G. Audi and A.H. Wapstra, Nucl.
// Physics,A595 vol 4 p 409-480,
@@ -61,16 +62,16 @@ public:
// Destructor (generated)
~G4NucleiPropertiesTable() { };
enum {nEntries = 2931}; // for SUN
enum {nEntries = 2931,MaxA = 273}; // for SUN
// Other Operations
public: // With Description
// Operation: GetMassExcess
static G4double GetMassExcess(G4int Z, G4int A);
// Operation: GetNuclearMass
static G4double GetNuclearMass(G4int Z, G4int A);
// Operation: GetNuclearMass
static G4double GetNuclearMass(G4int Z, G4int A);
// Operation: GetBindingEnergy
static G4double GetBindingEnergy(G4int Z, G4int A);
@@ -81,9 +82,6 @@ public:
// Operation: GetAtomicMass .. in Geant4 Energy units!
static G4double GetAtomicMass(G4int Z, G4int A);
// Operation: GetName
static const char*& GetName(G4int Z, G4int A);
// Is the nucleus (A,Z) in table?
static G4bool IsInTable(G4int Z, G4int A);
@@ -113,22 +111,9 @@ private:
static G4double MassExcess[nEntries];
// Binding Energy
static G4double BindingEnergy[nEntries];
// Beta Decay Energy
static G4double BetaEnergy[nEntries];
// Atomic Mass
static G4double AtomicMass[nEntries];
// Chemical Symbol
static const char* Name[nEntries];
static const char* noName;
// Table of Z (number of protons) and A (number of nucleons)
// indexArray[0][ ] --> Z
@@ -139,7 +124,7 @@ private:
// The index in this table coincide with A-1
// For each A value shortTable[A-1] has the index of the 1st occurrence in
// the indexArray[][]
static G4int shortTable[273];
static G4int shortTable[MaxA+1];
};
@@ -158,7 +143,7 @@ inline G4double G4NucleiPropertiesTable::GetBindingEnergy(G4int Z, G4int A)
{
G4int i=GetIndex(Z, A);
if (i >= 0){
return BindingEnergy[i]*keV;
return (G4double(A-Z)*MassExcess[0] + G4double(Z)*MassExcess[1] - MassExcess[i])*keV;
} else {
return 0.0;
}
@@ -176,27 +161,18 @@ inline G4double G4NucleiPropertiesTable::GetBetaDecayEnergy(G4int Z, G4int A)
inline G4double G4NucleiPropertiesTable::GetAtomicMass(G4int Z, G4int A)
{
G4int i=GetIndex(Z, A);
if (i >= 0) {
return AtomicMass[i]*amu_c2;
} else {
return 0.0;
}
G4int i=GetIndex(Z, A);
if (i >= 0){
return MassExcess[i]*keV + G4double(A)*amu_c2;
} else {
return 0.0;
}
}
inline const char*& G4NucleiPropertiesTable::GetName(G4int Z, G4int A)
{
G4int i=GetIndex(Z, A);
if (i >= 0){
return Name[i];
} else {
return noName;
}
}
inline G4bool G4NucleiPropertiesTable::IsInTable(G4int Z, G4int A)
{
return (Z <= A && A >= 1 && A <= 273 && GetIndex(Z, A) >= 0);
return (Z <= A && A >= 1 && A <= 273 && Z >= 0 && Z <= 110 && GetIndex(Z, A) >= 0);
}