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

Import Geant4 1.0.0 source tree

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files
source/particles/management/src/G4DalitzDecayChannel.cc
+3 -3
View File
@@ -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: G4DalitzDecayChannel.cc,v 1.3 1999/04/13 08:00:14 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4DalitzDecayChannel.cc,v 1.3.8.1 1999/12/07 20:49:54 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
source/particles/management/src/G4DecayProducts.cc
+3 -3
View File
@@ -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: G4DecayProducts.cc,v 1.4 1999/04/14 10:28:24 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4DecayProducts.cc,v 1.4.8.1 1999/12/07 20:49:55 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
source/particles/management/src/G4DecayTable.cc
+3 -3
View File
@@ -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: G4DecayTable.cc,v 1.4 1999/05/25 02:01:08 gcosmo Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4DecayTable.cc,v 1.4.8.1 1999/12/07 20:49:55 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
source/particles/management/src/G4DecayTableMessenger.cc
+3 -3
View File
@@ -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: G4DecayTableMessenger.cc,v 1.2 1999/04/13 08:00:17 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4DecayTableMessenger.cc,v 1.2.8.1 1999/12/07 20:49:55 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
//---------------------------------------------------------------
source/particles/management/src/G4DynamicParticle.cc
+114 -8
View File
@@ -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: G4DynamicParticle.cc,v 1.4 1999/05/06 16:37:39 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4DynamicParticle.cc,v 1.5.6.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// --------------------------------------------------------------
@@ -40,11 +40,14 @@
#include "G4DecayProducts.hh"
#include "G4LorentzVector.hh"
#include "G4ParticleDefinition.hh"
#include "G4ParticleTable.hh"
#include "G4IonTable.hh"
G4Allocator<G4DynamicParticle> aDynamicParticleAllocator;
static const G4double EnergyMomentumRelationAllowance = keV;
////////////////////
G4DynamicParticle::G4DynamicParticle():
theParticleDefinition(0),
theMomentumDirection(),
@@ -54,9 +57,13 @@ G4DynamicParticle::G4DynamicParticle():
verboseLevel(1)
{
theDynamicalMass = 0.0;
theDynamicalCharge= 0.0;
theElectronOccupancy = 0;
}
////////////////////
// -- constructors ----
////////////////////
G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
const G4ThreeVector& aMomentumDirection,
G4double aKineticEnergy):
@@ -67,9 +74,13 @@ G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
thePreAssignedDecayProducts(0),
verboseLevel(1)
{
theDynamicalMass = aParticleDefinition->GetPDGMass();
}
// set dynamic charge/mass
theDynamicalMass = aParticleDefinition->GetPDGMass();
theDynamicalCharge = aParticleDefinition->GetPDGCharge();
AllocateElectronOccupancy();
}
////////////////////
G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
const G4ThreeVector& aParticleMomentum):
theParticleDefinition(aParticleDefinition),
@@ -77,7 +88,12 @@ G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
thePreAssignedDecayProducts(0),
verboseLevel(1)
{
// set dynamic charge/mass
theDynamicalMass = aParticleDefinition->GetPDGMass();
theDynamicalCharge = aParticleDefinition->GetPDGCharge();
AllocateElectronOccupancy();
// 3-dim momentum is given
G4double pModule2 = aParticleMomentum.mag2();
if (pModule2>0.0) {
G4double mass = theDynamicalMass;
@@ -92,6 +108,7 @@ G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
}
}
////////////////////
G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
const G4LorentzVector &aParticleMomentum):
theParticleDefinition(aParticleDefinition),
@@ -99,7 +116,12 @@ G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
thePreAssignedDecayProducts(0),
verboseLevel(1)
{
// set dynamic charge/mass
theDynamicalMass = aParticleDefinition->GetPDGMass();
theDynamicalCharge = aParticleDefinition->GetPDGCharge();
AllocateElectronOccupancy();
// 4-momentum vector (Lorentz vecotr) is given
G4double pModule2 = aParticleMomentum.x()*aParticleMomentum.x()
+ aParticleMomentum.y()*aParticleMomentum.y()
+ aParticleMomentum.z()*aParticleMomentum.z();
@@ -131,7 +153,12 @@ G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
theProperTime(0.0),
verboseLevel(1)
{
// set dynamic charge/mass
theDynamicalMass = aParticleDefinition->GetPDGMass();
theDynamicalCharge = aParticleDefinition->GetPDGCharge();
AllocateElectronOccupancy();
// total energy and momentum direction are given
G4double pModule2 = aParticleMomentum.mag2();
if (pModule2>0.0) {
G4double pModule = sqrt(pModule2);
@@ -152,9 +179,18 @@ G4DynamicParticle::G4DynamicParticle(G4ParticleDefinition * aParticleDefinition,
}
}
////////////////////
G4DynamicParticle::G4DynamicParticle(const G4DynamicParticle &right)
{
theDynamicalMass = right.theDynamicalMass;
theDynamicalCharge = right.theDynamicalCharge;
if (right.theElectronOccupancy != 0){
theElectronOccupancy =
new G4ElectronOccupancy(*right.theElectronOccupancy);
} else {
theElectronOccupancy = 0;
}
theParticleDefinition = right.theParticleDefinition;
theMomentumDirection = right.theMomentumDirection;
theKineticEnergy = right.theKineticEnergy;
@@ -169,19 +205,35 @@ G4DynamicParticle::G4DynamicParticle(const G4DynamicParticle &right)
}
////////////////////
// -- destructor ----
////////////////////
G4DynamicParticle::~G4DynamicParticle() {
// delete thePreAssignedDecayProducts
if (thePreAssignedDecayProducts != 0) delete thePreAssignedDecayProducts;
thePreAssignedDecayProducts = 0;
if (theElectronOccupancy != 0) delete theElectronOccupancy;
theElectronOccupancy =0;
}
////////////////////
// -- operators ----
////////////////////
G4DynamicParticle & G4DynamicParticle::operator=(const G4DynamicParticle &right)
{
if (this != &right) {
theDynamicalMass = right.theDynamicalMass;
theDynamicalCharge = right.theDynamicalCharge;
if (right.theElectronOccupancy != 0){
theElectronOccupancy =
new G4ElectronOccupancy(*right.theElectronOccupancy);
} else {
theElectronOccupancy = 0;
}
theParticleDefinition = right.theParticleDefinition;
theMomentumDirection = right.theMomentumDirection;
theKineticEnergy = right.theKineticEnergy;
@@ -194,17 +246,40 @@ G4DynamicParticle & G4DynamicParticle::operator=(const G4DynamicParticle &right)
return *this;
}
////////////////////
G4int G4DynamicParticle::operator==(const G4DynamicParticle &right) const
{
return (this == (G4DynamicParticle *) &right);
}
////////////////////
G4int G4DynamicParticle::operator!=(const G4DynamicParticle &right) const
{
return (this != (G4DynamicParticle *) &right);
}
////////////////////
// -- AllocateElectronOccupancy --
////////////////////
void G4DynamicParticle::AllocateElectronOccupancy()
{
G4ParticleDefinition* particle = GetDefinition();
if (G4IonTable::IsIon(particle)) {
// Only ions can have ElectronOccupancy
theElectronOccupancy = new G4ElectronOccupancy();
} else {
theElectronOccupancy = 0;
}
}
////////////////////
// -- methods for setting Energy/Momentum --
////////////////////
void G4DynamicParticle::SetMomentum(const G4ThreeVector &momentum)
{
G4double pModule2 = momentum.mag2();
@@ -221,6 +296,7 @@ void G4DynamicParticle::SetMomentum(const G4ThreeVector &momentum)
}
}
////////////////////
void G4DynamicParticle::Set4Momentum(const G4LorentzVector &momentum )
{
G4double pModule2 = momentum.x()*momentum.x()
@@ -246,13 +322,18 @@ void G4DynamicParticle::Set4Momentum(const G4LorentzVector &momentum )
}
}
void G4DynamicParticle::DumpInfo() const
////////////////////
// --- Dump Information --
////////////////////
void G4DynamicParticle::DumpInfo(G4int mode) const
{
if (theParticleDefinition == 0) {
G4cout << " G4DynamicParticle::DumpInfo():: !!!Particle type not defined !!!! " << endl;
} else {
G4cout << " Particle type - " << theParticleDefinition->GetParticleName() << endl
<< " mass: " << GetMass()/GeV << "[GeV]" <<endl
<< " charge: " << GetCharge()/eplus << "[e]" <<endl
<< " Direction x: " << GetMomentumDirection().x() << ", y: "
<< GetMomentumDirection().y() << ", z: "
<< GetMomentumDirection().z() << endl
@@ -263,11 +344,36 @@ void G4DynamicParticle::DumpInfo() const
<< " Total Energy = " << GetTotalEnergy()/GeV << "[GeV]" << endl
<< " Kinetic Energy = " << GetKineticEnergy() /GeV << "[GeV]" << endl
<< " ProperTime = " << GetProperTime() /ns << "[ns]" << endl;
if (mode>0) {
if( theElectronOccupancy != 0) {
theElectronOccupancy->DumpInfo();
}
}
if (mode>1) {
if( theElectronOccupancy != 0) {
theElectronOccupancy->DumpInfo();
}
}
}
}
////////////////////////
G4double G4DynamicParticle::GetElectronMass() const
{
static G4double electronMass = 0.0;
// check if electron exits and get the mass
if (electronMass<=0.0) {
G4ParticleDefinition* electron = G4ParticleTable::GetParticleTable()->FindParticle("e-");
if (electron == 0) {
G4Exception("G4DynamicParticle: G4Electron is not defined !!");
}
electronMass = electron->GetPDGMass();
}
return electronMass;
}
source/particles/management/src/G4ElectronOccupancy.cc
+120
View File
@@ -0,0 +1,120 @@
// This code implementation is the intellectual property of
// 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: G4ElectronOccupancy.cc,v 1.4.6.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ----------------------------------------------------------------------
// GEANT 4 class implementation file
//
// For information related to this code contact:
// CERN, CN Division, ASD group
// History: first implementation, based on object model of
// Hisaya Kurashige, 17 Aug 1999
// ----------------------------------------------------------------
// This class has information of occupation of electrons
// in atomic orbits
// ---------------------------------------------------------------
#include "G4ElectronOccupancy.hh"
G4Allocator<G4ElectronOccupancy> aElectronOccupancyAllocator;
G4ElectronOccupancy::G4ElectronOccupancy(G4int sizeOrbit ):
theSizeOfOrbit(sizeOrbit)
{
// check size
if ( (theSizeOfOrbit <1 ) || (theSizeOfOrbit > MaxSizeOfOrbit) ) {
theSizeOfOrbit = MaxSizeOfOrbit;
}
// allocate and clear the array of theOccupancies
theOccupancies = new G4int[theSizeOfOrbit];
G4int index =0;
for (index = 0; index < theSizeOfOrbit; index++) {
theOccupancies[index] =0;
}
theTotalOccupancy =0;
}
G4ElectronOccupancy::~G4ElectronOccupancy()
{
theSizeOfOrbit = -1;
delete [] theOccupancies;
theOccupancies =0;
theTotalOccupancy =0;
}
G4ElectronOccupancy::G4ElectronOccupancy(const G4ElectronOccupancy& right)
{
theSizeOfOrbit = right.theSizeOfOrbit;
// allocate and clear the array of theOccupancies
theOccupancies = new G4int[theSizeOfOrbit];
G4int index =0;
for (index = 0; index < theSizeOfOrbit; index++) {
theOccupancies[index] = right.theOccupancies[index];
}
theTotalOccupancy = right.theTotalOccupancy;
}
G4ElectronOccupancy& G4ElectronOccupancy::operator=(const G4ElectronOccupancy& right)
{
if ( this != &right) {
theSizeOfOrbit = right.theSizeOfOrbit;
// allocate and clear the array of theOccupancies
if ( theOccupancies != 0 ) delete [] theOccupancies;
theOccupancies = new G4int[theSizeOfOrbit];
G4int index =0;
for (index = 0; index < theSizeOfOrbit; index++) {
theOccupancies[index] = right.theOccupancies[index];
}
theTotalOccupancy = right.theTotalOccupancy;
}
return *this;
}
G4int G4ElectronOccupancy::operator==(const G4ElectronOccupancy& right) const
{
G4int index;
G4bool value = true;
for (index = 0; index < MaxSizeOfOrbit; index++) {
if ( (index < theSizeOfOrbit ) && ( index < right.theSizeOfOrbit) ) {
value = value &&
(theOccupancies[index] == right.theOccupancies[index]) ;
} else if ((index < theSizeOfOrbit ) && ( index >= right.theSizeOfOrbit)) {
value = value && (theOccupancies[index] == 0);
} else if ((index >= theSizeOfOrbit ) && ( index <right.theSizeOfOrbit)) {
value = value && (right.theOccupancies[index] == 0);
}
}
return value;
}
G4int G4ElectronOccupancy::operator!=(const G4ElectronOccupancy& right) const
{
return !(*this == right);
}
void G4ElectronOccupancy::DumpInfo() const
{
G4cout << " -- Electron Occupancy -- " << endl;
G4int index;
for (index = 0; index < theSizeOfOrbit; index++) {
G4cout << " " << index << "-th orbit "
<< theOccupancies[index] << endl;
}
}
source/particles/management/src/G4IonTable.cc
+400 -162
View File
@@ -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: G4IonTable.cc,v 1.9 1999/05/06 16:37:40 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4IonTable.cc,v 1.22 1999/12/06 09:28:04 kurasige Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// --------------------------------------------------------------
@@ -22,13 +22,23 @@
// use G4NucleiPropoerties to get nuceli Mass 17 Nov.,98 H.Kurashige
// use G4GenericIon for process List
// modify fomula of Ion mass 09 Dec., 98 H.Kurashige
// -----
// Modified GetIon methods 17 Aug. 99 H.Kurashige
// New design using G4VIsotopeTable 5 Oct. 99 H.Kurashige
#include "G4IonTable.hh"
#include "G4ParticleTable.hh"
#include "G4Ions.hh"
#include "G4UImanager.hh"
#include "G4NucleiProperties.hh"
#include "G4IsotopeProperty.hh"
#include "G4VIsotopeTable.hh"
#include "G4ios.hh"
#include <iostream.h>
#include <iomanip.h>
#ifdef WIN32
# include <Strstrea.h>
@@ -37,152 +47,217 @@
#endif
////////////////////
G4IonTable::G4IonTable()
{
fIonList = new G4IonList();
fIsotopeTable = 0;
}
////////////////////
G4IonTable::~G4IonTable()
{
// delete IsotopeTable if exists
if (fIsotopeTable != 0) delete fIsotopeTable;
fIsotopeTable =0;
if (fIonList ==0) return;
// delete ion objects
G4ParticleDefinition* particle;
#ifdef G4USE_STL
G4IonList::reverse_iterator i;
for (i = fIonList->rbegin(); i!= fIonList->rend(); ++i) {
particle = *i;
#else
G4int idx;
G4String name;
for (idx=(fIonList->entries()-1); idx >=0 ; idx--) {
G4ParticleDefinition* particle = (*fIonList)(idx);
name = particle->GetParticleName();
particle = (*fIonList)(idx);
#endif
// keep the particle object if static
if (name == "alpha") {
} else if (name == "deuteron") {
} else if (name == "triton") {
} else if (name == "He3") {
} else if (name == "GenericIon") {
} else {
if ( !IsLightIon(particle) ) {
// delete if not static objects
#ifdef G4VERBOSE
G4String name;
if (GetVerboseLevel()>1) {
G4cout << "G4IonTable:~IonTable() : delete ion of " << name << endl;
G4cout << "G4IonTable:~IonTable() : delete ion of " ;
G4cout << particle->GetParticleName() << endl;
}
#endif
delete particle;
}
}
// remove all contents in the Ion List
fIonList->clear();
delete fIonList;
fIonList =0;
}
G4int G4IonTable::GetVerboseLevel() const
////////////////////
// -- CreateIon method ------
////////////////////
G4ParticleDefinition* G4IonTable::CreateIon(G4int Z, G4int A, G4double E, G4int J)
{
return G4ParticleTable::GetParticleTable()->GetVerboseLevel();
G4ParticleDefinition* ion=0;
// get ion name
G4String name = GetIonName(Z, A, E);
if ( name(0) == '?') {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
G4cout << "G4IonTable::GetIon() : can not create ions " << endl;
G4cout << " Z =" << Z << " A = " << A << endl;
}
#endif
return 0;
}
G4double life = -1.0;
G4DecayTable* decayTable =0;
G4IsotopeProperty* fProperty = FindIsotope(Z, A, E, J);
if (fProperty !=0 ){
J = fProperty->GetiSpin();
E = fProperty->GetEnergy();
life = fProperty->GetLifeTime();
decayTable = fProperty->GetDecayTable();
}
G4double mass = GetNucleusMass(Z, A)+ E;
G4double charge = G4double(Z)*eplus;
// create an ion
// spin, parity, isospin values are fixed
//
ion = new G4Ions( name, mass, 0.0*MeV, charge,
J, +1, 0,
0, 0, 0,
"nucleus", 0, A, 0,
true, life, decayTable);
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cout << "G4IonTable::GetIon() : create ion of " << name << endl;
}
#endif
// Add process manager to the ion
AddProcessManager(name);
// Set cut value same as "GenericIon"
SetCuts(ion);
if (fProperty !=0) delete fProperty;
return ion;
}
////////////////////
// -- GetIon methods ------
////////////////////
G4ParticleDefinition* G4IonTable::GetIon(G4int Z, G4int A, G4int J, G4int Q)
{
static G4double electronMass = 0.0;
return GetIon(Z, A);
}
////////////////////
G4ParticleDefinition* G4IonTable::GetIon(G4int Z, G4int A, G4int J)
{
return GetIon( Z, A, 0.0, J);
}
////////////////////
G4ParticleDefinition* G4IonTable::GetIon(G4int Z, G4int A, G4double E, G4int J)
{
if ( (A<1) || (Z>numberOfElements) || (Z<=0) || (J<0) || (E<0.0) ) {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
G4cout << "G4IonTable::GetIon() : illegal atomic number/mass" << endl;
G4cout << " Z =" << Z << " A = " << A << " E = " << E/keV << endl;
}
#endif
G4Exception("G4IonTable::GetIon : illegal atomic number/mass ");
}
// Search ions with A, Z
G4ParticleDefinition* ion = FindIon(Z,A,E,J);
// create ion
if (ion == 0) {
ion = CreateIon(Z, A, E, J);
}
return ion;
}
////////////////////
G4ParticleDefinition* G4IonTable::FindIon(G4int Z, G4int A, G4double E, G4int J)
{
const G4double EnergyTorelance = 0.1 * keV;
if ( (A<1) || (Z>numberOfElements) || (Z<=0) || (J<0) || (E<0.0)) {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
G4cout << "G4IonTable::FindIon() : illegal atomic number/mass or excitation level " << endl;
G4cout << " Z =" << Z << " A = " << A << " E = " << E/keV << endl;
}
#endif
return 0;
}
// Search ions with A, Z ,E
// !! J is moitted now !!
G4ParticleDefinition* ion;
G4bool isFound = false;
// check if electron exits and get their masses
if (electronMass<=0.0) {
G4ParticleDefinition* electron = G4ParticleTable::GetParticleTable()->FindParticle("e-");
if (electron == 0) {
G4Exception("G4IonTable: G4Electron is not defined !!");
}
electronMass = electron->GetPDGMass();
}
// -- loop over all particles in Ion table
for (G4int idx= 0; idx < fIonList->entries() ; idx++) {
#ifdef G4USE_STL
G4IonList::iterator idx;
for (idx = fIonList->begin(); idx!= fIonList->end(); ++idx) {
ion = *idx;
#else
G4int idx;
for (idx= 0; idx < fIonList->entries() ; ++idx) {
ion = (*fIonList)(idx);
// charge = charge /eplus
G4int aCharge = int(ion->GetPDGCharge()/eplus);
#endif
// Z = Atomic Number
G4int anAtomicNumber = 0;
// A = baryon number
G4int anAtomicMass = ion->GetBaryonNumber();
// spin
G4int anAngularMomentum = ion->GetPDGiSpin();
if ( (A == anAtomicMass) && (Q == aCharge) && ( J == anAngularMomentum )){
G4int anAtomicMass = 0;
// excitation level
G4double anExcitaionEnergy =0.0;
if ( IsLightIon(ion) ) {
anAtomicNumber = int(ion->GetPDGCharge()/eplus);
anAtomicMass = ion->GetBaryonNumber();
anExcitaionEnergy = 0.0;
} else {
anAtomicNumber = ((const G4Ions*)(ion))->GetAtomicNumber();
anAtomicMass = ((const G4Ions*)(ion))->GetAtomicMass();
anExcitaionEnergy = ((const G4Ions*)(ion))->GetExcitationEnergy();
}
if ( (A == anAtomicMass) &&
(Z == anAtomicNumber ) &&
( abs(E - anExcitaionEnergy ) < EnergyTorelance ) ) {
isFound = true;
break;
}
}
if (!isFound) {
// create ion
G4String name = GetIonName(Z, A, J, Q);
if ( name(0) == '?') {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
G4cout << "G4IonTable::GetIon() : can not create ions " << endl;
G4cout << " Z =" << Z << " A = " << A << endl;
}
#endif
return 0;
}
G4double mass = GetNucleusMass(Z, A) + electronMass*G4double(Z-Q);
G4double charge = G4double(Q)*eplus;
// create an ion
// spin, parity, isospin values are fixed
//
ion = new G4Ions( name, mass, 0.0*MeV, charge,
J, +1, 0,
0, 0, 0,
"nucleus", 0, A, 0,
true, -1.0, 0);
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cout << "G4IonTable::GetIon() : create ion of " << name << endl;
}
#endif
// create command string for addProcManager
char cmdAdd[60];
ostrstream osAdd(cmdAdd,60);
osAdd << "/run/particle/addProcManager "<< name << '\0';
// set /control/verbose 0
G4int tempVerboseLevel = G4UImanager::GetUIpointer()->GetVerboseLevel();
G4UImanager::GetUIpointer()->SetVerboseLevel(0);
// issue /run/particle/addProcManage
G4UImanager::GetUIpointer()->ApplyCommand(cmdAdd);
// retreive /control/verbose
G4UImanager::GetUIpointer()->SetVerboseLevel(tempVerboseLevel);
// Set cut value same as "GenericIon"
G4ParticleDefinition* genericIon=G4ParticleTable::GetParticleTable()->FindParticle("GenericIon");
if (genericIon->GetEnergyCuts() != 0) {
ion->SetCuts( genericIon->GetLengthCuts());
#ifdef G4VERBOSE
if (GetVerboseLevel()> 1) {
G4cout << "G4IonTable::GetIon() : cut value =" << genericIon->GetLengthCuts()/mm << "[mm]" <<endl;
}
#endif
// Build Physics Tables for the ion
// create command string for buildPhysicsTable
char cmdBld[60];
ostrstream osBld(cmdBld,60);
osBld << "/run/particle/buildPhysicsTable "<< name << '\0';
// set /control/verbose 0
tempVerboseLevel = G4UImanager::GetUIpointer()->GetVerboseLevel();
G4UImanager::GetUIpointer()->SetVerboseLevel(0);
// issue /run/particle/buildPhysicsTable
G4UImanager::GetUIpointer()->ApplyCommand(cmdBld);
// retreive /control/verbose
G4UImanager::GetUIpointer()->SetVerboseLevel(tempVerboseLevel);
}
if ( isFound ){
return ion;
} else {
return 0;
}
return ion;
}
G4String G4IonTable::GetIonName(G4int Z, G4int A, G4int J, G4int Q) const
/////////////////
G4String G4IonTable::GetIonName(G4int Z, G4int A, G4double E) const
{
G4String name;
if ( (0< Z) && (Z <=numberOfElements) ) {
@@ -192,71 +267,121 @@ G4String G4IonTable::GetIonName(G4int Z, G4int A, G4int J, G4int Q) const
}
char val[50];
ostrstream os(val,50);
os << A << '-' << J << "/2" << '[' << Q << ']' << '\0';
os.setf(ios::fixed);
os << A << '[' << setprecision(1) << E/keV << ']' << '\0';
name += val;
return name;
}
G4double G4IonTable::GetNucleusMass(G4int Z, G4int A) const
/////////////////
G4bool G4IonTable::IsIon(G4ParticleDefinition* particle)
{
static G4double protonMass = 0.0;
static G4double neutronMass = 0.0;
// return true if the particle is ion
// check if proton/neutron/electron exits and get their masses
if (protonMass<=0.0) {
G4ParticleDefinition* proton = G4ParticleTable::GetParticleTable()->FindParticle("proton");
G4ParticleDefinition* neutron = G4ParticleTable::GetParticleTable()->FindParticle("neutron");
if ((proton == 0)||(neutron == 0)) {
G4Exception("G4IonTable: G4Proton or G4Neutron is not defined !!");
}
protonMass = proton->GetPDGMass();
neutronMass = neutron->GetPDGMass();
}
// particles derived from G4VIon and G4Ions
G4bool value = (particle->GetParticleType() == "nucleus");
// proton (Hydrogen nucleus)
value = value || (particle->GetParticleName() == "proton");
return value;
}
/////////////////
G4bool G4IonTable::IsLightIon(G4ParticleDefinition* particle) const
{
// return true if the particle is pre-defined ion
G4String name = particle->GetParticleName();
G4bool value = (name == "proton");
value = value || (name == "neutron");
value = value || (name == "alpha");
value = value || (name == "deuteron");
value = value || (name == "triton") ;
value = value || (name == "He3");
value = value || (name == "GenericIon") ;
return value;
}
/////////////////
G4ParticleDefinition* G4IonTable::GetLightIon(G4int Z, G4int A) const
{
// returns pointer to pre-defined ions
// calculate nucleus mass
G4ParticleDefinition* ion=0;
G4double mass;
if ( (Z<=2) ) {
if ( (Z==1)&&(A==1) ) {
ion = G4ParticleTable::GetParticleTable()->FindParticle("proton"); // proton
ion = G4ParticleTable::GetParticleTable()->FindParticle("proton"); // proton
} else if ( (Z==0)&&(A==1) ) {
ion = G4ParticleTable::GetParticleTable()->FindParticle("neutron"); // neutron
ion = G4ParticleTable::GetParticleTable()->FindParticle("neutron"); // neutron
} else if ( (Z==1)&&(A==2) ) {
ion = G4ParticleTable::GetParticleTable()->FindParticle("deuteron"); // deuteron
ion = G4ParticleTable::GetParticleTable()->FindParticle("deuteron"); // deuteron
} else if ( (Z==1)&&(A==3) ) {
ion = G4ParticleTable::GetParticleTable()->FindParticle("triton"); // tritoon
ion = G4ParticleTable::GetParticleTable()->FindParticle("triton"); // tritoon
} else if ( (Z==2)&&(A==4) ) {
ion = G4ParticleTable::GetParticleTable()->FindParticle("alpha"); // alpha
ion = G4ParticleTable::GetParticleTable()->FindParticle("alpha"); // alpha
} else if ( (Z==2)&&(A==3) ) {
ion = G4ParticleTable::GetParticleTable()->FindParticle("He3"); // He3
}
ion = G4ParticleTable::GetParticleTable()->FindParticle("He3"); // He3
}
}
return ion;
}
/////////////////
// -- GetNucleusMass/GetIonMass ---
/////////////////
G4double G4IonTable::GetNucleusMass(G4int Z, G4int A) const
{
if ( (A<1) || (Z>numberOfElements) || (Z<0)) {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
G4cout << "G4IonTable::GetNucleusMass() : illegal atomic number/mass " << endl;
G4cout << " Z =" << Z << " A = " << A << endl;
}
#endif
G4Exception("G4IonTable::GetNucleusMass() : illegal atomic number/mass ");
}
// calculate nucleus mass
G4ParticleDefinition* ion=GetLightIon(Z, A);
G4double mass;
if (ion!=0) {
mass = ion->GetPDGMass();
}else {
// This routine returns mass of nuclei (w/o including electron mass)
// mass = Z*proton_mass + (A-Z)*neutron_mass - binding energy
G4double bindingEnergy = G4NucleiPropertiesTable::GetBindingEnergy(Z, A);
mass = G4double(Z)*protonMass + G4double(A-Z)*neutronMass - bindingEnergy;
mass = ion->GetPDGMass();
} else {
// use G4NucleiProperties::GetNuclearMass
mass = G4NucleiProperties::GetNuclearMass(A, Z);
}
return mass;
}
//////////////////
G4double G4IonTable::GetIonMass(G4int Z, G4int A) const
{
return GetNucleusMass(Z,A);
}
G4bool G4IonTable::IsIon(G4ParticleDefinition* particle) const
{
return (particle->GetParticleType() == "nucleus");
}
/////////////////
// -- Methods for handling conatiner ---
/////////////////
void G4IonTable::Insert(G4ParticleDefinition* particle)
{
if (IsIon(particle)) {
#ifdef G4USE_STL
fIonList->push_back(particle);
#else
fIonList->insert(particle);
#endif
} else {
//#ifdef G4VERBOSE
//if (GetVerboseLevel()>0) {
@@ -267,10 +392,21 @@ void G4IonTable::Insert(G4ParticleDefinition* particle)
}
}
/////////////////
void G4IonTable::Remove(G4ParticleDefinition* particle)
{
if (IsIon(particle)) {
#ifdef G4USE_STL
G4IonList::iterator idx;
for (idx = fIonList->begin(); idx!= fIonList->end(); ++idx) {
if ( particle == *idx) {
fIonList->erase(idx);
}
}
#else
fIonList->remove(particle);
#endif
} else {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
@@ -279,20 +415,34 @@ void G4IonTable::Remove(G4ParticleDefinition* particle)
}
#endif
}
}
/////////////////
// -- Dump Information
/////////////////
void G4IonTable::DumpTable(const G4String &particle_name) const
{
G4ParticleDefinition* ion;
#ifdef G4USE_STL
G4IonList::iterator idx;
for (idx = fIonList->begin(); idx!= fIonList->end(); ++idx) {
ion = *idx;
#else
for (G4int idx= 0; idx < fIonList->entries() ; idx++) {
ion = (*fIonList)(idx);
#endif
if (( particle_name == "ALL" ) || (particle_name == "all")){
((*fIonList)(idx))->DumpTable();
} else if ( particle_name == ((*fIonList)(idx))->GetParticleName() ) {
((*fIonList)(idx))->DumpTable();
ion->DumpTable();
} else if ( particle_name == ion->GetParticleName() ) {
ion->DumpTable();
}
}
}
/////////////////
const G4String G4IonTable::elementName[] = {
"H", "He",
"Li", "Be", "B", "C", "N", "O", "F", "Ne",
@@ -300,7 +450,7 @@ const G4String G4IonTable::elementName[] = {
"K", "Ca", "Sc", "Ti", "V", "Cr", "Mn", "Fe", "Co", "Ni", "Cu", "Zn", "Ga", "Ge", "As", "Se", "Br", "Kr",
"Rb", "Sr", "Y", "Zr", "Nb", "Mo","Tc", "Ru", "Rh", "Pd", "Ag", "Cd", "In", "Sn", "Sb", "Te", "I", "Xe",
"Cs", "Ba",
"La", "Ce", "Pr", "Nd", "Pr", "Sm", "Eu", "Gd", "Tb", "Dy", "Ho", "Er", "Tm", "Yb", "Lu",
"La", "Ce", "Pr", "Nd", "Pm", "Sm", "Eu", "Gd", "Tb", "Dy", "Ho", "Er", "Tm", "Yb", "Lu",
"Hf", "Ta", "W", "Re", "Os", "Ir", "Pt", "Au", "Hg", "Tl", "Pb", "Bi", "Po", "At", "Rn",
"Fr", "Ra",
"Ac", "Th", "Pa", "U", "Np", "Pu", "Am", "Cm", "Bk", "Cf", "Es", "Fm", "Md", "No", "Lr",
@@ -309,26 +459,114 @@ const G4String G4IonTable::elementName[] = {
};
/////////////////
G4int G4IonTable::GetVerboseLevel() const
{
return G4ParticleTable::GetParticleTable()->GetVerboseLevel();
}
/////////////////
void G4IonTable::AddProcessManager(const G4String& name)
{
// create command string for addProcManager
char cmdAdd[60];
ostrstream osAdd(cmdAdd,60);
osAdd << "/run/particle/addProcManager "<< name << '\0';
// set /control/verbose 0
G4int tempVerboseLevel = G4UImanager::GetUIpointer()->GetVerboseLevel();
G4UImanager::GetUIpointer()->SetVerboseLevel(0);
// issue /run/particle/addProcManage
G4UImanager::GetUIpointer()->ApplyCommand(cmdAdd);
// retreive /control/verbose
G4UImanager::GetUIpointer()->SetVerboseLevel(tempVerboseLevel);
}
/////////////////
void G4IonTable::SetCuts(G4ParticleDefinition* ion)
{
// Set cut value same as "GenericIon"
G4ParticleDefinition* genericIon=G4ParticleTable::GetParticleTable()->FindParticle("GenericIon");
if (genericIon == 0) {
G4Exception("G4IonTable::SetCuts : GenericIon is not defined !!");
}
if (genericIon->GetEnergyCuts() != 0) {
ion->SetCuts( genericIon->GetLengthCuts());
#ifdef G4VERBOSE
if (GetVerboseLevel()> 1) {
G4cout << "G4IonTable::GetIon() : cut value =";
G4cout << genericIon->GetLengthCuts()/mm << "[mm]" <<endl;
}
#endif
G4String name = ion->GetParticleName();
// Build Physics Tables for the ion
// create command string for buildPhysicsTable
char cmdBld[60];
ostrstream osBld(cmdBld,60);
osBld << "/run/particle/buildPhysicsTable "<< name << '\0';
// set /control/verbose 0
G4int tempVerboseLevel = G4UImanager::GetUIpointer()->GetVerboseLevel();
G4UImanager::GetUIpointer()->SetVerboseLevel(0);
// issue /run/particle/buildPhysicsTable
G4UImanager::GetUIpointer()->ApplyCommand(cmdBld);
// retreive /control/verbose
G4UImanager::GetUIpointer()->SetVerboseLevel(tempVerboseLevel);
} else {
#ifdef G4VERBOSE
if (GetVerboseLevel()> 1) {
G4cout << "G4IonTable::GetIon() : ";
G4cout << " cut value of GenericIon has not be defined yet";
}
#endif
}
}
////////////////////
void G4IonTable::RegisterIsotopeTable(G4VIsotopeTable* table)
{
fIsotopeTable = table;
}
////////////////////
G4VIsotopeTable* G4IonTable::GetIsotopeTable() const
{
return fIsotopeTable;
}
////////////////////
G4IsotopeProperty* G4IonTable::FindIsotope(G4int Z, G4int A, G4double E, G4int J)
{
G4IsotopeProperty* fProperty = new G4IsotopeProperty();
// Set Isotope Property
fProperty->SetAtomicNumber(Z);
fProperty->SetAtomicMass(A);
fProperty->SetEnergy(E);
fProperty->SetiSpin(J);
fProperty->SetLifeTime(-1.0);
fProperty->SetDecayTable(0);
if (fIsotopeTable ==0) return 0;
// ask IsotopeTable
if (fIsotopeTable->FindIsotope(fProperty)) {
return fProperty;
} else {
delete fProperty;
return 0;
}
}
source/particles/management/src/G4Ions.cc
+11 -6
View File
@@ -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: G4Ions.cc,v 1.1 1999/01/07 16:10:33 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4Ions.cc,v 1.3.6.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ----------------------------------------------------------------------
@@ -41,7 +41,12 @@ G4Ions::G4Ions(
iConjugation,iIsospin,iIsospin3,gParity,pType,
lepton,baryon,encoding,stable,lifetime,decaytable )
{
// Initialise cuts at construction to enable production cuts since
// ions are not in the particle table at initialisation.
// SetCuts(1.e-30);
// initialize excitation energy/level
theExcitationEnergy = 0.0;
}
G4Ions* G4Ions::IonsDefinition()
{
return this;
}
source/particles/management/src/G4IsotopeProperty.cc
+105
View File
@@ -0,0 +1,105 @@
// This code implementation is the intellectual property of
// 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: G4IsotopeProperty.cc,v 1.1 1999/10/05 06:45:19 kurasige Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ----------------------------------------------------------------------
// GEANT 4 class implementation file
//
// For information related to this code contact:
// CERN, CN Division, ASD Group
// **********************************************************************
// New design using G4VIsotopeTable 5 Oct. 99 H.Kurashige
#include "G4ios.hh"
#include <iomanip.h>
#include "G4IsotopeProperty.hh"
#include "G4DecayTable.hh"
// ######################################################################
// ### IsotopeProperty ###
// ######################################################################
G4IsotopeProperty::G4IsotopeProperty():
fAtomicNumber(0),fAtomicMass(0),
fISpin(0),fEnergy(0.0),
fLifeTime(-1.0),fDecayTable(0)
{
}
G4IsotopeProperty::~G4IsotopeProperty()
{
if (fDecayTable != 0) delete fDecayTable;
}
G4IsotopeProperty::G4IsotopeProperty(const G4IsotopeProperty& right)
{
fAtomicNumber = right.fAtomicNumber;
fAtomicMass = right.fAtomicMass;
fISpin = right.fISpin;
fEnergy = right.fEnergy;
fLifeTime = right.fLifeTime;
// decay table is not copied because G4DecayTable has no copy constructor
fDecayTable = 0;
}
// Assignment operator
G4IsotopeProperty & G4IsotopeProperty::operator=(G4IsotopeProperty& right)
{
if (this != &right) {
fAtomicNumber = right.fAtomicNumber;
fAtomicMass = right.fAtomicMass;
fISpin = right.fISpin;
fEnergy = right.fEnergy;
fLifeTime = right.fLifeTime;
// decay table is not copied because G4DecayTable has no copy constructor
fDecayTable = 0;
}
return *this;
}
// equal / unequal operator
G4int G4IsotopeProperty::operator==(const G4IsotopeProperty &right) const
{
G4bool value = true;
value = value && ( fAtomicNumber == right.fAtomicNumber);
value = value && ( fAtomicMass == right.fAtomicMass);
value = value && ( fISpin == right.fISpin);
value = value && ( fEnergy == right.fEnergy);
value = value && ( fLifeTime == right.fLifeTime);
return value;
}
G4int G4IsotopeProperty::operator!=(const G4IsotopeProperty &right) const
{
return !(*this == right);
}
void G4IsotopeProperty::DumpInfo() const
{
G4cout << "AtomicNumber: " << fAtomicNumber << endl;
G4cout << "AtomicMass: " << fAtomicMass << endl;
G4cout << "Spin: " << fISpin << "/2" << endl;
G4cout << "Excited Energy: " << setprecision(1) << fEnergy/keV << "[keV]" << endl;
G4cout << "Life Time: " << fLifeTime/ns << "[ns]" << endl;
if (fDecayTable != 0) {
fDecayTable->DumpInfo();
} else {
G4cout << "Decay Table is not defined !" << endl;
}
}
source/particles/management/src/G4KL3DecayChannel.cc
+3 -3
View File
@@ -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: G4KL3DecayChannel.cc,v 1.3 1999/04/13 08:00:20 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4KL3DecayChannel.cc,v 1.3.8.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
source/particles/management/src/G4MuonDecayChannel.cc
+3 -3
View File
@@ -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: G4MuonDecayChannel.cc,v 1.4 1999/04/14 10:28:27 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4MuonDecayChannel.cc,v 1.4.8.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
source/particles/management/src/G4NucleiProperties.cc
+66 -96
View File
@@ -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: G4NucleiProperties.cc,v 1.3 1999/05/26 14:05:17 larazb Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4NucleiProperties.cc,v 1.5.6.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
@@ -25,6 +25,69 @@
#include "G4NucleiProperties.hh"
G4double G4NucleiProperties::AtomicMass(G4double A, G4double Z)
{
const G4double hydrogen_mass_excess = G4NucleiPropertiesTable::GetMassExcess(1,1);
const G4double neutron_mass_excess = G4NucleiPropertiesTable::GetMassExcess(0,1);
G4double mass =
(A-Z)*neutron_mass_excess + Z*hydrogen_mass_excess - BindingEnergy(A,Z) + A*amu_c2;
return mass;
}
G4double G4NucleiProperties::BindingEnergy(G4double A, G4double Z)
{
//
// Weitzsaecker's Mass formula
//
G4int Npairing = G4int(A-Z)%2; // pairing
G4int Zpairing = G4int(Z)%2;
G4double binding =
- 15.67*A // nuclear volume
+ 17.23*pow(A,2./3.) // surface energy
+ 93.15*((A/2.-Z)*(A/2.-Z))/A // asymmetry
+ 0.6984523*Z*Z*pow(A,-1./3.); // coulomb
if( Npairing == Zpairing ) binding += (Npairing+Zpairing-1) * 12.0 / sqrt(A); // pairing
return -binding*MeV;
}
G4double G4NucleiProperties::GetNuclearMass(const G4double A, const G4double Z)
{
if (A < 1 || Z < 0 || Z > A) {
G4cout << "G4NucleiProperties::GetNuclearMass: Wrong values for A = " << A
<< " and Z = " << Z << endl;
return 0.0;
} else {
G4ParticleDefinition * nucleus = 0;
if ( (Z<=2) ) {
if ( (Z==1)&&(A==1) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("proton"); // proton
} else if ( (Z==0)&&(A==1) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("neutron"); // neutron
} else if ( (Z==1)&&(A==2) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("deuteron"); // deuteron
} else if ( (Z==1)&&(A==3) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("triton"); // triton
} else if ( (Z==2)&&(A==4) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("alpha"); // alpha
} else if ( (Z==2)&&(A==3) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("He3"); // He3
}
}
if (nucleus!=0) {
return nucleus->GetPDGMass();
}else {
return GetAtomicMass(A,Z) - Z*electron_mass_c2 + 1.433e-5*MeV*pow(Z,2.39);
}
}
}
// G4double G4NucleiProperties::CameronMassExcess(const G4int A, const G4int Z)
// {
// const G4double alpha = -17.0354*MeV;
@@ -75,99 +138,6 @@
// }
G4double G4NucleiProperties::AtomicMass(G4double Z, G4double A)
{
// derived from original FORTRAN code ATOMAS by H. Fesefeldt (2-Dec-1986)
//
// Computes atomic mass in MeV
// units for A example: A = material->GetA()/(g/mole);
//
// Note: can't just use aEff and zEff since the Nuclear Reaction
// function needs to calculate atomic mass for various values of A and Z
G4ParticleDefinition* proton = G4ParticleTable::GetParticleTable()->FindParticle("proton");
G4ParticleDefinition* neutron = G4ParticleTable::GetParticleTable()->FindParticle("neutron");
G4ParticleDefinition* electron = G4ParticleTable::GetParticleTable()->FindParticle("e-");
if ((proton == 0)||(neutron == 0)||(electron == 0)) {
G4Exception("G4NucleiProperties::AtomicMass G4Proton or G4Neutron is not defined !!");
}
const G4double proton_mass = proton->GetPDGMass();
const G4double neutron_mass = neutron->GetPDGMass();
const G4double electron_mass = electron->GetPDGMass();
//
// Weitzsaecker's Mass formula
//
G4int nNeutron = A-Z;
G4int ipp = G4int(nNeutron)%2; // pairing
G4int izz = G4int(Z)%2;
G4double mass =
nNeutron*neutron_mass + Z*proton_mass
- 15.67*double(A) // nuclear volume
+ 17.23*pow(double(A),2./3.) // surface energy
+ 93.15*(double(A/2.-Z)*double(A/2.-Z))/double(A) // asymmetry
+ 0.6984523*double(Z*Z)*pow(double(A),-1./3.) // coulomb
+ Z*electron_mass; // electrons mass
if( ipp == izz ) mass += (ipp+izz-1) * 12.0 / sqrt(double(A)); // pairing
return mass*MeV;
}
G4double G4NucleiProperties::BindingEnergy(G4double A, G4double Z)
{
//
// Weitzsaecker's Mass formula
//
G4int nNeutron = A-Z;
G4int ipp = G4int(nNeutron)%2; // pairing
G4int izz = G4int(Z)%2;
G4double binding =
- 15.67*A // nuclear volume
+ 17.23*pow(A,2./3.) // surface energy
+ 93.15*((A/2.-Z)*(A/2.-Z))/A // asymmetry
+ 0.6984523*Z*Z*pow(A,-1./3.); // coulomb
if( ipp == izz ) binding += (ipp+izz-1) * 12.0 / sqrt(A); // pairing
return -binding*MeV;
}
G4double G4NucleiProperties::GetNuclearMass(const G4double A, const G4double Z)
{
if (A < 1 || Z < 0 || Z > A) {
G4cout << "G4NucleiProperties::GetNuclearMass: Wrong values for A = " << A
<< " and Z = " << Z << endl;
return 0.0;
} else {
G4ParticleDefinition * nucleus = 0;
if ( (Z<=2) ) {
if ( (Z==1)&&(A==1) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("proton"); // proton
} else if ( (Z==0)&&(A==1) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("neutron"); // neutron
} else if ( (Z==1)&&(A==2) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("deuteron"); // deuteron
} else if ( (Z==1)&&(A==3) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("triton"); // tritoon
} else if ( (Z==2)&&(A==4) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("alpha"); // alpha
} else if ( (Z==2)&&(A==3) ) {
nucleus = G4ParticleTable::GetParticleTable()->FindParticle("He3"); // He3
}
}
if (nucleus!=0) {
return nucleus->GetPDGMass();
}else {
G4double bindingEnergy = GetBindingEnergy(A,Z);
G4double protonMass = G4ParticleTable::GetParticleTable()->FindParticle("proton")->GetPDGMass();
G4double neutronMass = G4ParticleTable::GetParticleTable()->FindParticle("neutron")->GetPDGMass();
return Z*protonMass + (A-Z)*neutronMass - bindingEnergy;
}
}
}
// S(Z)+P(Z) from Tab. 1 from A.G.W. Cameron, Canad. J. Phys., 35(1957)1021
// or Delta M(Z) from Tab. 97 of book [1]
// const G4double G4NucleiProperties::SPZTable[TableSize] = {
source/particles/management/src/G4NucleiPropertiesTableA.cc
+12 -837
View File
@@ -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: G4NucleiPropertiesTableA.cc,v 1.3 1999/05/26 14:05:17 larazb Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4NucleiPropertiesTableA.cc,v 1.4.6.1 1999/12/07 20:49:56 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// -------------------------------------------------------------------
// GEANT 4 class file --- Copyright CERN 1997
@@ -32,830 +32,8 @@
// Class G4NucleiPropertiesTable
const char* G4NucleiPropertiesTable::noName = " ";
//+----------------------+
//| Table of Mass Excess |
//+----------------------+
// unit: keV
G4double G4NucleiPropertiesTable::MassExcess[G4NucleiPropertiesTable::nEntries] = {
8071.323, 7288.969, 13135.720, 14949.794, 14931.204, 25927.784, 2424.911, 25320.173, 36833.979, 11386.234, 11678.880,
37996.000, 41863.763, 17594.123, 14086.312, 18374.465, 26110.264, 14907.673, 15769.489, 27867.864, 31597.983, 20946.195,
4941.662, 22921.002, 35094.056, 40818.362, 24953.903, 11347.584, 12415.701, 28913.650, 48810.011, 33050.226, 12606.577,
12050.761, 15698.568, 39699.000, 40795.860, 20173.970, 8667.984, 10650.531, 24960.520, 50096.000, 25076.402, 13368.901,
0.0 , 17338.083, 32047.838, 33658.445, 16562.209, 3125.011, 5345.456, 23110.735, 39882.396, 23663.730, 3019.892,
2863.417, 8006.456, 33608.000, 28966.936, 9873.143, 101.438, 2855.388, 16777.001, 37081.686, 13694.117, 5683.432,
-4736.998, 10680.257, 23992.401, 43716.310, 21036.589, 7870.819, -809.002, 1951.701, 16485.173, 52322.000, 24924.036,
13117.136, -782.064, 873.431, 5306.782, 25318.000, 59364.000, 32833.383, 15860.449, 3333.565, -1487.405, 1751.059,
12928.622, 37560.063, 21766.492, 3796.909, -17.396, -7041.930, 6844.859, 17570.530, 45960.000, 25231.909, 8061.736,
-47.580, -5731.720, -2184.261, 10911.681, 26119.000, 52583.000, 32080.890, 9284.346, 2793.783, -8024.344, -5182.104,
-396.766, 18183.000, 32164.000, 37735.000, 14616.373, 3329.518, -5153.641, -9529.485, -5472.666, 6767.210, 23772.000,
47040.000, 18974.457, 7544.514, -5947.519, -8417.601, -13933.381, -55.041, 10754.759, 31997.000, 27144.000, 11266.384,
-2058.696, -9357.459, -13192.726, -8915.742, 3825.310, 18872.000, 35164.000, 18288.165, 429.882, -6902.465, -16214.476,
-12210.339, -7144.618, 10973.000, 25970.000, 25050.028, 7093.512, -5580.857, -14586.503, -17196.829, -12384.431, -752.978,
17507.000, 33226.000, 11278.595, -1033.576, -15018.752, -16850.552, -21492.793, -7161.018, 4073.107, 26557.000, 40296.000,
18020.589, 2618.710, -10661.187, -18215.504, -21895.025, -16951.907, -3158.878, 13143.000, 22236.621, 8594.416, -8882.233,
-15872.372, -24432.881, -20200.556, -14062.806, 4443.000, 20083.000, 30842.000, 12663.760, -3215.089, -14954.181, -22948.958,
-24440.991, -19044.932, -7064.436, 11296.000, 37176.000, 18303.661, -795.599, -11062.068, -24080.859, -24305.318, -26015.981,
-13330.694, -2179.081, 20418.000, 25509.891, 5204.233, -8504.923, -20492.381, -26337.727, -26586.235, -21003.512, -9381.336,
6763.000, 32509.000, 8450.922, -2862.243, -19956.562, -24557.549, -29931.850, -24440.566, -18378.264, -1481.000, 13153.000,
41153.000, 16292.000, -58.079, -14359.762, -24857.613, -28846.371, -29013.512, -23048.208, -11167.107, 4439.000, 20912.000,
5916.384, -12400.639, -20250.840, -30663.958, -29521.886, -30230.439, -17425.078, -6439.199, 13898.000, 29100.000, 9603.702,
-6524.192, -18994.708, -26896.218, -31761.519, -30948.034, -24799.240, -13160.607, 2841.000, 15742.000, -3744.605, -14466.100,
-26861.076, -29797.976, -34714.763, -28801.691, -22059.044, -4937.000, 9101.000, 20400.000, 2142.000, -12649.687, -23161.339,
-29800.652, -33241.836, -33806.836, -27276.256, -14168.014, 1232.000, 5403.000, -8336.870, -22849.544, -27557.728, -35039.890,
-33535.016, -34846.110, -20526.386, -8850.210, 10330.000, 11830.000, -4843.768, -18601.932, -27339.148, -33067.261, -35558.872,
-35137.487, -28642.211, -15713.000, -242.000, 14997.000, 84.000, -17241.951, -24987.328, -34422.065, -35021.319, -38546.765,
-32120.925, -25120.878, -8169.000, 5990.000, 3083.000, -12482.018, -24029.389, -31977.531, -36593.042, -38408.442, -36187.623,
-29320.314, -18024.000, -2136.000, 9203.000, -10880.000, -19991.058, -32262.039, -35810.214, -41469.087, -37815.811, -37548.299,
-23846.000, -13535.000, 6399.000, 14103.000, -4825.000, -18909.325, -29719.331, -36608.028, -40812.530, -41069.338, -39006.912,
-31873.591, -19412.000, -5114.000, 13563.000, 22197.000, -401.000, -14792.000, -29720.739, -35418.933, -43134.911, -41758.637,
-44125.338, -37073.929, -29470.929, -12370.000, 755.000, 7098.000, -11225.000, -25908.348, -35696.887, -42339.694, -44331.631,
-44931.732, -42003.929, -34552.357, -22263.000, -6623.000, 12100.000, -4797.000, -23222.000, -32124.479, -44214.742, -44492.812,
-48487.000, -44474.659, -42815.313, -28997.000, -18108.000, 1639.000, 20502.000, -102.000, -16599.000, -30320.047, -41290.047,
-46552.277, -48558.040, -47956.179, -45325.434, -37610.541, -24582.000, -9576.000, 7200.000, -13097.000, -25352.625, -39571.456,
-44537.508, -51425.849, -49217.535, -50254.460, -42621.470, -34471.499, -17195.000, -3791.000, 12603.000, -6297.000, -22002.000,
-35886.511, -43218.800, -49726.852, -52197.493, -51444.760, -48236.956, -40217.307, -27274.000, -11439.000, -1705.000, -16199.000,
-32509.136, -40380.259, -49464.024, -51437.409, -55412.797, -50701.137, -48329.137, -33916.000, -22654.000, -2627.000, 5800.000,
-11998.000, -27898.000, -37968.000, -46824.604, -51844.604, -55280.638, -54683.625, -50941.273, -42639.145, -29379.000, -13460.000,
-5598.000, -23585.000, -34465.273, -45764.293, -49886.730, -56928.321, -55551.269, -56248.410, -48005.330, -39206.103, -21694.000,
-6567.000, -570.000, -18118.000, -30339.000, -41805.444, -49147.298, -55103.298, -57706.384, -57475.007, -54023.711, -45329.911,
-31624.000, -14923.000, -13237.000, -25467.000, -39132.057, -46239.355, -55288.596, -56905.551, -60601.003, -56035.003, -53899.645,
-38601.000, -25728.000, -4741.000, -7120.000, -21387.000, -34558.000, -44376.367, -52392.990, -57484.854, -60175.708, -59339.666,
-56075.475, -47305.268, -32686.000, -15901.000, -15770.000, -31568.000, -40380.259, -51930.783, -55902.253, -62148.844, -59841.428,
-60223.014, -51659.966, -42293.114, -23986.000, -8374.000, -11140.000, -26119.000, -37911.800, -47850.840, -55473.100, -60658.421,
-62223.609, -61151.125, -56351.547, -47257.409, -34121.000, -17000.000, -22691.000, -33068.032, -46826.196, -52914.442, -61406.923,
-61644.218, -64468.100, -58341.209, -54183.106, -39998.000, -27768.000, -6399.000, -16750.000, -30357.000, -42764.883, -51735.169,
-58917.489, -62895.042, -64216.775, -61979.570, -56342.425, -47348.000, -33729.000, -18052.000, -25020.000, -41172.029, -48465.626,
-58897.896, -61428.097, -66742.688, -62794.517, -61167.353, -51996.353, -42243.000, -24964.000, -21657.000, -35527.000, -46751.677,
-55779.304, -61837.017, -65509.217, -65576.162, -62209.293, -56689.293, -46910.000, -33823.000, -33347.000, -43100.221, -55079.232,
-59789.309, -67095.900, -65420.802, -65999.528, -58834.729, -54424.729, -39521.000, -27600.000, -40892.580, -51288.052, -59164.222,
-65122.587, -67259.719, -65907.775, -62652.909, -56410.559, -47056.000, -32919.000, -36496.000, -50319.298, -56052.259, -66028.726,
-66254.326, -68896.301, -63721.301, -61621.301, -51821.000, -41722.000, -33701.000, -46574.693, -55321.420, -63742.462, -67300.158,
-67877.158, -66876.681, -62653.753, -56643.753, -46491.000, -32798.000, -44237.000, -51828.318, -63486.027, -65541.887, -70004.030,
-67082.930, -66976.955, -58876.955, -54148.000, -38892.000, -39402.000, -51045.864, -60377.721, -65739.917, -68414.928, -69320.923,
-67093.638, -63080.621, -56297.481, -46409.000, -32304.000, -46752.000, -59485.198, -62960.334, -69559.425, -68904.705, -70560.320,
-64340.320, -61940.000, -51590.000, -40976.000, -44963.000, -55889.632, -62764.225, -67321.674, -70136.821, -69904.897, -67892.187,
-63092.000, -56592.000, -46100.000, -32304.000, -40604.000, -54678.690, -60063.000, -68128.416, -68586.498, -72585.557, -68229.459,
-67894.432, -59152.770, -54112.770, -38117.000, -50226.000, -59159.000, -65409.994, -69703.842, -71297.136, -70956.276, -68216.276,
-63532.642, -56885.291, -46234.000, -31699.000, -48522.000, -55703.000, -65709.197, -68054.011, -73422.011, -70859.599, -72212.607,
-65305.961, -62169.554, -51725.504, -40697.000, -43808.000, -54306.000, -62468.419, -68464.198, -71855.908, -73032.457, -72168.818,
-69138.818, -64241.597, -57222.414, -46649.000, -41610.000, -50310.000, -62042.888, -66202.888, -73212.888, -72289.575, -75251.563,
-70288.688, -68978.700, -60480.547, -54390.000, -36487.000, -48484.000, -58604.138, -65874.138, -71214.138, -73916.177, -74599.049,
-73233.933, -70171.407, -64825.826, -57974.770, -46929.000, -33720.000, -43957.000, -57222.063, -63662.063, -71862.063, -72816.201,
-77025.673, -73451.896, -74159.700, -66935.766, -63174.508, -52629.000, -41656.000, -53398.000, -62487.989, -69487.989, -73635.989,
-75916.934, -76067.980, -74442.202, -70796.589, -65477.427, -58357.427, -47357.000, -35499.000, -51777.345, -59067.745, -69447.745,
-72117.967, -77759.404, -75888.849, -77893.342, -72172.776, -70304.883, -61165.000, -55377.000, -46128.000, -57982.741, -66302.741,
-72532.741, -76389.081, -77974.363, -77693.650, -75456.438, -71526.530, -66016.164, -58856.164, -47460.000, -42066.000, -52946.000,
-65623.439, -70323.439, -77593.439, -77495.943, -80588.563, -76189.034, -76008.727, -68192.736, -64192.736, -52974.000, -49490.000,
-61004.000, -69880.088, -75340.088, -79009.106, -79981.833, -79072.696, -76796.985, -72328.103, -66460.103, -58960.103, -47748.000,
-44395.000, -58395.000, -66080.000, -75949.796, -77776.304, -82431.033, -79750.149, -80644.288, -74158.306, -71492.000, -61879.000,
-55806.000, -53384.000, -63519.000, -72428.605, -78610.605, -81480.605, -82167.687, -81102.665, -77847.665, -73154.665, -67154.665,
-59066.000, -47562.000, -50049.000, -59401.000, -70540.945, -75639.945, -83265.945, -82747.319, -84521.563, -79281.563, -77805.027,
-69827.027, -64557.027, -53207.000, -56281.000, -66582.484, -73857.484, -80709.984, -84595.045, -84878.358, -83016.752, -79347.835,
-74182.835, -67694.611, -59122.000, -47339.000, -51642.000, -63878.140, -70732.140, -79692.140, -82606.221, -87919.663, -84297.063,
-83623.763, -76424.000, -72700.555, -62568.000, -55498.000, -47292.000, -59597.000, -68569.815, -76724.815, -81710.698, -86207.050,
-87702.101, -84869.416, -80578.408, -75003.363, -67493.363, -59513.000, -47152.000, -56430.000, -64613.083, -74963.083, -79354.948,
-85941.863, -86487.861, -88767.938, -82656.938, -80167.938, -71207.275, -65409.000, -53216.000, -50888.000, -61510.918, -71312.918,
-77747.918, -83638.978, -86346.300, -87891.133, -86637.743, -82203.631, -75983.631, -68578.969, -59103.000, -47059.000, -47199.000,
-56583.354, -68788.258, -74775.258, -82875.106, -84815.467, -88454.559, -86448.952, -86805.466, -78935.111, -74408.000, -63360.000,
-55498.000, -53002.000, -64026.001, -72626.001, -80087.598, -84224.201, -87117.379, -87208.744, -86803.852, -83602.997, -77265.997,
-69173.000, -59699.000, -47804.000, -61141.000, -68551.124, -78841.774, -82349.639, -87266.289, -86364.891, -88410.338, -84154.593,
-82568.017, -72938.000, -66350.000, -53300.000, -56039.000, -65838.676, -75117.330, -81204.179, -85657.624, -86782.460, -87708.077,
-86017.446, -83449.993, -78339.993, -70151.000, -60100.000, -53030.000, -61214.086, -72954.158, -78340.695, -85440.646, -85604.215,
-88791.015, -85817.781, -86072.192, -79625.760, -76175.760, -64571.000, -56104.000, -47916.000, -58364.738, -68791.979, -76260.455,
-82948.861, -85606.946, -87540.831, -87220.574, -86112.372, -82589.372, -77799.372, -70794.000, -60603.000, -54302.779, -66628.659,
-72452.035, -81276.224, -83526.412, -88112.011, -86428.013, -88224.474, -83167.096, -81300.084, -72880.084, -67460.000, -53803.000,
-50840.361, -62116.633, -70202.280, -77769.413, -82327.417, -85966.080, -87323.307, -87616.958, -85574.384, -82187.793, -76757.793,
-69853.000, -60910.000, -46696.000, -60219.468, -67294.468, -76604.468, -79939.468, -86184.468, -86016.384, -89218.795, -85588.795,
-85227.407, -78180.851, -74305.049, -64134.253, -56864.000, -43597.645, -55407.645, -64912.645, -73457.645, -78942.645, -83511.645,
-86336.086, -87949.584, -87408.099, -85428.099, -81224.275, -75747.738, -68409.000, -59560.000, -37996.000, -53077.643, -61892.643,
-71742.643, -76347.643, -83557.643, -84567.591, -89097.851, -86775.318, -87925.833, -81971.463, -79384.463, -70134.463, -64748.000,
-47553.000, -58740.000, -68374.386, -75319.386, -80849.386, -84599.386, -87258.919, -88022.274, -87479.193, -84791.601, -80649.714,
-74599.714, -66946.000, -55778.000, -44404.000, -54539.000, -66341.000, -72228.533, -80333.533, -82488.533, -88091.239, -86950.001,
-89390.890, -85112.244, -83975.950, -76067.264, -71552.264, -59348.000, -51148.000, -62364.000, -70854.991, -77339.991, -82289.991,
-85929.991, -87846.909, -88413.628, -87068.376, -84330.172, -79481.172, -73224.351, -63780.695, -46370.000, -59699.000, -66891.000,
-76257.412, -79777.412, -86324.412, -86363.812, -89904.912, -86939.647, -87133.792, -80610.422, -77425.330, -66357.000, -58030.000,
-55089.000, -64916.000, -72940.884, -79100.884, -83920.884, -86861.300, -88372.264, -88405.269, -86988.269, -83562.269, -78555.949,
-70654.000, -60513.000, -51903.000, -60538.000, -71185.000, -75935.404, -83655.404, -85016.729, -89521.729, -87603.546, -89252.572,
-84095.561, -82003.746, -72507.000, -65682.577, -52824.000, -58097.000, -67245.000, -74867.000, -80852.209, -85012.209, -87603.705,
-88719.654, -88505.359, -86485.406, -82635.728, -76255.728, -67573.840, -57574.091, -53393.000, -65456.000, -71362.000, -80139.971,
-82949.971, -88349.971, -87457.530, -90349.708, -86471.708, -85834.656, -77535.000, -72277.250, -60348.000, -51721.000, -61004.000,
-69815.000, -76792.000, -82288.000, -86029.092, -88217.425, -89254.225, -88388.821, -85943.905, -80844.000, -73475.687, -64947.000,
-54369.000, -58833.000, -65913.000, -75867.000, -79537.000, -86337.113, -86625.080, -90581.047, -87995.116, -88658.831, -81603.855,
-77256.594, -67096.000, -59927.331, -46266.000, -53999.000, -63966.000, -72154.000, -78786.000, -83693.469, -87033.469, -89049.931,
-89366.381, -88330.421, -84413.891, -78314.000, -71124.917, -62053.479, -51664.830, -59727.000, -70794.000, -75594.000, -83494.153,
-84944.875, -90021.317, -88569.457, -90558.142, -84676.634, -81919.000, -72796.000, -66932.000, -54566.000, -45698.000, -57492.000,
-66779.000, -74403.374, -80403.374, -84987.374, -88090.859, -89536.747, -90032.633, -87002.633, -82363.966, -76459.000, -68430.000,
-59672.000, -48708.000, -65056.000, -71061.000, -79961.027, -82568.027, -88719.729, -88249.733, -91524.722, -86817.803, -85305.972,
-77560.823, -72901.000, -62490.055, -54325.000, -60743.000, -69536.000, -76532.000, -82265.638, -86425.638, -88943.010, -90397.972,
-88641.338, -85106.700, -80436.645, -73993.816, -66471.883, -56952.000, -46565.000, -58656.000, -65736.000, -75465.986, -79565.986,
-86708.904, -87230.094, -91653.102, -87996.470, -87723.260, -80690.442, -77713.676, -68413.676, -62000.000, -49770.000, -63938.000,
-72023.000, -78556.562, -83906.562, -87703.562, -90067.185, -89473.283, -87180.271, -83665.999, -78660.656, -72311.049, -64224.707,
-54967.000, -44004.000, -59821.000, -70766.000, -75647.912, -83972.912, -85733.293, -91103.293, -88422.693, -89404.882, -83789.882,
-81829.882, -73887.752, -68887.752, -57687.000, -49705.000, -57678.000, -66900.000, -74658.233, -81058.233, -85838.233, -89202.770,
-89592.901, -88557.294, -86287.943, -82542.934, -77142.934, -70340.913, -62401.000, -52471.000, -41579.000, -65391.000, -71427.000,
-80574.000, -83576.327, -89944.918, -88328.519, -90311.064, -86077.064, -85186.607, -78131.893, -74277.000, -64543.000, -57743.000,
-45038.000, -61236.000, -69955.000, -77310.567, -83425.567, -87819.470, -89222.491, -89169.158, -87934.936, -85258.936, -81049.124,
-75591.000, -68707.000, -60072.000, -50338.000, -66574.000, -76710.101, -80876.101, -88236.101, -87618.618, -90523.071, -87363.484,
-87657.508, -81742.563, -79094.600, -70300.000, -64720.000, -53132.000, -64702.000, -73357.777, -80479.777, -85897.777, -88261.089,
-89027.789, -88842.019, -87189.468, -84090.728, -79530.728, -73895.000, -66565.000, -57911.000, -61013.000, -72326.776, -77812.776,
-86019.776, -86397.776, -90070.293, -87914.962, -89172.962, -84348.676, -82675.533, -75106.000, -70700.000, -60258.000, -53030.000,
-58796.000, -68525.512, -76993.512, -83507.512, -86708.512, -88289.512, -88987.080, -88324.638, -86239.937, -82789.937, -78096.000,
-71958.000, -64431.000, -55424.000, -67290.542, -74360.542, -83336.142, -84610.075, -88993.635, -87741.827, -89860.807, -85932.247,
-85409.725, -78759.725, -75572.000, -66322.000, -60184.000, -48195.000, -63099.000, -72975.131, -80630.131, -84626.131, -87005.631,
-88503.573, -88697.350, -87501.395, -85069.842, -81349.842, -76300.000, -69992.000, -62173.000, -52946.000, -61497.000, -69997.161,
-80246.161, -82393.930, -87352.930, -86932.580, -89881.796, -86902.636, -87271.214, -81673.000, -79462.000, -71371.000, -66341.000,
-55470.000, -47851.000, -68215.710, -77389.307, -82021.307, -85211.307, -87444.761, -88415.608, -88063.214, -86693.390, -83733.390,
-79713.390, -74463.390, -67903.390, -59802.000, -50403.000, -62485.535, -76620.535, -79723.535, -85209.535, -85702.535, -89279.535,
-87160.068, -88439.611, -83731.611, -82447.000, -75339.000, -71613.000, -61711.000, -55126.000, -42700.000, -57436.000, -70966.712,
-78956.712, -82959.712, -85877.712, -87648.300, -88075.660, -87558.217, -85328.217, -82391.000, -78059.000, -72461.000, -65465.000,
-57073.000, -47599.000, -51549.000, -66635.740, -74005.740, -82399.438, -83949.438, -88124.438, -86895.877, -88954.546, -85241.369,
-84741.369, -78551.000, -75781.000, -66611.000, -61460.000, -50003.000, -60799.000, -69705.584, -77825.584, -83787.584, -86435.645,
-87586.595, -87855.940, -86655.940, -84630.357, -80910.357, -76159.000, -70219.000, -63016.000, -54287.000, -56504.000, -64590.000,
-74423.420, -79498.246, -86424.442, -86344.134, -88892.358, -86022.358, -86495.190, -81368.844, -79157.844, -71307.844, -66788.000,
-56355.000, -49304.000, -50496.000, -60258.000, -69559.519, -76501.119, -82378.579, -86551.145, -87726.774, -87126.667, -85904.567,
-83202.567, -79512.567, -73856.000, -67955.543, -60351.000, -51558.000, -54995.000, -65931.000, -72299.139, -80119.139, -82893.139,
-88267.172, -86529.421, -87573.860, -83136.860, -82037.000, -75037.000, -71222.000, -61991.000, -55918.000, -43901.000, -50571.000,
-60799.000, -68843.542, -75649.542, -80706.565, -84919.280, -87236.114, -86958.114, -84829.114, -82042.114, -77537.722, -72375.210,
-65355.000, -57678.000, -48410.000, -57101.000, -64077.000, -72995.897, -77055.897, -83276.031, -84325.762, -88087.615, -84699.615,
-84477.342, -78430.247, -75459.386, -66989.386, -61529.000, -50729.000, -43044.000, -51800.000, -60705.000, -68328.538, -74478.538,
-79729.877, -82942.993, -85444.905, -86025.576, -84202.574, -80474.888, -75946.081, -69968.353, -63146.000, -54809.000, -45466.000,
-47972.000, -55722.000, -65481.242, -70521.242, -77828.012, -80039.086, -84542.631, -83797.314, -85959.517, -81085.853, -78996.944,
-71352.399, -66852.000, -56952.000, -50052.000, -37390.000, -52098.000, -60650.000, -67691.387, -73944.606, -78190.856, -81616.413,
-83077.858, -84011.780, -82970.420, -79527.634, -74252.511, -68242.511, -60780.000, -52322.000, -42206.000, -46938.000, -57538.000,
-63316.084, -71780.481, -74899.869, -80441.308, -80759.963, -83757.479, -81425.820, -81976.369, -75661.412, -71921.000, -62848.000,
-56756.000, -45047.000, -36710.000, -52471.000, -60185.471, -68070.025, -72993.377, -77101.730, -79636.301, -81441.582, -81278.541,
-80662.142, -78002.099, -72947.615, -66248.000, -58728.000, -49481.000, -39626.000, -49090.000, -55738.704, -65105.231, -69209.858,
-75740.025, -76766.257, -80935.509, -79463.724, -81005.724, -77127.958, -76098.070, -67830.797, -62670.797, -52071.000, -44600.000,
-31210.000, -43771.000, -52289.934, -61485.563, -67235.563, -72180.563, -75470.563, -78156.253, -79052.253, -79276.392, -77555.055,
-75367.684, -70758.904, -64386.257, -56039.000, -47217.000, -36253.000, -47599.766, -58048.483, -63163.483, -70425.837, -72485.837,
-77417.837, -76878.251, -79346.590, -76239.256, -76280.245, -70515.356, -67833.356, -58433.000, -51754.000, -39542.000, -30963.000,
-44041.000, -53598.000, -61134.000, -66798.164, -70988.164, -74385.196, -76075.853, -77146.768, -76451.500, -75137.623, -71499.950,
-67687.950, -61674.261, -53864.000, -44106.000, -34018.000, -39151.000, -50655.000, -57222.000, -64993.681, -68003.681, -73693.681,
-73607.132, -77061.132, -74800.546, -75771.944, -71115.684, -69322.027, -62082.000, -57974.000, -46882.000, -39132.000, -25460.000,
-35397.000, -45923.000, -54437.000, -61441.000, -66855.300, -70956.788, -73399.207, -74586.250, -74662.939, -74198.821, -71633.583,
-68763.221, -63638.923, -58256.000, -50828.000, -41685.000, -30602.000, -42700.000, -50198.000, -59262.000, -63714.000, -70157.856,
-71268.076, -74772.647, -72898.338, -74717.096, -70727.096, -70128.564, -63583.214, -60474.024, -51884.000, -46419.000, -33897.000,
-37623.000, -47087.000, -55349.000, -61805.000, -67352.098, -70688.098, -72569.048, -73377.294, -72892.857, -71323.686, -69153.298,
-65023.389, -60460.355, -54000.905, -47311.000, -38480.000, -42476.000, -52797.000, -58321.000, -65685.878, -68421.001, -72465.282,
-71747.955, -73716.308, -70154.308, -70400.400, -64649.151, -62617.538, -54564.000, -50075.000, -39961.000, -33301.000, -39002.000,
-48400.000, -55899.000, -62755.159, -66977.159, -70201.159, -71828.023, -72080.112, -71258.898, -69164.398, -66062.398, -62219.810,
-56642.687, -50494.000, -42632.000, -34689.000, -45401.000, -52052.000, -60361.000, -64216.854, -69371.854, -70094.116, -72545.159,
-70100.736, -70534.324, -65474.000, -64259.103, -56814.703, -53237.567, -43866.000, -37961.000, -26371.000, -40669.000, -49211.000,
-56570.000, -62224.000, -66737.338, -69471.338, -70833.880, -70773.828, -69432.382, -66892.382, -63392.333, -58911.333, -53413.115,
-46480.113, -39004.000, -29673.000, -44917.000, -54148.000, -58973.000, -65215.806, -67214.806, -70699.888, -69479.885, -70416.616,
-66186.616, -65287.000, -58687.000, -56022.000, -47349.000, -42246.000, -31328.000, -24276.000, -41703.000, -49937.000, -56700.000,
-62224.000, -66057.353, -68571.851, -69542.412, -69176.777, -67339.054, -64570.486, -60725.048, -55746.428, -49727.694, -42846.000,
-34545.000, -25821.000, -47143.000, -53104.000, -60417.000, -63372.000, -67951.903, -67846.267, -69681.592, -66391.592, -66062.547,
-60462.547, -58163.000, -50283.000, -45909.990, -35995.000, -29464.000, -17247.000, -42541.000, -50431.000, -56979.000, -61777.000,
-65515.980, -67471.557, -68064.634, -67205.734, -65203.315, -62039.315, -57889.000, -52589.000, -46266.506, -38775.302, -30656.000,
-20809.000, -46305.000, -54753.000, -58647.000, -64290.578, -65684.473, -68190.258, -66049.975, -66345.722, -61506.402, -59848.000,
-52888.000, -49180.103, -39917.000, -34147.000, -22629.000, -15072.000, -43296.000, -50897.000, -56626.000, -61488.000, -64604.742,
-66389.866, -66387.301, -65177.303, -62738.303, -59368.303, -54768.303, -49316.000, -42553.760, -34901.000, -26112.000, -16722.000,
-48177.000, -53104.000, -59746.000, -62086.625, -65976.625, -64989.789, -65952.563, -61990.011, -60994.000, -54758.000, -51770.000,
-43249.000, -38206.329, -27647.000, -20561.000, -43799.000, -50561.000, -56467.000, -60659.000, -63621.191, -64907.266, -64531.286,
-62938.746, -60176.746, -56256.746, -51661.000, -45813.000, -38809.795, -30692.473, -21914.000, -11569.000, -46603.000, -54399.000,
-57706.000, -62593.368, -63079.584, -64934.464, -61894.849, -61590.725, -56110.725, -53794.000, -46137.000, -41898.691, -31855.000,
-25592.000, -13501.000, -43734.000, -50701.000, -55843.000, -59942.538, -62292.538, -63299.248, -62550.890, -60596.598, -57466.598,
-53468.000, -48463.000, -42223.000, -34872.000, -26497.000, -17193.000, -48102.000, -52499.000, -58470.000, -60084.685, -62998.997,
-61319.891, -61576.900, -57101.900, -55303.000, -48636.000, -44839.000, -35761.000, -29963.446, -18662.000, -11146.000, -43901.000,
-50096.000, -55606.785, -58806.785, -60930.800, -61281.940, -60372.800, -58079.800, -54810.434, -50375.000, -44936.000, -38350.000,
-30668.313, -21991.762, -12649.000, -46342.000, -53403.000, -56248.302, -60118.302, -59803.883, -60771.916, -57312.778, -56216.000,
-50217.000, -47236.000, -38971.000, -33934.586, -23257.000, -16463.000, -43501.000, -49854.000, -54528.508, -57728.508, -59218.961,
-59315.389, -57836.544, -55433.000, -51735.000, -47078.000, -41408.000, -34428.000, -26288.000, -17465.000, -7662.000, -47404.000,
-51400.000, -56493.101, -57383.638, -59263.786, -56744.520, -56394.520, -51474.520, -48975.000, -41651.000, -37187.000, -27346.000,
-21073.989, -9213.000, -43370.000, -49099.000, -53654.000, -56261.916, -57560.027, -56889.216, -55284.000, -52594.000, -48594.000,
-43722.000, -37454.000, -30080.000, -21890.439, -12670.051, -45503.000, -51847.000, -53873.303, -56953.303, -55578.958, -55852.224,
-52007.224, -50152.000, -43676.000, -39939.000, -30922.000, -25326.129, -14050.000, -42802.000, -48503.000, -52319.311, -54704.311,
-55174.334, -54489.605, -52490.000, -49583.000, -45277.000, -39980.000, -33274.000, -25825.000, -17185.000, -8000.000, -46305.000,
-49377.174, -53497.174, -53390.993, -54583.838, -51473.838, -50683.000, -45112.000, -41964.000, -33989.000, -28876.000, -18379.000,
-11724.482, -42504.000, -47469.000, -50992.651, -52391.884, -52890.209, -51724.209, -49723.000, -46323.000, -41875.000, -36170.000,
-29386.000, -21224.000, -12727.118, -2905.000, -44116.000, -49701.349, -50345.971, -52445.216, -50533.216, -50441.916, -45781.916,
-43455.842, -36251.000, -31941.000, -22379.000, -16323.195, -4445.000, -41601.000, -46416.000, -49067.170, -50472.927, -50362.041,
-49302.356, -46592.356, -42894.000, -38052.000, -32160.000, -24767.000, -16969.000, -7949.000, -44404.000, -46686.502, -49789.502,
-48935.420, -49643.282, -45840.974, -44385.000, -37955.000, -34265.000, -25713.000, -20193.000, -9135.000, -40846.000, -44740.000,
-47413.853, -48441.085, -48253.195, -46514.522, -43524.522, -39456.072, -34300.000, -27993.000, -20674.000, -12199.000, -3061.000,
-41722.000, -46059.677, -46432.720, -48246.241, -45446.241, -44538.241, -39003.801, -36078.959, -28299.000, -23519.000, -13404.000,
-6822.167, -39523.000, -43285.577, -45295.577, -46365.611, -45809.611, -43678.000, -40228.000, -35650.000, -30161.000, -23696.000,
-16118.000, -7517.000, -36170.000, -41500.026, -42840.026, -45706.026, -44223.334, -44254.521, -39692.521, -37358.000, -30298.000,
-26178.000, -16990.000, -10993.000, -38396.000, -41396.439, -43388.439, -43821.433, -42808.642, -40436.000, -36557.611, -31850.611,
-26098.000, -19468.000, -11569.000, -2135.000, -36403.000, -38610.327, -42511.327, -41929.771, -42999.289, -39168.289, -37788.521,
-31672.961, -28447.803, -19982.000, -14623.000, -3279.000, -36878.000, -39906.720, -41217.871, -41220.534, -39718.125, -36740.000,
-33010.000, -28145.000, -22197.000, -14876.000, -6094.000, -33804.000, -38669.148, -39018.148, -41138.501, -38329.144, -37822.659,
-32523.000, -30223.000, -22430.000, -17642.000, -7291.000, -35478.534, -37978.534, -38987.800, -38455.352, -36484.845, -33635.000,
-29685.000, -24508.000, -17810.000, -9776.000, -34298.032, -35568.032, -38708.032, -36708.032, -37324.891, -32882.891, -31413.000,
-24413.000, -20325.188, -10695.000, -4555.000, -34350.148, -36395.374, -36709.063, -35690.511, -33860.511, -30680.511, -26188.000,
-20307.000, -12991.000, -4980.000, -31708.000, -35882.031, -34835.823, -36295.511, -32779.170, -32069.000, -25949.000, -22577.000,
-13629.000, -7897.000, -33395.840, -34536.346, -34479.707, -33411.060, -31070.752, -27434.000, -22281.000, -15779.000, -8289.000,
175.000, -32435.255, -32531.855, -34778.645, -32286.611, -32246.611, -26964.000, -24250.000, -16070.000, -10913.283, -959.000,
-29692.402, -31692.402, -32812.385, -32585.585, -31075.585, -28271.000, -23780.000, -17930.000, -11136.000, -3210.000, -28296.408,
-29453.923, -32662.940, -31157.245, -31843.261, -27466.000, -25420.000, -18064.000, -13495.000, -4003.000, 2151.000, -28283.417,
-30438.051, -31156.971, -30557.346, -28376.843, -24796.000, -19622.582, -13445.000, -6250.000, 1547.000, -25821.000, -29923.300,
-29597.990, -30970.466, -27510.466, -26100.000, -19538.646, -15516.000, -6751.000, -1136.443, -24417.100, -27408.077, -29111.031,
-29563.297, -28118.225, -25234.743, -20886.930, -15281.000, -8725.000, -1575.000, -26618.475, -27276.109, -29520.227, -27064.187,
-26253.633, -20360.609, -17014.000, -9042.000, -4027.000, 6054.000, -23756.385, -26416.385, -27679.084, -27196.109, -25293.236,
-21451.632, -16572.000, -10724.374, -4159.000, 3713.000, -22598.000, -24415.916, -27362.070, -25997.463, -25947.892, -20796.062,
-17975.000, -10760.031, -6318.000, 3062.000, -23159.493, -25283.448, -25775.284, -24800.566, -21547.206, -17313.804, -12251.737,
-6226.000, 976.000, 8579.000, -20767.000, -24707.278, -24359.825, -25123.544, -20674.356, -18343.803, -11865.779, -8044.000,
552.000, 6034.000, -18993.000, -22303.593, -23834.813, -23783.728, -21075.339, -17544.318, -13007.052, -7761.000, -1244.512,
5763.000, -20959.849, -22267.062, -23800.598, -20043.090, -18196.508, -12482.724, -9166.000, -1409.457, 3523.000, -16229.395,
-21044.395, -22467.068, -20068.833, -17159.768, -13249.698, -8637.905, -2925.464, 3472.000, 11265.000, -13097.000, -16762.555,
-21763.563, -18884.455, -17483.154, -12498.312, -9658.440, -2669.802, 1654.000, 10698.000, -13647.200, -17628.707, -18272.891,
-16379.586, -12893.106, -8964.106, -3804.760, 1811.000, 8913.219, -9253.857, -14742.634, -14806.147, -15968.230, -11987.107,
-9613.145, -3354.936, 416.000, 8622.654, 14001.000, -10496.563, -11868.965, -12447.675, -11661.552, -8769.633, -4164.400,
832.752, 7124.247, 13840.000, -7556.749, -8130.505, -10384.522, -8630.610, -8673.233, -3544.346, -201.676, 7276.309,
12032.000, -3260.000, -5239.806, -6667.147, -6593.906, -5711.591, -3563.108, 322.155, 6123.351, 12074.000, 19732.030,
-188.025, -1212.186, -4484.259, -3393.980, -4334.917, -973.653, 84.898, 6420.855, 10666.000, 19318.465, 1706.821,
-545.288, -1265.672, -1183.747, 303.694, 2518.941, 6008.911, 10923.253, 17789.308, 5775.000, 1774.680, 2243.818,
240.468, 2969.484, 3277.370, 8123.808, 10293.904, 17800.520, 5825.000, 4386.981, 3646.384, 4300.196, 5874.010,
8693.330, 12171.056, 17035.691, 8351.563, 8086.725, 5203.618, 7045.191, 6635.913, 10828.658, 12358.822, 18637.242,
21878.000, 10522.600, 8825.747, 8607.788, 9379.013, 11555.105, 14457.952, 18518.422, 23208.564, 14253.000, 10604.265,
11469.463, 10260.096, 13741.495, 14655.310, 20377.819, 23019.000, 16897.000, 14396.000, 13269.739, 12954.995, 14508.712,
16926.640, 20365.941, 24546.000, 20800.000, 16366.787, 16342.089, 14309.441, 16607.466, 17189.909, 22100.000, 24284.000,
23604.000, 20297.000, 18379.037, 17229.973, 17815.779, 19370.558, 22322.084, 25823.763, 22440.000, 21643.737, 18818.043,
20221.274, 19989.160, 23860.080, 25700.045, 26492.000, 23852.683, 21987.412, 21629.824, 22301.306, 24326.123, 27371.360,
31577.352, 28774.000, 27333.218, 23662.324, 24302.533, 23185.517, 26019.186, 27329.797, 32723.000, 32981.000, 29652.399,
27172.306, 25846.141, 25801.317, 26820.644, 29006.783, 32563.406, 35475.000, 33276.000, 28936.019, 28890.119, 26763.075,
28910.721, 29217.569, 33701.000, 36074.602, 35793.000, 32434.904, 30674.904, 29579.904, 29890.335, 31201.446, 33763.734,
37389.171, 39598.000, 34544.239, 33557.201, 30857.201, 32166.869, 31603.158, 35222.197, 36929.636, 42296.000, 38396.000,
35910.488, 33810.488, 33420.973, 33803.128, 35613.955, 38432.000, 42439.000, 46253.000, 40700.000, 39143.677, 35443.677,
35938.635, 34601.531, 37352.000, 38358.400, 43398.000, 44707.000, 41498.000, 38728.649, 37483.532, 36913.421, 37941.934,
40042.657, 43289.000, 47320.000, 47085.000, 45103.000, 40608.938, 40335.850, 38140.580, 39950.426, 40338.044, 44520.000,
46798.000, 47601.000, 44250.076, 42324.062, 40914.062, 41037.778, 42179.440, 44739.000, 48057.000, 52704.000, 51398.000,
46305.000, 45340.627, 42440.627, 43370.097, 42893.512, 46174.000, 47883.000, 53403.000, 50202.000, 47636.065, 45386.065,
44867.501, 45087.818, 46547.445, 49268.000, 53214.000, 57818.000, 52390.000, 50763.664, 47303.664, 47450.729, 46158.688,
48417.037, 49384.356, 54274.000, 57203.000, 53216.000, 50568.731, 49305.273, 48583.478, 49386.389, 51186.000, 54364.000,
58292.000, 56802.000, 52709.264, 52320.918, 50121.319, 51500.271, 51715.651, 55656.000, 58027.000, 64199.000, 56197.000,
54256.039, 52951.039, 52930.224, 53697.581, 56098.000, 59351.000, 63959.000, 58614.000, 57413.000, 54713.012, 55463.975,
54799.156, 57799.000, 59325.645, 64924.000, 68400.000, 59870.000, 57749.837, 57168.280, 57177.189, 58685.576, 60939.000,
64861.000, 69406.000, 63202.000, 59799.717, 59875.894, 58447.839, 60703.482, 61469.643, 66107.000, 69002.000, 63098.143,
61893.480, 60999.422, 61809.635, 63378.000, 66432.000, 70212.000, 75467.000, 65389.406, 64988.872, 62612.736, 63962.736,
64085.667, 67966.000, 70124.380, 76320.000, 68996.000, 67148.000, 65527.622, 65482.652, 66128.652, 68604.000, 71556.000,
76200.000, 70556.000, 67386.359, 68074.000, 67233.439, 70289.000, 71896.805, 77229.000, 73104.000, 70744.222, 69843.351,
69719.351, 71170.000, 73611.000, 77316.000, 81807.000, 72983.184, 72945.777, 71166.085, 73266.000, 74067.510, 78700.000,
81499.000, 76641.333, 75221.333, 74128.333, 74504.225, 75978.663, 79101.000, 82866.000, 87896.000, 79056.000, 78528.000,
76028.139, 77288.139, 76811.050, 80695.000, 82871.198, 88799.000, 80929.000, 79295.083, 79007.422, 79341.163, 81301.000,
84439.000, 88732.000, 93782.000, 84393.000, 81334.503, 81986.388, 80898.188, 83578.000, 84718.198, 89971.000, 93304.000,
84803.000, 84082.584, 83792.964, 84835.986, 86845.454, 90140.000, 94539.000, 100041.000, 87039.000, 87180.000, 85479.952,
87609.566, 87817.402, 91997.000, 94248.151, 100704.000, 89403.000, 88583.794, 88989.933, 90217.768, 92782.000, 96011.000,
100469.000, 90419.000, 91682.582, 91473.000, 94903.000, 96473.000, 101941.000, 105399.000, 93697.000, 93617.000, 94103.000,
95935.000, 98392.000, 102205.000, 106798.000, 96545.000, 95605.000, 98340.000, 99142.000, 103794.000, 106595.916, 113459.000,
98499.000, 99615.000, 101302.000, 104426.000, 108238.000, 113456.000, 100154.000, 102177.000, 102388.000, 106333.000, 108498.000,
114582.000, 103762.000, 104830.000, 107194.000, 110208.000, 114710.000, 119893.000, 106170.000, 109425.000, 110777.000, 116186.000,
119611.504, 110530.000, 112772.000, 116621.000, 121096.000, 127211.000, 113575.000, 118308.000, 121133.000, 128490.000, 118989.000,
122746.000, 128105.000, 134094.000, 123102.000, 129306.000, 133696.000, 124927.000, 129576.000, 135200.000, 131083.000, 134718.000,
131554.000, 136070.000, 136287.000, 142963.000, 139021.000
};
//+-------------------------+
//| Table of Binding Energy |
//+-------------------------+
// unit keV
G4double G4NucleiPropertiesTable::BindingEnergy[G4NucleiPropertiesTable::nEntries] = {
0.0 , 0.0 , 2224.573, 8481.821, 7718.058, 5575.154, 28295.673, 4618.058, 2740.282, 27405.673, 26330.674,
-768.000, 5781.820, 29269.107, 31994.564, 26924.058, 28824.289, 39244.526, 37600.358, 24719.628, 31407.892, 41277.328,
56499.506, 37737.813, 24782.406, 30258.837, 45340.942, 58164.907, 56314.438, 39034.135, 30338.510, 45315.942, 64977.237,
64750.700, 60320.539, 35538.000, 45641.631, 65481.167, 76204.800, 73439.899, 58347.557, 44413.000, 68650.058, 79575.205,
92161.753, 74041.317, 58549.209, 68139.338, 84453.220, 97108.065, 94105.267, 75557.634, 69986.710, 85423.022, 105284.507,
104658.628, 98733.236, 72349.000, 88191.140, 106502.578, 115491.930, 111955.627, 97251.660, 88147.712, 110752.927, 117981.259,
127619.336, 111419.727, 97325.230, 89584.410, 111481.778, 123865.195, 131762.662, 128219.606, 112903.780, 89050.000, 115665.655,
126690.201, 139807.048, 137369.199, 132153.495, 111360.000, 90079.000, 115827.630, 132018.211, 143762.741, 147801.358, 143780.541,
131820.623, 119172.273, 134183.490, 151370.720, 154402.672, 160644.852, 145975.710, 134467.685, 118844.000, 138789.396, 155177.216,
162504.178, 167405.965, 163076.152, 149197.857, 133208.000, 120292.000, 140011.738, 162025.929, 167734.138, 177769.912, 174145.318,
168577.626, 149216.000, 134452.000, 142429.000, 164765.224, 175269.726, 182970.532, 186564.023, 181724.850, 168702.620, 150916.000,
141195.000, 168478.463, 179126.053, 191835.733, 193523.461, 198256.887, 183596.194, 172004.041, 149980.000, 168381.000, 183475.506,
196018.232, 202534.642, 205587.555, 200528.218, 187004.813, 171176.000, 168432.000, 184525.048, 201600.977, 208150.970, 216680.629,
211894.138, 206046.063, 187146.000, 171367.000, 185834.508, 203008.670, 214900.686, 223123.978, 224951.950, 219357.199, 206943.392,
187901.000, 185729.000, 206894.910, 218424.727, 231627.550, 232676.997, 236536.884, 221422.755, 209406.277, 186140.000, 186731.000,
208224.239, 222843.764, 235341.307, 242113.271, 245010.439, 239284.967, 224709.585, 207625.000, 212079.529, 224939.381, 241633.676,
247841.462, 255619.618, 250604.939, 243684.835, 224396.000, 207974.000, 211546.000, 228941.360, 244037.856, 254994.594, 262207.017,
262916.697, 256738.284, 243975.435, 224833.000, 213283.000, 231372.782, 249689.688, 259173.804, 271410.242, 270852.346, 271780.656,
258313.016, 246379.049, 222999.000, 232237.874, 251761.179, 264687.982, 275893.086, 280956.079, 280422.233, 274057.156, 261652.628,
244726.000, 233310.000, 256585.813, 267116.624, 283428.590, 287247.223, 291839.171, 285565.534, 278720.878, 261041.000, 245625.000,
232737.000, 256816.000, 272383.783, 285903.113, 295618.611, 298825.015, 298209.803, 291462.144, 278798.690, 262411.000, 260267.000,
274480.643, 292015.313, 299083.160, 308713.925, 306789.499, 306715.699, 293127.984, 281359.752, 260240.000, 260151.000, 278864.648,
294210.189, 305898.351, 313017.507, 317100.455, 315504.616, 308573.470, 296152.482, 279368.000, 280797.000, 299501.924, 309441.065,
321053.688, 323208.235, 327342.669, 320647.243, 313122.243, 295218.000, 280398.000, 284211.000, 301686.000, 315695.975, 325425.274,
331282.234, 333941.065, 333723.711, 326410.777, 312520.181, 296338.000, 306497.000, 319454.481, 333184.802, 337110.633, 343810.441,
341523.214, 342051.954, 326949.876, 314491.347, 294529.000, 308141.000, 324032.702, 337008.513, 344963.375, 349909.135, 351618.393,
350414.654, 343137.024, 329426.000, 313172.000, 313046.000, 327176.000, 343719.855, 350682.878, 359335.261, 359152.163, 361895.254,
354687.062, 346904.661, 329171.000, 314230.000, 332248.000, 347031.244, 357796.262, 364962.051, 368795.208, 369828.254, 366825.082,
359175.419, 347097.000, 330426.000, 334200.000, 353500.000, 361829.254, 373317.882, 376083.703, 380960.223, 376524.593, 375474.727,
360990.000, 349896.000, 329180.000, 337371.000, 355517.000, 368818.844, 378846.496, 384952.839, 388374.988, 387849.443, 385004.663,
377088.989, 363845.000, 348765.000, 329306.000, 337348.000, 359164.000, 372773.000, 386919.227, 391835.068, 398768.692, 396610.064,
398194.413, 390360.650, 381975.297, 364092.000, 350185.000, 359737.000, 377277.000, 391178.159, 400184.345, 406044.798, 407254.381,
407072.129, 403361.973, 395128.047, 382056.000, 365634.000, 362806.000, 378921.000, 396563.000, 404683.259, 415991.169, 415486.886,
418698.720, 413904.025, 411462.326, 396862.000, 385191.000, 364661.000, 362475.000, 382297.000, 398012.000, 410950.150, 421137.796,
425617.673, 426841.083, 425456.868, 422043.769, 413546.523, 399736.000, 383947.000, 383066.000, 402581.000, 414054.051, 427490.528,
431674.227, 437780.214, 434789.547, 435044.118, 426628.776, 417696.450, 399638.000, 385451.000, 385734.000, 403852.000, 418775.000,
431876.906, 438426.842, 444152.541, 445840.828, 444305.741, 440315.584, 431513.581, 417788.000, 401170.000, 407331.000, 421043.000,
436570.854, 443659.623, 451961.035, 453152.067, 456345.101, 450851.088, 447696.735, 432501.000, 420457.000, 399647.000, 407897.000,
424913.000, 440031.000, 449318.000, 457392.938, 461630.585, 464284.265, 462904.899, 458380.194, 449295.712, 435254.000, 418552.000,
426585.000, 443790.000, 453887.283, 464403.950, 467744.033, 474003.271, 471843.866, 471758.653, 462733.220, 453151.639, 434858.000,
418948.000, 429628.000, 446393.000, 457832.000, 468516.424, 475075.924, 480249.571, 482070.303, 481056.573, 476822.923, 467346.770,
452859.000, 435375.000, 449584.000, 461032.000, 473914.359, 480239.304, 488506.192, 489340.793, 492253.892, 486905.539, 483987.827,
467907.000, 454251.000, 432482.000, 451539.000, 465023.000, 477412.000, 486447.639, 493681.909, 497991.419, 499899.919, 498281.524,
494234.980, 484682.419, 469281.000, 451713.000, 467477.000, 482493.000, 490522.853, 501291.024, 504480.141, 509944.378, 506854.609,
506453.842, 497108.440, 486959.235, 467870.000, 451476.000, 470918.000, 485115.000, 496125.718, 505282.404, 512122.310, 516525.278,
517308.113, 515453.276, 509871.344, 499994.852, 486076.000, 468172.000, 489759.000, 499353.272, 512329.083, 517634.976, 525345.103,
524800.045, 526841.574, 519932.329, 514991.872, 500025.000, 487012.000, 464861.000, 491889.000, 504714.000, 516339.093, 524527.025,
530926.992, 534122.191, 534661.571, 531642.012, 525222.514, 515446.000, 501045.000, 484585.000, 507448.000, 522817.561, 529328.805,
538978.721, 540726.569, 545258.806, 540528.282, 538118.764, 528165.411, 517630.000, 499568.000, 512156.000, 525244.000, 535686.179,
543931.452, 549206.812, 552096.659, 551381.251, 547232.028, 540929.675, 530368.000, 516498.000, 531136.000, 540106.046, 551302.703,
555230.427, 561754.664, 559297.213, 559093.585, 551146.433, 545954.080, 530268.000, 533460.000, 545969.728, 555582.846, 562676.663,
567852.674, 569207.453, 567073.155, 563035.935, 556011.232, 545874.000, 530955.000, 549644.000, 562685.415, 567636.023, 576830.136,
576273.382, 578133.004, 572175.651, 569293.298, 558711.000, 547829.000, 554921.000, 567012.133, 574976.507, 582615.195, 585390.537,
585185.184, 583402.354, 578397.072, 571604.719, 560669.000, 546194.000, 572745.000, 579554.727, 590430.083, 591703.589, 595383.379,
591679.926, 590791.597, 581909.244, 576398.000, 560359.000, 575982.000, 586843.595, 595393.100, 599972.942, 601865.600, 601989.242,
598979.603, 594184.232, 586618.739, 575948.000, 561061.000, 590621.000, 602571.899, 605264.682, 611081.420, 609644.346, 610517.607,
603515.254, 600333.000, 589201.000, 577804.000, 596904.000, 607047.656, 613139.896, 616914.992, 618947.785, 617933.507, 615138.444,
609556.000, 602274.000, 590999.000, 576421.000, 600616.000, 613908.036, 618510.000, 625793.056, 625468.785, 628685.490, 623547.039,
622429.659, 612905.643, 607083.289, 590305.000, 617527.000, 625677.000, 631145.957, 634657.452, 635468.392, 634345.179, 630822.826,
625356.837, 617927.133, 606493.000, 591176.000, 623894.000, 630293.000, 639516.483, 641078.943, 645664.590, 642319.824, 642890.480,
635201.480, 631282.719, 620056.316, 608245.000, 627251.000, 636967.000, 644347.028, 649560.453, 652169.809, 652564.005, 650918.013,
647105.659, 641426.085, 633624.548, 622269.000, 633124.000, 641042.000, 651992.819, 655370.466, 661598.112, 659892.446, 662072.081,
656326.852, 654234.511, 644954.005, 638081.000, 636073.000, 647288.000, 656625.392, 663113.039, 667670.685, 669590.371, 669490.889,
667343.420, 663498.541, 657370.606, 649737.197, 637909.000, 641377.000, 650832.000, 663314.640, 668972.286, 676389.933, 676561.717,
679988.836, 675632.706, 675558.156, 667551.869, 663008.257, 651681.000, 656603.000, 667562.000, 675869.535, 682087.182, 685452.828,
686951.420, 686320.113, 683911.982, 679484.015, 673382.500, 665480.146, 653698.000, 658517.000, 674012.567, 680520.614, 690118.261,
692006.129, 696865.213, 694212.305, 695434.444, 688931.525, 686281.278, 676359.000, 669789.000, 676434.000, 687506.933, 695044.579,
700492.226, 703566.213, 704369.142, 703306.075, 700286.509, 695574.248, 689281.528, 681339.175, 669160.000, 680444.000, 690542.000,
702436.600, 706354.247, 712841.893, 711962.044, 714272.310, 709090.428, 708127.768, 699529.424, 694747.070, 682746.000, 695157.000,
705888.000, 713982.218, 718659.865, 721546.530, 721736.904, 720045.414, 716987.348, 711736.113, 705085.760, 696803.406, 684809.000,
698133.000, 711351.000, 718254.000, 727340.896, 728385.051, 732257.427, 728794.189, 728905.975, 721637.639, 718189.000, 707794.000,
700938.000, 714411.000, 723763.000, 731891.028, 737290.674, 739378.321, 739283.050, 737435.675, 733398.321, 727922.968, 721140.615,
712270.000, 699983.000, 719148.000, 727717.000, 738074.691, 742391.337, 749234.984, 747934.005, 748925.895, 742903.541, 740644.652,
731884.298, 725831.945, 713699.000, 732668.000, 742187.552, 748680.199, 754750.345, 757853.053, 757354.013, 754710.053, 750258.783,
744311.429, 737040.853, 727686.000, 715120.000, 736101.000, 747554.532, 753626.178, 761803.825, 763935.552, 768466.641, 764061.688,
762606.034, 754624.000, 750118.119, 739204.000, 731351.000, 739822.000, 751345.000, 759535.176, 766907.823, 771111.352, 774825.350,
775538.048, 771923.009, 766849.648, 760492.249, 752199.896, 743437.000, 730294.000, 756249.000, 763649.767, 773217.413, 776826.925,
782631.486, 782395.131, 783892.854, 776999.501, 773728.147, 763985.131, 757405.000, 744429.000, 758778.000, 768618.924, 777638.571,
783291.217, 788399.924, 790324.893, 791087.372, 789051.629, 783835.164, 776832.810, 768645.794, 758388.000, 745561.000, 763160.000,
771762.683, 783185.234, 788389.880, 795707.375, 796865.383, 799722.121, 796934.160, 796508.321, 787855.613, 782546.000, 770716.000,
762072.000, 776253.000, 786494.300, 794311.946, 800991.189, 804345.440, 806456.264, 805765.276, 804578.030, 800594.821, 793475.468,
784600.000, 774344.000, 779126.000, 791681.000, 798308.392, 807816.689, 810542.200, 814676.497, 812992.745, 814255.839, 809217.741,
806848.812, 796436.000, 789066.000, 775234.000, 794650.000, 803667.267, 812163.567, 817468.063, 821139.155, 821481.637, 821624.901,
819151.916, 815802.110, 809909.756, 800938.000, 790105.000, 799712.000, 807114.000, 818071.719, 822675.902, 828993.499, 828374.715,
830779.162, 827023.574, 826495.632, 819266.847, 815034.493, 802648.000, 793398.000, 802670.000, 812335.975, 821980.862, 828666.985,
834573.037, 836448.769, 837600.300, 836497.690, 834607.135, 830301.782, 824729.428, 816941.000, 805968.000, 816345.338, 827888.865,
832929.888, 840971.723, 842439.558, 846242.803, 843776.452, 844790.560, 838950.828, 836301.463, 827099.110, 820897.000, 806457.000,
820954.244, 831448.162, 838751.456, 845536.235, 849311.886, 852168.195, 852743.069, 852254.366, 849429.439, 845260.494, 839048.141,
831361.000, 821636.000, 824881.000, 837622.319, 843914.966, 852442.612, 854995.259, 860457.906, 859507.469, 861927.526, 857515.173,
856371.431, 848542.521, 843884.366, 832931.217, 824879.000, 829854.172, 840881.819, 849604.466, 857367.112, 862069.759, 865856.405,
867898.493, 868729.638, 867405.799, 864643.446, 859657.269, 853398.378, 845277.000, 835646.000, 832323.000, 846623.140, 854655.786,
863723.433, 867546.080, 873973.726, 874201.321, 877949.228, 874844.341, 875212.503, 868475.780, 865106.426, 855074.073, 848905.000,
849170.000, 859574.000, 868426.499, 874589.145, 879336.792, 882304.438, 884181.619, 884162.620, 882837.185, 879367.240, 874443.000,
867610.647, 859175.000, 847224.000, 854092.000, 863445.000, 874464.000, 879569.616, 886892.262, 888264.909, 893085.261, 891161.670,
892820.206, 887759.206, 885840.559, 877149.519, 871852.166, 858866.000, 868125.000, 878558.000, 886267.396, 891970.043, 896137.689,
898995.336, 900129.901, 899914.266, 897786.661, 894266.103, 888634.750, 881595.576, 871369.566, 871418.000, 883966.000, 890374.000,
898958.786, 901696.433, 907461.079, 906718.126, 909476.873, 905729.254, 905141.046, 897835.323, 893867.877, 882017.000, 872908.000,
887426.000, 896471.000, 903713.581, 909091.228, 913128.874, 915286.937, 916015.548, 915266.200, 913066.846, 908858.493, 903069.819,
894385.000, 883462.000, 892312.000, 900164.000, 910029.000, 913997.071, 920934.718, 921513.689, 925236.336, 922535.799, 923402.472,
917463.107, 914588.939, 904310.000, 896703.063, 883062.000, 905795.000, 914160.000, 921000.000, 926202.845, 929580.492, 931389.634,
931723.230, 930726.582, 927924.275, 923292.244, 916129.890, 906665.649, 895883.546, 909162.000, 920443.000, 925566.000, 933561.930,
935589.576, 940207.223, 938532.429, 940642.254, 935981.900, 934562.494, 925480.000, 919440.382, 906729.000, 897319.000, 924062.000,
932091.000, 938286.000, 942999.000, 945957.667, 947363.647, 947618.094, 945970.336, 942743.066, 936861.000, 928710.141, 919399.000,
908039.000, 929962.000, 936259.000, 945432.000, 948319.000, 954337.011, 953842.624, 957016.238, 953647.953, 953529.315, 945691.986,
940562.372, 929619.000, 921668.402, 907225.000, 933199.000, 942384.000, 949789.000, 955639.000, 959764.690, 962322.337, 963556.445,
963090.542, 961272.228, 956573.345, 949691.000, 941719.664, 931865.872, 920694.870, 946217.000, 956501.000, 960519.000, 967636.696,
968305.065, 972599.153, 970364.940, 971571.272, 964907.410, 961367.000, 951462.000, 944816.000, 931667.000, 922017.000, 952053.000,
960557.000, 967399.594, 972617.240, 976418.887, 978740.018, 979403.553, 979117.086, 975304.732, 969883.712, 963196.000, 954385.000,
944845.000, 933098.000, 966905.000, 972129.000, 980246.217, 982070.863, 987440.211, 986187.862, 988680.497, 983191.226, 980897.041,
972369.538, 966927.000, 955734.064, 946786.000, 970664.000, 978675.000, 984888.000, 989839.796, 993217.443, 994952.462, 995625.070,
993086.083, 988769.092, 983316.683, 976091.500, 967787.214, 957485.000, 946316.000, 976649.000, 982946.000, 991893.821, 995211.467,
1001572.032,1001310.868,1004951.523,1000512.537, 999456.974, 991641.803, 987882.683, 977800.330, 970605.000, 957592.000, 989219.000,
996522.000,1002273.366,1006841.012,1009855.659,1011436.929,1010060.673,1006985.308,1002688.683, 996900.986, 989769.026, 980900.330,
970861.000, 959115.000, 993173.000,1003336.000,1007436.039,1014978.686,1015956.714,1020544.360,1017081.406,1017281.242,1010883.889,
1008141.535, 999417.052, 993634.698, 981652.000, 972887.000, 999102.000,1007542.000,1014517.683,1020135.329,1024132.976,1026715.160,
1026322.937,1024504.976,1021453.273,1016925.910,1010743.556,1003159.182, 994437.000, 983725.000, 972050.000,1014104.000,1019358.000,
1027723.000,1029942.393,1035528.631,1033129.878,1034330.070,1029313.716,1027640.906,1019803.838,1015167.000,1004650.000, 997068.000,
983580.000,1018021.000,1025957.000,1032530.309,1037862.956,1041474.506,1042095.173,1041259.487,1039242.911,1035784.558,1030792.392,
1024552.000,1016886.000,1007468.000, 996952.000,1030647.000,1040001.166,1043384.812,1049962.459,1048562.623,1050684.722,1046742.782,
1046254.453,1039557.154,1036126.838,1026550.000,1020188.000,1007818.000,1036846.000,1044720.165,1051059.811,1055695.458,1057276.416,
1057260.763,1056292.639,1053857.735,1049976.642,1044634.288,1038217.000,1030103.000,1020667.000,1041229.000,1051760.487,1056464.133,
1063888.780,1063484.426,1066374.589,1063436.905,1063912.552,1058305.913,1055850.416,1047499.000,1042311.000,1031086.000,1023075.000,
1047083.000,1056030.545,1063716.192,1069447.839,1071866.485,1072665.132,1072580.346,1071135.551,1068268.496,1064036.143,1058560.000,
1051639.000,1043331.000,1033541.000,1062866.898,1069154.545,1077347.791,1077839.371,1081440.577,1079406.416,1080743.042,1076032.130,
1074727.253,1067294.900,1063325.000,1053293.000,1046372.000,1033601.000,1066747.000,1075840.457,1082713.103,1085926.750,1087523.897,
1088239.485,1087650.909,1085672.600,1082458.693,1077956.340,1072124.000,1065034.000,1056433.000,1046423.000,1073216.000,1080933.809,
1090400.456,1091765.872,1095942.518,1094739.814,1096906.678,1093145.164,1092731.389,1086351.000,1083358.000,1074484.000,1068672.000,
1057019.000,1048617.000,1087223.681,1095614.925,1099464.571,1101872.218,1103323.318,1103511.812,1102377.064,1100224.888,1096482.534,
1091680.181,1085647.827,1078305.474,1069422.000,1059241.000,1089564.829,1102917.476,1105238.122,1109941.769,1109652.416,1112447.062,
1109545.241,1110042.431,1104552.078,1102485.000,1094595.000,1090087.000,1079403.000,1072035.000,1058826.000,1092587.000,1105334.975,
1112542.622,1115763.268,1117898.915,1118887.150,1118532.156,1117232.360,1114220.006,1110500.000,1105386.000,1099006.000,1091228.000,
1082053.000,1071797.000,1094771.000,1109075.326,1115662.973,1123274.318,1124041.964,1127434.611,1125423.696,1126700.011,1122204.482,
1120922.128,1113950.000,1110397.000,1100445.000,1094511.000,1082272.000,1111310.000,1119434.139,1126771.786,1131951.432,1133817.140,
1134185.737,1133672.728,1131690.375,1128882.439,1124380.086,1118846.000,1112124.000,1104138.000,1094628.000,1115087.000,1122390.000,
1131440.945,1135733.417,1141877.260,1141014.598,1142780.469,1139128.116,1138818.595,1132909.895,1129916.541,1121284.188,1115982.000,
1104767.000,1096933.000,1117150.000,1126130.000,1134648.367,1140807.613,1145902.720,1149292.932,1149686.208,1148303.748,1146299.295,
1142814.941,1138342.588,1131903.000,1125220.857,1116834.000,1107259.000,1128938.000,1139091.000,1144676.956,1151714.602,1153706.249,
1158297.929,1155777.825,1156039.910,1150820.557,1148938.000,1141156.000,1136559.000,1126545.000,1119690.000,1106891.000,1132585.000,
1142030.000,1149292.682,1155316.329,1159590.998,1163021.360,1164555.840,1163495.487,1160584.133,1157014.780,1151728.035,1145783.169,
1137981.000,1129521.000,1119471.000,1146403.000,1152598.000,1160734.006,1164011.653,1169449.433,1169716.811,1172696.311,1168525.958,
1167521.331,1160691.882,1156938.668,1147686.315,1141444.000,1129862.000,1121394.000,1149175.000,1157297.000,1164137.970,1169505.616,
1173974.602,1176405.365,1178124.923,1177923.241,1175317.886,1170807.846,1165496.685,1158736.605,1151132.000,1142013.000,1131887.000,
1153417.000,1160385.000,1169361.997,1173619.643,1180144.060,1181572.781,1185293.973,1183766.302,1185146.152,1179490.134,1176618.872,
1168191.973,1162910.000,1152227.000,1144545.000,1131100.000,1164833.000,1172602.000,1178861.111,1184331.977,1187795.873,1190439.078,
1191118.168,1191269.737,1189446.024,1185220.885,1179163.408,1172371.055,1164126.000,1154886.000,1143987.000,1167744.000,1177562.000,
1182557.132,1190239.175,1192576.210,1197335.295,1196871.597,1199086.759,1195972.747,1195740.942,1188643.632,1184121.000,1174265.000,
1167391.000,1154900.000,1145781.000,1180566.000,1187497.841,1194600.042,1198741.041,1202067.040,1203819.257,1204842.185,1203896.791,
1202498.038,1199055.642,1193218.804,1185736.000,1177434.000,1167405.000,1156768.000,1185256.000,1191122.397,1199706.571,1203028.844,
1208776.657,1209020.536,1212407.435,1210153.297,1210912.943,1206252.823,1204440.582,1195390.956,1189448.603,1178066.000,1169813.000,
1155641.000,1188008.000,1195744.949,1204158.226,1209125.872,1213288.519,1215796.165,1217699.502,1217813.148,1217254.933,1214751.244,
1211781.519,1206390.385,1199235.385,1190105.000,1180502.000,1168755.000,1199126.104,1208792.468,1213125.115,1219605.115,1220882.762,
1225032.408,1223710.469,1225396.454,1221506.768,1220765.403,1214218.160,1210753.807,1200571.000,1193110.000,1180115.000,1170754.000,
1203639.000,1212413.000,1219167.000,1224048.765,1227456.411,1230071.091,1230979.394,1231267.955,1229790.334,1227694.104,1223274.077,
1218679.724,1211883.681,1203291.000,1192751.000,1181881.000,1206820.000,1217541.000,1223326.000,1230315.605,1232543.251,1237450.898,
1236581.996,1239253.643,1236210.703,1236399.748,1230961.133,1228385.123,1220363.000,1215472.000,1203598.000,1195066.000,1180611.000,
1211137.000,1220881.000,1228612.000,1234835.000,1239466.193,1242785.327,1244445.394,1244850.083,1244144.418,1242897.947,1239550.356,
1235897.640,1229990.989,1223825.000,1215616.000,1205690.000,1193825.000,1225729.000,1232445.000,1240726.000,1244396.000,1250057.718,
1250385.585,1253107.803,1250451.140,1251487.545,1246715.191,1245334.306,1238006.602,1234115.059,1224743.000,1218496.000,1205191.000,
1228724.000,1237405.000,1244885.000,1250558.000,1255323.284,1257876.930,1258975.526,1259001.419,1257734.629,1255383.104,1252430.363,
1247518.101,1242172.713,1234930.910,1227458.000,1217845.000,1240866.000,1250404.000,1255146.000,1261728.386,1263681.156,1266943.084,
1265443.403,1266629.403,1262285.050,1261748.788,1255215.185,1252401.219,1243565.000,1238294.000,1227398.000,1219955.000,1245463.000,
1254079.000,1260795.000,1266868.990,1270308.637,1272750.283,1273594.794,1273064.530,1271460.962,1268584.108,1264699.755,1260074.814,
1253715.337,1246784.000,1238140.000,1229414.000,1259151.000,1265019.000,1272546.000,1275619.654,1279992.301,1279932.210,1281600.899,
1278374.123,1278025.357,1272183.000,1270185.429,1261958.676,1257599.187,1247446.000,1240758.000,1228386.000,1262490.000,1270250.000,
1276826.000,1281698.000,1285429.108,1287380.754,1287960.943,1287118.537,1284994.738,1281672.385,1277389.983,1272126.629,1265846.058,
1258130.702,1249873.000,1239759.000,1274027.000,1282476.000,1286518.000,1291978.899,1293195.545,1295898.274,1293895.917,1294050.295,
1289037.942,1287356.000,1279974.000,1276526.265,1267070.000,1261186.000,1249485.000,1241651.000,1278884.000,1286337.000,1292317.000,
1297058.000,1300109.415,1301841.559,1302029.767,1300881.779,1298261.702,1294710.781,1290082.990,1284322.017,1277520.929,1269857.000,
1260774.000,1251267.000,1291613.000,1296793.000,1303322.000,1305495.000,1309292.935,1308404.945,1309457.917,1305385.564,1304274.165,
1297891.811,1294809.000,1286147.000,1280992.194,1270295.000,1262982.000,1249982.000,1295083.000,1302190.000,1307957.000,1311971.000,
1314928.334,1316101.558,1315912.281,1314271.028,1311486.255,1307539.902,1302608.000,1296525.000,1289420.033,1281146.476,1272245.000,
1261615.000,1306135.000,1313802.000,1316913.000,1321774.255,1322385.797,1324109.229,1321186.592,1320699.985,1315078.312,1312638.000,
1304896.000,1300404.952,1290359.000,1283807.000,1271506.000,1263168.000,1311198.000,1318017.000,1322963.000,1327043.000,1329377.389,
1330380.159,1329595.241,1327602.889,1324381.535,1320229.182,1314846.829,1308612.000,1301067.579,1292633.000,1283062.000,1272889.000,
1323368.000,1327513.000,1333372.000,1334930.594,1338038.241,1336269.052,1336449.472,1331704.567,1329926.000,1322907.000,1319138.000,
1309834.000,1304009.117,1292668.000,1284799.000,1327061.000,1333041.000,1338165.000,1341574.000,1343754.130,1344257.852,1343099.518,
1340724.625,1337180.271,1332477.918,1327100.000,1320470.000,1312683.907,1303784.231,1294223.000,1283096.000,1337154.000,1344168.000,
1346693.000,1350797.630,1350501.492,1351574.019,1347752.050,1346665.573,1340403.219,1337304.000,1328865.000,1323844.125,1313018.000,
1305972.000,1293099.000,1342356.000,1348542.000,1352901.000,1356218.123,1357785.769,1358010.125,1356479.414,1353742.769,1349830.416,
1345049.000,1339262.000,1332240.000,1324106.000,1314949.000,1304862.000,1354014.000,1357628.000,1362817.000,1363649.239,1365781.197,
1363319.738,1362794.394,1357537.040,1354956.000,1347507.000,1342927.000,1333067.000,1326486.819,1314403.000,1306104.000,1357884.000,
1363296.000,1368025.015,1370442.662,1371784.323,1371353.110,1369661.616,1366586.263,1362534.543,1357317.000,1351096.000,1343727.000,
1335263.009,1325804.104,1315679.000,1367614.000,1373892.000,1375955.502,1379043.148,1377946.376,1378132.055,1373890.563,1372011.000,
1365230.000,1361467.000,1352419.000,1346600.604,1335140.000,1327564.000,1372844.000,1378414.000,1382307.030,1384724.677,1385432.776,
1384746.851,1382485.653,1379300.000,1374820.000,1369380.000,1362927.000,1355166.000,1346243.000,1336637.000,1326053.000,1384036.000,
1387250.000,1391560.593,1391668.776,1392766.570,1389464.951,1388332.598,1382630.245,1379348.000,1371242.000,1365996.000,1355372.000,
1348317.946,1335675.000,1388074.000,1393020.000,1396793.000,1398618.377,1399134.135,1397680.971,1395294.000,1391821.000,1387039.000,
1381384.000,1374334.000,1366178.000,1357205.719,1347202.978,1397496.000,1403057.000,1404301.087,1406598.734,1404442.035,1403932.947,
1399305.594,1396668.000,1389409.000,1384890.000,1375091.000,1368712.732,1356654.000,1402866.000,1407784.000,1410818.418,1412421.065,
1412108.734,1410641.651,1407859.000,1404171.000,1399082.000,1393003.000,1385514.000,1377283.000,1367860.000,1357894.000,1413657.000,
1415947.604,1419285.250,1418396.716,1418807.207,1414914.853,1413341.000,1406989.000,1403058.000,1394301.000,1388406.000,1377126.000,
1369689.024,1417928.000,1422111.000,1424852.050,1425468.929,1425184.901,1423236.548,1420453.000,1416271.000,1411041.000,1404553.000,
1396986.000,1388042.000,1378762.983,1368159.000,1426829.000,1431632.071,1431494.339,1432811.231,1430116.878,1429243.224,1423800.871,
1420692.443,1412705.000,1407613.000,1397269.000,1390430.383,1377770.000,1432385.000,1436418.000,1438286.861,1438910.264,1438017.026,
1436174.987,1432682.633,1428202.000,1422578.000,1415903.000,1407728.000,1399148.000,1389346.000,1442478.000,1443977.516,1446298.162,
1444661.727,1444587.236,1440002.575,1437764.000,1430552.000,1426079.000,1416746.000,1410443.000,1398602.000,1446991.000,1450102.000,
1451993.837,1452238.715,1451268.471,1448747.445,1444975.092,1440124.288,1434186.000,1427097.000,1418995.000,1409738.000,1399818.000,
1455155.000,1458710.983,1458301.673,1459332.840,1455750.486,1454060.133,1447743.340,1444036.144,1435474.000,1429911.000,1419014.000,
1411649.939,1461028.000,1464008.206,1465235.853,1465523.534,1464185.180,1461271.000,1457039.000,1451678.000,1445408.000,1438160.000,
1429799.000,1420416.000,1465746.000,1470293.978,1470851.624,1472935.271,1470670.225,1469919.059,1464574.705,1461458.000,1453615.000,
1448713.000,1438743.000,1431964.000,1475261.000,1477479.360,1478689.006,1478339.647,1476544.503,1473390.000,1468728.765,1463239.412,
1456704.000,1449292.000,1440611.000,1430395.000,1481339.000,1482764.571,1485883.217,1484519.309,1484806.472,1480193.119,1478030.998,
1471133.084,1467125.573,1457878.000,1451736.000,1439610.000,1489103.000,1491349.933,1491878.731,1491099.040,1488814.278,1485054.000,
1480542.000,1474894.000,1468164.000,1460060.000,1450496.000,1494101.000,1498183.684,1497750.330,1499088.330,1495496.620,1494207.781,
1488125.000,1485043.000,1476468.000,1470898.000,1459764.000,1503064.392,1504782.039,1505008.952,1503694.151,1500941.290,1497309.000,
1492577.000,1486618.000,1479137.000,1470321.000,1509955.214,1510442.860,1512800.507,1510018.153,1509852.659,1504628.305,1502376.000,
1494594.000,1489723.543,1479311.000,1472389.000,1517296.299,1518559.172,1518090.508,1516289.601,1513677.248,1509714.895,1504440.000,
1497776.000,1489679.000,1480885.000,1522726.000,1526117.151,1524288.590,1524965.925,1520667.230,1519175.000,1512273.000,1508118.000,
1498388.000,1491873.000,1531702.284,1532060.436,1531221.444,1529370.443,1526247.782,1521829.000,1515894.000,1508609.000,1500336.000,
1491090.000,1538813.021,1538127.268,1539591.705,1536317.317,1535494.963,1529430.000,1525934.000,1516971.000,1511032.221,1500295.000,
1544141.491,1545359.137,1545696.767,1544687.614,1542395.260,1538808.000,1533535.000,1526903.000,1519326.000,1510618.000,1550816.820,
1551191.982,1553618.645,1551330.596,1551234.259,1546074.000,1543247.000,1535108.000,1529757.000,1519483.000,1512546.000,1558092.798,
1559465.079,1559401.645,1558019.667,1555056.811,1550694.000,1544737.843,1537778.000,1529801.000,1521221.000,1563702.000,1567021.651,
1565913.988,1566504.110,1562261.756,1560069.000,1552725.230,1547920.000,1538373.000,1531975.966,1570369.127,1572577.751,1573498.351,
1573168.263,1570940.839,1567275.002,1562144.837,1555757.000,1548419.000,1540486.000,1579859.472,1579734.752,1581196.516,1577958.123,
1576365.215,1569689.838,1565561.000,1556807.000,1551009.000,1540146.000,1585068.704,1586946.350,1587426.696,1586161.368,1583476.141,
1578852.184,1573191.000,1566560.219,1559212.000,1550558.000,1591982.000,1593017.204,1595181.005,1593034.045,1592202.120,1586267.937,
1582664.000,1574667.199,1569443.000,1559281.000,1599832.105,1601173.706,1600883.189,1599126.117,1595090.403,1590074.648,1584230.228,
1577422.000,1569437.000,1561052.000,1605511.000,1608668.859,1607539.053,1607520.418,1602288.877,1599175.970,1591915.593,1587311.000,
1577933.000,1571669.000,1611808.000,1614336.496,1615085.363,1614251.925,1610761.183,1606447.808,1601128.189,1595100.000,1587800.941,
1580011.000,1621064.075,1621588.935,1622340.117,1617800.256,1615171.320,1608675.183,1604576.000,1596037.209,1590322.000,1624404.944,
1628437.590,1629077.910,1625897.322,1622205.903,1617513.480,1612119.333,1605624.539,1598445.000,1589869.000,1629344.000,1632227.074,
1636445.728,1632784.267,1630600.612,1624833.416,1621211.191,1613440.200,1608334.000,1598508.000,1637183.042,1640382.195,1640244.025,
1637568.367,1633299.534,1628588.181,1622646.481,1616249.000,1608363.795,1640861.021,1645567.444,1644848.605,1645228.334,1640464.858,
1637308.542,1630267.980,1625715.000,1616725.683,1610565.000,1649392.697,1649982.745,1649779.101,1648210.626,1644536.353,1639148.767,
1633369.261,1626295.412,1618798.000,1654524.205,1654315.608,1655787.271,1653251.006,1652511.276,1646600.035,1642475.011,1634214.673,
1628677.000,1658299.000,1659496.231,1660141.219,1659285.624,1657620.956,1654690.120,1650022.504,1643438.954,1636706.000,1628265.569,
1663298.127,1663539.935,1666029.654,1664157.022,1664315.605,1660171.988,1658331.084,1651212.774,1646185.000,1636750.456,1668692.250,
1670162.006,1670100.036,1669235.758,1666965.964,1663968.363,1659696.040,1653999.345,1646350.936,1672696.000,1675913.361,1674661.869,
1675882.866,1672371.496,1671281.257,1665652.466,1662700.016,1654411.046,1679934.000,1680590.029,1680548.273,1679112.107,1676755.940,
1673154.266,1668894.187,1663247.198,1685479.123,1684961.608,1687062.361,1684438.435,1684065.359,1679090.262,1676777.744,1669716.971,
1665694.000,1690597.056,1691511.556,1690947.161,1689393.582,1686435.137,1682749.937,1677907.113,1672434.618,1694938.000,1697804.360,
1696156.808,1696583.822,1692320.070,1690623.902,1684119.039,1680696.000,1700365.000,1702084.000,1702427.855,1701960.247,1699624.176,
1696423.894,1692202.240,1687240.000,1704533.000,1708184.484,1707426.829,1708677.123,1705596.745,1704231.948,1698539.000,1695573.000,
1709801.000,1712325.000,1713461.203,1713827.914,1712459.754,1710122.622,1706388.742,1702104.710,1718254.000,1718267.826,1720311.167,
1718125.582,1717575.343,1712922.070,1710299.751,1722274.000,1724130.203,1725213.120,1724788.355,1723334.520,1720527.350,1716699.759,
1711711.413,1728063.000,1728720.990,1731609.532,1730186.969,1730521.632,1726905.609,1724812.645,1718638.000,1731927.000,1734473.132,
1736170.872,1736714.684,1735977.154,1734175.474,1731206.981,1726868.005,1737504.000,1738921.000,1742478.482,1741742.028,1743086.719,
1740156.720,1739067.519,1733801.000,1730645.779,1744475.000,1747050.920,1748028.566,1748341.213,1747248.429,1745154.964,1741810.323,
1737402.532,1748741.000,1753012.907,1753217.592,1755135.239,1753043.217,1752824.575,1748423.183,1745933.390,1754114.000,1757232.000,
1758935.628,1760253.274,1759860.436,1758695.928,1756102.748,1752503.000,1747713.000,1758229.000,1763000.000,1763773.762,1766691.409,
1765414.097,1765968.847,1762436.000,1760647.272,1754825.000,1767064.000,1769491.000,1771477.760,1771940.523,1771728.280,1769917.414,
1767034.337,1763006.000,1758192.000,1772758.000,1773957.000,1777668.793,1777159.528,1778572.444,1775980.244,1774810.273,1769846.000,
1766785.000,1779530.000,1782098.978,1783242.638,1783870.285,1782964.215,1781040.200,1777698.000,1773598.000,1768169.000,1783805.000,
1788116.000,1788297.396,1790415.042,1788703.219,1788397.451,1784335.000,1781843.000,1775541.000,1792290.000,1794073.281,1795540.927,
1795277.138,1794274.467,1792032.487,1788530.000,1783802.000,1778415.000,1798173.000,1799017.005,1801694.651,1800765.233,1801274.921,
1798234.218,1796484.545,1790812.000,1787101.000,1804636.000,1806500.907,1806982.011,1806921.454,1805336.188,1802754.000,1798794.000,
1794084.000,1809121.000,1812431.697,1812037.689,1813454.935,1811293.630,1810295.896,1805574.000,1802420.000,1795466.000,1817015.000,
1818173.891,1818696.538,1817935.000,1816385.289,1813203.000,1809167.000,1803777.000,1822669.000,1823088.000,1825005.887,1823472.571,
1823355.037,1819573.000,1817263.841,1810883.000,1806625.000,1828703.000,1830040.386,1829839.589,1829048.327,1826757.586,1823722.000,
1819018.000,1813691.000,1833442.000,1836061.829,1835203.298,1835849.000,1832811.004,1831262.489,1825843.000,1822165.000,1840834.725,
1841257.034,1841368.740,1839776.173,1837425.000,1833589.000,1829027.000,1822989.000,1846614.785,1846232.966,1847826.748,1845694.395,
1844789.111,1840126.000,1837185.691,1830208.000,1851080.000,1852146.000,1852983.185,1852245.802,1850817.448,1847560.000,1843825.000,
1838399.000,1856808.000,1859195.771,1857726.000,1857783.984,1853946.000,1851555.911,1845441.000,1862332.000,1863909.230,1864027.748,
1863369.394,1861136.000,1857913.000,1853426.000,1848153.000,1869741.591,1868996.645,1869993.983,1867112.000,1865527.852,1860113.000,
1856531.000,1874154.765,1874792.412,1875103.058,1873944.813,1871688.022,1867783.000,1863236.000,1857424.000,1879812.000,1879557.000,
1881274.575,1879232.222,1878926.958,1874260.000,1871302.103,1864592.000,1885228.000,1886078.954,1885584.262,1884468.167,1881726.000,
1877806.000,1872730.000,1866898.000,1889834.000,1892110.857,1890676.618,1890982.465,1887520.000,1885597.748,1879563.000,1875447.000,
1896714.000,1896651.745,1896159.012,1894333.637,1891541.815,1887465.000,1882284.000,1876000.000,1902549.000,1901626.000,1902543.347,
1899631.379,1898641.190,1893679.000,1890645.734,1883407.000,1907474.000,1907510.827,1906322.335,1904312.147,1900965.000,1896954.000,
1891713.000,1913747.000,1911701.009,1911128.000,1906916.000,1904563.000,1898313.000,1894073.000,1918540.000,1917837.000,1916569.000,
1913955.000,1910716.000,1906121.000,1900745.000,1922981.000,1923139.000,1919621.000,1918037.000,1912603.000,1909018.553,1901373.000,
1928317.000,1926418.000,1923949.000,1920042.000,1915447.000,1909447.000,1934732.000,1931927.000,1930934.000,1926206.000,1923259.000,
1916393.000,1938413.000,1936563.000,1933417.000,1929620.000,1924336.000,1918371.000,1943295.000,1939257.000,1937123.000,1930932.000,
1926723.550,1946224.000,1943199.000,1938568.000,1933311.000,1926413.000,1950468.000,1944952.000,1941345.000,1933205.000,1952342.000,
1947803.000,1941662.000,1934890.000,1955518.000,1948532.000,1943359.000,1961765.000,1956333.000,1949927.000,1962898.000,1958480.000,
1970498.000,1965199.000,1973054.000,1965596.000,1978392.000
};
//+----------------------------+
//| Table of Beta Decay Energy |
//+----------------------------+
//unit: keV
G4double G4NucleiPropertiesTable::BetaEnergy[G4NucleiPropertiesTable::nEntries] = {
782.353, 0.0 , 0.0 , 18.591, 0.0 , 23502.873, -22895.261, 0.0 , 25447.745, -292.646, -26317.000,
0.0 , 24269.640, 3507.811, -4288.153, 0.0 , 11202.591, -861.815, -12098.376, 0.0 , 10651.789, 16004.532,
-17979.340, -12173.054, 0.0 , 15864.459, 13606.319, -1068.116, -16497.950, 0.0 , 15759.785, 20443.649, 555.816,
-3647.807, -24000.000, 0.0 , 20621.889, 11505.986, -1982.547, -14309.989, 0.0 , 25019.000, 11707.501, 13368.901,
-17338.083, -14709.755, 0.0 , 17096.236, 13437.198, -2220.445, -17765.279, 0.0 , 16218.666, 20643.837, 156.475,
-5143.039, -25602.000, 0.0 , 19093.792, 9771.705, -2753.950, -13921.614, 0.0 , 23387.569, 8010.685, 10420.430,
-15417.255, -13312.144, 0.0 , 22679.721, 13165.771, 8679.820, -2760.703, -14533.472, 0.0 , 27398.000, 11806.900,
13899.200, -1655.496, -4433.351, -20011.000, 0.0 , 26531.000, 16972.934, 12526.884, 4820.970, -3238.464, -11177.564,
0.0 , 15793.571, 17969.583, 3814.305, 7024.533, -13886.789, -10725.671, 0.0 , 20728.000, 17170.173, 8109.316,
5684.140, -3547.460, -13095.942, -15207.000, 0.0 , 20502.000, 22796.544, 6490.562, 10818.127, -2842.240, -4785.338,
-18580.000, -13982.000, 0.0 , 23118.000, 11286.855, 8483.159, 4375.844, -4056.819, -12239.876, -17005.000, 0.0 ,
28066.000, 11429.943, 13492.033, 2470.081, 5515.780, -13878.340, -10809.800, -21242.000, 0.0 , 15877.000, 13325.079,
7298.763, 3835.267, -4276.983, -12741.052, -15047.000, 0.0 , 16876.000, 17858.282, 7332.347, 9312.012, -4004.137,
-5065.721, -18118.000, -14997.000, 0.0 , 17956.515, 12674.370, 9005.645, 2610.326, -4812.398, -11631.453, -18260.000,
0.0 , 21948.000, 12312.171, 13985.176, 1831.800, 4642.241, -14331.775, -11234.125, -22484.000, 0.0 , 22276.000,
15401.879, 13279.896, 7554.317, 3679.521, -4943.119, -13793.029, -16302.000, 0.0 , 13642.205, 17476.649, 6990.139,
8560.509, -4232.325, -6137.750, -18506.000, -15640.000, 0.0 , 18178.000, 15878.849, 11739.092, 7994.777, 1492.032,
-5396.059, -11980.495, -18360.000, 0.0 , 18872.000, 19099.260, 10266.469, 13018.791, 224.458, 1710.663, -12685.287,
-11151.613, -22597.000, 0.0 , 20305.658, 13709.156, 11987.457, 5845.347, 248.508, -5582.724, -11622.175, -16144.000,
0.0 , 24058.000, 11313.165, 17094.319, 4600.987, 5374.301, -5491.284, -6062.302, -16897.000, -14634.000, 0.0 ,
24862.000, 16350.000, 14301.683, 10497.851, 3988.758, 167.141, -5965.305, -11881.101, -15606.000, 0.0 , 14996.000,
18317.023, 7850.201, 10413.118, -1142.072, 708.554, -12805.361, -10985.879, -20337.000, 0.0 , 19496.000, 16127.894,
12470.516, 7901.510, 4865.301, -813.485, -6148.793, -11638.634, -16002.000, 0.0 , 19487.000, 10721.494, 12394.976,
2936.900, 4916.787, -5913.072, -6742.647, -17122.000, -14038.000, 0.0 , 18257.000, 14792.000, 10511.652, 6639.314,
3441.184, 565.000, -6530.581, -13108.242, -15400.000, 0.0 , 13740.000, 14512.674, 4708.184, 7482.161, -1504.873,
1311.093, -14319.724, -11676.176, -19180.000, 0.0 , 16674.000, 13758.164, 8737.215, 5728.114, 2491.611, -421.386,
-6495.276, -12929.000, -15471.000, 0.0 , 14913.000, 17326.000, 7745.377, 9434.736, 599.255, 3525.445, -6425.839,
-7000.047, -16952.000, -14159.000, 0.0 , 15565.000, 11547.371, 7948.142, 4615.511, 1815.400, -2220.819, -6867.310,
-11296.000, -15888.000, 0.0 , 20083.000, 9111.000, 12270.981, 3548.175, 5658.873, -3653.276, -267.513, -13702.000,
-10312.000, -19934.000, 0.0 , 18928.000, 14084.000, 10810.006, 6888.696, 4204.502, 256.809, -2062.427, -7133.321,
-12461.000, -14298.000, -18676.000, 0.0 , 22598.000, 14392.000, 14929.000, 5698.194, 7715.977, -1376.274, 2366.702,
-7051.409, -7603.000, -17101.000, -13125.000, 0.0 , 18322.000, 14684.000, 9788.539, 6642.807, 1991.936, 600.101,
-2927.802, -7451.573, -12290.000, -15640.000, 0.0 , 16897.000, 18425.000, 8902.000, 12090.263, 278.070, 3994.188,
-4012.342, -1659.346, -13818.000, -10889.000, -19748.000, 0.0 , 20605.000, 16497.000, 13721.000, 10970.000, 5262.230,
2005.764, -601.861, -2630.745, -7714.893, -13028.000, -15006.000, 0.0 , 20297.000, 12256.000, 14218.831, 4966.053,
6888.341, -2208.314, 1036.925, -7632.989, -8149.972, -17276.000, -13404.000, 0.0 , 18900.000, 15705.000, 13885.000,
7332.289, 6508.052, 2470.641, -752.733, -3207.804, -8019.649, -12943.000, -15835.000, 0.0 , 14494.000, 16310.000,
7871.123, 9083.765, 1973.385, 3975.387, -4711.659, -2372.000, -14413.000, -11262.000, -20027.000, 0.0 , 17798.000,
15901.000, 10069.000, 8857.000, 5020.000, 3436.034, -597.013, -3742.352, -8302.128, -13260.000, -15919.000, 0.0 ,
17987.000, 10880.000, 11299.021, 4122.437, 7041.591, -1377.052, 697.140, -8243.079, -8799.227, -17512.000, -15127.000,
0.0 , 17547.000, 12221.000, 11467.000, 7341.854, 5956.000, 2603.086, -231.377, -3451.296, -8693.800, -13706.000,
-16702.000, 0.0 , 12231.000, 13665.000, 7107.298, 9049.241, 1616.955, 3695.453, -4566.000, -2135.358, -15299.000,
-12873.000, -20987.000, 0.0 , 14267.000, 13171.000, 9818.000, 8016.623, 5091.864, 2690.854, -836.042, -3264.191,
-8770.207, -14619.000, -16786.000, 0.0 , 15798.000, 8812.000, 11550.524, 3971.470, 6246.591, -2307.416, 381.586,
-8563.049, -9366.851, -18307.000, -15612.000, 0.0 , 14979.000, 11793.000, 9939.039, 7622.260, 5185.321, 1565.188,
-1072.484, -4799.579, -9094.138, -13137.000, -17121.000, 0.0 , 10377.000, 13758.164, 6088.246, 8492.481, 237.295,
2823.882, -6126.891, -4158.103, -14185.000, -12231.000, -21368.000, 0.0 , 13607.000, 12407.000, 8970.286, 7182.320,
3977.553, 1321.733, -2237.206, -5637.145, -8995.000, -13618.000, -15677.000, 0.0 , 16152.000, 7293.597, 10432.270,
2530.201, 5314.591, -3948.171, -1627.164, -9171.000, -9753.000, -17279.000, 0.0 , 13870.000, 11225.000, 9027.627,
6057.713, 3672.200, 66.945, -3366.869, -5520.000, -9779.000, -13087.000, 0.0 , 9753.000, 11979.011, 4710.077,
7306.591, -1675.098, 578.725, -7164.799, -4410.000, -14904.000, 0.0 , 13292.000, 10395.471, 7876.171, 5958.365,
2137.132, -1351.944, -3254.866, -6242.350, -9355.000, -14137.000, 0.0 , 13823.000, 5732.961, 9976.467, 225.600,
2641.976, -5175.000, -2100.000, -9800.000, -10100.000, 0.0 , 12873.000, 8746.727, 8421.041, 3557.696, 577.000,
-1000.477, -4222.928, -6010.000, -10153.000, -13693.000, 0.0 , 7592.000, 11657.709, 2055.860, 4462.143, -2921.100,
-105.975, -8100.000, -4729.000, -15256.000, 0.0 , 11644.000, 9331.858, 5362.196, 2675.011, 905.995, -2227.285,
-4013.017, -6783.140, -9889.000, -14105.000, 0.0 , 12734.000, 3475.137, 6599.091, -654.720, 1655.614, -6220.000,
-2400.000, -10350.000, -10614.000, 0.0 , 10926.000, 6874.594, 4557.449, 2815.147, -231.924, -2012.710, -4800.000,
-6500.000, -10493.000, -13795.000, 0.0 , 14075.000, 5384.000, 8066.000, 458.083, 3999.058, -4356.097, -335.027,
-8741.663, -5040.000, -15996.000, 0.0 , 8933.000, 6251.000, 4293.849, 1593.293, -340.859, -2740.000, -4683.635,
-6647.351, -10651.000, -14535.000, 0.0 , 7182.000, 10006.000, 2344.814, 5368.000, -2562.412, 1353.008, -6906.646,
-3136.408, -10444.050, -11029.000, 0.0 , 10498.000, 8162.000, 5995.779, 3391.710, 1176.549, -863.639, -3030.000,
-4897.221, -7019.183, -10573.000, 0.0 , 8700.000, 11733.000, 4160.000, 7010.000, -923.313, 2961.988, -4962.875,
-1309.988, -8498.153, -6091.000, 0.0 , 11998.000, 10120.000, 7270.000, 5340.000, 2702.040, 682.871, -1365.116,
-3062.526, -5345.581, -6851.055, -11046.000, 0.0 , 10237.000, 13265.000, 6440.000, 8200.000, 954.138, 4209.472,
-3573.777, 707.804, -7223.934, -3761.258, -10545.000, 0.0 , 11742.000, 9090.000, 7000.000, 4148.000, 2280.945,
151.046, -1625.778, -3645.613, -5319.162, -7120.000, -11000.000, 0.0 , 16278.000, 7290.400, 10380.000, 2670.222,
5641.437, -1870.555, 2004.493, -5720.566, -1867.893, -9140.000, -5788.000, 0.0 , 11855.000, 8320.000, 6230.000,
3856.341, 1585.282, -280.714, -2237.212, -3929.907, -5510.367, -7160.000, -11397.000, 0.0 , 10880.000, 12677.000,
4700.000, 7270.000, -97.496, 3092.620, -4399.529, -180.307, -7815.991, -4000.000, -11219.000, 0.0 , 11513.000,
8877.000, 5460.000, 3669.018, 972.728, -909.137, -2275.712, -4468.882, -5868.000, -7500.000, -11212.000, 0.0 ,
14000.000, 7685.000, 9870.000, 1826.508, 4654.729, -2680.884, 894.139, -6485.983, -2666.000, -9613.000, -6073.000,
0.0 , 10135.000, 8910.000, 6182.000, 2870.000, 687.083, -1065.022, -3255.000, -4693.000, -6000.000, -8089.000,
-11504.000, 0.0 , 9352.000, 11140.000, 5099.000, 7626.000, -518.626, 1774.243, -5240.000, -1476.536, -7978.000,
-5270.000, -11350.000, 0.0 , 10302.000, 7275.000, 6852.500, 3885.061, 283.314, -1861.606, -3668.917, -5165.000,
-6488.223, -8573.000, -11783.000, 0.0 , 12236.000, 6854.000, 8960.000, 2914.081, 5313.443, -3622.600, -673.301,
-7200.000, -3723.000, -10132.000, -7070.000, 0.0 , 12305.000, 8973.000, 8155.000, 4985.882, 4496.352, 1495.051,
-2832.685, -4291.008, -5575.045, -7510.000, -7980.000, -12361.000, 0.0 , 8183.000, 10350.000, 4391.865, 6586.914,
545.998, 2280.077, -6111.000, -2489.000, -8960.663, -5798.000, -12193.000, 0.0 , 10623.000, 9802.000, 6435.000,
5891.060, 2707.322, 1544.833, -1253.390, -4434.112, -6220.000, -7404.663, -9476.000, -12044.000, 0.0 , 9385.000,
12204.904, 5987.000, 8099.849, 1940.361, 3639.092, -2005.607, 356.514, -7870.354, -4527.000, -11048.000, -7862.000,
0.0 , 11024.000, 8600.000, 7461.597, 4136.604, 2893.177, 91.365, -404.892, -3200.855, -6337.000, -8093.000,
-9473.000, 0.0 , 13337.000, 7410.000, 10290.651, 3507.865, 4916.650, -901.398, 2045.447, -4255.745, -1586.576,
-9630.000, -6588.000, -13050.000, 0.0 , 9800.000, 9278.654, 6086.850, 4453.445, 1124.835, 925.617, -1690.631,
-2567.453, -5110.000, -8189.000, -10051.000, 0.0 , 8184.000, 11740.072, 5386.536, 7099.951, 163.569, 3186.800,
-2973.234, 254.411, -6446.432, -3450.000, -11605.000, -8467.000, 0.0 , 10449.000, 10427.241, 7468.476, 6688.406,
2658.085, 1933.885, -320.257, -1108.202, -3523.000, -4790.000, -7006.000, -10191.000, 0.0 , 12325.881, 5823.376,
8824.189, 2250.188, 4585.599, -1683.997, 1796.461, -5057.378, -1867.012, -8420.000, -5420.000, -13657.000, 0.0 ,
11276.271, 8085.648, 7567.133, 4558.004, 3638.662, 1357.227, 293.651, -2042.574, -3386.591, -5430.000, -6905.000,
-8942.000, 0.0 , 13524.000, 7075.000, 9310.000, 3335.000, 6245.000, -168.084, 3202.411, -3630.000, -361.388,
-7046.557, -3875.802, -10170.796, -7270.000, 0.0 , 11810.000, 9505.000, 8545.000, 5485.000, 4569.000, 2824.441,
1613.498, -541.485, -1980.000, -4203.824, -5476.538, -7339.000, -8849.000, 0.0 , 15082.000, 8815.000, 9850.000,
4605.000, 7210.000, 1009.949, 4530.260, -2322.533, 1150.515, -5954.369, -2587.000, -9250.000, -5386.000, 0.0 ,
11187.000, 9634.000, 6945.000, 5530.000, 3750.000, 2659.534, 763.355, -543.081, -2687.592, -4141.887, -6050.000,
-7653.000, -11169.000, 0.0 , 10135.000, 11802.000, 5888.000, 8105.000, 2155.000, 5602.706, -1141.238, 2440.889,
-4278.646, -1136.294, -7908.686, -4515.000, -12204.000, 0.0 , 11215.000, 8491.000, 6485.000, 4950.000, 3640.000,
1916.919, 566.719, -1345.252, -2738.204, -4849.000, -6256.821, -9443.656, 0.0 , 13330.000, 7191.000, 9367.000,
3520.000, 6547.000, 39.400, 3541.100, -2965.265, 194.145, -6523.369, -3185.092, -11068.000, -8327.000, 0.0 ,
9827.000, 8025.000, 6160.000, 4820.000, 2940.416, 1510.964, 33.005, -1417.000, -3426.000, -5006.320, -7902.000,
-10141.000, 0.0 , 8635.000, 10648.000, 4750.000, 7720.000, 1361.325, 4505.000, -1918.183, 1649.025, -5157.011,
-2091.814, -9496.000, -6825.000, -12858.000, 0.0 , 9147.000, 7623.000, 5985.000, 4160.000, 2591.496, 1115.949,
-214.295, -2019.953, -3849.678, -6380.000, -8681.887, -9999.749, 0.0 , 12063.000, 5906.000, 8778.000, 2810.000,
5400.000, -892.440, 2892.178, -3878.000, -637.052, -8300.000, -5257.000, -11929.000, -8627.000, 0.0 , 8812.000,
6977.000, 5496.000, 3741.000, 2188.333, 1036.800, -865.404, -2444.917, -5100.000, -7368.000, -8528.000, -10578.000,
0.0 , 7079.000, 9955.000, 3670.000, 6800.000, 287.967, 3955.967, -2585.931, 663.715, -7054.976, -4347.260,
-10161.000, -7168.000, -13661.000, 0.0 , 9967.000, 8188.000, 6632.000, 4908.000, 3340.000, 2016.462, 316.450,
-1035.961, -3916.529, -6100.000, -7189.000, -9071.438, -10388.648, 0.0 , 11067.000, 4800.000, 7900.000, 1450.722,
5076.442, -1451.860, 1988.685, -5881.508, -2758.000, -9122.000, -5864.000, -12366.000, -8868.000, 0.0 , 9287.000,
7625.000, 6000.000, 4584.000, 3103.485, 1445.888, 495.886, -3030.000, -4638.667, -5905.000, -8029.000, -8757.000,
-10965.000, 0.0 , 6005.000, 8900.000, 2607.000, 6151.701, -469.996, 3274.989, -4706.918, -1511.831, -7745.149,
-4660.000, -10411.000, -8165.000, 0.0 , 8793.000, 6996.000, 5734.000, 4160.000, 2517.373, 1454.962, -1756.634,
-3534.638, -4670.055, -6442.829, -7521.933, -9520.000, -10386.000, 0.0 , 7079.000, 9730.000, 4100.000, 7142.918,
521.190, 4423.008, -3656.632, -273.210, -7032.818, -2976.766, -9300.000, -6413.000, -12231.000, 0.0 , 8085.000,
6533.000, 5350.000, 3797.000, 2363.623, -593.902, -2293.011, -3514.272, -5005.343, -6349.607, -8086.343, -9257.000,
-10964.000, 0.0 , 10945.000, 4882.000, 8325.000, 1760.381, 5370.000, -2680.600, 982.189, -5615.000, -1960.000,
-7942.130, -5000.000, -11200.000, -7983.000, 0.0 , 9222.000, 7758.000, 6400.000, 4780.000, 3364.538, 390.131,
-1035.608, -2269.350, -3745.010, -5400.000, -6802.021, -7940.000, -9930.000, -10893.000, 0.0 , 6036.000, 9147.000,
3002.000, 6368.591, -1616.399, 1982.545, -4234.000, -890.457, -7054.714, -3855.000, -9734.000, -6800.000, -12706.000,
0.0 , 8719.000, 7355.000, 6115.000, 4393.903, 1403.021, -53.333, -1234.222, -2676.000, -4209.812, -5458.000,
-6884.000, -8635.000, -9734.000, 0.0 , 10136.000, 4166.000, 7360.000, -617.483, 2904.453, -3159.587, 294.024,
-5914.946, -2647.963, -8795.000, -5580.000, -11588.000, 0.0 , 8656.000, 7122.000, 5418.000, 2363.312, 766.700,
-185.770, -1652.551, -3098.740, -4560.000, -5635.000, -7331.000, -8654.000, 0.0 , 11314.000, 5486.000, 8207.000,
378.000, 3672.517, -2155.331, 1258.000, -4824.286, -1673.143, -7569.000, -4406.000, -10442.000, -7228.000, 0.0 ,
9730.000, 8468.000, 6514.000, 3201.000, 1581.000, 697.568, -662.442, -2084.701, -3450.000, -4693.000, -6139.000,
-7526.000, -9008.000, 0.0 , 7070.000, 8975.600, 1273.933, 4383.560, -1251.808, 2118.979, -3928.559, -522.523,
-6650.000, -3188.000, -9250.000, -6139.000, -11988.000, 0.0 , 9876.000, 7655.000, 3996.000, 2379.500, 1497.942,
193.777, -1195.955, -2431.553, -3720.000, -5050.000, -6307.000, -7819.000, -9227.000, 0.0 , 8500.000, 10249.000,
2147.769, 4959.000, -420.351, 2949.217, -2979.160, 368.578, -5598.000, -2211.000, -8091.000, -5030.000, -10871.000,
-7620.000, 0.0 , 9173.597, 4632.000, 3190.000, 2233.454, 970.848, -352.395, -1369.823, -2960.000, -4020.000,
-5250.000, -6560.000, -8101.000, -9399.000, 0.0 , 14135.000, 3103.000, 5486.000, 493.000, 3577.000, -2119.467,
1279.543, -4708.000, -1285.000, -7107.000, -3726.000, -9902.000, -6586.000, -12426.000, 0.0 , 13531.000, 7990.000,
4003.000, 2918.000, 1770.588, 427.360, -517.443, -2230.000, -2938.000, -4331.000, -5598.000, -6996.000, -8393.000,
-9473.000, 0.0 , 15087.000, 7370.000, 8393.699, 1550.000, 4175.000, -1228.561, 2058.669, -3713.176, -500.000,
-6190.000, -2770.000, -9170.000, -5151.000, -11457.000, 0.0 , 8907.000, 8120.000, 5962.000, 2648.061, 1150.950,
269.345, -1200.000, -2025.582, -3720.000, -4751.000, -5940.000, -7203.000, -8728.000, 0.0 , 8085.000, 9834.000,
5074.826, 6926.196, -80.308, 2548.224, -2870.000, 472.833, -5126.347, -2211.000, -7850.000, -4520.000, -10433.000,
-7051.000, 0.0 , 9762.000, 9301.000, 6941.600, 5877.460, 4172.566, 1175.630, -600.107, -1222.100, -2702.000,
-3690.000, -5657.000, -5900.000, -7604.000, -8793.000, 0.0 , 10936.000, 6368.000, 7820.000, 2774.000, 5374.034,
-1737.751, 1044.439, -4437.000, -1100.000, -7000.000, -3815.000, -9231.000, -6073.000, -12016.000, 0.0 , 10228.000,
8045.000, 6806.000, 5057.023, 4212.716, 2316.834, -278.000, -2129.000, -2787.000, -4504.392, -5162.512, -7020.000,
-7677.000, -9268.000, 0.0 , 6977.000, 8918.000, 4060.000, 6220.134, 1049.731, 3761.853, -3388.000, -222.273,
-6047.095, -2970.861, -8470.000, -5460.000, -10800.000, -7685.000, 0.0 , 8905.000, 7623.000, 6150.000, 5251.339,
3213.117, 2501.911, 580.672, -1823.002, -3727.686, -4528.807, -5977.727, -6822.000, -8337.000, -9343.000, 0.0 ,
7750.000, 9759.000, 5040.000, 7306.770, 2211.074, 4503.545, -745.318, 2162.203, -4873.664, -2088.908, -7644.545,
-4500.000, -9900.000, -6900.000, -12662.000, 0.0 , 8551.000, 7042.000, 6253.219, 4246.250, 3425.558, 1461.444,
933.922, -1041.359, -3442.786, -5275.123, -6010.000, -7463.000, -8458.000, -10116.000, 0.0 , 10600.000, 5778.000,
8464.396, 3119.389, 5541.438, 318.655, 2997.516, -2331.659, 550.549, -6314.957, -3740.000, -9074.000, -6092.000,
-11709.000, -8337.000, 0.0 , 7714.000, 7884.554, 4923.352, 4108.352, 2534.571, 1805.282, -163.041, -616.399,
-2660.043, -5054.484, -6700.000, -7520.000, -9247.000, -9855.000, 0.0 , 6649.000, 9366.528, 4104.626, 6530.167,
1026.232, 4169.252, -1471.785, 1542.000, -3877.767, -1029.888, -8267.273, -5160.000, -10600.000, -7471.000, -13390.000,
0.0 , 8519.000, 9195.630, 5750.000, 4945.000, 3290.000, 2685.690, 896.000, 224.139, -1721.336, -2187.371,
-4608.780, -6372.647, -8348.000, -8821.000, -10965.000, 0.0 , 10448.718, 5115.000, 7262.354, 2060.000, 4932.000,
-539.586, 2468.339, -3107.333, 40.989, -5764.889, -2682.000, -9400.000, -6680.000, -12212.000, -8579.000, 0.0 ,
9557.000, 7536.000, 5664.000, 4190.000, 3397.033, 1690.657, 1070.915, -695.268, -1313.877, -3637.673, -3812.000,
-6013.690, -7810.000, -9758.000, -10088.000, 0.0 , 11504.000, 6567.000, 7772.000, 3010.000, 5690.000, -86.548,
3454.000, -2260.587, 971.398, -4656.261, -1793.657, -7240.000, -4108.000, -11092.000, -7750.000, -13672.000, 0.0 ,
10526.000, 8514.000, 7005.000, 5414.000, 4101.488, 2442.420, 1187.042, 76.689, -464.118, -2565.237, -2870.363,
-5124.297, -5383.000, -7427.000, -9143.000, -11083.000, 0.0 , 7499.000, 9063.000, 4453.000, 6444.000, 1110.220,
3504.571, -1874.310, 1818.758, -3990.000, -598.532, -6545.350, -3109.190, -8590.000, -5465.000, -12522.000, 0.0 ,
9464.000, 8262.000, 6455.000, 5547.000, 3336.000, 1880.950, 808.246, -484.437, -1569.171, -2170.387, -4129.909,
-4563.034, -6459.450, -6690.000, -8831.000, 0.0 , 10321.000, 5524.000, 7365.000, 2735.123, 4044.281, -717.327,
1968.354, -3562.000, 246.091, -5751.249, -2031.613, -8054.000, -4488.701, -10114.000, -6660.000, 0.0 , 9399.000,
7499.000, 6856.000, 4222.000, 3224.000, 1626.864, 252.089, -821.215, -2094.500, -3102.000, -3842.588, -5577.123,
-6149.000, -7862.000, -7943.000, 0.0 , 6651.000, 8309.000, 3856.000, 5155.000, 722.262, 2451.043, -2444.423,
433.588, -5060.000, -1215.000, -7444.400, -3577.136, -9371.000, -5905.015, -11590.000, 0.0 , 8542.000, 7359.000,
5654.000, 4514.000, 2734.000, 1362.542, -60.053, -1341.445, -2540.000, -3500.049, -4481.000, -5498.218, -6933.002,
-7476.000, -9331.000, 0.0 , 9231.000, 4825.000, 6243.000, 1999.000, 3485.082, -1220.003, 936.732, -4230.000,
-900.000, -6599.118, -2665.000, -8673.000, -5102.070, -10919.000, -7052.000, 0.0 , 8234.000, 6763.000, 5524.000,
3834.000, 2514.498, 970.561, -365.635, -1837.723, -2768.568, -3845.437, -4978.620, -6018.734, -6882.000, -8301.000,
-8724.000, 0.0 , 5962.000, 7312.000, 2955.000, 4580.000, -105.636, 1835.325, -3290.000, -329.045, -5600.000,
-2300.000, -7880.000, -4373.000, -9915.000, -6530.628, -12217.000, 0.0 , 7890.000, 6548.000, 4797.000, 3739.000,
1955.577, 593.077, -858.900, -2002.419, -3164.000, -4150.000, -5300.000, -6323.000, -7491.204, -8119.000, -9847.000,
0.0 , 8449.000, 3894.000, 5644.000, 1393.895, 2505.785, -2140.283, 295.747, -4839.320, -1658.000, -6960.028,
-3708.000, -9264.000, -5769.440, -11519.000, -7556.000, 0.0 , 7601.000, 5729.000, 4862.000, 3117.000, 1785.124,
-2.565, -1209.999, -2439.000, -3370.000, -4600.000, -5452.000, -6762.000, -7653.000, -8789.000, -9390.000, 0.0 ,
4928.000, 6642.000, 2341.000, 3890.000, -986.836, 962.774, -3962.552, -996.000, -6236.680, -2987.000, -8521.000,
-5043.000, -10559.000, -7086.153, 0.0 , 6763.000, 5906.000, 4192.000, 2962.000, 1286.075, -375.980, -1592.540,
-2762.000, -3920.000, -4596.000, -5848.000, -7004.000, -8117.322, -8779.000, -10345.000, 0.0 , 7797.000, 3307.000,
4887.000, 486.215, 1854.881, -3039.615, -304.124, -5480.000, -2317.000, -7657.000, -4238.000, -10044.000, -6262.936,
-12091.000, 0.0 , 6968.000, 5142.000, 4099.000, 2350.000, 1006.709, -748.358, -1954.292, -3130.000, -3999.000,
-5005.000, -6240.000, -7351.000, -8375.000, -9304.000, 0.0 , 4397.000, 5971.000, 1615.000, 2914.312, -1679.106,
257.009, -4475.000, -1799.000, -6666.000, -3797.000, -9078.000, -5798.000, -11302.000, -7516.000, 0.0 , 6194.000,
5511.000, 3200.000, 2124.015, 351.141, -909.141, -2293.000, -3269.366, -4435.000, -5439.000, -6587.000, -7681.000,
-8676.551, -9343.000, 0.0 , 7061.000, 2846.000, 3870.000, -314.419, 968.032, -3459.138, -1097.000, -5999.000,
-2981.000, -8265.000, -5036.000, -10678.000, -6793.591, 0.0 , 6353.000, 4675.000, 3200.000, 1490.453, 96.428,
-1478.845, -2403.000, -3698.000, -4657.000, -5670.000, -6979.000, -8141.000, -8823.000, -9802.000, 0.0 , 3996.000,
5093.000, 890.537, 1880.148, -2519.266, -350.000, -4920.000, -2500.000, -7323.000, -4464.000, -9841.000, -6272.000,
-11861.000, 0.0 , 5729.000, 4555.000, 2608.000, 1298.111, -670.811, -1605.000, -2690.000, -4000.000, -4872.000,
-6268.000, -7374.000, -8190.000, -9220.388, 0.0 , 6343.000, 2026.000, 3080.000, -1374.345, 273.266, -3845.000,
-1856.000, -6476.000, -3736.000, -9017.000, -5596.000, -11277.000, 0.0 , 5701.000, 3816.000, 2385.000, 470.023,
-684.729, -2000.000, -2906.000, -4307.000, -5297.000, -6706.000, -7449.000, -8641.000, -9184.000, 0.0 , 3073.000,
4120.000, -106.181, 1192.844, -3110.000, -791.000, -5570.000, -3148.000, -7975.000, -5113.000, -10497.000, -6655.000,
0.0 , 4965.000, 3524.000, 1399.233, 498.325, -1166.000, -2001.000, -3400.000, -4448.000, -5705.000, -6784.000,
-8162.000, -8497.000, -9822.000, 0.0 , 5586.000, 644.621, 2099.246, -1912.000, -91.300, -4660.000, -2326.075,
-7205.000, -4310.000, -9562.000, -6056.000, -11879.000, 0.0 , 4816.000, 2651.000, 1405.757, -110.885, -1059.685,
-2710.000, -3698.000, -4842.000, -5892.000, -7393.000, -7798.000, -9020.000, 0.0 , 2282.000, 3103.000, -854.082,
707.862, -3802.308, -1456.000, -6429.000, -3691.000, -8551.000, -5520.000, -11059.000, 0.0 , 3894.000, 2674.000,
1027.231, -187.890, -1738.673, -2990.000, -4068.450, -5156.000, -6307.000, -7319.000, -8475.000, -9138.000, 0.0 ,
4338.000, 373.043, 1813.520, -2800.000, -908.000, -5534.440, -2924.842, -7780.000, -4780.000, -10115.000, -6582.000,
0.0 , 3762.000, 2010.000, 1070.034, -556.000, -2132.000, -3450.000, -4578.000, -5488.000, -6466.000, -7578.000,
-8601.000, 0.0 , 5330.000, 1340.000, 2866.000, -1482.692, 31.187, -4562.000, -2335.000, -7060.000, -4120.000,
-9187.000, -5997.000, 0.0 , 3000.000, 1992.000, 432.994, -1012.791, -2372.000, -3879.000, -4707.000, -5753.000,
-6630.000, -7899.000, -9434.000, 0.0 , 2208.000, 3901.000, -581.556, 1069.517, -3831.000, -1379.768, -6115.560,
-3225.158, -8466.000, -5359.000, -11344.000, 0.0 , 3029.000, 1311.151, 2.663, -1502.409, -2978.000, -3730.000,
-4865.000, -5947.000, -7322.000, -8782.000, 0.0 , 4865.000, 349.000, 2120.353, -2809.357, -506.486, -5300.000,
-2300.000, -7792.000, -4789.000, -10351.000, 0.0 , 2500.000, 1009.267, -532.448, -1970.508, -2850.000, -3950.000,
-5176.558, -6698.000, -8034.000, 0.0 , 1270.000, 3140.000, -2000.000, 616.859, -4442.000, -1470.000, -7000.000,
-4088.000, -9630.000, -6140.000, 0.0 , 2045.226, 313.689, -1018.553, -1830.000, -3180.000, -4493.000, -5881.000,
-7315.000, -8011.000, 0.0 , 4174.000, -1046.208, 1459.689, -3516.341, -710.000, -6120.000, -3372.000, -8947.000,
-5732.000, 0.0 , 1140.506, -56.639, -1068.648, -2340.308, -3636.000, -5153.000, -6503.000, -7490.000, -8464.000,
0.0 , 96.600, 2246.791, -2492.034, -40.000, -5283.000, -2713.000, -8180.501, -5156.000, -9955.000, 0.0 ,
2000.000, 1119.983, -226.800, -1510.000, -2805.000, -4490.000, -5850.000, -6795.000, -7925.000, 0.0 , 1157.515,
3209.016, -1505.695, 686.016, -4378.000, -2045.000, -7357.000, -4569.000, -9492.000, -6154.000, 0.0 , 2154.634,
718.919, -599.624, -2180.503, -3580.000, -5174.000, -6178.000, -7194.000, -7797.000, 0.0 , 4102.000, -325.310,
1372.475, -3460.000, -1410.000, -6562.000, -4022.000, -8764.701, -5615.000, 0.0 , 2990.977, 1702.954, 452.265,
-1445.071, -2883.483, -4347.812, -5606.000, -6555.000, -7150.000, 0.0 , 657.634, 2244.118, -2456.040, -810.554,
-5893.024, -3347.000, -7972.000, -5016.000, -10080.000, 0.0 , 2660.000, 1262.699, -482.975, -1902.874, -3841.604,
-4879.000, -5848.000, -6566.000, -7872.000, 0.0 , 1818.000, 2946.154, -1364.606, -49.571, -5151.830, -2822.000,
-7214.000, -4442.000, -9379.647, 0.0 , 2123.955, 491.836, -974.718, -3253.361, -4233.402, -5062.066, -6026.000,
-7202.000, -7603.000, 0.0 , 3940.000, -347.453, 763.718, -4449.187, -2330.553, -6478.024, -3822.000, -8596.000,
-5481.000, 0.0 , 3310.000, 1531.220, -51.085, -2708.389, -3531.022, -4537.266, -5246.000, -6517.000, -7007.000,
0.0 , 1307.213, 1533.536, -3757.508, -1846.582, -5713.784, -3317.000, -7756.000, -4932.000, 0.0 , 4815.000,
1422.674, -2398.235, -2909.065, -3910.070, -4611.793, -5712.441, -6397.000, -7794.000, 0.0 , 3666.000, 5001.007,
-2879.108, -1401.302, -4984.842, -2839.872, -6988.638, -4324.000, -9043.000, 0.0 , 3981.507, 644.184, -1893.305,
-3486.479, -3929.000, -5159.346, -5615.000, -7103.000, 0.0 , 5488.776, 63.514, 1162.083, -3981.123, -2373.963,
-6258.208, -3771.000, -8207.000, -5378.000, 0.0 , 1372.402, 578.709, -786.122, -2891.919, -4605.233, -4997.152,
-6291.495, -6716.000, 0.0 , 573.756, 2254.017, -1753.912, 42.624, -5128.888, -3342.670, -7477.985, -4755.000,
0.0 , 1980.000, 1427.341, -73.242, -882.315, -2148.483, -3885.263, -5801.196, -5950.000, -7658.000, 0.0 ,
1024.161, 3272.073, -1090.279, 940.937, -3361.263, -1058.551, -6335.957, -4246.000, -8652.000, 0.0 , 2252.109,
720.384, -81.925, -1487.441, -2215.247, -3489.970, -4914.342, -6866.055, 0.0 , 4000.000, -469.139, 2003.351,
-2729.016, -307.886, -4846.438, -2170.096, -7506.616, 0.0 , 1438.000, 740.598, -653.813, -1573.813, -2819.321,
-3477.726, -4864.635, 0.0 , 264.838, 2883.107, -1841.573, 409.278, -4192.744, -1530.164, -6278.420, -3241.000,
0.0 , 1696.853, 217.958, -771.225, -2176.092, -2902.847, -4060.470, -4690.142, 0.0 , 3649.000, -865.199,
1209.367, -3481.399, -913.815, -5722.509, -2641.000, 0.0 , 2501.000, 1127.000, 314.745, -1553.717, -2417.928,
-3439.301, -4180.000, 0.0 , 4433.000, 24.698, 2032.647, -2298.025, -582.444, -4910.000, -2183.000, 0.0 ,
3307.000, 1918.000, 1149.064, -585.807, -1554.778, -2951.527, -3501.679, 0.0 , 796.000, 2825.694, -1403.231,
232.115, -3870.920, -1839.965, 0.0 , 2639.000, 1865.271, 357.589, -671.482, -2024.817, -3045.237, -4205.993,
0.0 , 1441.000, 3670.895, -640.210, 1117.017, -2833.669, -1310.611, -5393.000, 0.0 , 3329.000, 2480.093,
1326.166, 44.824, -1019.327, -2186.140, -3556.622, 0.0 , 2199.000, 4340.000, 45.900, 2127.045, -2147.646,
-306.848, -4484.000, -2373.000, 0.0 , 3358.000, 1760.000, 1095.000, -310.431, -1311.112, -2562.287, -3625.437,
0.0 , 5054.000, 987.038, 2700.000, -1309.668, 563.712, -3619.039, -1707.439, 0.0 , 3900.000, 2486.000,
2100.000, 389.515, -382.155, -1810.827, -2818.000, -4007.000, 0.0 , 5553.000, 1556.000, 3700.000, -494.958,
1337.103, -2750.000, -1007.000, -5040.000, 0.0 , 3209.000, 2769.000, 1245.117, 570.111, -1028.513, -2100.723,
-3246.000, -4031.000, 0.0 , 1982.000, 4494.000, 273.088, 2195.269, -1809.846, -387.618, -4182.000, -2279.000,
0.0 , 3351.000, 1926.014, 1410.000, -123.716, -1141.661, -2559.000, -3318.000, -4647.000, 0.0 , 5093.000,
964.000, 2900.000, -929.469, 476.585, -3280.000, -1710.000, -5519.000, 0.0 , 2566.000, 2250.000, 518.565,
-220.318, -1459.627, -2720.000, -3946.000, -4604.000, 0.0 , 1626.000, 3460.000, -147.065, 1292.041, -2258.350,
-967.319, -4890.000, -2929.000, 0.0 , 2648.000, 1263.457, 721.796, -802.912, -1800.000, -3177.000, -3928.000,
0.0 , 4093.000, 388.346, 2199.599, -1378.952, -215.380, -3940.000, -2371.000, -6172.000, 0.0 , 1941.000,
1305.000, 20.815, -767.357, -2400.000, -3254.000, -4607.000, 0.0 , 1201.000, 2700.000, -750.963, 664.820,
-3000.000, -1526.000, -5598.000, -3476.000, 0.0 , 2120.000, 581.556, -8.908, -1508.387, -2254.000, -3921.000,
-4545.000, 0.0 , 3402.000, -76.177, 1428.055, -2255.643, -766.161, -4637.000, -2895.000, 0.0 , 1204.663,
894.059, -810.213, -1568.000, -3054.000, -3780.000, -5255.000, 0.0 , 400.534, 2376.136, -1350.000, -122.930,
-3880.000, -2158.000, -6195.000, 0.0 , 1848.000, 1620.000, 44.970, -646.000, -2476.000, -2952.000, -4644.000,
0.0 , 3170.000, -687.000, 840.000, -3055.000, -1608.000, -5332.000, 0.0 , 2359.000, 900.871, 124.000,
-1451.000, -2440.000, -3705.000, -4491.000, 0.0 , 37.407, 1779.692, -2100.000, -801.000, -4633.000, -2799.000,
0.0 , 1420.000, 1093.000, -375.892, -1474.438, -3123.000, -3765.000, -5030.000, 0.0 , 528.000, 2500.000,
-1260.000, 477.090, -3884.000, -2176.000, -5928.000, 0.0 , 1633.000, 287.661, -333.741, -1960.000, -3138.000,
-4294.000, -5049.000, 0.0 , 3059.000, -651.886, 1088.200, -2680.000, -1140.000, -5252.000, -3334.000, 0.0 ,
720.000, 289.620, -1043.022, -2009.468, -3295.000, -4399.000, -5502.000, 0.0 , -141.000, 1700.000, -2129.614,
-207.836, -4180.000, -2251.000, -6456.000, 0.0 , 820.000, -406.139, -1227.835, -2564.000, -3229.000, -4459.000,
0.0 , -1263.000, 209.000, -3430.000, -1570.000, -5468.000, -3458.000, 0.0 , 80.000, -486.000, -1832.000,
-2457.000, -3813.000, -4593.000, 0.0 , 940.000, -2735.000, -802.000, -4651.000, -2802.000, -6863.000, 0.0 ,
-1116.000, -1687.000, -3125.000, -3812.000, -5218.000, 0.0 , -2023.000, -211.000, -3945.000, -2165.000, -6084.000,
0.0 , -1068.000, -2364.000, -3014.000, -4502.000, -5183.000, 0.0 , -3255.000, -1352.000, -5408.000, -3426.000,
0.0 , -2242.000, -3849.000, -4474.000, -6116.000, 0.0 , -4733.000, -2825.000, -7357.000, 0.0 , -3758.000,
-5358.000, -5990.000, 0.0 , -6204.000, -4391.000, 0.0 , -4649.000, -5624.000, 0.0 , -3635.000, 0.0 ,
-4517.000, 0.0 , -6675.000, 0.0 , 0.0
};
G4int G4NucleiPropertiesTable::shortTable[273];
G4int G4NucleiPropertiesTable::shortTable[G4NucleiPropertiesTable::MaxA+1];
// make sure there is exactly one instance of this class!
G4NucleiPropertiesTable G4NucleiPropertiesTable::theInstance(2.5);
@@ -867,16 +45,14 @@ G4NucleiPropertiesTable::G4NucleiPropertiesTable(G4double dummy)
G4double even_more_dummy = 0;
even_more_dummy = dummy;
G4int A = 0;
G4int j = 0;
for (G4int i = 0; i < G4NucleiPropertiesTable::nEntries; i++) {
if (indexArray[1][i] > A) {
shortTable[j] = i;
A = indexArray[1][i];
j++;
if (indexArray[1][i] > j) {
shortTable[j++] = i;
}
}
shortTable[G4NucleiPropertiesTable::MaxA] = G4NucleiPropertiesTable::nEntries;
}
@@ -886,7 +62,7 @@ G4NucleiPropertiesTable::G4NucleiPropertiesTable(G4double dummy)
G4int G4NucleiPropertiesTable::GetIndex(G4int Z, G4int A)
{
if(A>273) G4Exception(
if(A>G4NucleiPropertiesTable::MaxA) G4Exception(
"G4NucleiPropertiesTable::GetIndex : Nucleon number larger than 273!\n");
if(A<1) G4Exception(
"G4NucleiPropertiesTable::GetIndex : Nucleon number negativ!\n");
@@ -916,7 +92,7 @@ G4int G4NucleiPropertiesTable::MinZ(G4int A)
G4int G4NucleiPropertiesTable::MaxZ(G4int A)
{
G4int i = shortTable[A] - 1;
G4int i = shortTable[A]-1;
return indexArray[0][i];
}
@@ -927,10 +103,9 @@ G4double G4NucleiPropertiesTable::GetNuclearMass(G4int Z, G4int A)
{
G4int i=GetIndex(Z, A);
if (i >= 0){
// In order to not introduce dependences with other tables (PDG)
const G4double neutronMass = GetAtomicMass(0,1);
const G4double protonMass = GetAtomicMass(1,1) - electron_mass_c2;
return protonMass*G4double(Z)+neutronMass*G4double(A-Z) - GetBindingEnergy(Z, A);
const G4double NuclearMass = GetAtomicMass(Z,A) - G4double(Z)*electron_mass_c2 +
1.433e-5*MeV*pow(G4double(Z),2.39);
return NuclearMass;
} else {
return 0.0;
}
source/particles/management/src/G4NucleiPropertiesTableB.cc
+555 -577
View File
File diff suppressed because it is too large Load Diff
source/particles/management/src/G4NucleiPropertiesTheoreticalTableA.cc
+50
View File
@@ -0,0 +1,50 @@
#include "G4NucleiPropertiesTheoreticalTable.hh"
G4int G4NucleiPropertiesTheoreticalTable::shortTable[G4NucleiPropertiesTheoreticalTable::shortTableSize];
G4NucleiPropertiesTheoreticalTable G4NucleiPropertiesTheoreticalTable::theInstance(2.5);
// Default constructor
G4NucleiPropertiesTheoreticalTable::G4NucleiPropertiesTheoreticalTable(G4double dummy)
{
G4double even_more_dummy = dummy;
G4int j = 0;
for (G4int i = 0; i < G4NucleiPropertiesTheoreticalTable::nEntries; i++) {
if (indexArray[0][i] > j+7) {
shortTable[j++] = i;
}
}
shortTable[G4NucleiPropertiesTheoreticalTable::shortTableSize-1] =
G4NucleiPropertiesTheoreticalTable::nEntries;
}
// Determine the table index for a Nuclide with Z protons and A nucleons
G4int G4NucleiPropertiesTheoreticalTable::GetIndex(G4int Z, G4int A)
{
if(A>339) G4Exception(
"G4NucleiPropertiesTheoreticalTable::GetIndex : Nucleon number larger than 339!\n");
if(A<16) G4Exception(
"G4NucleiPropertiesTheoreticalTable::GetIndex : Nucleon number smaller than 16!\n");
if(Z>136) G4Exception(
"G4NucleiPropertiesTheoreticalTable::GetIndex : Proton number larger than 136!\n");
if(Z<8) G4Exception(
"G4NucleiPropertiesTheoreticalTable::GetIndex : Proton number smaller than 8!\n");
if(Z>A) G4Exception(
"G4NucleiPropertiesTheoreticalTable::GetIndex : Nucleon number smaller than Z!\n");
G4int i = shortTable[Z-8];
while ( i < shortTable[Z-8+1] ) {
if (indexArray[1][i] != A ) i++;
else return i;
}
return -1;
}
source/particles/management/src/G4NucleiPropertiesTheoreticalTableB.cc
+2719
View File
File diff suppressed because it is too large Load Diff
source/particles/management/src/G4PDGCodeChecker.cc
+349
View File
@@ -0,0 +1,349 @@
// This code implementation is the intellectual property of
// 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: G4PDGCodeChecker.cc,v 1.2.6.1 1999/12/07 20:49:58 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ----------------------------------------------------------------------
// GEANT 4 class implementation file
//
// For information related to this code contact:
// CERN, CN Division, ASD Group
// History: first implementation, based on object model of
// 17 Aug 1999 H.Kurashige
// **********************************************************************
#include <fstream.h>
#include <iomanip.h>
#include "G4PDGCodeChecker.hh"
/////////////
G4PDGCodeChecker::G4PDGCodeChecker()
{
code = 0;
verboseLevel = 3;
}
/////////////
G4int G4PDGCodeChecker::CheckPDGCode( G4int PDGcode,
G4String particleType)
{
code = PDGcode;
theParticleType = particleType;
// clear QuarkContents
G4int flavor;
for (flavor=0; flavor<NumberOfQuarkFlavor; flavor++){
theQuarkContent[flavor] =0;
theAntiQuarkContent[flavor] =0;
}
// get each digit number
GetDigits(code);
// check code
if (theParticleType =="quarks") {
return CheckForQuarks();
} else if (theParticleType =="diquarks") {
return CheckForDiQuarks();
} else if (theParticleType =="gluons") {
// gluons
// do not care about
return code;
} else if (theParticleType == "meson") {
return CheckForMesons();
} else if (theParticleType == "baryon"){
return CheckForBaryons();
}
// No check
return code;
}
/////////////
G4int G4PDGCodeChecker::CheckForBaryons()
{
G4int tempPDGcode = code;
if ((quark1==0)||(quark2==0)||(quark3==0)){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " meson has three quark ";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
//exceptions
if (abs(tempPDGcode)%10000 == 3122) {
// Lambda
quark2=2; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 4122) {
// Lambda_c
quark2=2; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 4132) {
// Xi_c0
quark2=3; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 4232) {
// Xi_c+
quark2=3; quark3 = 2; spin = 1;
} else if (abs(tempPDGcode)%10000 == 2122) {
// Delta+ (spin 1/2)
quark2=2; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 1212) {
// Delta0 (spin 1/2)
quark1=2; quark2 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 2126) {
// Delta+ (spin 5/2)
quark2=2; quark3 = 1; spin = 5;
} else if (abs(tempPDGcode)%10000 == 1216) {
// Delta0 (spin 5/2)
quark1=2; quark2 = 1; spin = 5;
} else if (abs(tempPDGcode)%10000 == 2128) {
// Delta+ (spin 7/2)
quark2=2; quark3 = 1; spin = 7;
} else if (abs(tempPDGcode)%10000 == 1218) {
// Delta0 (spin 7/2)
quark1=2; quark2 = 1; spin = 7;
} else if (abs(tempPDGcode)%10000 == 2124) {
// N*+ (spin 3/2)
quark2=2; quark3 = 1; spin = 3;
} else if (abs(tempPDGcode)%10000 == 1214) {
// N*0 (spin 3/2)
quark1=2; quark2 = 1; spin = 3;
}
// check quark flavor
if ((quark1<quark2)||(quark2<quark3)||(quark1<quark3)) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal code for baryon ";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
if (quark1> NumberOfQuarkFlavor) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
// Fill Quark contents
if (tempPDGcode >0) {
theQuarkContent[quark1-1] ++;
theQuarkContent[quark2-1] ++;
theQuarkContent[quark3-1] ++;
} else {
theAntiQuarkContent[quark1-1] ++;
theAntiQuarkContent[quark2-1] ++;
theAntiQuarkContent[quark3-1] ++;
}
return code;
}
/////////////
G4int G4PDGCodeChecker::CheckForMesons()
{
G4int tempPDGcode = code;
// -- exceptions --
if (tempPDGcode == 310) spin = 0; //K0s
if (tempPDGcode == 130) { //K0l
spin = 0;
quark2 = 3;
quark3 = 1;
}
//
if ((quark1 !=0)||(quark2==0)||(quark3==0)){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " meson has only quark and anti-quark pair";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
if (quark2<quark3) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal code for meson ";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
// check quark flavor
if (quark2> NumberOfQuarkFlavor){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
// check heavier quark type
if (quark2 & 1) {
// down type qurak
if (tempPDGcode >0) {
theQuarkContent[quark3-1] =1;
theAntiQuarkContent[quark2-1] =1;
} else {
theQuarkContent[quark2-1] =1;
theAntiQuarkContent[quark3-1] =1;
}
} else {
// up type quark
if (tempPDGcode >0) {
theQuarkContent[quark2-1] =1;
theAntiQuarkContent[quark3-1] =1;
} else {
theQuarkContent[quark3-1] =1;
theAntiQuarkContent[quark2-1] =1;
}
}
return code;
}
/////////////
G4int G4PDGCodeChecker::CheckForDiQuarks()
{
if ((quark1 ==0) || (quark2 ==0) || (quark3 !=0)) {
// quark3 should be 0
// --- code is wrong
return 0;
} else if (quark1 < quark2) {
// --- code is wrong
return 0;
} else if (quark2>NumberOfQuarkFlavor){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << code <<endl;
}
#endif
return 0;
}
// Fill Quark Contents
if (code>0){
theQuarkContent[quark1-1] +=1;
theQuarkContent[quark2-1] +=1;
} else {
theAntiQuarkContent[quark1-1] +=1;
theAntiQuarkContent[quark2-1] +=1;
}
return code;
}
/////////////
G4int G4PDGCodeChecker::CheckForQuarks()
{
if ( abs(quark1)>NumberOfQuarkFlavor ) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << code <<endl;
}
#endif
// --- code is wrong
return 0;
}
quark1 = abs(code);
// Fill Quark Contents
if (code>0){
theQuarkContent[quark1-1] =1;
} else {
theAntiQuarkContent[quark1-1] =1;
}
return code;
}
/////////////
G4bool G4PDGCodeChecker::CheckCharge(G4double thePDGCharge) const
{
// check charge
G4double totalCharge = 0.0;
for (G4int flavor= 0; flavor<NumberOfQuarkFlavor-1; flavor+=2){
totalCharge += (-1./3.)*eplus*theQuarkContent[flavor];
totalCharge += 1./3.*eplus*theAntiQuarkContent[flavor];
totalCharge += 2./3.*eplus*theQuarkContent[flavor+1];
totalCharge += (-2./3.)*eplus*theAntiQuarkContent[flavor+1];
}
if (abs(totalCharge-thePDGCharge)>0.1*eplus) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal electric charge " << thePDGCharge/eplus;
G4cout << " PDG code=" << code <<endl;
}
#endif
return false;
}
return true;
}
/////////////
void G4PDGCodeChecker::GetDigits(G4int PDGcode)
{
G4int temp = abs(PDGcode);
higherSpin = temp/10000000;
temp -= G4int(higherSpin*10000000);
exotic = temp/1000000;
temp -= G4int(exotic*1000000);
radial = temp/100000;
temp -= G4int(radial*100000);
multiplet = temp/10000;
temp -= G4int(multiplet*10000);
quark1 = temp/1000;
temp -= G4int(quark1*1000);
quark2 = temp/100;
temp -= G4int(quark2*100);
quark3 = temp/10;
temp -= G4int(quark3*10);
spin= temp;
if ((spin ==0) && ( higherSpin !=0 )) {
spin = higherSpin-1;
} else {
spin -= 1;
}
}
source/particles/management/src/G4ParticleDefinition.cc
+35 -286
View File
@@ -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: G4ParticleDefinition.cc,v 1.3 1999/04/14 10:28:28 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ParticleDefinition.cc,v 1.6.6.1 1999/12/07 20:49:59 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// --------------------------------------------------------------
@@ -28,13 +28,16 @@
// added Resonance flag and ApplyCuts flag H.Kurashige 27 June 1998
// modify FillQuarkContents() for quarks/diquarks H.Kurashige 30 June 1998
// modify encoding rule H.Kurashige 23 Oct. 98
// modify FillQuarkContents() for deltas 25 Nov.,98 H.Kurashige
// modify FillQuarkContents() for deltas 25 Nov.,98 H.Kurashige
//
// modify FillQuarkContents() to use G4PDGCodeChecker 17 Aug. 99 H.Kurashige
// --------------------------------------------------------------
#include "G4ParticleDefinition.hh"
#include "G4ParticleTable.hh"
#include "G4DecayTable.hh"
#include "G4PDGCodeChecker.hh"
G4ParticleDefinition::G4ParticleDefinition(
const G4String& aName,
@@ -139,299 +142,45 @@ G4int G4ParticleDefinition::FillQuarkContents()
// It means error if the return value is differnt from
// this->thePDGEncoding.
{
G4int tempPDGcode = thePDGEncoding;
for (G4int flavor=0; flavor<NumberOfQuarkFlavor; flavor++){
theQuarkContent[flavor] =0;
theAntiQuarkContent[flavor] =0;
G4int flavor;
for (flavor= 0; flavor<NumberOfQuarkFlavor-1; flavor++){
theQuarkContent[flavor] = 0;
theAntiQuarkContent[flavor] = 0;
}
G4int temp = abs(tempPDGcode);
G4int higherSpin = temp/10000000;
temp -= G4int(higherSpin*10000000);
G4int exotic = temp/1000000;
temp -= G4int(exotic*1000000);
G4int radial = temp/100000;
temp -= G4int(radial*100000);
G4int multiplet = temp/10000;
temp -= G4int(multiplet*10000);
G4int quark1 = temp/1000;
temp -= G4int(quark1*1000);
G4int quark2 = temp/100;
temp -= G4int(quark2*100);
G4int quark3 = temp/10;
temp -= G4int(quark3*10);
G4int spin= temp;
if ((spin ==0) && ( higherSpin !=0 )) {
spin = higherSpin-1;
} else {
spin -= 1;
}
if (theParticleType =="quarks") {
if ((quark1 !=0) || (quark2 !=0) || (quark3 !=0)) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
// --- thePDGEncoding is wrong
tempPDGcode = 0;
} else {
quark1 = abs(tempPDGcode);
if (quark1>NumberOfQuarkFlavor){
G4PDGCodeChecker checker;
G4int temp = checker.CheckPDGCode(thePDGEncoding, theParticleType);
if ( temp != 0) {
for (flavor= 0; flavor<NumberOfQuarkFlavor-1; flavor++){
theQuarkContent[flavor] = checker.GetQuarkContent(flavor);
theAntiQuarkContent[flavor] = checker.GetAntiQuarkContent(flavor);
}
if ((theParticleType == "meson")||(theParticleType == "baryon")) {
// check charge
if (!checker.CheckCharge(thePDGCharge) ){
temp = 0;
#ifdef G4VERBOSE
if (verboseLevel>1) {
cout << " ??? unknown quark ";
cout << " PDG code=" << thePDGEncoding <<endl;
G4cout << " illegal charge (" << thePDGCharge/eplus;
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
// --- thePDGEncoding is wrong
tempPDGcode = 0;
} else {
if (tempPDGcode>0){
theQuarkContent[quark1-1] =1;
} else {
theAntiQuarkContent[quark1-1] =1;
}
// check spin
if (checker.GetSpin() != thePDGiSpin) {
temp=0;
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal SPIN (" << thePDGiSpin << "/2";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
}
}
} else if (theParticleType =="diquarks") {
if ((quark1 ==0) || (quark2 ==0) || (quark3 !=0)) {
// quark3 should be 0
// --- thePDGEncoding is wrong
tempPDGcode = 0;
} else if (quark1 < quark2) {
// --- thePDGEncoding is wrong
tempPDGcode = 0;
} else if (quark2>NumberOfQuarkFlavor){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
} else {
if (tempPDGcode>0){
theQuarkContent[quark1-1] +=1;
theQuarkContent[quark2-1] +=1;
} else {
theAntiQuarkContent[quark1-1] +=1;
theAntiQuarkContent[quark2-1] +=1;
}
}
} else if (theParticleType =="gluons") {
// gluons
// do not care about
} else if (theParticleType == "meson") {
// check meson or not
// -- exceptions --
if (tempPDGcode == 310) spin = 0; //K0s
if (tempPDGcode == 130) { //K0l
spin = 0;
quark2 = 3;
quark3 = 1;
}
if (quark1 !=0) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " meson has only quark and anti-quark pair";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
if ((quark2==0)||(quark3==0)){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " meson has quark and anti-quark pair";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
// check spin
if ( spin != thePDGiSpin) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal SPIN (" << thePDGiSpin << "/2)";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
if (quark2<quark3) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal code for meson ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
// check quark flavor
if (quark2> NumberOfQuarkFlavor){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
// check heavier quark type
if (quark2 & 1) {
// down type qurak
if (tempPDGcode >0) {
theQuarkContent[quark3-1] =1;
theAntiQuarkContent[quark2-1] =1;
} else {
theQuarkContent[quark2-1] =1;
theAntiQuarkContent[quark3-1] =1;
}
} else {
// up type quark
if (tempPDGcode >0) {
theQuarkContent[quark2-1] =1;
theAntiQuarkContent[quark3-1] =1;
} else {
theQuarkContent[quark3-1] =1;
theAntiQuarkContent[quark2-1] =1;
}
}
// check charge
G4double totalCharge = 0.0;
for (G4int flavor= 0; flavor<NumberOfQuarkFlavor-1; flavor+=2){
totalCharge += (-1./3.)*eplus*theQuarkContent[flavor];
totalCharge += 1./3.*eplus*theAntiQuarkContent[flavor];
totalCharge += 2./3.*eplus*theQuarkContent[flavor+1];
totalCharge += (-2./3.)*eplus*theAntiQuarkContent[flavor+1];
}
if (abs(totalCharge-thePDGCharge)>0.1*eplus) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal charge for meson " << thePDGCharge/eplus;
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
} else if (theParticleType == "baryon"){
// check meson or not
if ((quark1==0)||(quark2==0)||(quark3==0)){
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " meson has three quark ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
//exceptions
if (abs(tempPDGcode)%10000 == 3122) {
// Lambda
quark2=2; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 4122) {
// Lambda_c
quark2=2; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 4132) {
// Xi_c0
quark2=3; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 4232) {
// Xi_c+
quark2=3; quark3 = 2; spin = 1;
} else if (abs(tempPDGcode)%10000 == 2122) {
// Delta+ (spin 1/2)
quark2=2; quark3 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 1212) {
// Delta0 (spin 1/2)
quark1=2; quark2 = 1; spin = 1;
} else if (abs(tempPDGcode)%10000 == 2126) {
// Delta+ (spin 5/2)
quark2=2; quark3 = 1; spin = 5;
} else if (abs(tempPDGcode)%10000 == 1216) {
// Delta0 (spin 5/2)
quark1=2; quark2 = 1; spin = 5;
} else if (abs(tempPDGcode)%10000 == 2128) {
// Delta+ (spin 7/2)
quark2=2; quark3 = 1; spin = 7;
} else if (abs(tempPDGcode)%10000 == 1218) {
// Delta0 (spin 7/2)
quark1=2; quark2 = 1; spin = 7;
} else if (abs(tempPDGcode)%10000 == 2124) {
// N*+ (spin 3/2)
quark2=2; quark3 = 1; spin = 3;
} else if (abs(tempPDGcode)%10000 == 1214) {
// N*0 (spin 3/2)
quark1=2; quark2 = 1; spin = 3;
}
// check spin
if (spin != thePDGiSpin) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal SPIN (" << thePDGiSpin << "/2";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
// check quark flavor
if ((quark1<quark2)||(quark2<quark3)||(quark1<quark3)) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal code for baryon ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
if (quark1> NumberOfQuarkFlavor) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " ??? unknown quark ";
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
if (tempPDGcode >0) {
theQuarkContent[quark1-1] ++;
theQuarkContent[quark2-1] ++;
theQuarkContent[quark3-1] ++;
} else {
theAntiQuarkContent[quark1-1] ++;
theAntiQuarkContent[quark2-1] ++;
theAntiQuarkContent[quark3-1] ++;
}
// check charge
G4double totalCharge = 0.0;
for (G4int flavor= 0; flavor<NumberOfQuarkFlavor-1; flavor+=2){
totalCharge += (-1./3.)*eplus*theQuarkContent[flavor];
totalCharge += 1./3.*eplus*theAntiQuarkContent[flavor];
totalCharge += 2./3.*eplus*theQuarkContent[flavor+1];
totalCharge += (-2./3.)*eplus*theAntiQuarkContent[flavor+1];
}
if (abs(totalCharge-thePDGCharge)>0.1*eplus) {
#ifdef G4VERBOSE
if (verboseLevel>1) {
G4cout << " illegal charge for baryon " << thePDGCharge/eplus;
G4cout << " PDG code=" << thePDGEncoding <<endl;
}
#endif
tempPDGcode = 0;
}
} else {
}
return tempPDGcode;
return temp;
}
void G4ParticleDefinition::DumpTable() const
source/particles/management/src/G4ParticleMessenger.cc
+6 -6
View File
@@ -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: G4ParticleMessenger.cc,v 1.2 1999/04/13 08:00:30 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ParticleMessenger.cc,v 1.3.6.1 1999/12/07 20:49:59 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
//---------------------------------------------------------------
@@ -59,10 +59,10 @@ G4ParticleMessenger::G4ParticleMessenger(G4ParticleTable* pTable)
//Commnad /particle/list
listCmd = new G4UIcmdWithAString("/particle/list",this);
listCmd->SetGuidance("List name of particles.");
listCmd->SetGuidance(" all(default)/lepton/baryon/meson");
listCmd->SetGuidance(" all(default)/lepton/baryon/meson/nucleus/quarks");
listCmd->SetParameterName("particle type", true);
listCmd->SetDefaultValue("all");
listCmd->SetCandidates("all lepton baryon meson");
listCmd->SetCandidates("all lepton baryon meson nucleus quarks");
//Commnad /particle/find
findCmd = new G4UIcmdWithAnInteger("/particle/find",this);
@@ -94,9 +94,9 @@ void G4ParticleMessenger::SetNewValue(G4UIcommand * command,G4String newValues)
G4int counter = 0;
G4ParticleTable::G4PTblDicIterator *piter = theParticleTable->GetIterator();
piter -> reset();
// newValues.toLower(); temporaly commented out
while( (*piter)() ){
G4ParticleDefinition *particle = piter->value();
newValues.toLower();
if ((newValues=="all") || (newValues==particle->GetParticleType())) {
G4cout << setw(19) << particle->GetParticleName();
if ((counter++)%4 == 3) {
source/particles/management/src/G4ParticlePropertyMessenger.cc
+3 -3
View File
@@ -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: G4ParticlePropertyMessenger.cc,v 1.2 1999/04/13 08:00:31 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ParticlePropertyMessenger.cc,v 1.2.8.1 1999/12/07 20:49:59 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
//---------------------------------------------------------------
source/particles/management/src/G4ParticleTable.cc
+130 -33
View File
@@ -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: G4ParticleTable.cc,v 1.6 1999/05/19 15:07:18 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ParticleTable.cc,v 1.14.4.1 1999/12/07 20:49:59 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// class G4ParticleTable
//
@@ -21,7 +21,13 @@
// added dictionary for encoding 24 Sep., 98 H.Kurashige
// fixed bugs in destruction of IonTable 08 Nov.,98 H.Kurashige
// commented out G4cout/G4cout in the constructor 10 Nov.,98 H.Kurashige
// --------------------------------
// modified destructor for STL interface 18 May 1999
// fixed some improper codings 08 Apr., 99 H.Kurashige
// modified FindIon/GetIon methods 17 AUg., 99 H.Kurashige
// implement new version for using STL map instaed of RW PtrHashedDictionary
// 28 ct., 99 H.Kurashige
#include "G4ios.hh"
#include "globals.hh"
@@ -31,15 +37,24 @@
#include "G4IonTable.hh"
#include "G4ShortLivedTable.hh"
#ifndef G4USE_STL
const G4int G4ParticleTableDefaultBucket = 32;
const G4int G4ParticleTableMaxInABucket = 64;
#endif
G4ParticleTable::G4ParticleTable():verboseLevel(0),fParticleMessenger(0)
////////////////////
G4ParticleTable::G4ParticleTable():verboseLevel(0),fParticleMessenger(0),noName(" ")
{
#ifdef G4USE_STL
fDictionary = new G4PTblDictionary();
fIterator = new G4PTblDicIterator( *fDictionary );
fEncodingDictionary = new G4PTblEncodingDictionary();
#else
DictionaryBucketSize = G4ParticleTableDefaultBucket;
fDictionary = new G4PTblDictionary(G4ParticleTable::HashFun,DictionaryBucketSize);
fIterator = new G4PTblDicIterator( *fDictionary );
fEncodingDictionary = new G4PTblEncodingDictionary(G4ParticleTable::EncodingHashFun,DictionaryBucketSize);
#endif
// Ion Table
fIonTable = new G4IonTable();
@@ -49,29 +64,38 @@ G4ParticleTable::G4ParticleTable():verboseLevel(0),fParticleMessenger(0)
}
////////////////////
G4ParticleTable::~G4ParticleTable()
{
if(fDictionary)
{
fDictionary->clear();
delete fDictionary;
}
delete fIterator;
if (fParticleMessenger!=0) delete fParticleMessenger;
// delete Short Lived table and contents
if (fShortLivedTable!=0) delete fShortLivedTable;
fShortLivedTable =0;
//delete Ion Table and contents
if (fIonTable!=0) delete fIonTable;
fIonTable =0;
// delete dictionary for encoding
if (fEncodingDictionary!=0){
fEncodingDictionary -> clear();
delete fEncodingDictionary;
fEncodingDictionary =0;
}
//delete Ion Table and contents
if (fIonTable!=0) delete fIonTable;
// delete Short Lived table and contents
if (fShortLivedTable!=0) delete fShortLivedTable;
if(fDictionary){
fDictionary->clear();
delete fDictionary;
fDictionary =0;
if (fIterator!=0 )delete fIterator;
fIterator =0;
}
if (fParticleMessenger!=0) delete fParticleMessenger;
fParticleMessenger =0;
}
////////////////////
G4ParticleTable::G4ParticleTable(const G4ParticleTable &right)
{
G4Exception("you call copy constructor of G4ParticleTable");
@@ -79,9 +103,12 @@ G4ParticleTable::G4ParticleTable(const G4ParticleTable &right)
fIterator = new G4PTblDicIterator(*fDictionary);
}
// Static class variable: ptr to single instance of class
G4ParticleTable* G4ParticleTable::fgParticleTable =0;
////////////////////
G4ParticleTable* G4ParticleTable::GetParticleTable()
{
static G4ParticleTable theParticleTable;
@@ -91,6 +118,7 @@ G4ParticleTable* G4ParticleTable::GetParticleTable()
return fgParticleTable;
}
////////////////////
G4UImessenger* G4ParticleTable::CreateMessenger()
{
if (fParticleMessenger== 0) {
@@ -100,6 +128,7 @@ G4UImessenger* G4ParticleTable::CreateMessenger()
return fParticleMessenger;
}
////////////////////
void G4ParticleTable::DeleteMessenger()
{
if (fParticleMessenger!= 0) {
@@ -111,6 +140,7 @@ void G4ParticleTable::DeleteMessenger()
}
}
////////////////////
void G4ParticleTable::RemoveAllParticles()
{
@@ -140,15 +170,18 @@ void G4ParticleTable::RemoveAllParticles()
fEncodingDictionary = 0;
}
// delete G4String objects for key
// delete dictionary
if (fDictionary)
{
if (fIterator!=0 )delete fIterator;
fIterator =0;
fDictionary->clear();
delete fDictionary;
fDictionary = 0;
}
}
////////////////////
G4ParticleDefinition* G4ParticleTable::Insert(G4ParticleDefinition *particle)
{
@@ -160,7 +193,9 @@ G4ParticleDefinition* G4ParticleTable::Insert(G4ParticleDefinition *particle)
}
#endif
return 0;
}else {
if (contains(particle)) {
#ifdef G4VERBOSE
if (verboseLevel>0){
@@ -171,30 +206,40 @@ G4ParticleDefinition* G4ParticleTable::Insert(G4ParticleDefinition *particle)
}
#endif
return FindParticle(particle);
} else {
G4PTblDictionary *pdic = GetDictionary();
G4PTblDictionary *pdic = fDictionary;
G4PTblEncodingDictionary *pedic = fEncodingDictionary;
#ifdef G4USE_STL
(*pdic)[GetKey(particle)] = particle;
// insert into EncodingDictionary
G4int code = particle->GetPDGEncoding();
if (code !=0 ) {
(*pedic)[code] = particle;
}
#else
pdic -> insertKeyAndValue(new G4String(GetKey(particle)), particle);
// if HashDictionary get too big, rehash all of the key
if (pdic -> entries() > G4ParticleTableMaxInABucket*DictionaryBucketSize) {
DictionaryBucketSize *= 2;
pdic -> resize(DictionaryBucketSize);
G4PTblDicIterator *piter = fIterator;
piter -> reset();
DictionaryBucketSize *= 2;
pdic -> resize(DictionaryBucketSize);
G4PTblDicIterator *piter = fIterator;
piter -> reset();
}
// insert into EncodingDictionary
G4int code = particle->GetPDGEncoding();
if (code !=0 ) {
G4PTblEncodingDictionary *pedic = fEncodingDictionary;
pedic -> insertKeyAndValue(new G4int(code), particle);
pedic -> insertKeyAndValue(new G4int(code), particle);
}
#endif
// insert it in IonTable if "nucleus"
if (fIonTable->IsIon(particle) ){
fIonTable->Insert(particle);
fIonTable->Insert(particle);
}
// insert it in SHortLivedTable if "shortlived"
// insert it in ShortLivedTable if "shortlived"
if (particle->IsShortLived() ){
fShortLivedTable->Insert(particle);
}
@@ -204,8 +249,24 @@ G4ParticleDefinition* G4ParticleTable::Insert(G4ParticleDefinition *particle)
}
}
////////////////////
G4ParticleDefinition* G4ParticleTable::Remove(G4ParticleDefinition* particle)
{
#ifdef G4USE_STL
G4PTblDictionary::iterator it = fDictionary->find(GetKey(particle));
if (it != fDictionary->end()) {
fDictionary->erase(it);
// remove from EncodingDictionary
G4int code = particle->GetPDGEncoding();
if (code !=0 ) {
fEncodingDictionary->erase(fEncodingDictionary->find(code));
}
} else {
return 0;
}
#else
if (! contains(particle) ) return 0;
G4String particle_name = GetKey(particle);
@@ -216,7 +277,8 @@ G4ParticleDefinition* G4ParticleTable::Remove(G4ParticleDefinition* particle)
if (code !=0 ) {
G4PTblEncodingDictionary *pedic = fEncodingDictionary;
pedic -> remove(&code);
}
}
#endif
// remove it from IonTable if "nucleus"
if (fIonTable->IsIon(particle) ){
@@ -230,15 +292,33 @@ G4ParticleDefinition* G4ParticleTable::Remove(G4ParticleDefinition* particle)
return particle;
}
////////////////////
G4ParticleDefinition* G4ParticleTable::FindIon(G4int Z, G4int A, G4int J, G4int Q)
{
if (Z<=0) return 0;
if (A<Z) return 0;
if (J<0) return 0;
if (Q<0) Q=Z;
return fIonTable->GetIon(Z, A, J, Q);
return fIonTable->GetIon(Z, A);
}
////////////////////
G4ParticleDefinition* G4ParticleTable::GetIon(G4int Z, G4int A, G4double E)
{
if (Z<=0) return 0;
if (A<Z) return 0;
if (E<0.) return 0;
return fIonTable->GetIon(Z, A, E);
}
////////////////////
G4ParticleDefinition* G4ParticleTable::FindIon(G4int Z, G4int A, G4double E)
{
if (Z<=0) return 0;
if (A<Z) return 0;
if (E<0.) return 0;
return fIonTable->FindIon(Z, A, E);
}
////////////////////
G4ParticleDefinition* G4ParticleTable::GetParticle(G4int index)
{
if ( (index >=0) && (index < entries()) ) {
@@ -259,6 +339,14 @@ G4ParticleDefinition* G4ParticleTable::GetParticle(G4int index)
return 0;
}
////////////////////
G4ParticleDefinition* G4ParticleTable::FindParticle(const G4ParticleDefinition *particle)
{
G4String key = GetKey(particle);
return FindParticle(key);
}
////////////////////
G4ParticleDefinition* G4ParticleTable::FindParticle(G4int aPDGEncoding )
{
// check aPDGEncoding is valid
@@ -271,8 +359,16 @@ G4ParticleDefinition* G4ParticleTable::FindParticle(G4int aPDGEncoding )
return 0;
}
G4PTblEncodingDictionary *pedic = fEncodingDictionary;
G4ParticleDefinition* particle = pedic -> findValue( &aPDGEncoding );
G4PTblEncodingDictionary *pedic = fEncodingDictionary;
G4ParticleDefinition* particle =0;
#ifdef G4USE_STL
G4PTblEncodingDictionary::iterator it = pedic->find(aPDGEncoding );
if (it != pedic->end()) {
particle = (*it).second;
}
#else
particle = pedic -> findValue( &aPDGEncoding );
#endif
#ifdef G4VERBOSE
if ((particle == 0) && (verboseLevel>0) ){
@@ -282,6 +378,7 @@ G4ParticleDefinition* G4ParticleTable::FindParticle(G4int aPDGEncoding )
return particle;
}
////////////////////
void G4ParticleTable::DumpTable(const G4String &particle_name)
{
if (( particle_name == "ALL" ) || (particle_name == "all")){
source/particles/management/src/G4ParticleWithCuts.cc
+3 -3
View File
@@ -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: G4ParticleWithCuts.cc,v 1.5 1999/06/09 08:56:54 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ParticleWithCuts.cc,v 1.5.8.1 1999/12/07 20:50:00 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// --------------------------------------------------------------
source/particles/management/src/G4PhaseSpaceDecayChannel.cc
+3 -3
View File
@@ -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: G4PhaseSpaceDecayChannel.cc,v 1.3 1999/04/13 08:00:34 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4PhaseSpaceDecayChannel.cc,v 1.3.8.1 1999/12/07 20:50:00 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
source/particles/management/src/G4ShortLivedTable.cc
+40 -6
View File
@@ -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: G4ShortLivedTable.cc,v 1.2 1999/04/14 10:28:31 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ShortLivedTable.cc,v 1.7.4.1 1999/12/07 20:50:00 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// --------------------------------------------------------------
@@ -39,9 +39,19 @@ G4ShortLivedTable::G4ShortLivedTable()
G4ShortLivedTable::~G4ShortLivedTable()
{
if (fShortLivedList ==0) return;
// remove all contents in the short lived List and delete all particles
#ifdef G4USE_STL
G4ShortLivedList::iterator i;
for (i = fShortLivedList->begin(); i!= fShortLivedList->end(); ++i) {
delete (*i);
}
fShortLivedList->clear();
#else
fShortLivedList->clearAndDestroy();
#endif
delete fShortLivedList;
fShortLivedList =0;
}
G4int G4ShortLivedTable::GetVerboseLevel() const
@@ -57,7 +67,11 @@ G4bool G4ShortLivedTable::IsShortLived(G4ParticleDefinition* particle) const
void G4ShortLivedTable::Insert(G4ParticleDefinition* particle)
{
if (IsShortLived(particle)) {
#ifdef G4USE_STL
fShortLivedList->push_back(particle);
#else
fShortLivedList->insert(particle);
#endif
} else {
//#ifdef G4VERBOSE
//if (GetVerboseLevel()>0) {
@@ -71,7 +85,17 @@ void G4ShortLivedTable::Insert(G4ParticleDefinition* particle)
void G4ShortLivedTable::Remove(G4ParticleDefinition* particle)
{
if (IsShortLived(particle)) {
#ifdef G4USE_STL
G4ShortLivedList::iterator idx;
for (idx = fShortLivedList->begin(); idx!= fShortLivedList->end(); ++idx) {
if ( particle == *idx) {
fShortLivedList->erase(idx);
}
}
#else
fShortLivedList->remove(particle);
#endif
} else {
#ifdef G4VERBOSE
if (GetVerboseLevel()>0) {
@@ -85,11 +109,21 @@ void G4ShortLivedTable::Remove(G4ParticleDefinition* particle)
void G4ShortLivedTable::DumpTable(const G4String &particle_name) const
{
G4ParticleDefinition* particle;
#ifdef G4USE_STL
G4ShortLivedList::iterator idx;
for (idx = fShortLivedList->begin(); idx!= fShortLivedList->end(); ++idx) {
particle = *idx;
#else
for (G4int idx= 0; idx < fShortLivedList->entries() ; idx++) {
particle = (*fShortLivedList)(idx);
#endif
if (( particle_name == "ALL" ) || (particle_name == "all")){
((*fShortLivedList)(idx))->DumpTable();
} else if ( particle_name == ((*fShortLivedList)(idx))->GetParticleName() ) {
((*fShortLivedList)(idx))->DumpTable();
particle->DumpTable();
} else if ( particle_name == particle->GetParticleName() ) {
particle->DumpTable();
}
}
}
source/particles/management/src/G4VDecayChannel.cc
+5 -3
View File
@@ -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: G4VDecayChannel.cc,v 1.4 1999/06/16 11:42:33 kurasige Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4VDecayChannel.cc,v 1.5.6.1 1999/12/07 20:50:01 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
//
// ------------------------------------------------------------
@@ -25,6 +25,8 @@
#include "G4DecayProducts.hh"
#include "G4VDecayChannel.hh"
const G4String G4VDecayChannel::noName = " ";
G4VDecayChannel::G4VDecayChannel(const G4String &aName, G4int Verbose)
:kinematics_name(aName),
verboseLevel(Verbose),rbranch(0.0),