Files
geant4/source/materials/src/G4NistElementBuilder.cc
T
2016-06-09 15:07:44 +02:00

2465 lines
96 KiB
C++

//
// ********************************************************************
// * License and Disclaimer *
// * *
// * The Geant4 software is copyright of the Copyright Holders of *
// * the Geant4 Collaboration. It is provided under the terms and *
// * conditions of the Geant4 Software License, included in the file *
// * LICENSE and available at http://cern.ch/geant4/license . These *
// * include a list of copyright holders. *
// * *
// * Neither the authors of this software system, nor their employing *
// * institutes,nor the agencies providing financial support for this *
// * work make any representation or warranty, express or implied, *
// * regarding this software system or assume any liability for its *
// * use. Please see the license in the file LICENSE and URL above *
// * for the full disclaimer and the limitation of liability. *
// * *
// * This code implementation is the result of the scientific and *
// * technical work of the GEANT4 collaboration. *
// * By using, copying, modifying or distributing the software (or *
// * any work based on the software) you agree to acknowledge its *
// * use in resulting scientific publications, and indicate your *
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4NistElementBuilder.cc,v 1.13 2007/01/10 18:58:52 vnivanch Exp $
// GEANT4 tag $Name: geant4-08-03 $
//
// -------------------------------------------------------------------
//
// GEANT4 Class file
//
// File name: G4NistElementBuilder
//
// Author: Vladimir Ivanchenko
//
// Creation date: 23.12.2004
//
// Modifications:
// 02.05.2006 Subtract mass of atomic electrons from NIST mass (VI)
// 11.05.2006 Do not subtract mass of atomic electrons from NIST mass (VI)
// 17.10.2006 Add natiral abandances flag to element and
// use G4 units for isotope mass vector (VI)
// 10.01.2006 Add protection agains Z>101 (VI)
//
// -------------------------------------------------------------------
//
// Class Description:
//
// Element data from the NIST DB on Atomic Weights and Isotope Compositions
// http://physics.nist.gov/PhysRefData/Compositions/index.html
//
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
#include "G4NistElementBuilder.hh"
#include "G4Element.hh"
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4NistElementBuilder::G4NistElementBuilder(G4int vb):
verbose(vb), first(true)
{
Initialise();
// Atomic shells are defined only for 101 elements
limitNumElements = 101;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4NistElementBuilder::~G4NistElementBuilder()
{}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4Element* G4NistElementBuilder::FindOrBuildElement(const G4String& symb,
G4bool buildIsotopes)
{
if(first) {
if(verbose > 0) {
G4cout << "### NIST DataBase for Elements is used" << G4endl;
}
first = false;
}
G4int Z = 0;
G4Element* elm = 0;
do {Z++;} while (Z<limitNumElements && !(symb == elmSymbol[Z]));
if(Z<maxNumElements) elm = FindOrBuildElement(Z, buildIsotopes);
return elm;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4Element* G4NistElementBuilder::FindOrBuildElement(G4int Z,
G4bool buildIsotopes)
{
// already existing in G4ElementTable ?
//
const G4ElementTable* theElementTable = G4Element::GetElementTable();
size_t nelm = theElementTable->size();
G4Element* anElement = 0;
if (nelm>0) {
for(size_t i=0; i<nelm; i++) {
G4int iz = G4int(((*theElementTable)[i])->GetZ());
if (iz == Z) {
anElement = (*theElementTable)[i];
break;
}
}
}
// if not, build it
//
if (!anElement) anElement = BuildElement(Z, buildIsotopes);
return anElement;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4Element* G4NistElementBuilder::BuildElement(G4int Z, G4bool buildIsotopes)
{
G4Element* theElement = 0;
if(Z<1 || Z>limitNumElements) return theElement;
G4double Zeff = (G4double)Z;
G4double Aeff = atomicMass[Z];
if (verbose > 1) {
G4cout << "G4NistElementBuilder: Build Element <" << elmSymbol[Z]
<< "> Z= " << Zeff
<< " A= " << Aeff;
if(buildIsotopes) G4cout << " with natural isotope composition" << G4endl;
else G4cout << " isotopes are not built" << G4endl;
}
//build Element with its Isotopes
//
if (buildIsotopes) {
G4int nc = nIsotopes[Z];
G4int n0 = nFirstIsotope[Z];
G4int idx = idxIsotopes[Z];
std::vector<G4Isotope*> iso;
G4Isotope* ist;
for (G4int i=0; i<nc; i++) {
if (relAbundance[idx + i] > 0.0) {
ist = new G4Isotope(elmSymbol[Z],Z, n0 + i,
massIsotopes[idx + i]*gram/mole);
iso.push_back(ist);
}
}
G4int ni = iso.size();
G4double w;
theElement = new G4Element(elmSymbol[Z],elmSymbol[Z],ni);
for(G4int j=0; j<ni; j++) {
w = relAbundance[idx + (iso[j])->GetN() - n0];
ist = iso[j];
theElement->AddIsotope(ist, w);
}
}
//build Element without Isotopes
//
else {
theElement = new G4Element(elmSymbol[Z],elmSymbol[Z],Zeff,Aeff*gram/mole);
}
theElement->SetNaturalAbandancesFlag(buildIsotopes);
return theElement;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
void G4NistElementBuilder::PrintElement(G4int Z)
{
G4int imin = Z;
G4int imax = Z+1;
if (Z == 0) {
imin = 1;
imax = maxNumElements;
}
for(G4int i=imin; i<imax; i++) {
G4int nc = nIsotopes[i];
G4cout << "Nist Element: <" << elmSymbol[i]
<< "> Z= " << i
<< " Aeff(amu)= " << atomicMass[i] << " "
<< nc << " isotopes:"
<< G4endl;
if(verbose > 1) {
G4int j;
G4int idx = idxIsotopes[i];
G4int n0 = nFirstIsotope[i];
G4cout << " N: ";
for(j=0; j<nc; j++) {G4cout << n0 + j << " ";}
G4cout << G4endl;
G4cout << " mass(amu): ";
for(j=0; j<nc; j++) {G4cout << massIsotopes[idx + j] << " ";}
G4cout << G4endl;
G4cout << " abanbance: ";
for(j=0; j<nc; j++) {G4cout << relAbundance[idx + j] << " ";}
G4cout << G4endl;
}
}
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
void G4NistElementBuilder::AddElement(const G4String& name, G4int Z, G4int nc,
const G4int& N, const G4double& A,
const G4double& sA, const G4double& W)
{
if (verbose > 1)
G4cout << "AddElement " << name << " Z= " << Z << " nc= " << nc << G4endl;
if (Z >= maxNumElements) {
G4cout << "G4NistElementBuilder::AddElement: Warning! Z= " << Z
<< " is too big" << G4endl;
return;
}
if (index >= maxAbundance) {
G4cout << "G4NistElementBuilder::AddElement: Warning! index= " << index
<< " is too big" << G4endl;
return;
}
elmSymbol[Z] = name;
atomicMass[Z] = 0.0;
idxIsotopes[Z] = index;
nIsotopes[Z] = nc;
nFirstIsotope[Z] = (&N)[0];
G4double ww = 0.0;
G4double www;
size_t nm = nc;
// G4double delm = G4double(Z)*electron_mass_c2/amu_c2;
for(size_t i=0; i<nm; i++) {
www = 0.01*(&W)[i];
massIsotopes[index] = (&A)[i]; // - delm;
sigMass[index] = (&sA)[i];
relAbundance[index] = www;
atomicMass[Z] += www*(&A)[i];
ww += www;
index++;
}
if(ww != 1.0) {
G4int idx = idxIsotopes[Z];
atomicMass[Z] /= ww;
for(G4int j=0; j<nc; j++) {relAbundance[idx + j] /= ww;}
}
if (verbose > 0) PrintElement(Z);
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
void G4NistElementBuilder::Initialise()
{
index = 0;
// Z = 1 ---------------------------------------------------------------------
int HN[6] =
{1, 2, 3, 4, 5, 6};
double HA[6] =
{1.00783, 2.0141, 3.01605, 4.02783, 5.03954, 6.04494};
double HS[6] =
{4, 4, 11, 12, 102, 28};
double HW[6] =
{99.9885, 0.0115, 0, 0, 0, 0};
AddElement("H", 1, 6, *HN , *HA , *HS , *HW);
// Z = 2 ---------------------------------------------------------------------
int HeN[8] =
{3, 4, 5, 6, 7, 8, 9, 10};
double HeA[8] =
{3.01603, 4.0026, 5.01222, 6.01889, 7.02803, 8.03392, 9.04382, 10.0524};
double HeS[8] =
{9, 10, 50, 11, 30, 8, 70, 80};
double HeW[8] =
{0.000137, 99.9999, 0, 0, 0, 0, 0, 0};
AddElement("He", 2, 8, *HeN , *HeA , *HeS , *HeW);
// Z = 3 ---------------------------------------------------------------------
int LiN[9] =
{4, 5, 6, 7, 8, 9, 10, 11, 12};
double LiA[9] =
{4.02718, 5.01254, 6.01512, 7.016, 8.02249, 9.02679, 10.0355, 11.0438,
12.0538};
double LiS[9] =
{23, 50, 5, 5, 5, 21, 16, 29, 107};
double LiW[9] =
{0, 0, 7.59, 92.41, 0, 0, 0, 0, 0};
AddElement("Li", 3, 9, *LiN , *LiA , *LiS , *LiW);
// Z = 4 ---------------------------------------------------------------------
int BeN[10] =
{5, 6, 7, 8, 9, 10, 11, 12, 13, 14};
double BeA[10] =
{5.04079, 6.01973, 7.01693, 8.00531, 9.01218, 10.0135, 11.0217, 12.0269,
13.0361, 14.0428};
double BeS[10] =
{429, 6, 5, 4, 4, 4, 7, 16, 54, 12};
double BeW[10] =
{0, 0, 0, 0, 100, 0, 0, 0, 0, 0};
AddElement("Be", 4, 10, *BeN , *BeA , *BeS , *BeW);
// Z = 5 ---------------------------------------------------------------------
int BN[13] =
{7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19};
double BA[13] =
{7.02992, 8.02461, 9.01333, 10.0129, 11.0093, 12.0144, 13.0178, 14.0254,
15.0311, 16.0398, 17.0469, 18.0562, 19.0637};
double BS[13] =
{80, 12, 11, 4, 5, 15, 12, 23, 24, 60, 15, 86, 43};
double BW[13] =
{0, 0, 0, 19.9, 80.1, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("B", 5, 13, *BN , *BA , *BS , *BW);
// Z = 6 ---------------------------------------------------------------------
int CN[15] =
{8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22};
double CA[15] =
{8.03768, 9.03104, 10.0169, 11.0114, 12. , 13.0034, 14.0032, 15.0106,
16.0147, 17.0226, 18.0268, 19.0353, 20.0403, 21.0493, 22.0565};
double CS[15] =
{25, 23, 4, 10, 0, 10, 4, 9, 4, 19, 30, 12, 22, 54, 97};
double CW[15] =
{0, 0, 0, 0, 98.93, 1.07, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("C", 6, 15, *CN , *CA , *CS , *CW);
// Z = 7 ---------------------------------------------------------------------
int NN[15] =
{10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24};
double NA[15] =
{10.0426, 11.0268, 12.0186, 13.0057, 14.0031, 15.0001, 16.0061, 17.0084,
18.0141, 19.017 , 20.0234, 21.0271, 22.0344, 23.0405, 24.0505};
double NS[15] =
{43, 19, 11, 29, 9, 9, 28, 16, 21, 18, 60, 10, 21, 76, 54};
double NW[15] =
{0, 0, 0, 0, 99.632, 0.368, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("N", 7, 15, *NN , *NA , *NS , *NW);
// Z = 8 ---------------------------------------------------------------------
int ON[15] =
{12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26};
double OA[15] =
{12.0344, 13.0248, 14.0086, 15.0031, 15.9949, 16.9991, 17.9992, 19.0036,
20.0041, 21.0087, 22.01 , 23.0157, 24.0204, 25.0291, 26.0377};
double Os[15] =
{20, 10, 8, 5, 15, 22, 9, 3, 13, 13, 60, 11, 33, 40, 46};
double OW[15] =
{0, 0, 0, 0, 99.757, 0.038, 0.205, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("O", 8, 15, *ON , *OA , *Os , *OW);
// Z = 9 ---------------------------------------------------------------------
int FN[16] =
{14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29};
double FA[16] =
{14.0361, 15.018 , 16.0115, 17.0021, 18.0009, 18.9984, 20 , 20.9999,
22.003 , 23.0036, 24.0081, 25.0121, 26.0196, 27.0269, 28.0357, 29.0433};
double FS[16] =
{43, 14, 9, 27, 6, 7, 9, 19, 13, 90, 70, 80, 13, 45, 55, 62};
double FW[16] =
{0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("F", 9, 16, *FN , *FA , *FS , *FW);
// Z = 10 --------------------------------------------------------------------
int NeN[17] =
{16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32};
double NeA[17] =
{16.0258, 17.0177, 18.0057, 19.0019, 19.9924, 20.9938, 21.9914, 22.9945,
23.9936, 24.9978, 26.0005, 27.0076, 28.0121, 29.0193, 30.0239, 31.0331,
32.0399};
double NeS[17] =
{22, 50, 16, 6, 20, 4, 23, 26, 11, 50, 60, 10, 12, 32, 88, 97, 94};
double NeW[17] =
{0, 0, 0, 0, 90.48, 0.27, 9.25, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ne", 10, 17, *NeN , *NeA , *NeS , *NeW);
// Z = 11 --------------------------------------------------------------------
int NaN[18] =
{18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35};
double NaA[18] =
{18.0272, 19.0139, 20.0073, 20.9977, 21.9944, 22.9898, 23.991 , 24.99 ,
25.9926, 26.994 , 27.9989, 29.0028, 30.0092, 31.0136, 32.0196, 33.0274,
34.0349, 35.0442};
double NaS[18] =
{43, 13, 7, 8, 5, 23, 23, 13, 15, 40, 80, 10, 10, 18, 52, 160, 113, 166};
double NaW[18] =
{0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Na", 11, 18, *NaN , *NaA , *NaS , *NaW);
// Z = 12 --------------------------------------------------------------------
int MgN[18] =
{20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37};
double MgA[18] =
{20.0189, 21.0117, 21.9996, 22.9941, 23.985 , 24.9858, 25.9826, 26.9843,
27.9839, 28.9886, 29.9905, 30.9965, 31.9992, 33.0056, 34.0091, 35.0175,
36.0224, 37.0312};
double MgS[18] =
{29, 18, 15, 13, 20, 20, 21, 21, 22, 30, 70, 80, 10, 16, 28, 47, 97, 97};
double MgW[18] =
{0, 0, 0, 0, 78.99, 10, 11.01, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Mg", 12, 18, *MgN , *MgA , *MgS , *MgW);
// Z = 13 --------------------------------------------------------------------
int AlN[19] =
{21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39};
double AlA[19] =
{21.028 , 22.0195, 23.0073, 23.9999, 24.9904, 25.9869, 26.9815, 27.9819,
28.9804, 29.983 , 30.9839, 31.9881, 32.9909, 33.9969, 34.9999, 36.0063,
37.0103, 38.0169, 39.0219};
double AlS[19] =
{32, 10, 27, 4, 7, 21, 14, 15, 13, 15, 22, 90, 70, 10, 15, 29, 58, 60, 64};
double AlW[19] =
{0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Al", 13, 19, *AlN , *AlA , *AlS , *AlW);
// Z = 14 --------------------------------------------------------------------
int SiN[21] =
{22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
41, 42};
double SiA[21] =
{22.0345, 23.0255, 24.0115, 25.0041, 25.9923, 26.9867, 27.9769, 28.9765,
29.9738, 30.9754, 31.9741, 32.978 , 33.9786, 34.9846, 35.9867, 36.993 ,
37.996 , 39.0023, 40.0058, 41.0127, 42.0161};
double SiS[21] =
{22, 21, 21, 11, 3, 17, 20, 3, 5, 7, 23, 17, 15, 40, 11, 13, 29, 43, 54, 64,
75};
double SiW[21] =
{0, 0, 0, 0, 0, 0, 92.2297, 4.6832, 3.0872, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0};
AddElement("Si", 14, 21, *SiN , *SiA , *SiS , *SiW);
// Z = 15 --------------------------------------------------------------------
int PN[23] =
{24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42,
43, 44, 45, 46};
double PA[23] =
{24.0343, 25.0203, 26.0118, 26.9992, 27.9923, 28.9818, 29.9783, 30.9738,
31.9739, 32.9717, 33.9736, 34.9733, 35.9783, 36.9796, 37.9845, 38.9864,
39.9911, 40.9948, 42.0001, 43.0033, 44.0099, 45.0151, 46.0238};
double PS[23] =
{54, 21, 21, 40, 4, 8, 4, 20, 20, 12, 5, 20, 14, 40, 15, 16, 21, 50, 54, 54,
75, 86, 97};
double PW[23] =
{0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("P", 15, 23, *PN , *PA , *PS , *PW);
// Z = 16 --------------------------------------------------------------------
int SN[24] =
{26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44,
45, 46, 47, 48, 49};
double SA[24] =
{26.0279, 27.0188, 28.0044, 28.9966, 29.9849, 30.9796, 31.9721, 32.9715,
33.9679, 34.969 , 35.9671, 36.9711, 37.9712, 38.9751, 39.9755, 40.98 ,
41.9815, 42.9866, 43.9883, 44.9948, 45.9996, 47.0076, 48.013 , 49.022 };
double SS[24] =
{32, 22, 17, 50, 3, 16, 12, 12, 11, 10, 25, 27, 8, 50, 25, 23, 35, 90, 54,
64, 75, 86, 97, 107};
double SW[24] =
{0, 0, 0, 0, 0, 0, 94.93, 0.76, 4.29, 0, 0.02, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0};
AddElement("S", 16, 24, *SN , *SA , *SS , *SW);
// Z = 17 --------------------------------------------------------------------
int ClN[24] =
{28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46,
47, 48, 49, 50, 51};
double ClA[24] =
{28.0285, 29.0141, 30.0048, 30.9924, 31.9857, 32.9775, 33.9738, 34.9689,
35.9683, 36.9659, 37.968 , 38.968 , 39.9704, 40.9706, 41.9732, 42.9742,
43.9785, 44.9797, 45.9841, 46.9879, 47.9948, 48.9999, 50.0077, 51.0135};
double ClS[24] =
{54, 21, 21, 50, 7, 6, 13, 4, 8, 5, 12, 19, 30, 70, 12, 17, 24, 70, 54,
64, 75, 86, 97, 107};
double ClW[24] =
{0, 0, 0, 0, 0, 0, 0, 75.78, 0, 24.22, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0};
AddElement("Cl", 17, 24, *ClN , *ClA , *ClS , *ClW);
// Z = 18 --------------------------------------------------------------------
int ArN[24] =
{30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, 53};
double ArA[24] =
{30.0216, 31.0121, 31.9977, 32.9899, 33.9803, 34.9753, 35.9675, 36.9668,
37.9627, 38.9643, 39.9624, 40.9645, 41.9631, 42.9657, 43.9654, 44.9681,
45.9681, 46.9722, 47.9751, 48.9822, 49.9859, 50.9932, 51.9982, 53.0062};
double ArS[24] =
{32, 22, 50, 30, 3, 8, 27, 3, 5, 5, 3, 7, 40, 80, 22, 60, 40, 11, 32, 54, 75,
75, 97, 107};
double ArW[24] =
{0, 0, 0, 0, 0, 0, 0.3365, 0, 0.0632, 0, 99.6003, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0};
AddElement("Ar", 18, 24, *ArN , *ArA , *ArS , *ArW);
// Z = 19 --------------------------------------------------------------------
int KN[24] =
{32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50,
51, 52, 53, 54, 55};
double KA[24] =
{32.0219, 33.0073, 33.9984, 34.988 , 35.9813, 36.9734, 37.9691, 38.9637,
39.964 , 40.9618, 41.9624, 42.9607, 43.9616, 44.9607, 45.962 , 46.9617,
47.9655, 48.9674, 49.9728, 50.9764, 51.9826, 52.9871, 53.994 , 54.9994};
double KS[24] =
{54, 21, 32, 21, 8, 29, 8, 3, 29, 28, 3, 10, 40, 11, 17, 9, 26, 80, 30, 54,
75, 75, 97, 107};
double KW[24] =
{0, 0, 0, 0, 0, 0, 0, 93.2581, 0.0117, 6.7302, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0};
AddElement("K", 19, 24, *KN , *KA , *KS , *KW);
// Z = 20 --------------------------------------------------------------------
int CaN[24] =
{34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52,
53, 54, 55, 56, 57};
double CaA[24] =
{34.0141, 35.0048, 35.9931, 36.9859, 37.9763, 38.9707, 39.9626, 40.9623,
41.9586, 42.9588, 43.9555, 44.9562, 45.9537, 46.9545, 47.9525, 48.9557,
49.9575, 50.9615, 51.9651, 52.9701, 53.9747, 54.9806, 55.9858, 56.9924};
double CaS[24] =
{32, 70, 40, 24, 5, 19, 3, 4, 4, 5, 9, 10, 25, 25, 4, 4, 10, 10, 50, 54, 75,
75, 97, 107};
double CaW[24] =
{0, 0, 0, 0, 0, 0, 96.941, 0, 0.647, 0.135, 2.086, 0, 0.004, 0, 0.187, 0, 0,
0, 0, 0, 0, 0, 0, 0};
AddElement("Ca", 20, 24, *CaN , *CaA , *CaS , *CaW);
// Z = 21 --------------------------------------------------------------------
int ScN[24] =
{36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54,
55, 56, 57, 58, 59};
double ScA[24] =
{36.0149, 37.0031, 37.9947, 38.9848, 39.978, 40.9693, 41.9655, 42.9612,
43.9594, 44.9559, 45.9552, 46.9524, 47.9522, 48.95 , 49.9522, 50.9536,
51.9567, 52.9592, 53.963 , 54.9674, 55.9727, 56.977, 57.9831, 58.988 };
double ScS[24] =
{54, 32, 32, 26, 4, 3, 4, 20, 19, 12, 12, 22, 6, 4, 17, 22, 25, 32, 50, 110,
75, 75, 86, 97};
double ScW[24] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Sc", 21, 24, *ScN , *ScA , *ScS , *ScW);
// Z = 22 --------------------------------------------------------------------
int TiN[24] =
{38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61};
double TiA[24] =
{38.0098, 39.0013, 39.9905, 40.9831, 41.973 , 42.9685, 43.9597, 44.9581,
45.9526, 46.9518, 47.9479, 48.9479, 49.9448, 50.9466, 51.9469, 52.9497,
53.9509, 54.9551, 55.958 , 56.9629, 57.9661, 58.972 , 59.9756, 60.982 };
double TiS[24] =
{27, 11, 17, 40, 6, 7, 8, 13, 12, 10, 10, 10, 11, 14, 8, 11, 25, 26, 30, 100,
75, 75, 86, 97};
double TiW[24] =
{0, 0, 0, 0, 0, 0, 0, 0, 8.25, 7.44, 73.72, 5.41, 5.18, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0};
AddElement("Ti", 22, 24, *TiN , *TiA , *TiS , *TiW);
// Z = 23 --------------------------------------------------------------------
int VN[24] =
{40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58,
59, 60, 61, 62, 63};
double VA[24] =
{40.0111, 40.9997, 41.9912, 42.9806, 43.9744, 44.9658, 45.9602, 46.9549,
47.9523, 48.9485, 49.9472, 50.944 , 51.9448, 52.9443, 53.9464, 54.9472,
55.9504, 56.9524, 57.9567, 58.9593, 59.9645, 60.9674, 61.9731, 62.9768};
double VS[24] =
{54, 27, 21, 25, 90, 18, 16, 12, 28, 14, 14, 14, 14, 4, 16, 11, 26, 27, 28,
35, 60, 75, 75, 97};
double VW[24] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.25, 99.75, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0};
AddElement("V", 23, 24, *VN , *VA , *VS , *VW);
// Z = 24 --------------------------------------------------------------------
int CrN[24] =
{42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60,
61, 62, 63, 64, 65};
double CrA[24] =
{42.0064, 42.9977, 43.9855, 44.9792, 45.9684, 46.9629, 47.954 , 48.9513,
49.946 , 50.9448, 51.9405, 52.9407, 53.9389, 54.9408, 55.9406, 56.9438,
57.9442, 58.9486, 59.9497, 60.9541, 61.9558, 62.9619, 63.9642, 64.9704};
double CrS[24] =
{32, 90, 14, 11, 22, 15, 8, 28, 14, 14, 15, 15, 15, 16, 10, 10, 26, 27, 28,
30, 40, 75, 75, 97};
double CrW[24] =
{0, 0, 0, 0, 0, 0, 0, 0, 4.345, 0, 83.789, 9.501, 2.365, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0};
AddElement("Cr", 24, 24, *CrN , *CrA , *CrS , *CrW);
// Z = 25 --------------------------------------------------------------------
int MnN[24] =
{44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62,
63, 64, 65, 66, 67};
double MnA[24] =
{44.0069, 44.9945, 45.9867, 46.9761, 47.9689, 48.9596, 49.9542, 50.9482,
51.9456, 52.9413, 53.9404, 54.938 , 55.9389, 56.9383, 57.94 , 58.9404,
59.9432, 60.9445, 61.948 , 62.9498, 63.9537, 64.9561, 65.9608, 66.9638};
double MnS[24] =
{54, 32, 12, 17, 80, 26, 15, 14, 25, 15, 18, 14, 15, 4, 30, 30, 29, 28, 28,
30, 35, 60, 75, 86};
double MnW[24] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Mn", 25, 24, *MnN , *MnA , *MnS , *MnW);
// Z = 26 --------------------------------------------------------------------
int FeN[25] =
{45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
64, 65, 66, 67, 68, 69};
double FeA[25] =
{45.0146, 46.0008, 46.9929, 47.9806, 48.9736, 49.963 , 50.9568, 51.9481,
52.9453, 53.9396, 54.9383, 55.9349, 56.9354, 57.9333, 58.9349, 59.9341,
60.9367, 61.9368, 62.9401, 63.9409, 64.9449, 65.946 , 66.95 , 67.9525,
68.9577};
double FeS[25] =
{43, 38, 28, 11, 17, 60, 16, 11, 23, 14, 14, 15, 15, 15, 15, 4, 22, 16, 20,
30, 30, 35, 50, 75, 86};
double FeW[25] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 5.845, 0, 91.754, 2.119, 0.282, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0};
AddElement("Fe", 26, 25, *FeN , *FeA , *FeS , *FeW);
// Z = 27 --------------------------------------------------------------------
int CoN[25] =
{48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66,
67, 68, 69, 70, 71, 72};
double CoA[25] =
{48.0018, 48.9897, 49.9815, 50.9707, 51.9636, 52.9542, 53.9485, 54.942,
55.9398, 56.9363, 57.9358, 58.9332, 59.9338, 60.9325, 61.9341, 62.9336,
63.9358, 64.9365, 65.9398, 66.9406, 67.9444, 68.9452, 69.9498, 70.9517,
71.9564};
double CoS[25] =
{43, 28, 18, 16, 70, 19, 14, 15, 26, 15, 19, 15, 15, 17, 22, 22, 22, 14, 29,
30, 35, 40, 75, 86, 86};
double CoW[25] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Co", 27, 25, *CoN , *CoA , *CoS , *CoW);
// Z = 28 --------------------------------------------------------------------
int NiN[29] =
{50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68,
69, 70, 71, 72, 73, 74, 75, 76, 77, 78};
double NiA[29] =
{49.9959, 50.9877, 51.9757, 52.9685, 53.9579, 54.9513, 55.9421, 56.9398,
57.9353, 58.9344, 59.9308, 60.9311, 61.9283, 62.9297, 63.928 , 64.9301,
65.9291, 66.9316, 67.9318, 68.9352, 69.9361, 70.94 , 71.9413, 72.9461,
73.9479, 74.953 , 75.9553, 76.9608, 77.9638};
double NiS[29] =
{28, 28, 90, 17, 50, 12, 12, 3, 15, 15, 15, 15, 15, 15, 16, 16, 17, 20, 18,
15, 35, 40, 50, 64, 75, 86, 97, 107, 118};
double NiW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 68.0769, 0, 26.2231, 1.1399, 3.6345, 0, 0.9256, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ni", 28, 29, *NiN , *NiA , *NiS , *NiW);
// Z = 29 --------------------------------------------------------------------
int CuN[29] =
{52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70,
71, 72, 73, 74, 75, 76, 77, 78, 79, 80};
double CuA[29] =
{51.9972, 52.9856, 53.9767, 54.9661, 55.9586, 56.9492, 57.9445, 58.9395,
59.9374, 60.9335, 61.9326, 62.9296, 63.9298, 64.9278, 65.9289, 66.9278,
67.9296, 68.9294, 69.9324, 70.9326, 71.9355, 72.9365, 73.9402, 74.9417,
75.946 , 76.948 , 77.9528, 78.9553, 79.9619};
double CuS[29] =
{28, 28, 23, 32, 15, 17, 27, 18, 27, 19, 4, 15, 15, 19, 19, 9, 50, 9, 16, 40,
21, 32, 43, 54, 64, 75, 86, 97, 97};
double CuW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 69.17, 0, 30.83, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0};
AddElement("Cu", 29, 29, *CuN , *CuA , *CuS , *CuW);
// Z = 30 --------------------------------------------------------------------
int ZnN[29] =
{54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72,
73, 74, 75, 76, 77, 78, 79, 80, 81, 82};
double ZnA[29] =
{53.993 , 54.984 , 55.9724, 56.9649, 57.9546, 58.9493, 59.9418, 60.9395,
61.9343, 62.9332, 63.9291, 64.9292, 65.926 , 66.9271, 67.9248, 68.9266,
69.9253, 70.9277, 71.9269, 72.9298, 73.9295, 74.9329, 75.9334, 76.9371,
77.9386, 78.9427, 79.9444, 80.9505, 81.9548};
double ZnS[29] =
{43, 27, 28, 15, 50, 40, 11, 18, 11, 23, 18, 18, 16, 17, 17, 18, 4, 11, 7,
40, 50, 80, 13, 14, 17, 29, 18, 43, 43};
double ZnW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 48.63, 0, 27.9, 4.1, 18.75, 0, 0.62, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Zn", 30, 29, *ZnN , *ZnA , *ZnS , *ZnW);
// Z = 31 --------------------------------------------------------------------
int GaN[29] =
{56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74,
75, 76, 77, 78, 79, 80, 81, 82, 83, 84};
double GaA[29] =
{55.9949, 56.9829, 57.9742, 58.9634, 59.9571, 60.9492, 61.9442, 62.9391,
63.9368, 64.9327, 65.9316, 66.9282, 67.928 , 68.9256, 69.926 , 70.9247,
71.9264, 72.9252, 73.9269, 74.9265, 75.9289, 76.9293, 77.9317, 78.9329,
79.9366, 80.9377, 81.9432, 82.9469, 83.9523};
double GaS[29] =
{28, 28, 23, 18, 12, 21, 30, 11, 4, 19, 4, 19, 22, 3, 3, 19, 22, 7, 80, 7, 10,
60, 90, 13, 13, 21, 32, 54, 64};
double GaW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 60.108, 0, 39.892, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0};
AddElement("Ga", 31, 29, *GaN , *GaA , *GaS , *GaW);
// Z = 32 --------------------------------------------------------------------
int GeN[29] =
{58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76,
77, 78, 79, 80, 81, 82, 83, 84, 85, 86};
double GeA[29] =
{57.991 , 58.9817, 59.9702, 60.9638, 61.9547, 62.9496, 63.9416, 64.9394,
65.9339, 66.9327, 67.9281, 68.928 , 69.9243, 70.925 , 71.9221, 72.9235,
73.9212, 74.9229, 75.9214, 76.9235, 77.9229, 78.9254, 79.9254, 80.9288,
81.9296, 82.9345, 83.9373, 84.9427, 85.9463};
double GeS[29] =
{34, 30, 25, 32, 15, 21, 27, 11, 30, 5, 7, 3, 19, 19, 16, 16, 16, 16, 16, 20,
4, 10, 25, 13, 26, 32, 43, 54, 64};
double GeW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 20.84, 0, 27.54, 7.73, 36.28, 0, 7.61,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ge", 32, 29, *GeN , *GeA , *GeS , *GeW);
// Z = 33 --------------------------------------------------------------------
int AsN[30] =
{60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78,
79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89};
double AsA[30] =
{59.9931, 60.9806, 61.9732, 62.9637, 63.9576, 64.9495, 65.9444, 66.9392,
67.9368, 68.9323, 69.9309, 70.9271, 71.9268, 72.9238, 73.9239, 74.9216,
75.9224, 76.9206, 77.9218, 78.9209, 79.9226, 80.9221, 81.9245, 82.925 ,
83.9291, 84.9318, 85.9362, 86.9396, 87.9446, 88.9492};
double AsS[30] =
{64, 64, 32, 54, 38, 42, 22, 11, 11, 30, 50, 5, 5, 4, 24, 18, 18, 23, 11, 6,
23, 6, 21, 24, 32, 32, 43, 54, 64, 64};
double AsW[30] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0};
AddElement("As", 33, 30, *AsN , *AsA , *AsS , *AsW);
// Z = 34 --------------------------------------------------------------------
int SeN[28] =
{65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83,
84, 85, 86, 87, 88, 89, 90, 91, 92};
double SeA[28] =
{64.9647, 65.9552, 66.9501, 67.9419, 68.9396, 69.9335, 70.9323, 71.9271,
72.9268, 73.9225, 74.9225, 75.9192, 76.9199, 77.9173, 78.9185, 79.9165,
80.918 , 81.9167, 82.9191, 83.9185, 84.9222, 85.9243, 86.9285, 87.9314,
88.936 , 89.9394, 90.9454, 91.9493};
double SeS[28] =
{64, 32, 21, 32, 40, 22, 22, 13, 12, 16, 16, 16, 16, 16, 16, 20, 21, 22, 4,
16, 30, 17, 40, 50, 32, 43, 54, 64};
double SeW[28] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0.89, 0, 9.37, 7.63, 23.77, 0, 49.61, 0, 8.73,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Se", 34, 28, *SeN , *SeA , *SeS , *SeW);
// Z = 35 --------------------------------------------------------------------
int BrN[28] =
{67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85,
86, 87, 88, 89, 90, 91, 92, 93, 94};
double BrA[28] =
{66.9648, 67.9583, 68.9502, 69.9446, 70.9393, 71.9365, 72.9318, 73.9299,
74.9258, 75.9245, 76.9214, 77.9211, 78.9183, 79.9185, 80.9163, 81.9168,
82.9152, 83.9165, 84.9156, 85.9188, 86.9207, 87.9241, 88.9264, 89.9306,
90.934 , 91.9393, 92.9431, 93.9487};
double BrS[28] =
{54, 58, 34, 39, 32, 28, 14, 16, 15, 10, 3, 4, 20, 20, 3, 3, 5, 27, 21, 12,
19, 40, 60, 80, 80, 50, 32, 43};
double BrW[28] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 50.69, 0, 49.31, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0};
AddElement("Br", 35, 28, *BrN , *BrA , *BrS , *BrW);
// Z = 36 --------------------------------------------------------------------
int KrN[29] =
{69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87,
88, 89, 90, 91, 92, 93, 94, 95, 96, 97};
double KrA[29] =
{68.9653, 69.956 , 70.9505, 71.9419, 72.9389, 73.9333, 74.931 , 75.9259,
76.9247, 77.9204, 78.9201, 79.9164, 80.9166, 81.9135, 82.9141, 83.9115,
84.9125, 85.9106, 86.9134, 87.9144, 88.9176, 89.9195, 90.9234, 91.9262,
92.9313, 93.9344, 94.9398, 95.9431, 96.9486};
double KrS[29] =
{54, 43, 32, 29, 15, 60, 17, 11, 9, 7, 4, 4, 3, 28, 3, 3, 3, 12, 14, 14, 60,
20, 60, 13, 11, 32, 43, 54, 54};
double KrW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0.35, 0, 2.28, 0, 11.58, 11.49, 57, 0, 17.3, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Kr", 36, 29, *KrN , *KrA , *KrS , *KrW);
// Z = 37 --------------------------------------------------------------------
int RbN[32] =
{71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89,
90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102};
double RbA[32] =
{70.9653, 71.9591, 72.9504, 73.9445, 74.9386, 75.9351, 76.9304, 77.9281,
78.924 , 79.9225, 80.919 , 81.9182, 82.9151, 83.9144, 84.9118, 85.9112,
86.9092, 87.9113, 88.9123, 89.9148, 90.9165, 91.9197, 92.922 , 93.9264,
94.9293, 95.9343, 96.9373, 97.9417, 98.9454, 99.9499, 100.953, 101.959};
double RbS[32] =
{54, 54, 52, 77, 8, 8, 8, 8, 7, 8, 7, 8, 7, 3, 25, 25, 27, 5, 6, 9, 9, 7, 8,
9, 21, 27, 30, 40, 16, 32, 18, 54};
double RbW[32] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 72.17, 0, 27.83, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Rb", 37, 32, *RbN , *RbA , *RbS , *RbW);
// Z = 38 --------------------------------------------------------------------
int SrN[32] =
{73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91,
92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104};
double SrA[32] =
{72.966 , 73.9563, 74.9499, 75.9416, 76.9378, 77.9322, 78.9297, 79.9245,
80.9232, 81.9184, 82.9176, 83.9134, 84.9129, 85.9093, 86.9089, 87.9056,
88.9075, 89.9077, 90.9102, 91.911 , 92.914 , 93.9154, 94.9194, 95.9217,
96.9261, 97.9285, 98.9333, 99.9353, 100.941, 101.943, 102.949, 103.952};
double SrS[32] =
{64, 54, 32, 32, 16, 8, 9, 8, 8, 6, 9, 4, 4, 24, 24, 24, 24, 29, 6, 7, 8, 8,
8, 26, 20, 27, 15, 14, 13, 12, 54, 75};
double SrW[32] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.56, 0, 9.86, 7, 82.58, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Sr", 38, 32, *SrN , *SrA , *SrS , *SrW);
// Z = 39 --------------------------------------------------------------------
int YN[30] =
{77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106};
double YA[30] =
{76.9496, 77.9435, 78.9373, 79.9343, 80.9291, 81.9268, 82.9223, 83.9204,
84.9164, 85.9149, 86.9109, 87.9095, 88.9058, 89.9072, 90.9073, 91.9089,
92.9096, 93.9116, 94.9128, 95.9159, 96.9181, 97.9222, 98.9246, 99.9278,
100.93 , 101.934, 102.937, 103.941, 104.945, 105.95};
double YS[30] =
{32, 43, 48, 43, 70, 11, 50, 10, 27, 15, 28, 29, 25, 25, 3, 10, 11, 8, 8, 23,
13, 26, 26, 80, 10, 90, 32, 43, 54, 75};
double YW[30] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0};
AddElement("Y", 39, 30, *YN , *YA , *YS , *YW);
// Z = 40 --------------------------------------------------------------------
int ZrN[30] =
{79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97,
98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108};
double ZrA[30] =
{78.9492, 79.9406, 80.9368, 81.9311, 82.9287, 83.9232, 84.9215, 85.9165,
86.9148, 87.9102, 88.9089, 89.9047, 90.9056, 91.905 , 92.9065, 93.9063,
94.908 , 95.9083, 96.911 , 97.9127, 98.9165, 99.9178, 100.921, 101.923,
102.927, 103.929, 104.933, 105.936, 106.941, 107.944};
double ZrS[30] =
{43, 32, 32, 55, 10, 21, 11, 30, 9, 11, 4, 23, 23, 23, 23, 25, 25, 3, 3, 21,
21, 40, 30, 50, 12, 43, 43, 54, 64, 75};
double ZrW[30] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 51.45, 11.22, 17.15, 0, 17.38, 0, 2.8, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Zr", 40, 30, *ZrN , *ZrA , *ZrS , *ZrW);
// Z = 41 --------------------------------------------------------------------
int NbN[30] =
{81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99,
100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110};
double NbA[30] =
{80.949 , 81.9431, 82.9367, 83.9336, 84.9279, 85.925 , 86.9204, 87.918 ,
88.9135, 89.9113, 90.907 , 91.9072, 92.9064, 93.9073, 94.9068, 95.9081,
96.9081, 97.9103, 98.9116, 99.9142, 100.915, 101.918, 102.919, 103.922,
104.924, 105.928, 106.93 , 107.935, 108.938, 109.943};
double NbS[30] =
{43, 32, 34, 32, 24, 90, 70, 22, 40, 5, 3, 29, 24, 24, 20, 4, 28, 6, 14, 28,
20, 40, 70, 12, 11, 32, 43, 54, 54, 64};
double NbW[30] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0};
AddElement("Nb", 41, 30, *NbN , *NbA , *NbS , *NbW);
// Z = 42 --------------------------------------------------------------------
int MoN[31] =
{83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101,
102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113};
double MoA[31] =
{82.9487, 83.9401, 84.9366, 85.9307, 86.9273, 87.922 , 88.9195, 89.9139,
90.9118, 91.9068, 92.9068, 93.9051, 94.9058, 95.9047, 96.906 , 97.9054,
98.9077, 99.9075, 100.91 , 101.91 , 102.913, 103.914, 104.917, 105.918,
106.922, 107.924, 108.928, 109.93 , 110.935, 111.937, 112.942};
double MoS[31] =
{54, 43, 43, 47, 24, 22, 17, 7, 12, 4, 4, 20, 20, 20, 20, 20, 20, 6, 6, 22,
70, 70, 80, 23, 17, 21, 32, 43, 54, 64, 64};
double MoW[31] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 14.84, 0, 9.25, 15.92, 16.68, 9.55, 24.13, 0,
9.63, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Mo", 42, 31, *MoN , *MoA , *MoS , *MoW);
// Z = 43 --------------------------------------------------------------------
int TcN[31] =
{85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102,
103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115};
double TcA[31] =
{84.9489, 85.9429, 86.9365, 87.9328, 88.9275, 89.9236, 90.9184, 91.9153,
92.9102, 93.9097, 94.9077, 95.9079, 96.9064, 97.9072, 98.9063, 99.9077,
100.907, 101.909, 102.909, 103.911, 104.912, 105.914, 106.915, 107.918,
108.92 , 109.923, 110.925, 111.929, 112.931, 113.936, 114.938};
double TcS[31] =
{54, 32, 32, 32, 23, 26, 22, 28, 4, 5, 6, 6, 5, 4, 21, 23, 26, 10, 11, 50,
60, 15, 16, 14, 23, 43, 43, 54, 64, 64, 75};
double TcW[31] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0};
AddElement("Tc", 43, 31, *TcN , *TcA , *TcS , *TcW);
// Z = 44 --------------------------------------------------------------------
int RuN[32] =
{87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104,
105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118};
double RuA[32] =
{86.9492, 87.9404, 88.9361, 89.9298, 90.9264, 91.9201, 92.9171, 93.9114,
94.9104, 95.9076, 96.9076, 97.9053, 98.9059, 99.9042, 100.906, 101.904,
102.906, 103.905, 104.908, 105.907, 106.91 , 107.91 , 108.913, 109.914,
110.918, 111.919, 112.923, 113.924, 114.928, 115.93 , 116.935, 117.937};
double RuS[32] =
{64, 54, 54, 43, 54, 32, 90, 14, 13, 8, 9, 7, 21, 22, 22, 22, 22, 4, 4, 8,
13, 13, 70, 25, 32, 58, 54, 39, 64, 75, 86, 97};
double RuW[32] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 5.54, 0, 1.87, 12.76, 12.6, 17.06, 31.55, 0,
18.62, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ru", 44, 32, *RuN , *RuA , *RuS , *RuW);
// Z = 45 --------------------------------------------------------------------
int RhN[33] =
{89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105,
106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120,
121};
double RhA[33] =
{88.9494, 89.9429, 90.9365, 91.932 , 92.9257, 93.9217, 94.9159, 95.9145,
96.9113, 97.9107, 98.9081, 99.9081, 100.906, 101.907, 102.906, 103.907,
104.906, 105.907, 106.907, 107.909, 108.909, 109.911, 110.912, 111.915,
112.915, 113.919, 114.92 , 115.924, 116.925, 117.929, 118.931, 119.936,
120.938};
double RhS[33] =
{54, 54, 43, 43, 43, 48, 16, 14, 40, 13, 8, 22, 19, 5, 3, 3, 5, 8, 13, 11,
13, 24, 22, 54, 43, 32, 54, 54, 64, 75, 86, 86, 97};
double RhW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Rh", 45, 33, *RhN , *RhA , *RhS , *RhW);
// Z = 46 --------------------------------------------------------------------
int PdN[33] =
{91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107,
108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122,
123};
double PdA[33] =
{90.9495, 91.9404, 92.9359, 93.9288, 94.9247, 95.9182, 96.9165, 97.9127,
98.9118, 99.9085, 100.908, 101.906, 102.906, 103.904, 104.905, 105.903,
106.905, 107.904, 108.906, 109.905, 110.908, 111.907, 112.91 , 113.91 ,
114.914, 115.914, 116.918, 117.919, 118.923, 119.924, 120.928, 121.93 ,
122.934};
double PdS[33] =
{64, 54, 43, 43, 43, 16, 32, 23, 16, 12, 19, 3, 3, 5, 5, 5, 7, 4, 4, 12, 40,
19, 40, 26, 70, 60, 32, 23, 32, 43, 54, 54, 64};
double PdW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1.02, 0, 11.14, 22.33, 27.33, 0, 26.46, 0,
11.72, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Pd", 46, 33, *PdN , *PdA , *PdS , *PdW);
// Z = 47 --------------------------------------------------------------------
int AgN[34] =
{94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109,
110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124,
125, 126, 127};
double AgA[34] =
{93.9428, 94.9355, 95.9307, 96.924 , 97.9218, 98.9176, 99.9161, 100.913,
101.912, 102.909, 103.909, 104.907, 105.907, 106.905, 107.906, 108.905,
109.906, 110.905, 111.907, 112.907, 113.909, 114.909, 115.911, 116.912,
117.915, 118.916, 119.919, 120.92 , 121.923, 122.925, 123.929, 124.931,
125.934, 126.937};
double AgS[34] =
{54, 43, 43, 43, 16, 16, 80, 11, 80, 18, 7, 12, 6, 6, 6, 3, 3, 4, 18, 18, 28,
40, 50, 50, 70, 10, 80, 16, 22, 32, 43, 43, 43, 54};
double AgW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 51.839, 0, 48.161, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ag", 47, 34, *AgN , *AgA , *AgS , *AgW);
// Z = 48 --------------------------------------------------------------------
int CdN[35] =
{96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111,
112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130};
double CdA[35] =
{95.9398, 96.9349, 97.9276, 98.925 , 99.9202, 100.919, 101.915, 102.913,
103.91 , 104.909, 105.906, 106.907, 107.904, 108.905, 109.903, 110.904,
111.903, 112.904, 113.903, 114.905, 115.905, 116.907, 117.907, 118.91 ,
119.91 , 120.913, 121.913, 122.917, 123.918, 124.921, 125.922, 126.926,
127.928, 128.932, 129.934};
double CdS[35] =
{54, 43, 22, 22, 10, 16, 80, 17, 10, 12, 6, 7, 6, 4, 3, 3, 30, 30, 30, 3, 3,
4, 22, 90, 20, 90, 22, 40, 70, 70, 60, 80, 32, 43, 43};
double CdW[35] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1.25, 0, 0.89, 0, 12.49, 12.8, 24.13, 12.22,
28.73, 0, 7.49, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Cd", 48, 35, *CdN , *CdA , *CdS , *CdW);
// Z = 49 --------------------------------------------------------------------
int InN[37] =
{98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112,
113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, 134};
double InA[37] =
{97.9422, 98.9346, 99.9312, 100.927, 101.925, 102.92 , 103.918, 104.915,
105.913, 106.91 , 107.91 , 108.907, 109.907, 110.905, 111.906, 112.904,
113.905, 114.904, 115.905, 116.905, 117.906, 118.906, 119.908, 120.908,
121.91 , 122.91 , 123.913, 124.914, 125.916, 126.917, 127.92 , 128.922,
129.925, 130.927, 131.933, 132.938, 133.945};
double InS[37] =
{54, 54, 41, 32, 41, 27, 15, 19, 15, 14, 40, 6, 13, 6, 6, 4, 3, 5, 5, 6, 9,
8, 40, 29, 50, 26, 50, 30, 40, 40, 50, 14, 50, 80, 70, 43, 54};
double InW[37] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4.29, 0, 95.71, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("In", 49, 37, *InN , *InA , *InS , *InW);
// Z = 50 --------------------------------------------------------------------
int SnN[38] =
{100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114,
115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, 134, 135, 136, 137};
double SnA[38] =
{99.939 , 100.936, 101.93 , 102.928, 103.923, 104.921, 105.917, 106.916,
107.912, 108.911, 109.908, 110.908, 111.905, 112.905, 113.903, 114.903,
115.902, 116.903, 117.902, 118.903, 119.902, 120.904, 121.903, 122.906,
123.905, 124.908, 125.908, 126.91 , 127.911, 128.913, 129.914, 130.917,
131.918, 132.924, 133.928, 134.935, 135.939, 136.946};
double SnS[38] =
{46, 54, 43, 32, 16, 10, 50, 90, 50, 11, 17, 8, 5, 4, 3, 3, 3, 3, 3, 3, 27,
27, 29, 29, 15, 16, 11, 27, 29, 13, 30, 80, 28, 90, 11, 43, 54, 64};
double SnW[38] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.97, 0, 0.66, 0.34, 14.54, 7.68, 24.22,
8.59, 32.58, 0, 4.63, 0, 5.79, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Sn", 50, 38, *SnN , *SnA , *SnS , *SnW);
// Z = 51 --------------------------------------------------------------------
int SbN[37] =
{103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117,
118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, 134, 135, 136, 137, 138, 139};
double SbA[37] =
{102.94 , 103.936, 104.932, 105.929, 106.924, 107.922, 108.918, 109.917,
110.913, 111.912, 112.909, 113.909, 114.907, 115.907, 116.905, 117.906,
118.904, 119.905, 120.904, 121.905, 122.904, 123.906, 124.905, 125.907,
126.907, 127.909, 128.909, 129.912, 130.912, 131.914, 132.915, 133.921,
134.925, 135.931, 136.935, 137.941, 138.946};
double SbS[37] =
{54, 39, 17, 34, 32, 22, 20, 22, 22, 25, 24, 22, 22, 6, 10, 4, 9, 8, 24, 24,
22, 22, 3, 30, 6, 27, 23, 27, 80, 25, 80, 60, 11, 32, 43, 54, 64};
double SbW[37] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 57.21, 0, 42.79, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Sb", 51, 37, *SbN , *SbA , *SbS , *SbW);
// Z = 52 --------------------------------------------------------------------
int TeN[37] =
{106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135,
136, 137, 138, 139, 140, 141, 142};
double TeA[37] =
{105.938, 106.935, 107.929, 108.927, 109.922, 110.921, 111.917, 112.916,
113.912, 114.912, 115.908, 116.909, 117.906, 118.906, 119.904, 120.905,
121.903, 122.904, 123.903, 124.904, 125.903, 126.905, 127.904, 128.907,
129.906, 130.909, 131.909, 132.911, 133.912, 134.916, 135.92 , 136.925,
137.929, 138.935, 139.939, 140.944, 141.948};
double TeS[37] =
{43, 32, 16, 80, 60, 80, 18, 22, 22, 11, 10, 20, 17, 9, 11, 27, 20, 19, 16,
20, 20, 4, 19, 3, 21, 22, 12, 80, 40, 10, 50, 13, 22, 43, 54, 54, 64};
double TeW[37] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.09, 0, 2.55, 0.89, 4.74, 7.07,
18.84, 0, 31.74, 0, 34.08, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Te", 52, 37, *TeN , *TeA , *TeS , *TeW);
// Z = 53 --------------------------------------------------------------------
int IN[37] =
{108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137,
138, 139, 140, 141, 142, 143, 144};
double IA[37] =
{107.943, 108.938, 109.935, 110.93 , 111.928, 112.924, 113.922, 114.918,
115.917, 116.914, 117.913, 118.91 , 119.91 , 120.907, 121.908, 122.906,
123.906, 124.905, 125.906, 126.904, 127.906, 128.905, 129.907, 130.906,
131.908, 132.908, 133.91 , 134.91 , 135.915, 136.918, 137.922, 138.926,
139.931, 140.935, 141.94, 142.944, 143.95};
double IS[37] =
{39, 16, 33, 32, 23, 60, 32, 50, 15, 80, 80, 70, 20, 12, 6, 4, 26, 20, 4, 4,
4, 4, 4, 12, 11, 28, 16, 25, 50, 30, 90, 30, 23, 32, 43, 43, 54};
double IW[37] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("I", 53, 37, *IN , *IA , *IS , *IW);
// Z = 54 --------------------------------------------------------------------
int XeN[38] =
{110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139,
140, 141, 142, 143, 144, 145, 146, 147};
double XeA[38] =
{109.944, 110.942, 111.936, 112.933, 113.928, 114.927, 115.922, 116.921,
117.917, 118.916, 119.912, 120.911, 121.909, 122.908, 123.906, 124.906,
125.904, 126.905, 127.904, 128.905, 129.904, 130.905, 131.904, 132.906,
133.905, 134.907, 135.907, 136.912, 137.914, 138.919, 139.922, 140.927,
141.93 , 142.935, 143.938, 144.944, 145.947, 146.953};
double XeS[38] =
{43, 33, 16, 10, 22, 26, 26, 19, 107, 13, 50, 26, 90, 17, 21, 21, 7, 4, 15,
9, 10, 10, 12, 4, 9, 11, 8, 8, 40, 23, 70, 10, 11, 24, 34, 43, 43, 54};
double XeW[38] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.09, 0, 0.09, 0, 1.92, 26.44,
4.08, 21.18, 26.89, 0, 10.44, 0, 8.87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Xe", 54, 38, *XeN , *XeA , *XeS , *XeW);
// Z = 55 --------------------------------------------------------------------
int CsN[40] =
{112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141,
142, 143, 144, 145, 146, 147, 148, 149, 150, 151};
double CsA[40] =
{111.95 , 112.945, 113.941, 114.936, 115.933, 116.929, 117.927, 118.922,
119.921, 120.917, 121.916, 122.913, 123.912, 124.91 , 125.909, 126.907,
127.908, 128.906, 129.907, 130.905, 131.906, 132.905, 133.907, 134.906,
135.907, 136.907, 137.911, 138.913, 139.917, 140.92 , 141.924, 142.927,
143.932, 144.935, 145.94 , 146.944, 147.949, 148.953, 149.958, 150.962};
double CsS[40] =
{33, 16, 33, 46, 38, 60, 14, 15, 11, 15, 18, 13, 13, 8, 13, 9, 6, 5, 9, 6, 4,
3, 3, 3, 4, 3, 10, 5, 9, 11, 11, 24, 30, 50, 90, 16, 63, 32, 54, 75};
double CsW[40] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Cs", 55, 40, *CsN , *CsA , *CsS , *CsW);
// Z = 56 --------------------------------------------------------------------
int BaN[40] =
{114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143,
144, 145, 146, 147, 148, 149, 150, 151, 152, 153};
double BaA[40] =
{113.951, 114.948, 115.942, 116.939, 117.933, 118.931, 119.926, 120.924,
121.92 , 122.919, 123.915, 124.915, 125.911, 126.911, 127.908, 128.909,
129.906, 130.907, 131.905, 132.906, 133.905, 134.906, 135.905, 136.906,
137.905, 138.909, 139.911, 140.914, 141.916, 142.921, 143.923, 144.927,
145.93 , 146.934, 147.938, 148.942, 149.946, 150.951, 151.954, 152.96};
double BaS[40] =
{48, 64, 54, 70, 54, 109, 32, 33, 32, 32, 15, 27, 15, 11, 12, 12, 7, 7, 3, 3,
3, 3, 3, 3, 3, 3, 9, 9, 7, 14, 15, 60, 80, 10, 15, 43, 54, 64, 75, 97};
double BaW[40] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.106, 0, 0.101, 0, 2.417,
6.592, 7.854, 11.232, 71.698, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ba", 56, 40, *BaN , *BaA , *BaS , *BaW);
// Z = 57 --------------------------------------------------------------------
int LaN[39] =
{117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146,
147, 148, 149, 150, 151, 152, 153, 154, 155};
double LaA[39] =
{116.95 , 117.947, 118.941, 119.938, 120.933, 121.931, 122.926, 123.925,
124.921, 125.919, 126.916, 127.915, 128.913, 129.912, 130.91 , 131.91 ,
132.908, 133.908, 134.907, 135.908, 136.906, 137.907, 138.906, 139.909,
140.911, 141.914, 142.916, 143.92 , 144.922, 145.926, 146.928, 147.932,
148.934, 149.939, 150.942, 151.946, 152.949, 153.954, 154.958};
double LaS[39] =
{96, 86, 75, 64, 54, 54, 43, 32, 32, 32, 24, 43, 60, 22, 11, 50, 21, 28, 11,
80, 50, 4, 3, 3, 5, 6, 16, 60, 70, 80, 80, 14, 32, 43, 54, 64, 75, 86, 97};
double LaW[39] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.09, 99.91,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("La", 57, 39, *LaN , *LaA , *LaS , *LaW);
// Z = 58 --------------------------------------------------------------------
int CeN[39] =
{119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148,
149, 150, 151, 152, 153, 154, 155, 156, 157};
double CeA[39] =
{118.953, 119.947, 120.944, 121.938, 122.936, 123.931, 124.929, 125.924,
126.923, 127.919, 128.918, 129.915, 130.914, 131.911, 132.912, 133.909,
134.909, 135.907, 136.908, 137.906, 138.907, 139.905, 140.908, 141.909,
142.912, 143.914, 144.917, 145.919, 146.923, 147.924, 148.928, 149.93 ,
150.934, 151.936, 152.941, 153.943, 154.948, 155.951, 156.956};
double CeS[39] =
{97, 86, 75, 64, 54, 54, 43, 43, 32, 32, 22, 66, 44, 21, 21, 22, 12, 50, 50,
11, 8, 3, 3, 4, 4, 4, 40, 70, 60, 13, 80, 13, 32, 43, 54, 64, 75, 86, 97};
double CeW[39] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.185, 0, 0.251, 0,
88.45, 0, 11.114, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ce", 58, 39, *CeN , *CeA , *CeS , *CeW);
// Z = 59 --------------------------------------------------------------------
int PrN[39] =
{121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135,
136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150,
151, 152, 153, 154, 155, 156, 157, 158, 159};
double PrA[39] =
{120.955, 121.952, 122.946, 123.943, 124.938, 125.935, 126.931, 127.929,
128.925, 129.923, 130.92 , 131.919, 132.916, 133.916, 134.913, 135.913,
136.911, 137.911, 138.909, 139.909, 140.908, 141.91 , 142.911, 143.913,
144.915, 145.918, 146.919, 147.922, 148.924, 149.927, 150.928, 151.932,
152.934, 153.937, 154.94 , 155.944, 156.947, 157.952, 158.955};
double PrS[39] =
{86, 86, 75, 64, 54, 54, 43, 43, 32, 32, 47, 21, 21, 32, 16, 50, 50, 16, 9,
7, 3, 3, 3, 4, 8, 60, 40, 10, 11, 90, 40, 32, 32, 43, 54, 64, 75, 86, 97};
double PrW[39] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Pr", 59, 39, *PrN , *PrA , *PrS , *PrW);
// Z = 60 --------------------------------------------------------------------
int NdN[36] =
{126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140,
141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155,
156, 157, 158, 159, 160, 161};
double NdA[36] =
{125.943, 126.941, 127.935, 128.933, 129.929, 130.927, 131.923, 132.922,
133.919, 134.918, 135.915, 136.915, 137.912, 138.912, 139.909, 140.91 ,
141.908, 142.91 , 143.91 , 144.913, 145.913, 146.916, 147.917, 148.92 ,
149.921, 150.924, 151.925, 152.928, 153.929, 154.933, 155.935, 156.939,
157.942, 158.946, 159.949, 160.954};
double NdS[36] =
{75, 64, 64, 39, 54, 50, 32, 32, 36, 22, 60, 80, 22, 50, 21, 4, 3, 3, 3, 3,
3, 3, 3, 3, 4, 4, 30, 29, 12, 16, 43, 54, 64, 75, 86, 97};
double NdW[36] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 27.2, 12.2, 23.8, 8.3, 17.2,
0, 5.7, 0, 5.6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Nd", 60, 36, *NdN , *NdA , *NdS , *NdW);
// Z = 61 --------------------------------------------------------------------
int PmN[36] =
{128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142,
143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157,
158, 159, 160, 161, 162, 163};
double PmA[36] =
{127.948, 128.943, 129.94 , 130.936, 131.934, 132.93 , 133.928, 134.925,
135.923, 136.921, 137.919, 138.917, 139.916, 140.914, 141.913, 142.911,
143.913, 144.913, 145.915, 146.915, 147.917, 148.918, 149.921, 150.921,
151.923, 152.924, 153.927, 154.928, 155.931, 156.933, 157.937, 158.939,
159.943, 160.946, 161.95 , 162.954};
double PmS[36] =
{97, 86, 75, 64, 54, 54, 42, 35, 22, 15, 34, 60, 30, 29, 50, 4, 4, 4, 5, 3,
7, 5, 22, 6, 80, 12, 80, 30, 40, 32, 43, 54, 64, 75, 86, 97};
double PmW[36] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Pm", 61, 36, *PmN , *PmA , *PmS , *PmW);
// Z = 62 --------------------------------------------------------------------
int SmN[36] =
{130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144,
145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159,
160, 161, 162, 163, 164, 165};
double SmA[36] =
{129.949, 130.946, 131.941, 132.939, 133.934, 134.932, 135.928, 136.927,
137.924, 138.922, 139.919, 140.918, 141.915, 142.915, 143.912, 144.913,
145.913, 146.915, 147.915, 148.917, 149.917, 150.92 , 151.92 , 152.922,
153.922, 154.925, 155.926, 156.928, 157.93 , 158.933, 159.935, 160.939,
161.941, 162.945, 163.948, 164.953};
double SmS[36] =
{97, 97, 75, 64, 54, 54, 43, 12, 32, 16, 16, 13, 11, 4, 4, 4, 4, 3, 3, 3, 3,
3, 3, 3, 3, 3, 10, 50, 80, 32, 43, 54, 64, 75, 86, 97};
double SmW[36] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3.07, 0, 0, 14.99, 11.24, 13.82,
7.38, 0, 26.75, 0, 22.75, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Sm", 62, 36, *SmN , *SmA , *SmS , *SmW);
// Z = 63 --------------------------------------------------------------------
int EuN[36] =
{132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146,
147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161,
162, 163, 164, 165, 166, 167};
double EuA[36] =
{131.954, 132.949, 133.946, 134.942, 135.94 , 136.935, 137.933, 138.93 ,
139.928, 140.925, 141.923, 142.92 , 143.919, 144.916, 145.917, 146.917,
147.918, 148.918, 149.92 , 150.92 , 151.922, 152.921, 153.923, 154.923,
155.925, 156.925, 157.928, 158.929, 159.932, 160.934, 161.937, 162.939,
163.943, 164.946, 165.95 , 166.953};
double EuS[36] =
{97, 97, 75, 64, 54, 54, 43, 16, 60, 30, 30, 14, 19, 5, 8, 4, 19, 5, 8, 3,
3, 3, 3, 3, 6, 7, 80, 9, 22, 32, 43, 54, 64, 75, 86, 97};
double EuW[36] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 47.81, 0, 52.19,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Eu", 63, 36, *EuN , *EuA , *EuS , *EuW);
// Z = 64 --------------------------------------------------------------------
int GdN[34] =
{136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150,
151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165,
166, 167, 168, 169};
double GdA[34] =
{135.947, 136.945, 137.94 , 138.938, 139.934, 140.932, 141.928, 142.927,
143.923, 144.922, 145.918, 146.919, 147.918, 148.919, 149.919, 150.92 ,
151.92 , 152.922, 153.921, 154.923, 155.922, 156.924, 157.924, 158.926,
159.927, 160.93 , 161.931, 162.934, 163.936, 164.939, 165.942, 166.946,
167.948, 168.953};
double GdS[34] =
{75, 64, 54, 54, 43, 32, 32, 22, 22, 40, 6, 4, 4, 5, 7, 4, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 5, 32, 43, 54, 64, 64, 75, 86};
double GdW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.2, 0, 2.18, 14.8, 20.47,
15.65, 24.84, 0, 21.86, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Gd", 64, 34, *GdN , *GdA , *GdS , *GdW);
// Z = 65 --------------------------------------------------------------------
int TbN[34] =
{138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 152,
153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167,
168, 169, 170, 171};
double TbA[34] =
{137.953, 138.948, 139.946, 140.941, 141.939, 142.935, 143.933, 144.929,
145.927, 146.924, 147.924, 148.923, 149.924, 150.923, 151.924, 152.923,
153.925, 154.923, 155.925, 156.924, 157.925, 158.925, 159.927, 160.928,
161.929, 162.931, 163.933, 164.935, 165.938, 166.94 , 167.944, 168.946,
169.95 , 170.953};
double TbS[34] =
{86, 75, 96, 64, 82, 43, 32, 24, 50, 13, 30, 5, 9, 5, 40, 5, 50, 13, 5, 3,
3, 3, 3, 3, 40, 5, 11, 21, 32, 43, 54, 64, 75, 86};
double TbW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Tb", 65, 34, *TbN , *TbA , *TbS , *TbW);
// Z = 66 --------------------------------------------------------------------
int DyN[34] =
{140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154,
155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169,
170, 171, 172, 173};
double DyA[34] =
{139.954, 140.951, 141.946, 142.944, 143.939, 144.937, 145.933, 146.931,
147.927, 148.927, 149.926, 150.926, 151.925, 152.926, 153.924, 154.926,
155.924, 156.925, 157.924, 158.926, 159.925, 160.927, 161.927, 162.929,
163.929, 164.932, 165.933, 166.936, 167.937, 168.94 , 169.943, 170.946,
171.949, 172.953};
double DyS[34] =
{97, 75, 85, 54, 43, 32, 12, 60, 30, 12, 6, 5, 6, 5, 9, 13, 7, 7, 4, 3, 3, 3,
3, 3, 3, 3, 3, 60, 32, 32, 43, 54, 64, 75};
double DyW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.06, 0, 0.1, 0, 2.34,
18.91, 25.51, 24.9, 28.18, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Dy", 66, 34, *DyN , *DyA , *DyS , *DyW);
// Z = 67 --------------------------------------------------------------------
int HoN[34] =
{142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156,
157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171,
172, 173, 174, 175};
double HoA[34] =
{141.96 , 142.955, 143.952, 144.947, 145.944, 146.94 , 147.937, 148.934,
149.933, 150.932, 151.932, 152.93 , 153.931, 154.929, 155.93 , 156.928,
157.929, 158.928, 159.929, 160.928, 161.929, 162.929, 163.93 , 164.93 ,
165.932, 166.933, 167.935, 168.937, 169.94 , 170.941, 171.945, 172.947,
173.951, 174.954};
double HoS[34] =
{107, 75, 64, 64, 54, 43, 29, 23, 11, 13, 30, 6, 10, 25, 22, 50, 30, 4, 16,
4, 5, 3, 3, 3, 3, 6, 30, 22, 50, 64, 43, 43, 54, 64};
double HoW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ho", 67, 34, *HoN , *HoA , *HoS , *HoW);
// Z = 68 --------------------------------------------------------------------
int ErN[34] =
{144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158,
159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173,
174, 175, 176, 177};
double ErA[34] =
{143.961, 144.957, 145.952, 146.949, 147.944, 148.942, 149.938, 150.937,
151.935, 152.935, 153.933, 154.933, 155.931, 156.932, 157.93 , 158.931,
159.929, 160.93 , 161.929, 162.93 , 163.929, 164.931, 165.93 , 166.932,
167.932, 168.935, 169.935, 170.938, 171.939, 172.942, 173.944, 174.948,
175.95 , 176.954};
double ErS[34] =
{86, 75, 64, 54, 43, 51, 11, 32, 30, 12, 6, 50, 80, 90, 11, 5, 50, 10, 4, 6,
4, 4, 3, 3, 3, 3, 3, 3, 5, 21, 32, 43, 43, 64};
double ErW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.14, 0, 1.61, 0,
33.61, 22.93, 26.78, 0, 14.93, 0, 0, 0, 0, 0, 0, 0};
AddElement("Er", 68, 34, *ErN , *ErA , *ErS , *ErW);
// Z = 69 --------------------------------------------------------------------
int TmN[34] =
{146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160,
161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175,
176, 177, 178, 179};
double TmA[34] =
{145.966, 146.961, 147.958, 148.953, 149.95 , 150.945, 151.944, 152.942,
153.941, 154.939, 155.939, 156.937, 157.937, 158.935, 159.935, 160.933,
161.934, 162.933, 163.933, 164.932, 165.934, 166.933, 167.934, 168.934,
169.936, 170.936, 171.938, 172.94 , 173.942, 174.944, 175.947, 176.949,
177.953, 178.955};
double TmS[34] =
{75, 64, 75, 64, 54, 15, 32, 23, 12, 14, 60, 11, 13, 70, 33, 10, 30, 7, 20,
4, 12, 3, 4, 3, 3, 3, 7, 6, 50, 50, 11, 32, 43, 54};
double TmW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Tm", 69, 34, *TmN , *TmA , *TmS , *TmW);
// Z = 70 --------------------------------------------------------------------
int YbN[34] =
{148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162,
163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177,
178, 179, 180, 181};
double YbA[34] =
{147.967, 148.963, 149.958, 150.955, 151.95 , 152.949, 153.946, 154.946,
155.943, 156.943, 157.94 , 158.94 , 159.938, 160.938, 161.936, 162.936,
163.935, 164.935, 165.934, 166.935, 167.934, 168.935, 169.935, 170.936,
171.936, 172.938, 173.939, 174.941, 175.943, 176.945, 177.947, 178.95,
179.952, 180.956};
double YbS[34] =
{86, 75, 64, 34, 38, 32, 11, 32, 40, 60, 11, 10, 22, 24, 22, 11, 11, 22, 9,
5, 5, 5, 3, 3, 30, 30, 30, 30, 3, 3, 11, 32, 43, 43};
double YbW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.13, 0, 3.04,
14.28, 21.83, 16.13, 31.83, 0, 12.76, 0, 0, 0, 0, 0};
AddElement("Yb", 70, 34, *YbN , *YbA , *YbS , *YbW);
// Z = 71 --------------------------------------------------------------------
int LuN[35] =
{150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164,
165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179,
180, 181, 182, 183, 184};
double LuA[35] =
{149.973, 150.967, 151.964, 152.959, 153.957, 154.954, 155.953, 156.95 ,
157.949, 158.947, 159.946, 160.944, 161.943, 162.941, 163.941, 164.94 ,
165.94 , 166.938, 167.939, 168.938, 169.938, 170.938, 171.939, 172.939,
173.94 , 174.941, 175.943, 176.944, 177.946, 178.947, 179.95 , 180.952,
181.955, 182.958, 183.961};
double LuS[35] =
{75, 65, 75, 64, 54, 14, 32, 23, 13, 50, 25, 26, 24, 24, 13, 90, 17, 11, 90,
6, 20, 3, 4, 3, 30, 28, 28, 28, 3, 6, 80, 32, 32, 32, 43};
double LuW[35] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
97.41, 2.59, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Lu", 71, 35, *LuN , *LuA , *LuS , *LuW);
// Z = 72 --------------------------------------------------------------------
int HfN[33] =
{154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168,
169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183,
184, 185, 186};
double HfA[33] =
{153.964, 154.963, 155.959, 156.958, 157.955, 158.954, 159.951, 160.95 ,
161.947, 162.947, 163.944, 164.945, 165.942, 166.943, 167.941, 168.941,
169.94 , 170.94 , 171.939, 172.941, 173.94 , 174.942, 175.941, 176.943,
177.944, 178.946, 179.947, 180.949, 181.951, 182.954, 183.955, 184.959,
185.961};
double HfS[33] =
{75, 64, 38, 32, 11, 32, 40, 80, 12, 34, 21, 40, 32, 22, 11, 90, 21, 21, 50,
11, 3, 3, 29, 27, 27, 27, 27, 28, 7, 30, 40, 32, 32};
double HfW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.16, 0, 5.26,
18.6, 27.28, 13.62, 35.08, 0, 0, 0, 0, 0, 0};
AddElement("Hf", 72, 33, *HfN , *HfA , *HfS , *HfW);
// Z = 73 --------------------------------------------------------------------
int TaN[33] =
{156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170,
171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185,
186, 187, 188};
double TaA[33] =
{155.972, 156.968, 157.966, 158.963, 159.961, 160.958, 161.957, 162.954,
163.954, 164.951, 165.95 , 166.948, 167.948, 168.946, 169.946, 170.944,
171.945, 172.944, 173.944, 174.944, 175.945, 176.944, 177.946, 178.946,
179.947, 180.948, 181.95 , 182.951, 183.954, 184.956, 185.959, 186.96 ,
187.964};
double TaS[33] =
{64, 64, 54, 13, 33, 60, 14, 80, 43, 24, 32, 46, 39, 22, 21, 22, 20, 24, 90,
11, 11, 4, 11, 6, 3, 3, 3, 3, 28, 15, 60, 32, 32};
double TaW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0.012, 99.988, 0, 0, 0, 0, 0, 0, 0};
AddElement("Ta", 73, 33, *TaN , *TaA , *TaS , *TaW);
// Z = 74 --------------------------------------------------------------------
int WN[33] =
{158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172,
173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187,
188, 189, 190};
double WA[33] =
{157.974, 158.972, 159.968, 160.967, 161.963, 162.963, 163.959, 164.958,
165.955, 166.955, 167.952, 168.952, 169.949, 170.949, 171.947, 172.948,
173.946, 174.947, 175.946, 176.947, 177.946, 178.947, 179.947, 180.948,
181.948, 182.95 , 183.951, 184.953, 185.954, 186.957, 187.958, 188.962,
189.963};
double WS[33] =
{75, 64, 38, 33, 11, 33, 40, 90, 13, 33, 21, 34, 51, 30, 29, 40, 32, 21, 21,
32, 11, 17, 5, 6, 3, 29, 29, 30, 3, 3, 4, 21, 24};
double WW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.12, 0,
26.5, 14.31, 30.64, 0, 28.43, 0, 0, 0, 0};
AddElement("W", 74, 33, *WN , *WA , *WS , *WW);
// Z = 75 --------------------------------------------------------------------
int ReN[33] =
{160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174,
175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189,
190, 191, 192};
double ReA[33] =
{159.981, 160.978, 161.976, 162.972, 163.97 , 164.967, 165.966, 166.963,
167.962, 168.959, 169.958, 170.956, 171.955, 172.953, 173.953, 174.951,
175.952, 176.95 , 177.951, 178.95 , 179.951, 180.95 , 181.951, 182.951,
183.953, 184.953, 185.955, 186.956, 187.958, 188.959, 189.962, 190.963,
191.966};
double ReS[33] =
{64, 64, 55, 12, 33, 80, 15, 14, 43, 22, 43, 37, 33, 48, 44, 48, 21, 21, 22,
60, 40, 15, 11, 9, 6, 30, 3, 30, 30, 9, 23, 11, 21};
double ReW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
37.4, 0, 62.6, 0, 0, 0, 0, 0};
AddElement("Re", 75, 33, *ReN , *ReA , *ReS , *ReW);
// Z = 76 --------------------------------------------------------------------
int OsN[35] =
{162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176,
177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191,
192, 193, 194, 195, 196};
double OsA[35] =
{161.984, 162.982, 163.978, 164.976, 165.973, 166.972, 167.968, 168.967,
169.964, 170.963, 171.96 , 172.96 , 173.957, 174.957, 175.955, 176.955,
177.953, 178.954, 179.952, 180.953, 181.952, 182.953, 183.952, 184.954,
185.954, 186.956, 187.956, 188.958, 189.958, 190.961, 191.961, 192.964,
193.965, 194.968, 195.97};
double OsS[35] =
{75, 64, 38, 33, 11, 33, 40, 90, 14, 33, 21, 33, 50, 32, 22, 30, 22, 25, 20,
22, 27, 11, 3, 3, 3, 30, 30, 30, 3, 3, 4, 4, 4, 54, 40};
double OsW[35] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.02, 0,
1.59, 1.96, 13.24, 16.15, 26.26, 0, 40.78, 0, 0, 0, 0};
AddElement("Os", 76, 35, *OsN , *OsA , *OsS , *OsW);
// Z = 77 --------------------------------------------------------------------
int IrN[35] =
{165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179,
180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194,
195, 196, 197, 198, 199};
double IrA[35] =
{164.988, 165.986, 166.982, 167.98 , 168.976, 169.975, 170.972, 171.971,
172.968, 173.967, 174.964, 175.964, 176.961, 177.961, 178.959, 179.959,
180.958, 181.958, 182.957, 183.957, 184.957, 185.958, 186.957, 187.959,
188.959, 189.961, 190.961, 191.963, 192.963, 193.965, 194.966, 195.968,
196.97 , 197.972, 198.974};
double IrS[35] =
{43, 55, 11, 35, 10, 16, 14, 43, 25, 43, 37, 33, 48, 39, 43, 21, 23, 15, 15,
29, 21, 22, 7, 8, 14, 21, 3, 3, 3, 3, 3, 40, 22, 21, 40};
double IrW[35] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
37.3, 0, 62.7, 0, 0, 0, 0, 0, 0};
AddElement("Ir", 77, 35, *IrN , *IrA , *IrS , *IrW);
// Z = 78 --------------------------------------------------------------------
int PtN[35] =
{168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182,
183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197,
198, 199, 200, 201, 202};
double PtA[35] =
{167.988, 168.986, 169.982, 170.981, 171.977, 172.976, 173.973, 174.972,
175.969, 176.968, 177.966, 178.965, 179.963, 180.963, 181.961, 182.962,
183.96 , 184.961, 185.959, 186.961, 187.959, 188.961, 189.96 , 190.962,
191.961, 192.963, 193.963, 194.965, 195.965, 196.967, 197.968, 198.971,
199.971, 200.975, 201.976};
double PtS[35] =
{38, 34, 11, 34, 40, 11, 14, 33, 21, 33, 50, 32, 22, 30, 22, 25, 20, 22, 30,
20, 6, 12, 7, 5, 4, 3, 3, 3, 3, 3, 4, 5, 22, 50, 32};
double PtW[35] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.014, 0,
0.782, 0, 32.967, 33.832, 25.242, 0, 7.163, 0, 0, 0, 0};
AddElement("Pt", 78, 35, *PtN , *PtA , *PtS , *PtW);
// Z = 79 --------------------------------------------------------------------
int AuN[35] =
{171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185,
186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200,
201, 202, 203, 204, 205};
double AuA[35] =
{170.992, 171.99 , 172.986, 173.985, 174.982, 175.98 , 176.977, 177.976,
178.973, 179.972, 180.97 , 181.97 , 182.968, 183.967, 184.966, 185.966,
186.965, 187.965, 188.964, 189.965, 190.964, 191.965, 192.964, 193.965,
194.965, 195.967, 196.967, 197.968, 198.969, 199.971, 200.972, 201.974,
202.975, 203.978, 204.98 };
double AuS[35] =
{27, 36, 11, 16, 26, 43, 25, 43, 37, 32, 48, 39, 43, 21, 23, 15, 16, 11, 22,
17, 50, 17, 10, 12, 3, 4, 3, 3, 3, 60, 5, 18, 5, 22, 32};
double AuW[35] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
100, 0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Au", 79, 35, *AuN , *AuA , *AuS , *AuW);
// Z = 80 --------------------------------------------------------------------
int HgN[34] =
{175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189,
190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204,
205, 206, 207, 208};
double HgA[34] =
{174.991, 175.987, 176.986, 177.982, 178.982, 179.978, 180.978, 181.975,
182.975, 183.972, 184.972, 185.969, 186.97 , 187.968, 188.968, 189.966,
190.967, 191.966, 192.967, 193.965, 194.967, 195.966, 196.967, 197.967,
198.968, 199.968, 200.97 , 201.971, 202.973, 203.973, 204.976, 205.977,
206.983, 207.986};
double HgS[34] =
{34, 40, 12, 16, 33, 21, 33, 50, 32, 22, 30, 22, 26, 19, 30, 16, 90, 30, 21,
25, 50, 4, 5, 3, 3, 3, 3, 3, 3, 3, 5, 22, 16, 32};
double HgW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.15, 0, 9.97,
16.87, 23.1, 13.18, 29.86, 0, 6.87, 0, 0, 0, 0};
AddElement("Hg", 80, 34, *HgN , *HgA , *HgS , *HgW);
// Z = 81 --------------------------------------------------------------------
int TlN[34] =
{177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191,
192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206,
207, 208, 209, 210};
double TlA[34] =
{176.997, 177.995, 178.991, 179.99 , 180.987, 181.986, 182.983, 183.982,
184.979, 185.979, 186.976, 187.976, 188.974, 189.974, 190.972, 191.972,
192.971, 193.971, 194.97 , 195.971, 196.97 , 197.97 , 198.97 , 199.971,
200.971, 201.972, 202.972, 203.974, 204.974, 205.976, 206.977, 207.982,
208.985, 209.99 };
double TlS[34] =
{24, 23, 15, 48, 41, 43, 42, 32, 43, 39, 43, 24, 37, 46, 23, 22, 27, 22, 14,
15, 30, 90, 11, 7, 16, 16, 3, 3, 3, 3, 6, 3, 10, 12};
double TlW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
29.524, 0, 70.476, 0, 0, 0, 0, 0};
AddElement("Tl", 81, 34, *TlN , *TlA , *TlS , *TlW);
// Z = 82 --------------------------------------------------------------------
int PbN[34] =
{181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195,
196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210,
211, 212, 213, 214};
double PbA[34] =
{180.997, 181.993, 182.992, 183.988, 184.988, 185.984, 186.984, 187.981,
188.981, 189.978, 190.978, 191.976, 192.976, 193.974, 194.974, 195.973,
196.973, 197.972, 198.973, 199.972, 200.973, 201.972, 202.973, 203.973,
204.974, 205.974, 206.976, 207.977, 208.981, 209.984, 210.989, 211.992,
212.996, 214};
double PbS[34] =
{17, 18, 33, 21, 33, 50, 32, 22, 29, 22, 23, 19, 20, 16, 44, 15, 11, 10, 70,
14, 30, 11, 7, 3, 3, 3, 3, 3, 3, 3, 3, 29, 11, 27};
double PbW[34] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1.4, 0,
24.1, 22.1, 52.4, 0, 0, 0, 0, 0, 0};
AddElement("Pb", 82, 34, *PbN , *PbA , *PbS , *PbW);
// Z = 83 --------------------------------------------------------------------
int BiN[32] =
{185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199,
200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214,
215, 216};
double BiA[32] =
{184.998, 185.996, 186.993, 187.992, 188.99 , 189.989, 190.986, 191.985,
192.983, 193.983, 194.981, 195.981, 196.979, 197.979, 198.978, 199.978,
200.977, 201.978, 202.977, 203.978, 204.977, 205.978, 206.978, 207.98 ,
208.98 , 209.984, 210.987, 211.991, 212.994, 213.999, 215.002, 216.006};
double BiS[32] =
{24, 48, 41, 32, 43, 39, 43, 24, 37, 46, 23, 22, 26, 19, 13, 10, 30, 60, 23,
28, 8, 9, 4, 4, 3, 3, 6, 3, 8, 12, 10, 11};
double BiW[32] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100,
0, 0, 0, 0, 0, 0, 0};
AddElement("Bi", 83, 32, *BiN , *BiA , *BiS , *BiW);
// Z = 84 --------------------------------------------------------------------
int PoN[29] =
{190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204,
205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218};
double PoA[29] =
{189.995, 190.995, 191.992, 192.991, 193.988, 194.988, 195.986, 196.986,
197.983, 198.984, 199.982, 200.982, 201.981, 202.981, 203.98 , 204.981,
205.98 , 206.982, 207.981, 208.982, 209.983, 210.987, 211.989, 212.993,
213.995, 214.999, 216.002, 217.006, 218.009};
double PoS[29] =
{51, 32, 22, 30, 22, 24, 19, 21, 16, 44, 15, 11, 10, 70, 14, 30, 11, 8, 3, 3,
3, 3, 3, 4, 3, 3, 29, 11, 27};
double PoW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0,
0, 0, 0, 0};
AddElement("Po", 84, 29, *PoN , *PoA , *PoS , *PoW);
// Z = 85 --------------------------------------------------------------------
int AtN[31] =
{193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207,
208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222,
223};
double AtA[31] =
{193.000, 193.999, 194.997, 195.996, 196.993, 197.993, 198.991, 199.99,
200.988, 201.988, 202.987, 203.987, 204.986, 205.987, 206.986, 207.987,
208.986, 209.987, 210.987, 211.991, 212.993, 213.996, 214.999, 216.002,
217.005, 218.009, 219.011, 220.015, 221.018, 222.022, 223.025};
double AtS[31] =
{43, 43, 43, 25, 38, 46, 24, 22, 26, 19, 13, 10, 30, 60, 23, 28, 9, 9, 4, 4,
6, 5, 8, 5, 8, 13, 90, 12, 32, 32, 43};
double AtW[31] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0};
AddElement("At", 85, 31, *AtN , *AtA , *AtS , *AtW);
// Z = 86 --------------------------------------------------------------------
int RnN[33] =
{196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210,
211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225,
226, 227, 228};
double RnA[33] =
{196.002, 197.002, 197.999, 198.998, 199.996, 200.996, 201.993, 202.993,
203.991, 204.992, 205.99 , 206.991, 207.99 , 208.99 , 209.99 , 210.991,
211.991, 212.994, 213.995, 214.999, 216.000, 217.004, 218.006, 219.009,
220.011, 221.015, 222.018, 223.022, 224.024, 225.028, 226.031, 227.035,
228.038};
double RnS[33] =
{22, 30, 22, 24, 19, 21, 16, 44, 15, 12, 10, 70, 14, 30, 11, 8, 4, 8, 10, 9,
8, 5, 4, 3, 29, 11, 27, 32, 32, 32, 43, 45, 50};
double RnW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
100, 0, 0, 0, 0, 0, 0};
AddElement("Rn", 86, 33, *RnN , *RnA , *RnS , *RnW);
// Z = 87 --------------------------------------------------------------------
int FrN[33] =
{200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214,
215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229,
230, 231, 232};
double FrA[33] =
{200.006, 201.004, 202.003, 203.001, 204.001, 204.999, 205.998, 206.997,
207.997, 208.996, 209.996, 210.996, 211.996, 212.996, 213.999, 215.000,
216.003, 217.005, 218.008, 219.009, 220.012, 221.014, 222.018, 223.02 ,
224.023, 225.026, 226.029, 227.032, 228.036, 229.038, 230.043, 231.045,
232.05 };
double FrS[33] =
{25, 38, 46, 25, 22, 25, 19, 12, 80, 30, 23, 22, 28, 9, 10, 8, 14, 8, 6, 8, 5,
8, 23, 29, 50, 11, 10, 10, 22, 39, 48, 56, 69};
double FrW[33] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0,
0, 0, 0, 0, 0, 0, 0, 0};
AddElement("Fr", 87, 33, *FrN , *FrA , *FrS , *FrW);
// Z = 88 --------------------------------------------------------------------
int RaN[32] =
{203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217,
218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231, 232,
233, 234};
double RaA[32] =
{203.009, 204.006, 205.006, 206.004, 207.004, 208.002, 209.002, 210 ,
211.001, 212 , 213 , 214 , 215.003, 216.004, 217.006, 218.007,
219.01 , 220.011, 221.014, 222.015, 223.018, 224.02 , 225.024, 226.025,
227.029, 228.031, 229.035, 230.037, 231.041, 232.044, 233.048, 234.051};
double RaS[32] =
{25, 19, 22, 16, 45, 15, 13, 10, 70, 15, 30, 12, 9, 10, 10, 12, 9, 11, 8, 5,
3, 29, 3, 27, 27, 27, 70, 40, 32, 39, 50, 58};
double RaW[32] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0,
0, 0, 0, 0, 0, 0, 0};
AddElement("Ra", 88, 32, *RaN , *RaA , *RaS , *RaW);
// Z = 89 --------------------------------------------------------------------
int AcN[30] =
{207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221,
222, 223, 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236};
double AcA[30] =
{207.012, 208.011, 209.01 , 210.009, 211.008, 212.008, 213.007, 214.007,
215.006, 216.009, 217.009, 218.012, 219.012, 220.015, 221.016, 222.018,
223.019, 224.022, 225.023, 226.026, 227.028, 228.031, 229.033, 230.036,
231.039, 232.042, 233.045, 234.048, 235.051, 236.055};
double AcS[30] =
{25, 22, 26, 20, 14, 10, 60, 60, 60, 29, 14, 50, 50, 60, 50, 6, 8, 5, 8, 4,
29, 28, 50, 11, 11, 11, 32, 43, 45, 54};
double AcW[30] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0,
0, 0, 0, 0, 0};
AddElement("Ac", 89, 30, *AcN , *AcA , *AcS , *AcW);
// Z = 90 --------------------------------------------------------------------
int ThN[29] =
{210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224,
225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238};
double ThA[29] =
{210.015, 211.015, 212.013, 213.013, 214.011, 215.012, 216.011, 217.013,
218.013, 219.016, 220.016, 221.018, 222.018, 223.021, 224.021, 225.024,
226.025, 227.028, 228.029, 229.032, 230.033, 231.036, 232.038, 233.042,
234.044, 235.048, 236.05 , 237.054, 238.056};
double ThS[29] =
{17, 45, 15, 14, 10, 70, 17, 30, 15, 50, 24, 11, 14, 10, 13, 8, 5, 3, 29, 3,
22, 22, 22, 22, 4, 50, 32, 39, 39};
double ThW[29] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0,
0, 0, 0, 0};
AddElement("Th", 90, 29, *ThN , *ThA , *ThS , *ThW);
// Z = 91 --------------------------------------------------------------------
int PaN[28] =
{213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227,
228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 240};
double PaA[28] =
{213.021, 214.021, 215.019, 216.019, 217.018, 218.02 , 219.02 , 220.022,
221.022, 222.024, 223.024, 224.026, 225.026, 226.028, 227.029, 228.031,
229.032, 230.035, 231.036, 232.039, 233.04 , 234.043, 235.045, 236.049,
237.051, 238.054, 239.057, 240.061};
double PaS[28] =
{27, 21, 15, 11, 80, 80, 80, 60, 60, 80, 80, 60, 80, 13, 8, 5, 10, 4, 28, 8,
24, 5, 50, 21, 11, 60, 32, 32};
double PaW[28] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0,
0, 0, 0};
AddElement("Pa", 91, 28, *PaN , *PaA , *PaS , *PaW);
// Z = 92 --------------------------------------------------------------------
int UN[25] =
{218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231, 232,
233, 234, 235, 236, 237, 238, 239, 240, 241, 242};
double UA[25] =
{218.023, 219.025, 220.025, 221.026, 222.026, 223.028, 224.028, 225.029,
226.029, 227.031, 228.031, 229.033, 230.034, 231.036, 232.037, 233.04 ,
234.041, 235.044, 236.046, 237.049, 238.051, 239.054, 240.057, 241.06 ,
242.063};
double US[25] =
{10, 90, 22, 11, 11, 80, 27, 50, 20, 18, 17, 9, 5, 4, 29, 3, 21, 21, 21, 21,
21, 21, 6, 32, 22};
double UW[25] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0055, 0.72, 0, 0, 99.2745,
0, 0, 0, 0};
AddElement("U", 92, 25, *UN , *UA , *US , *UW);
// Z = 93 --------------------------------------------------------------------
int NpN[20] =
{225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239,
240, 241, 242, 243, 244};
double NpA[20] =
{225.034, 226.035, 227.035, 228.036, 229.036, 230.038, 231.038, 232.04 ,
233.041, 234.043, 235.044, 236.047, 237.048, 238.051, 239.053, 240.056,
241.058, 242.062, 243.064, 244.068};
double NpS[20] =
{80, 10, 80, 21, 90, 60, 50, 11, 60, 9, 23, 50, 21, 21, 23, 16, 80, 22, 30,
32};
double NpW[20] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0};
AddElement("Np", 93, 20, *NpN , *NpA , *NpS , *NpW);
// Z = 94 --------------------------------------------------------------------
int PuN[20] =
{228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 242,
243, 244, 245, 246, 247};
double PuA[20] =
{228.039, 229.04 , 230.04 , 231.041, 232.041, 233.043, 234.043, 235.045,
236.046, 237.048, 238.05 , 239.052, 240.054, 241.057, 242.059, 243.062,
244.064, 245.068, 246.07 , 247.074};
double PuS[20] =
{30, 80, 26, 11, 20, 50, 8, 22, 29, 25, 21, 21, 21, 21, 21, 3, 5, 15, 16, 32};
double PuW[20] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0};
AddElement("Pu", 94, 20, *PuN , *PuA , *PuS , *PuW);
// Z = 95 --------------------------------------------------------------------
int AmN[19] =
{231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 242, 243, 244, 245,
246, 247, 248, 249};
double AmA[19] =
{231.046, 232.047, 233.046, 234.048, 235.048, 236.05 , 237.05 , 238.052,
239.053, 240.055, 241.057, 242.06 , 243.061, 244.064, 245.066, 246.07 ,
247.072, 248.076, 249.078};
double AmS[19] =
{32, 32, 23, 22, 22, 11, 60, 50, 3, 15, 21, 21, 23, 23, 4, 20, 11, 22, 32};
double AmW[19] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0};
AddElement("Am", 95, 19, *AmN , *AmA , *AmS , *AmW);
// Z = 96 --------------------------------------------------------------------
int CmN[20] =
{233, 234, 235, 236, 237, 238, 239, 240, 241, 242, 243, 244, 245, 246, 247,
248, 249, 250, 251, 252};
double CmA[20] =
{233.051, 234.05 , 235.052, 236.051, 237.053, 238.053, 239.055, 240.056,
241.058, 242.059, 243.061, 244.063, 245.065, 246.067, 247.07 , 248.072,
249.076, 250.078, 251.082, 252.085};
double CmS[20] =
{43, 32, 24, 22, 22, 40, 11, 29, 24, 21, 24, 21, 29, 24, 5, 5, 5, 12, 24, 32};
double CmW[20] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0};
AddElement("Cm", 96, 20, *CmN , *CmA , *CmS , *CmW);
// Z = 97 --------------------------------------------------------------------
int BkN[20] =
{235, 236, 237, 238, 239, 240, 241, 242, 243, 244, 245, 246, 247, 248, 249,
250, 251, 252, 253, 254};
double BkA[20] =
{235.057, 236.057, 237.057, 238.058, 239.058, 240.06 , 241.06 , 242.062,
243.063, 244.065, 245.066, 246.069, 247.07 , 248.073, 249.075, 250.078,
251.081, 252.084, 253.087, 254.091};
double BkS[20] =
{43, 43, 32, 31, 31, 16, 22, 22, 5, 16, 26, 60, 6, 80, 3, 4, 12, 22, 39, 32};
double BkW[20] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0, 0, 0};
AddElement("Bk", 97, 20, *BkN , *BkA , *BkS , *BkW);
// Z = 98 --------------------------------------------------------------------
int CfN[20] =
{237, 238, 239, 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251,
252, 253, 254, 255, 256};
double CfA[20] =
{237.062, 238.061, 239.063, 240.062, 241.064, 242.064, 243.065, 244.066,
245.068, 246.069, 247.071, 248.072, 249.075, 250.076, 251.08 , 252.082,
253.085, 254.087, 255.091, 256.093};
double CfS[20] =
{54, 43, 25, 22, 27, 40, 15, 4, 11, 24, 9, 6, 3, 24, 5, 5, 7, 13, 22, 32};
double CfW[20] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0};
AddElement("Cf", 98, 20, *CfN , *CfA , *CfS , *CfW);
// Z = 99 --------------------------------------------------------------------
int EsN[18] =
{240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254,
255, 256, 257};
double EsA[18] =
{240.069, 241.069, 242.07 , 243.07 , 244.071, 245.071, 246.073, 247.074,
248.075, 249.076, 250.079, 251.08 , 252.083, 253.085, 254.088, 255.09 ,
256.094, 257.096};
double EsS[18] =
{43, 32, 35, 31, 20, 22, 24, 30, 60, 30, 11, 7, 50, 3, 5, 12, 11, 44};
double EsW[18] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0, 0, 0};
AddElement("Es", 99, 18, *EsN , *EsA , *EsS , *EsW);
// Z = 100 -------------------------------------------------------------------
int FmN[18] =
{242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255, 256,
257, 258, 259};
double FmA[18] =
{242.073, 243.075, 244.074, 245.075, 246.075, 247.077, 248.077, 249.079,
250.08 , 251.082, 252.082, 253.085, 254.087, 255.09 , 256.092, 257.095,
258.097, 259.101};
double FmS[18] =
{43, 25, 31, 30, 40, 16, 13, 15, 13, 9, 6, 5, 3, 5, 8, 7, 22, 30};
double FmW[18] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0};
AddElement("Fm", 100, 18, *FmN , *FmA , *FmS , *FmW);
// Z = 101 -------------------------------------------------------------------
int MdN[16] =
{245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255, 256, 257, 258, 259,
260};
double MdA[16] =
{245.081, 246.082, 247.082, 248.083, 249.083, 250.084, 251.085, 252.087,
253.087, 254.09 , 255.091, 256.094, 257.096, 258.098, 259.101, 260.104};
double MdS[16] =
{40, 41, 39, 26, 24, 32, 22, 21, 22, 11, 8, 60, 4, 5, 22, 34};
double MdW[16] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0};
AddElement("Md", 101, 16, *MdN , *MdA , *MdS , *MdW);
// Z = 102 -------------------------------------------------------------------
int NoN[14] =
{249, 250, 251, 252, 253, 254, 255, 256, 257, 258, 259, 260, 261, 262};
double NoA[14] =
{249.088, 250.087, 251.089, 252.089, 253.091, 254.091, 255.093, 256.094,
257.097, 258.098, 259.101, 260.103, 261.106, 262.108};
double NoS[14] =
{37, 22, 19, 14, 26, 19, 13, 9, 30, 22, 11, 22, 32, 58};
double NoW[14] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0};
AddElement("No", 102, 14, *NoN , *NoA , *NoS , *NoW);
// Z = 103 -------------------------------------------------------------------
int LrN[13] =
{251, 252, 253, 254, 255, 256, 257, 258, 259, 260, 261, 262, 263};
double LrA[13] =
{251.094, 252.095, 253.095, 254.097, 255.097, 256.099, 257.1 , 258.102,
259.103, 260.106, 261.107, 262.11 , 263.111};
double LrS[13] =
{32, 32, 24, 36, 22, 24, 22, 11, 80, 12, 22, 32, 39};
double LrW[13] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100, 0};
AddElement("Lr", 103, 13, *LrN , *LrA , *LrS , *LrW);
// Z = 104 -------------------------------------------------------------------
int RfN[12] =
{253, 254, 255, 256, 257, 258, 259, 260, 261, 262, 263, 264};
double RfA[12] =
{253.101, 254.1 , 255.101, 256.101, 257.103, 258.104, 259.106, 260.106,
261.109, 262.11 , 263.113, 264.114};
double RfS[12] =
{49, 31, 22, 29, 29, 22, 80, 22, 11, 30, 20, 48};
double RfW[12] =
{0, 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0};
AddElement("Rf", 104, 12, *RfN , *RfA , *RfS , *RfW);
// Z = 105 -------------------------------------------------------------------
int DbN[11] =
{255, 256, 257, 258, 259, 260, 261, 262, 263, 264, 265};
double DbA[11] =
{255.107, 256.108, 257.108, 258.109, 259.11 , 260.111, 261.112, 262.114,
263.115, 264.117, 265.119};
double DbS[11] =
{45, 39, 25, 37, 31, 25, 25, 20, 18, 25, 30};
double DbW[11] =
{0, 0, 0, 0, 0, 0, 0, 100, 0, 0, 0};
AddElement("Db", 105, 11, *DbN , *DbA , *DbS , *DbW);
// Z = 106 -------------------------------------------------------------------
int SgN[9] =
{258, 259, 260, 261, 262, 263, 264, 265, 266};
double SgA[9] =
{258.113, 259.115, 260.114, 261.116, 262.116, 263.118, 264.119, 265.121,
266.122};
double SgS[9] =
{45, 23, 40, 30, 30, 13, 30, 15, 31};
double SgW[9] =
{0, 0, 0, 0, 0, 0, 0, 0, 100};
AddElement("Sg", 106, 9, *SgN , *SgA , *SgS , *SgW);
// Z = 107 -------------------------------------------------------------------
int BhN[8] =
{260, 261, 262, 263, 264, 265, 266, 267};
double BhA[8] =
{260.122, 261.122, 262.123, 263.123, 264.125, 265.125, 266.127, 267.128};
double BhS[8] =
{66, 26, 40, 45, 30, 41, 38, 37};
double BhW[8] =
{0, 0, 0, 0, 100, 0, 0, 0};
AddElement("Bh", 107, 8, *BhN , *BhA , *BhS , *BhW);
for(G4int i=0; i<maxNumElements; i++) {elmNames.push_back(elmSymbol[i]);}
if(0<verbose) {
G4cout << "G4NistElementBuilder: " << maxNumElements-1 << " Elements "
<< index << " Isotopes"
<< G4endl;
}
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......