// requires ROOT: http://root.cern.ch/
//
//    usage:            compile using ROOT by: ".L library_atomic.C+" (note the plus sign)
//
//	By: 		Jaideep Singh
//
//	Date: 		02/12/07 
//	
//      descp:          Nuclear Charge, Relative Atomic Weight, and Isotopic Abundances for Most Isoptopes
//								
//			To use this library, place the following line in your macro to load the lib:
//
//				gSystem->Load("library_atomic_C.so");
//			
//                      Make sure that it has been compiled as described in the usage above.
//                      Make sure that the path is correct in the "Load" command
//
//	                now you can call the "atomic" function
//                      the first parameter is an isotope like "He" for natural abundance helium 
//                           or "He3" for that specific isotope for helium
//                      the second parameter is the required output parameter:
//                           parameter = "Z" , nuclear charge
//                           parameter = "A" , relative atomic weight
//                           parameter = "IC" , isotopic abundance in natural sample
// 
//     data from:       http://physics.nist.gov/PhysRefData/Compositions/index.html
//                      (NIST) downloaded on 02/11/07
//
#include "TString.h"
#include "Riostream.h"

// get atomic parameters
// parameter = "Z" , nuclear charge
// parameter = "A" , relative atomic weight
// parameter = "IC" , isotopic abundance in natural sample
Double_t atomic(TString isotope = "H" , TString parameter = "A")
{
	Double_t Z  = 0.0;
	Double_t A  = 0.0;
	Double_t IC = 0.0;
	Double_t output = 0.0;
	if (isotope == "H")
	{
		Z = 1;
		A = 1.00794;
		IC = 1.0;
	}
	else if (isotope == "H1")
	{
		Z = 1;
		A = 1.0078250321;
		IC = 0.999885;
	}
	else if (isotope == "D" || isotope == "H2")
	{
		Z = 1;
		A = 2.0141017780;
		IC = 0.000115;
	}
	else if (isotope == "T" || isotope == "H3")
	{
		Z = 1;
		A = 3.0160492675;
		IC = 0;
	}
	else if (isotope == "H4")
	{
		Z = 1;
		A = 4.02783;
		IC = 0;
	}
	else if (isotope == "H5")
	{
		Z = 1;
		A = 5.03954;
		IC = 0;
	}
	else if (isotope == "H6")
	{
		Z = 1;
		A = 6.04494;
		IC = 0;
	}
	else if (isotope == "He")
	{
		Z = 2;
		A = 4.002602;
		IC = 1.0;
	}
	else if (isotope == "He3")
	{
		Z = 2;
		A = 3.0160293097;
		IC = 1.37e-06;
	}
	else if (isotope == "He4")
	{
		Z = 2;
		A = 4.0026032497;
		IC = 0.99999863;
	}
	else if (isotope == "He5")
	{
		Z = 2;
		A = 5.012220;
		IC = 0;
	}
	else if (isotope == "He6")
	{
		Z = 2;
		A = 6.0188881;
		IC = 0;
	}
	else if (isotope == "He7")
	{
		Z = 2;
		A = 7.028030;
		IC = 0;
	}
	else if (isotope == "He8")
	{
		Z = 2;
		A = 8.033922;
		IC = 0;
	}
	else if (isotope == "He9")
	{
		Z = 2;
		A = 9.043820;
		IC = 0;
	}
	else if (isotope == "He10")
	{
		Z = 2;
		A = 10.052400;
		IC = 0;
	}
	else if (isotope == "Li4")
	{
		Z = 3;
		A = 4.02718;
		IC = 0;
	}
	else if (isotope == "Li5")
	{
		Z = 3;
		A = 5.012540;
		IC = 0;
	}
	else if (isotope == "Li")
	{
		Z = 3;
		A = 6.941;
		IC = 1.0;
	}
	else if (isotope == "Li6")
	{
		Z = 3;
		A = 6.0151223;
		IC = 0.0759;
	}
	else if (isotope == "Li7")
	{
		Z = 3;
		A = 7.0160040;
		IC = 0.9241;
	}
	else if (isotope == "Li8")
	{
		Z = 3;
		A = 8.0224867;
		IC = 0;
	}
	else if (isotope == "Li9")
	{
		Z = 3;
		A = 9.0267891;
		IC = 0;
	}
	else if (isotope == "Li10")
	{
		Z = 3;
		A = 10.035481;
		IC = 0;
	}
	else if (isotope == "Li11")
	{
		Z = 3;
		A = 11.043796;
		IC = 0;
	}
	else if (isotope == "Li12")
	{
		Z = 3;
		A = 12.05378;
		IC = 0;
	}
	else if (isotope == "Be5")
	{
		Z = 4;
		A = 5.04079;
		IC = 0;
	}
	else if (isotope == "Be6")
	{
		Z = 4;
		A = 6.019726;
		IC = 0;
	}
	else if (isotope == "Be7")
	{
		Z = 4;
		A = 7.0169292;
		IC = 0;
	}
	else if (isotope == "Be8")
	{
		Z = 4;
		A = 8.00530509;
		IC = 0;
	}
	else if (isotope == "Be")
	{
		Z = 4;
		A = 9.012182;
		IC = 1.0;
	}
	else if (isotope == "Be9")
	{
		Z = 4;
		A = 9.0121821;
		IC = 1;
	}
	else if (isotope == "Be10")
	{
		Z = 4;
		A = 10.0135337;
		IC = 0;
	}
	else if (isotope == "Be11")
	{
		Z = 4;
		A = 11.021658;
		IC = 0;
	}
	else if (isotope == "Be12")
	{
		Z = 4;
		A = 12.026921;
		IC = 0;
	}
	else if (isotope == "Be13")
	{
		Z = 4;
		A = 13.03613;
		IC = 0;
	}
	else if (isotope == "Be14")
	{
		Z = 4;
		A = 14.04282;
		IC = 0;
	}
	else if (isotope == "B7")
	{
		Z = 5;
		A = 7.029920;
		IC = 0;
	}
	else if (isotope == "B8")
	{
		Z = 5;
		A = 8.0246067;
		IC = 0;
	}
	else if (isotope == "B9")
	{
		Z = 5;
		A = 9.0133288;
		IC = 0;
	}
	else if (isotope == "B")
	{
		Z = 5;
		A = 10.811;
		IC = 1.0;
	}
	else if (isotope == "B10")
	{
		Z = 5;
		A = 10.0129370;
		IC = 0.199;
	}
	else if (isotope == "B11")
	{
		Z = 5;
		A = 11.0093055;
		IC = 0.801;
	}
	else if (isotope == "B12")
	{
		Z = 5;
		A = 12.0143521;
		IC = 0;
	}
	else if (isotope == "B13")
	{
		Z = 5;
		A = 13.0177803;
		IC = 0;
	}
	else if (isotope == "B14")
	{
		Z = 5;
		A = 14.025404;
		IC = 0;
	}
	else if (isotope == "B15")
	{
		Z = 5;
		A = 15.031097;
		IC = 0;
	}
	else if (isotope == "B16")
	{
		Z = 5;
		A = 16.039810;
		IC = 0;
	}
	else if (isotope == "B17")
	{
		Z = 5;
		A = 17.04693;
		IC = 0;
	}
	else if (isotope == "B18")
	{
		Z = 5;
		A = 18.05617;
		IC = 0;
	}
	else if (isotope == "B19")
	{
		Z = 5;
		A = 19.06373;
		IC = 0;
	}
	else if (isotope == "C8")
	{
		Z = 6;
		A = 8.037675;
		IC = 0;
	}
	else if (isotope == "C9")
	{
		Z = 6;
		A = 9.0310401;
		IC = 0;
	}
	else if (isotope == "C10")
	{
		Z = 6;
		A = 10.0168531;
		IC = 0;
	}
	else if (isotope == "C11")
	{
		Z = 6;
		A = 11.0114338;
		IC = 0;
	}
	else if (isotope == "C")
	{
		Z = 6;
		A = 12.0107;
		IC = 1.0;
	}
	else if (isotope == "C12")
	{
		Z = 6;
		A = 12.0000000;
		IC = 0.9893;
	}
	else if (isotope == "C13")
	{
		Z = 6;
		A = 13.0033548378;
		IC = 0.0107;
	}
	else if (isotope == "C14")
	{
		Z = 6;
		A = 14.003241988;
		IC = 0;
	}
	else if (isotope == "C15")
	{
		Z = 6;
		A = 15.0105993;
		IC = 0;
	}
	else if (isotope == "C16")
	{
		Z = 6;
		A = 16.014701;
		IC = 0;
	}
	else if (isotope == "C17")
	{
		Z = 6;
		A = 17.022584;
		IC = 0;
	}
	else if (isotope == "C18")
	{
		Z = 6;
		A = 18.026760;
		IC = 0;
	}
	else if (isotope == "C19")
	{
		Z = 6;
		A = 19.03525;
		IC = 0;
	}
	else if (isotope == "C20")
	{
		Z = 6;
		A = 20.04032;
		IC = 0;
	}
	else if (isotope == "C21")
	{
		Z = 6;
		A = 21.04934;
		IC = 0;
	}
	else if (isotope == "C22")
	{
		Z = 6;
		A = 22.05645;
		IC = 0;
	}
	else if (isotope == "N10")
	{
		Z = 7;
		A = 10.04262;
		IC = 0;
	}
	else if (isotope == "N11")
	{
		Z = 7;
		A = 11.02680;
		IC = 0;
	}
	else if (isotope == "N12")
	{
		Z = 7;
		A = 12.0186132;
		IC = 0;
	}
	else if (isotope == "N13")
	{
		Z = 7;
		A = 13.00573858;
		IC = 0;
	}
	else if (isotope == "N")
	{
		Z = 7;
		A = 14.0067;
		IC = 1.0;
	}
	else if (isotope == "N14")
	{
		Z = 7;
		A = 14.0030740052;
		IC = 0.99632;
	}
	else if (isotope == "N15")
	{
		Z = 7;
		A = 15.0001088984;
		IC = 0.00368;
	}
	else if (isotope == "N16")
	{
		Z = 7;
		A = 16.0061014;
		IC = 0;
	}
	else if (isotope == "N17")
	{
		Z = 7;
		A = 17.008450;
		IC = 0;
	}
	else if (isotope == "N18")
	{
		Z = 7;
		A = 18.014082;
		IC = 0;
	}
	else if (isotope == "N19")
	{
		Z = 7;
		A = 19.017027;
		IC = 0;
	}
	else if (isotope == "N20")
	{
		Z = 7;
		A = 20.023370;
		IC = 0;
	}
	else if (isotope == "N21")
	{
		Z = 7;
		A = 21.02709;
		IC = 0;
	}
	else if (isotope == "N22")
	{
		Z = 7;
		A = 22.03444;
		IC = 0;
	}
	else if (isotope == "N23")
	{
		Z = 7;
		A = 23.04051;
		IC = 0;
	}
	else if (isotope == "N24")
	{
		Z = 7;
		A = 24.05050;
		IC = 0;
	}
	else if (isotope == "O12")
	{
		Z = 8;
		A = 12.034405;
		IC = 0;
	}
	else if (isotope == "O13")
	{
		Z = 8;
		A = 13.024810;
		IC = 0;
	}
	else if (isotope == "O14")
	{
		Z = 8;
		A = 14.00859529;
		IC = 0;
	}
	else if (isotope == "O15")
	{
		Z = 8;
		A = 15.0030654;
		IC = 0;
	}
	else if (isotope == "O")
	{
		Z = 8;
		A = 15.9994;
		IC = 1.0;
	}
	else if (isotope == "O16")
	{
		Z = 8;
		A = 15.9949146221;
		IC = 0.99757;
	}
	else if (isotope == "O17")
	{
		Z = 8;
		A = 16.99913150;
		IC = 0.00038;
	}
	else if (isotope == "O18")
	{
		Z = 8;
		A = 17.9991604;
		IC = 0.00205;
	}
	else if (isotope == "O19")
	{
		Z = 8;
		A = 19.003579;
		IC = 0;
	}
	else if (isotope == "O20")
	{
		Z = 8;
		A = 20.0040762;
		IC = 0;
	}
	else if (isotope == "O21")
	{
		Z = 8;
		A = 21.008655;
		IC = 0;
	}
	else if (isotope == "O22")
	{
		Z = 8;
		A = 22.009970;
		IC = 0;
	}
	else if (isotope == "O23")
	{
		Z = 8;
		A = 23.01569;
		IC = 0;
	}
	else if (isotope == "O24")
	{
		Z = 8;
		A = 24.02037;
		IC = 0;
	}
	else if (isotope == "O25")
	{
		Z = 8;
		A = 25.02914;
		IC = 0;
	}
	else if (isotope == "O26")
	{
		Z = 8;
		A = 26.03775;
		IC = 0;
	}
	else if (isotope == "F14")
	{
		Z = 9;
		A = 14.03608;
		IC = 0;
	}
	else if (isotope == "F15")
	{
		Z = 9;
		A = 15.01801;
		IC = 0;
	}
	else if (isotope == "F16")
	{
		Z = 9;
		A = 16.011466;
		IC = 0;
	}
	else if (isotope == "F17")
	{
		Z = 9;
		A = 17.00209524;
		IC = 0;
	}
	else if (isotope == "F18")
	{
		Z = 9;
		A = 18.0009377;
		IC = 0;
	}
	else if (isotope == "F")
	{
		Z = 9;
		A = 18.9984032;
		IC = 1.0;
	}
	else if (isotope == "F19")
	{
		Z = 9;
		A = 18.99840320;
		IC = 1;
	}
	else if (isotope == "F20")
	{
		Z = 9;
		A = 19.99998132;
		IC = 0;
	}
	else if (isotope == "F21")
	{
		Z = 9;
		A = 20.9999489;
		IC = 0;
	}
	else if (isotope == "F22")
	{
		Z = 9;
		A = 22.002999;
		IC = 0;
	}
	else if (isotope == "F23")
	{
		Z = 9;
		A = 23.003570;
		IC = 0;
	}
	else if (isotope == "F24")
	{
		Z = 9;
		A = 24.008100;
		IC = 0;
	}
	else if (isotope == "F25")
	{
		Z = 9;
		A = 25.012090;
		IC = 0;
	}
	else if (isotope == "F26")
	{
		Z = 9;
		A = 26.01963;
		IC = 0;
	}
	else if (isotope == "F27")
	{
		Z = 9;
		A = 27.02689;
		IC = 0;
	}
	else if (isotope == "F28")
	{
		Z = 9;
		A = 28.03567;
		IC = 0;
	}
	else if (isotope == "F29")
	{
		Z = 9;
		A = 29.04326;
		IC = 0;
	}
	else if (isotope == "Ne16")
	{
		Z = 10;
		A = 16.025757;
		IC = 0;
	}
	else if (isotope == "Ne17")
	{
		Z = 10;
		A = 17.017700;
		IC = 0;
	}
	else if (isotope == "Ne18")
	{
		Z = 10;
		A = 18.0056971;
		IC = 0;
	}
	else if (isotope == "Ne19")
	{
		Z = 10;
		A = 19.0018798;
		IC = 0;
	}
	else if (isotope == "Ne")
	{
		Z = 10;
		A = 20.1797;
		IC = 1.0;
	}
	else if (isotope == "Ne20")
	{
		Z = 10;
		A = 19.9924401759;
		IC = 0.9048;
	}
	else if (isotope == "Ne21")
	{
		Z = 10;
		A = 20.99384674;
		IC = 0.0027;
	}
	else if (isotope == "Ne22")
	{
		Z = 10;
		A = 21.99138551;
		IC = 0.0925;
	}
	else if (isotope == "Ne23")
	{
		Z = 10;
		A = 22.99446734;
		IC = 0;
	}
	else if (isotope == "Ne24")
	{
		Z = 10;
		A = 23.993615;
		IC = 0;
	}
	else if (isotope == "Ne25")
	{
		Z = 10;
		A = 24.997790;
		IC = 0;
	}
	else if (isotope == "Ne26")
	{
		Z = 10;
		A = 26.000460;
		IC = 0;
	}
	else if (isotope == "Ne27")
	{
		Z = 10;
		A = 27.00762;
		IC = 0;
	}
	else if (isotope == "Ne28")
	{
		Z = 10;
		A = 28.01211;
		IC = 0;
	}
	else if (isotope == "Ne29")
	{
		Z = 10;
		A = 29.01935;
		IC = 0;
	}
	else if (isotope == "Ne30")
	{
		Z = 10;
		A = 30.02387;
		IC = 0;
	}
	else if (isotope == "Ne31")
	{
		Z = 10;
		A = 31.03311;
		IC = 0;
	}
	else if (isotope == "Ne32")
	{
		Z = 10;
		A = 32.03991;
		IC = 0;
	}
	else if (isotope == "Na18")
	{
		Z = 11;
		A = 18.02718;
		IC = 0;
	}
	else if (isotope == "Na19")
	{
		Z = 11;
		A = 19.013879;
		IC = 0;
	}
	else if (isotope == "Na20")
	{
		Z = 11;
		A = 20.007348;
		IC = 0;
	}
	else if (isotope == "Na21")
	{
		Z = 11;
		A = 20.9976551;
		IC = 0;
	}
	else if (isotope == "Na22")
	{
		Z = 11;
		A = 21.9944368;
		IC = 0;
	}
	else if (isotope == "Na")
	{
		Z = 11;
		A = 22.989770;
		IC = 1.0;
	}
	else if (isotope == "Na23")
	{
		Z = 11;
		A = 22.98976967;
		IC = 1;
	}
	else if (isotope == "Na24")
	{
		Z = 11;
		A = 23.99096333;
		IC = 0;
	}
	else if (isotope == "Na25")
	{
		Z = 11;
		A = 24.9899544;
		IC = 0;
	}
	else if (isotope == "Na26")
	{
		Z = 11;
		A = 25.992590;
		IC = 0;
	}
	else if (isotope == "Na27")
	{
		Z = 11;
		A = 26.994010;
		IC = 0;
	}
	else if (isotope == "Na28")
	{
		Z = 11;
		A = 27.998890;
		IC = 0;
	}
	else if (isotope == "Na29")
	{
		Z = 11;
		A = 29.00281;
		IC = 0;
	}
	else if (isotope == "Na30")
	{
		Z = 11;
		A = 30.00923;
		IC = 0;
	}
	else if (isotope == "Na31")
	{
		Z = 11;
		A = 31.01360;
		IC = 0;
	}
	else if (isotope == "Na32")
	{
		Z = 11;
		A = 32.01965;
		IC = 0;
	}
	else if (isotope == "Na33")
	{
		Z = 11;
		A = 33.02739;
		IC = 0;
	}
	else if (isotope == "Na34")
	{
		Z = 11;
		A = 34.03490;
		IC = 0;
	}
	else if (isotope == "Na35")
	{
		Z = 11;
		A = 35.04418;
		IC = 0;
	}
	else if (isotope == "Mg20")
	{
		Z = 12;
		A = 20.018863;
		IC = 0;
	}
	else if (isotope == "Mg21")
	{
		Z = 12;
		A = 21.011714;
		IC = 0;
	}
	else if (isotope == "Mg22")
	{
		Z = 12;
		A = 21.9995741;
		IC = 0;
	}
	else if (isotope == "Mg23")
	{
		Z = 12;
		A = 22.9941249;
		IC = 0;
	}
	else if (isotope == "Mg")
	{
		Z = 12;
		A = 24.3050;
		IC = 1.0;
	}
	else if (isotope == "Mg24")
	{
		Z = 12;
		A = 23.98504190;
		IC = 0.7899;
	}
	else if (isotope == "Mg25")
	{
		Z = 12;
		A = 24.98583702;
		IC = 0.1;
	}
	else if (isotope == "Mg26")
	{
		Z = 12;
		A = 25.98259304;
		IC = 0.1101;
	}
	else if (isotope == "Mg27")
	{
		Z = 12;
		A = 26.98434074;
		IC = 0;
	}
	else if (isotope == "Mg28")
	{
		Z = 12;
		A = 27.9838767;
		IC = 0;
	}
	else if (isotope == "Mg29")
	{
		Z = 12;
		A = 28.988550;
		IC = 0;
	}
	else if (isotope == "Mg30")
	{
		Z = 12;
		A = 29.990460;
		IC = 0;
	}
	else if (isotope == "Mg31")
	{
		Z = 12;
		A = 30.996550;
		IC = 0;
	}
	else if (isotope == "Mg32")
	{
		Z = 12;
		A = 31.99915;
		IC = 0;
	}
	else if (isotope == "Mg33")
	{
		Z = 12;
		A = 33.00559;
		IC = 0;
	}
	else if (isotope == "Mg34")
	{
		Z = 12;
		A = 34.00907;
		IC = 0;
	}
	else if (isotope == "Mg35")
	{
		Z = 12;
		A = 35.01749;
		IC = 0;
	}
	else if (isotope == "Mg36")
	{
		Z = 12;
		A = 36.02245;
		IC = 0;
	}
	else if (isotope == "Mg37")
	{
		Z = 12;
		A = 37.03124;
		IC = 0;
	}
	else if (isotope == "Al21")
	{
		Z = 13;
		A = 21.02804;
		IC = 0;
	}
	else if (isotope == "Al22")
	{
		Z = 13;
		A = 22.01952;
		IC = 0;
	}
	else if (isotope == "Al23")
	{
		Z = 13;
		A = 23.007265;
		IC = 0;
	}
	else if (isotope == "Al24")
	{
		Z = 13;
		A = 23.999941;
		IC = 0;
	}
	else if (isotope == "Al25")
	{
		Z = 13;
		A = 24.9904286;
		IC = 0;
	}
	else if (isotope == "Al26")
	{
		Z = 13;
		A = 25.98689166;
		IC = 0;
	}
	else if (isotope == "Al")
	{
		Z = 13;
		A = 26.981538;
		IC = 1.0;
	}
	else if (isotope == "Al27")
	{
		Z = 13;
		A = 26.98153844;
		IC = 1;
	}
	else if (isotope == "Al28")
	{
		Z = 13;
		A = 27.98191018;
		IC = 0;
	}
	else if (isotope == "Al29")
	{
		Z = 13;
		A = 28.9804448;
		IC = 0;
	}
	else if (isotope == "Al30")
	{
		Z = 13;
		A = 29.982960;
		IC = 0;
	}
	else if (isotope == "Al31")
	{
		Z = 13;
		A = 30.983946;
		IC = 0;
	}
	else if (isotope == "Al32")
	{
		Z = 13;
		A = 31.988120;
		IC = 0;
	}
	else if (isotope == "Al33")
	{
		Z = 13;
		A = 32.990870;
		IC = 0;
	}
	else if (isotope == "Al34")
	{
		Z = 13;
		A = 33.99693;
		IC = 0;
	}
	else if (isotope == "Al35")
	{
		Z = 13;
		A = 34.99994;
		IC = 0;
	}
	else if (isotope == "Al36")
	{
		Z = 13;
		A = 36.00635;
		IC = 0;
	}
	else if (isotope == "Al37")
	{
		Z = 13;
		A = 37.01031;
		IC = 0;
	}
	else if (isotope == "Al38")
	{
		Z = 13;
		A = 38.01690;
		IC = 0;
	}
	else if (isotope == "Al39")
	{
		Z = 13;
		A = 39.02190;
		IC = 0;
	}
	else if (isotope == "Si22")
	{
		Z = 14;
		A = 22.03453;
		IC = 0;
	}
	else if (isotope == "Si23")
	{
		Z = 14;
		A = 23.02552;
		IC = 0;
	}
	else if (isotope == "Si24")
	{
		Z = 14;
		A = 24.011546;
		IC = 0;
	}
	else if (isotope == "Si25")
	{
		Z = 14;
		A = 25.004107;
		IC = 0;
	}
	else if (isotope == "Si26")
	{
		Z = 14;
		A = 25.992330;
		IC = 0;
	}
	else if (isotope == "Si27")
	{
		Z = 14;
		A = 26.98670476;
		IC = 0;
	}
	else if (isotope == "Si")
	{
		Z = 14;
		A = 28.0855;
		IC = 1.0;
	}
	else if (isotope == "Si28")
	{
		Z = 14;
		A = 27.9769265327;
		IC = 0.922297;
	}
	else if (isotope == "Si29")
	{
		Z = 14;
		A = 28.97649472;
		IC = 0.046832;
	}
	else if (isotope == "Si30")
	{
		Z = 14;
		A = 29.97377022;
		IC = 0.030872;
	}
	else if (isotope == "Si31")
	{
		Z = 14;
		A = 30.97536327;
		IC = 0;
	}
	else if (isotope == "Si32")
	{
		Z = 14;
		A = 31.9741481;
		IC = 0;
	}
	else if (isotope == "Si33")
	{
		Z = 14;
		A = 32.978001;
		IC = 0;
	}
	else if (isotope == "Si34")
	{
		Z = 14;
		A = 33.978576;
		IC = 0;
	}
	else if (isotope == "Si35")
	{
		Z = 14;
		A = 34.984580;
		IC = 0;
	}
	else if (isotope == "Si36")
	{
		Z = 14;
		A = 35.98669;
		IC = 0;
	}
	else if (isotope == "Si37")
	{
		Z = 14;
		A = 36.99300;
		IC = 0;
	}
	else if (isotope == "Si38")
	{
		Z = 14;
		A = 37.99598;
		IC = 0;
	}
	else if (isotope == "Si39")
	{
		Z = 14;
		A = 39.00230;
		IC = 0;
	}
	else if (isotope == "Si40")
	{
		Z = 14;
		A = 40.00580;
		IC = 0;
	}
	else if (isotope == "Si41")
	{
		Z = 14;
		A = 41.01270;
		IC = 0;
	}
	else if (isotope == "Si42")
	{
		Z = 14;
		A = 42.01610;
		IC = 0;
	}
	else if (isotope == "P24")
	{
		Z = 15;
		A = 24.03435;
		IC = 0;
	}
	else if (isotope == "P25")
	{
		Z = 15;
		A = 25.02026;
		IC = 0;
	}
	else if (isotope == "P26")
	{
		Z = 15;
		A = 26.01178;
		IC = 0;
	}
	else if (isotope == "P27")
	{
		Z = 15;
		A = 26.999190;
		IC = 0;
	}
	else if (isotope == "P28")
	{
		Z = 15;
		A = 27.992312;
		IC = 0;
	}
	else if (isotope == "P29")
	{
		Z = 15;
		A = 28.9818014;
		IC = 0;
	}
	else if (isotope == "P30")
	{
		Z = 15;
		A = 29.9783138;
		IC = 0;
	}
	else if (isotope == "P")
	{
		Z = 15;
		A = 30.973761;
		IC = 1.0;
	}
	else if (isotope == "P31")
	{
		Z = 15;
		A = 30.97376151;
		IC = 1;
	}
	else if (isotope == "P32")
	{
		Z = 15;
		A = 31.97390716;
		IC = 0;
	}
	else if (isotope == "P33")
	{
		Z = 15;
		A = 32.9717253;
		IC = 0;
	}
	else if (isotope == "P34")
	{
		Z = 15;
		A = 33.973636;
		IC = 0;
	}
	else if (isotope == "P35")
	{
		Z = 15;
		A = 34.9733142;
		IC = 0;
	}
	else if (isotope == "P36")
	{
		Z = 15;
		A = 35.978260;
		IC = 0;
	}
	else if (isotope == "P37")
	{
		Z = 15;
		A = 36.979610;
		IC = 0;
	}
	else if (isotope == "P38")
	{
		Z = 15;
		A = 37.98447;
		IC = 0;
	}
	else if (isotope == "P39")
	{
		Z = 15;
		A = 38.98642;
		IC = 0;
	}
	else if (isotope == "P40")
	{
		Z = 15;
		A = 39.99105;
		IC = 0;
	}
	else if (isotope == "P41")
	{
		Z = 15;
		A = 40.99480;
		IC = 0;
	}
	else if (isotope == "P42")
	{
		Z = 15;
		A = 42.00009;
		IC = 0;
	}
	else if (isotope == "P43")
	{
		Z = 15;
		A = 43.00331;
		IC = 0;
	}
	else if (isotope == "P44")
	{
		Z = 15;
		A = 44.00988;
		IC = 0;
	}
	else if (isotope == "P45")
	{
		Z = 15;
		A = 45.01514;
		IC = 0;
	}
	else if (isotope == "P46")
	{
		Z = 15;
		A = 46.02383;
		IC = 0;
	}
	else if (isotope == "S26")
	{
		Z = 16;
		A = 26.02788;
		IC = 0;
	}
	else if (isotope == "S27")
	{
		Z = 16;
		A = 27.01880;
		IC = 0;
	}
	else if (isotope == "S28")
	{
		Z = 16;
		A = 28.00437;
		IC = 0;
	}
	else if (isotope == "S29")
	{
		Z = 16;
		A = 28.996610;
		IC = 0;
	}
	else if (isotope == "S30")
	{
		Z = 16;
		A = 29.984903;
		IC = 0;
	}
	else if (isotope == "S31")
	{
		Z = 16;
		A = 30.9795544;
		IC = 0;
	}
	else if (isotope == "S")
	{
		Z = 16;
		A = 32.065;
		IC = 1.0;
	}
	else if (isotope == "S32")
	{
		Z = 16;
		A = 31.97207069;
		IC = 0.9493;
	}
	else if (isotope == "S33")
	{
		Z = 16;
		A = 32.97145850;
		IC = 0.0076;
	}
	else if (isotope == "S34")
	{
		Z = 16;
		A = 33.96786683;
		IC = 0.0429;
	}
	else if (isotope == "S35")
	{
		Z = 16;
		A = 34.96903214;
		IC = 0;
	}
	else if (isotope == "S36")
	{
		Z = 16;
		A = 35.96708088;
		IC = 0.0002;
	}
	else if (isotope == "S37")
	{
		Z = 16;
		A = 36.97112572;
		IC = 0;
	}
	else if (isotope == "S38")
	{
		Z = 16;
		A = 37.971163;
		IC = 0;
	}
	else if (isotope == "S39")
	{
		Z = 16;
		A = 38.975140;
		IC = 0;
	}
	else if (isotope == "S40")
	{
		Z = 16;
		A = 39.97547;
		IC = 0;
	}
	else if (isotope == "S41")
	{
		Z = 16;
		A = 40.98003;
		IC = 0;
	}
	else if (isotope == "S42")
	{
		Z = 16;
		A = 41.98149;
		IC = 0;
	}
	else if (isotope == "S43")
	{
		Z = 16;
		A = 42.98660;
		IC = 0;
	}
	else if (isotope == "S44")
	{
		Z = 16;
		A = 43.98832;
		IC = 0;
	}
	else if (isotope == "S45")
	{
		Z = 16;
		A = 44.99482;
		IC = 0;
	}
	else if (isotope == "S46")
	{
		Z = 16;
		A = 45.99957;
		IC = 0;
	}
	else if (isotope == "S47")
	{
		Z = 16;
		A = 47.00762;
		IC = 0;
	}
	else if (isotope == "S48")
	{
		Z = 16;
		A = 48.01299;
		IC = 0;
	}
	else if (isotope == "S49")
	{
		Z = 16;
		A = 49.02201;
		IC = 0;
	}
	else if (isotope == "Cl28")
	{
		Z = 17;
		A = 28.02851;
		IC = 0;
	}
	else if (isotope == "Cl29")
	{
		Z = 17;
		A = 29.01411;
		IC = 0;
	}
	else if (isotope == "Cl30")
	{
		Z = 17;
		A = 30.00477;
		IC = 0;
	}
	else if (isotope == "Cl31")
	{
		Z = 17;
		A = 30.992420;
		IC = 0;
	}
	else if (isotope == "Cl32")
	{
		Z = 17;
		A = 31.985689;
		IC = 0;
	}
	else if (isotope == "Cl33")
	{
		Z = 17;
		A = 32.9774518;
		IC = 0;
	}
	else if (isotope == "Cl34")
	{
		Z = 17;
		A = 33.97376197;
		IC = 0;
	}
	else if (isotope == "Cl")
	{
		Z = 17;
		A = 35.453;
		IC = 1.0;
	}
	else if (isotope == "Cl35")
	{
		Z = 17;
		A = 34.96885271;
		IC = 0.7578;
	}
	else if (isotope == "Cl36")
	{
		Z = 17;
		A = 35.96830695;
		IC = 0;
	}
	else if (isotope == "Cl37")
	{
		Z = 17;
		A = 36.96590260;
		IC = 0.2422;
	}
	else if (isotope == "Cl38")
	{
		Z = 17;
		A = 37.96801055;
		IC = 0;
	}
	else if (isotope == "Cl39")
	{
		Z = 17;
		A = 38.9680077;
		IC = 0;
	}
	else if (isotope == "Cl40")
	{
		Z = 17;
		A = 39.970420;
		IC = 0;
	}
	else if (isotope == "Cl41")
	{
		Z = 17;
		A = 40.970650;
		IC = 0;
	}
	else if (isotope == "Cl42")
	{
		Z = 17;
		A = 41.97317;
		IC = 0;
	}
	else if (isotope == "Cl43")
	{
		Z = 17;
		A = 42.97420;
		IC = 0;
	}
	else if (isotope == "Cl44")
	{
		Z = 17;
		A = 43.97854;
		IC = 0;
	}
	else if (isotope == "Cl45")
	{
		Z = 17;
		A = 44.97970;
		IC = 0;
	}
	else if (isotope == "Cl46")
	{
		Z = 17;
		A = 45.98412;
		IC = 0;
	}
	else if (isotope == "Cl47")
	{
		Z = 17;
		A = 46.98795;
		IC = 0;
	}
	else if (isotope == "Cl48")
	{
		Z = 17;
		A = 47.99485;
		IC = 0;
	}
	else if (isotope == "Cl49")
	{
		Z = 17;
		A = 48.99989;
		IC = 0;
	}
	else if (isotope == "Cl50")
	{
		Z = 17;
		A = 50.00773;
		IC = 0;
	}
	else if (isotope == "Cl51")
	{
		Z = 17;
		A = 51.01353;
		IC = 0;
	}
	else if (isotope == "Ar30")
	{
		Z = 18;
		A = 30.02156;
		IC = 0;
	}
	else if (isotope == "Ar31")
	{
		Z = 18;
		A = 31.01213;
		IC = 0;
	}
	else if (isotope == "Ar32")
	{
		Z = 18;
		A = 31.997660;
		IC = 0;
	}
	else if (isotope == "Ar33")
	{
		Z = 18;
		A = 32.989930;
		IC = 0;
	}
	else if (isotope == "Ar34")
	{
		Z = 18;
		A = 33.980270;
		IC = 0;
	}
	else if (isotope == "Ar35")
	{
		Z = 18;
		A = 34.9752567;
		IC = 0;
	}
	else if (isotope == "Ar")
	{
		Z = 18;
		A = 39.948;
		IC = 1.0;
	}
	else if (isotope == "Ar36")
	{
		Z = 18;
		A = 35.96754628;
		IC = 0.003365;
	}
	else if (isotope == "Ar37")
	{
		Z = 18;
		A = 36.9667759;
		IC = 0;
	}
	else if (isotope == "Ar38")
	{
		Z = 18;
		A = 37.9627322;
		IC = 0.000632;
	}
	else if (isotope == "Ar39")
	{
		Z = 18;
		A = 38.964313;
		IC = 0;
	}
	else if (isotope == "Ar40")
	{
		Z = 18;
		A = 39.962383123;
		IC = 0.996003;
	}
	else if (isotope == "Ar41")
	{
		Z = 18;
		A = 40.9645008;
		IC = 0;
	}
	else if (isotope == "Ar42")
	{
		Z = 18;
		A = 41.963050;
		IC = 0;
	}
	else if (isotope == "Ar43")
	{
		Z = 18;
		A = 42.965670;
		IC = 0;
	}
	else if (isotope == "Ar44")
	{
		Z = 18;
		A = 43.965365;
		IC = 0;
	}
	else if (isotope == "Ar45")
	{
		Z = 18;
		A = 44.968090;
		IC = 0;
	}
	else if (isotope == "Ar46")
	{
		Z = 18;
		A = 45.968090;
		IC = 0;
	}
	else if (isotope == "Ar47")
	{
		Z = 18;
		A = 46.97219;
		IC = 0;
	}
	else if (isotope == "Ar48")
	{
		Z = 18;
		A = 47.97507;
		IC = 0;
	}
	else if (isotope == "Ar49")
	{
		Z = 18;
		A = 48.98218;
		IC = 0;
	}
	else if (isotope == "Ar50")
	{
		Z = 18;
		A = 49.98594;
		IC = 0;
	}
	else if (isotope == "Ar51")
	{
		Z = 18;
		A = 50.99324;
		IC = 0;
	}
	else if (isotope == "Ar52")
	{
		Z = 18;
		A = 51.99817;
		IC = 0;
	}
	else if (isotope == "Ar53")
	{
		Z = 18;
		A = 53.00623;
		IC = 0;
	}
	else if (isotope == "K32")
	{
		Z = 19;
		A = 32.02192;
		IC = 0;
	}
	else if (isotope == "K33")
	{
		Z = 19;
		A = 33.00726;
		IC = 0;
	}
	else if (isotope == "K34")
	{
		Z = 19;
		A = 33.99841;
		IC = 0;
	}
	else if (isotope == "K35")
	{
		Z = 19;
		A = 34.988012;
		IC = 0;
	}
	else if (isotope == "K36")
	{
		Z = 19;
		A = 35.981293;
		IC = 0;
	}
	else if (isotope == "K37")
	{
		Z = 19;
		A = 36.97337691;
		IC = 0;
	}
	else if (isotope == "K38")
	{
		Z = 19;
		A = 37.9690801;
		IC = 0;
	}
	else if (isotope == "K")
	{
		Z = 19;
		A = 39.0983;
		IC = 1.0;
	}
	else if (isotope == "K39")
	{
		Z = 19;
		A = 38.9637069;
		IC = 0.932581;
	}
	else if (isotope == "K40")
	{
		Z = 19;
		A = 39.96399867;
		IC = 0.000117;
	}
	else if (isotope == "K41")
	{
		Z = 19;
		A = 40.96182597;
		IC = 0.067302;
	}
	else if (isotope == "K42")
	{
		Z = 19;
		A = 41.9624031;
		IC = 0;
	}
	else if (isotope == "K43")
	{
		Z = 19;
		A = 42.960716;
		IC = 0;
	}
	else if (isotope == "K44")
	{
		Z = 19;
		A = 43.961560;
		IC = 0;
	}
	else if (isotope == "K45")
	{
		Z = 19;
		A = 44.960700;
		IC = 0;
	}
	else if (isotope == "K46")
	{
		Z = 19;
		A = 45.961976;
		IC = 0;
	}
	else if (isotope == "K47")
	{
		Z = 19;
		A = 46.961678;
		IC = 0;
	}
	else if (isotope == "K48")
	{
		Z = 19;
		A = 47.965513;
		IC = 0;
	}
	else if (isotope == "K49")
	{
		Z = 19;
		A = 48.967450;
		IC = 0;
	}
	else if (isotope == "K50")
	{
		Z = 19;
		A = 49.97278;
		IC = 0;
	}
	else if (isotope == "K51")
	{
		Z = 19;
		A = 50.97638;
		IC = 0;
	}
	else if (isotope == "K52")
	{
		Z = 19;
		A = 51.98261;
		IC = 0;
	}
	else if (isotope == "K53")
	{
		Z = 19;
		A = 52.98712;
		IC = 0;
	}
	else if (isotope == "K54")
	{
		Z = 19;
		A = 53.99399;
		IC = 0;
	}
	else if (isotope == "K55")
	{
		Z = 19;
		A = 54.99939;
		IC = 0;
	}
	else if (isotope == "Ca34")
	{
		Z = 20;
		A = 34.01412;
		IC = 0;
	}
	else if (isotope == "Ca35")
	{
		Z = 20;
		A = 35.004770;
		IC = 0;
	}
	else if (isotope == "Ca36")
	{
		Z = 20;
		A = 35.993090;
		IC = 0;
	}
	else if (isotope == "Ca37")
	{
		Z = 20;
		A = 36.985872;
		IC = 0;
	}
	else if (isotope == "Ca38")
	{
		Z = 20;
		A = 37.976319;
		IC = 0;
	}
	else if (isotope == "Ca39")
	{
		Z = 20;
		A = 38.9707177;
		IC = 0;
	}
	else if (isotope == "Ca")
	{
		Z = 20;
		A = 40.078;
		IC = 1.0;
	}
	else if (isotope == "Ca40")
	{
		Z = 20;
		A = 39.9625912;
		IC = 0.96941;
	}
	else if (isotope == "Ca41")
	{
		Z = 20;
		A = 40.9622783;
		IC = 0;
	}
	else if (isotope == "Ca42")
	{
		Z = 20;
		A = 41.9586183;
		IC = 0.00647;
	}
	else if (isotope == "Ca43")
	{
		Z = 20;
		A = 42.9587668;
		IC = 0.00135;
	}
	else if (isotope == "Ca44")
	{
		Z = 20;
		A = 43.9554811;
		IC = 0.02086;
	}
	else if (isotope == "Ca45")
	{
		Z = 20;
		A = 44.9561859;
		IC = 0;
	}
	else if (isotope == "Ca46")
	{
		Z = 20;
		A = 45.9536928;
		IC = 4e-05;
	}
	else if (isotope == "Ca47")
	{
		Z = 20;
		A = 46.9545465;
		IC = 0;
	}
	else if (isotope == "Ca48")
	{
		Z = 20;
		A = 47.952534;
		IC = 0.00187;
	}
	else if (isotope == "Ca49")
	{
		Z = 20;
		A = 48.955673;
		IC = 0;
	}
	else if (isotope == "Ca50")
	{
		Z = 20;
		A = 49.957518;
		IC = 0;
	}
	else if (isotope == "Ca51")
	{
		Z = 20;
		A = 50.96147;
		IC = 0;
	}
	else if (isotope == "Ca52")
	{
		Z = 20;
		A = 51.96510;
		IC = 0;
	}
	else if (isotope == "Ca53")
	{
		Z = 20;
		A = 52.97005;
		IC = 0;
	}
	else if (isotope == "Ca54")
	{
		Z = 20;
		A = 53.97468;
		IC = 0;
	}
	else if (isotope == "Ca55")
	{
		Z = 20;
		A = 54.98055;
		IC = 0;
	}
	else if (isotope == "Ca56")
	{
		Z = 20;
		A = 55.98579;
		IC = 0;
	}
	else if (isotope == "Ca57")
	{
		Z = 20;
		A = 56.99236;
		IC = 0;
	}
	else if (isotope == "Sc36")
	{
		Z = 21;
		A = 36.01492;
		IC = 0;
	}
	else if (isotope == "Sc37")
	{
		Z = 21;
		A = 37.00305;
		IC = 0;
	}
	else if (isotope == "Sc38")
	{
		Z = 21;
		A = 37.99470;
		IC = 0;
	}
	else if (isotope == "Sc39")
	{
		Z = 21;
		A = 38.984790;
		IC = 0;
	}
	else if (isotope == "Sc40")
	{
		Z = 21;
		A = 39.977964;
		IC = 0;
	}
	else if (isotope == "Sc41")
	{
		Z = 21;
		A = 40.9692513;
		IC = 0;
	}
	else if (isotope == "Sc42")
	{
		Z = 21;
		A = 41.9655168;
		IC = 0;
	}
	else if (isotope == "Sc43")
	{
		Z = 21;
		A = 42.9611510;
		IC = 0;
	}
	else if (isotope == "Sc44")
	{
		Z = 21;
		A = 43.9594030;
		IC = 0;
	}
	else if (isotope == "Sc")
	{
		Z = 21;
		A = 44.955910;
		IC = 1.0;
	}
	else if (isotope == "Sc45")
	{
		Z = 21;
		A = 44.9559102;
		IC = 1;
	}
	else if (isotope == "Sc46")
	{
		Z = 21;
		A = 45.9551703;
		IC = 0;
	}
	else if (isotope == "Sc47")
	{
		Z = 21;
		A = 46.9524080;
		IC = 0;
	}
	else if (isotope == "Sc48")
	{
		Z = 21;
		A = 47.952235;
		IC = 0;
	}
	else if (isotope == "Sc49")
	{
		Z = 21;
		A = 48.950024;
		IC = 0;
	}
	else if (isotope == "Sc50")
	{
		Z = 21;
		A = 49.952187;
		IC = 0;
	}
	else if (isotope == "Sc51")
	{
		Z = 21;
		A = 50.953603;
		IC = 0;
	}
	else if (isotope == "Sc52")
	{
		Z = 21;
		A = 51.95665;
		IC = 0;
	}
	else if (isotope == "Sc53")
	{
		Z = 21;
		A = 52.95924;
		IC = 0;
	}
	else if (isotope == "Sc54")
	{
		Z = 21;
		A = 53.96300;
		IC = 0;
	}
	else if (isotope == "Sc55")
	{
		Z = 21;
		A = 54.96743;
		IC = 0;
	}
	else if (isotope == "Sc56")
	{
		Z = 21;
		A = 55.97266;
		IC = 0;
	}
	else if (isotope == "Sc57")
	{
		Z = 21;
		A = 56.97704;
		IC = 0;
	}
	else if (isotope == "Sc58")
	{
		Z = 21;
		A = 57.98307;
		IC = 0;
	}
	else if (isotope == "Sc59")
	{
		Z = 21;
		A = 58.98804;
		IC = 0;
	}
	else if (isotope == "Ti38")
	{
		Z = 22;
		A = 38.00977;
		IC = 0;
	}
	else if (isotope == "Ti39")
	{
		Z = 22;
		A = 39.00132;
		IC = 0;
	}
	else if (isotope == "Ti40")
	{
		Z = 22;
		A = 39.99050;
		IC = 0;
	}
	else if (isotope == "Ti41")
	{
		Z = 22;
		A = 40.983130;
		IC = 0;
	}
	else if (isotope == "Ti42")
	{
		Z = 22;
		A = 41.973032;
		IC = 0;
	}
	else if (isotope == "Ti43")
	{
		Z = 22;
		A = 42.968523;
		IC = 0;
	}
	else if (isotope == "Ti44")
	{
		Z = 22;
		A = 43.9596902;
		IC = 0;
	}
	else if (isotope == "Ti45")
	{
		Z = 22;
		A = 44.9581243;
		IC = 0;
	}
	else if (isotope == "Ti")
	{
		Z = 22;
		A = 47.867;
		IC = 1.0;
	}
	else if (isotope == "Ti46")
	{
		Z = 22;
		A = 45.9526295;
		IC = 0.0825;
	}
	else if (isotope == "Ti47")
	{
		Z = 22;
		A = 46.9517638;
		IC = 0.0744;
	}
	else if (isotope == "Ti48")
	{
		Z = 22;
		A = 47.9479471;
		IC = 0.7372;
	}
	else if (isotope == "Ti49")
	{
		Z = 22;
		A = 48.9478708;
		IC = 0.0541;
	}
	else if (isotope == "Ti50")
	{
		Z = 22;
		A = 49.9447921;
		IC = 0.0518;
	}
	else if (isotope == "Ti51")
	{
		Z = 22;
		A = 50.9466160;
		IC = 0;
	}
	else if (isotope == "Ti52")
	{
		Z = 22;
		A = 51.946898;
		IC = 0;
	}
	else if (isotope == "Ti53")
	{
		Z = 22;
		A = 52.94973;
		IC = 0;
	}
	else if (isotope == "Ti54")
	{
		Z = 22;
		A = 53.95087;
		IC = 0;
	}
	else if (isotope == "Ti55")
	{
		Z = 22;
		A = 54.95512;
		IC = 0;
	}
	else if (isotope == "Ti56")
	{
		Z = 22;
		A = 55.95799;
		IC = 0;
	}
	else if (isotope == "Ti57")
	{
		Z = 22;
		A = 56.96290;
		IC = 0;
	}
	else if (isotope == "Ti58")
	{
		Z = 22;
		A = 57.96611;
		IC = 0;
	}
	else if (isotope == "Ti59")
	{
		Z = 22;
		A = 58.97196;
		IC = 0;
	}
	else if (isotope == "Ti60")
	{
		Z = 22;
		A = 59.97564;
		IC = 0;
	}
	else if (isotope == "Ti61")
	{
		Z = 22;
		A = 60.98202;
		IC = 0;
	}
	else if (isotope == "V40")
	{
		Z = 23;
		A = 40.01109;
		IC = 0;
	}
	else if (isotope == "V41")
	{
		Z = 23;
		A = 40.99974;
		IC = 0;
	}
	else if (isotope == "V42")
	{
		Z = 23;
		A = 41.99123;
		IC = 0;
	}
	else if (isotope == "V43")
	{
		Z = 23;
		A = 42.98065;
		IC = 0;
	}
	else if (isotope == "V44")
	{
		Z = 23;
		A = 43.974400;
		IC = 0;
	}
	else if (isotope == "V45")
	{
		Z = 23;
		A = 44.965782;
		IC = 0;
	}
	else if (isotope == "V46")
	{
		Z = 23;
		A = 45.9601995;
		IC = 0;
	}
	else if (isotope == "V47")
	{
		Z = 23;
		A = 46.9549069;
		IC = 0;
	}
	else if (isotope == "V48")
	{
		Z = 23;
		A = 47.9522545;
		IC = 0;
	}
	else if (isotope == "V49")
	{
		Z = 23;
		A = 48.9485169;
		IC = 0;
	}
	else if (isotope == "V")
	{
		Z = 23;
		A = 50.9415;
		IC = 1.0;
	}
	else if (isotope == "V50")
	{
		Z = 23;
		A = 49.9471628;
		IC = 0.0025;
	}
	else if (isotope == "V51")
	{
		Z = 23;
		A = 50.9439637;
		IC = 0.9975;
	}
	else if (isotope == "V52")
	{
		Z = 23;
		A = 51.9447797;
		IC = 0;
	}
	else if (isotope == "V53")
	{
		Z = 23;
		A = 52.944343;
		IC = 0;
	}
	else if (isotope == "V54")
	{
		Z = 23;
		A = 53.946444;
		IC = 0;
	}
	else if (isotope == "V55")
	{
		Z = 23;
		A = 54.94724;
		IC = 0;
	}
	else if (isotope == "V56")
	{
		Z = 23;
		A = 55.95036;
		IC = 0;
	}
	else if (isotope == "V57")
	{
		Z = 23;
		A = 56.95236;
		IC = 0;
	}
	else if (isotope == "V58")
	{
		Z = 23;
		A = 57.95665;
		IC = 0;
	}
	else if (isotope == "V59")
	{
		Z = 23;
		A = 58.95930;
		IC = 0;
	}
	else if (isotope == "V60")
	{
		Z = 23;
		A = 59.96450;
		IC = 0;
	}
	else if (isotope == "V61")
	{
		Z = 23;
		A = 60.96741;
		IC = 0;
	}
	else if (isotope == "V62")
	{
		Z = 23;
		A = 61.97314;
		IC = 0;
	}
	else if (isotope == "V63")
	{
		Z = 23;
		A = 62.97675;
		IC = 0;
	}
	else if (isotope == "Cr42")
	{
		Z = 24;
		A = 42.00643;
		IC = 0;
	}
	else if (isotope == "Cr43")
	{
		Z = 24;
		A = 42.997710;
		IC = 0;
	}
	else if (isotope == "Cr44")
	{
		Z = 24;
		A = 43.98547;
		IC = 0;
	}
	else if (isotope == "Cr45")
	{
		Z = 24;
		A = 44.97916;
		IC = 0;
	}
	else if (isotope == "Cr46")
	{
		Z = 24;
		A = 45.968362;
		IC = 0;
	}
	else if (isotope == "Cr47")
	{
		Z = 24;
		A = 46.962907;
		IC = 0;
	}
	else if (isotope == "Cr48")
	{
		Z = 24;
		A = 47.954036;
		IC = 0;
	}
	else if (isotope == "Cr49")
	{
		Z = 24;
		A = 48.9513411;
		IC = 0;
	}
	else if (isotope == "Cr")
	{
		Z = 24;
		A = 51.9961;
		IC = 1.0;
	}
	else if (isotope == "Cr50")
	{
		Z = 24;
		A = 49.9460496;
		IC = 0.04345;
	}
	else if (isotope == "Cr51")
	{
		Z = 24;
		A = 50.9447718;
		IC = 0;
	}
	else if (isotope == "Cr52")
	{
		Z = 24;
		A = 51.9405119;
		IC = 0.83789;
	}
	else if (isotope == "Cr53")
	{
		Z = 24;
		A = 52.9406538;
		IC = 0.09501;
	}
	else if (isotope == "Cr54")
	{
		Z = 24;
		A = 53.9388849;
		IC = 0.02365;
	}
	else if (isotope == "Cr55")
	{
		Z = 24;
		A = 54.9408442;
		IC = 0;
	}
	else if (isotope == "Cr56")
	{
		Z = 24;
		A = 55.940645;
		IC = 0;
	}
	else if (isotope == "Cr57")
	{
		Z = 24;
		A = 56.94375;
		IC = 0;
	}
	else if (isotope == "Cr58")
	{
		Z = 24;
		A = 57.94425;
		IC = 0;
	}
	else if (isotope == "Cr59")
	{
		Z = 24;
		A = 58.94863;
		IC = 0;
	}
	else if (isotope == "Cr60")
	{
		Z = 24;
		A = 59.94973;
		IC = 0;
	}
	else if (isotope == "Cr61")
	{
		Z = 24;
		A = 60.95409;
		IC = 0;
	}
	else if (isotope == "Cr62")
	{
		Z = 24;
		A = 61.95580;
		IC = 0;
	}
	else if (isotope == "Cr63")
	{
		Z = 24;
		A = 62.96186;
		IC = 0;
	}
	else if (isotope == "Cr64")
	{
		Z = 24;
		A = 63.96420;
		IC = 0;
	}
	else if (isotope == "Cr65")
	{
		Z = 24;
		A = 64.97037;
		IC = 0;
	}
	else if (isotope == "Mn44")
	{
		Z = 25;
		A = 44.00687;
		IC = 0;
	}
	else if (isotope == "Mn45")
	{
		Z = 25;
		A = 44.99451;
		IC = 0;
	}
	else if (isotope == "Mn46")
	{
		Z = 25;
		A = 45.98672;
		IC = 0;
	}
	else if (isotope == "Mn47")
	{
		Z = 25;
		A = 46.97610;
		IC = 0;
	}
	else if (isotope == "Mn48")
	{
		Z = 25;
		A = 47.968870;
		IC = 0;
	}
	else if (isotope == "Mn49")
	{
		Z = 25;
		A = 48.959623;
		IC = 0;
	}
	else if (isotope == "Mn50")
	{
		Z = 25;
		A = 49.9542440;
		IC = 0;
	}
	else if (isotope == "Mn51")
	{
		Z = 25;
		A = 50.9482155;
		IC = 0;
	}
	else if (isotope == "Mn52")
	{
		Z = 25;
		A = 51.9455701;
		IC = 0;
	}
	else if (isotope == "Mn53")
	{
		Z = 25;
		A = 52.9412947;
		IC = 0;
	}
	else if (isotope == "Mn54")
	{
		Z = 25;
		A = 53.9403632;
		IC = 0;
	}
	else if (isotope == "Mn")
	{
		Z = 25;
		A = 54.938049;
		IC = 1.0;
	}
	else if (isotope == "Mn55")
	{
		Z = 25;
		A = 54.9380496;
		IC = 1;
	}
	else if (isotope == "Mn56")
	{
		Z = 25;
		A = 55.9389094;
		IC = 0;
	}
	else if (isotope == "Mn57")
	{
		Z = 25;
		A = 56.938287;
		IC = 0;
	}
	else if (isotope == "Mn58")
	{
		Z = 25;
		A = 57.939990;
		IC = 0;
	}
	else if (isotope == "Mn59")
	{
		Z = 25;
		A = 58.940450;
		IC = 0;
	}
	else if (isotope == "Mn60")
	{
		Z = 25;
		A = 59.94319;
		IC = 0;
	}
	else if (isotope == "Mn61")
	{
		Z = 25;
		A = 60.94446;
		IC = 0;
	}
	else if (isotope == "Mn62")
	{
		Z = 25;
		A = 61.94797;
		IC = 0;
	}
	else if (isotope == "Mn63")
	{
		Z = 25;
		A = 62.94981;
		IC = 0;
	}
	else if (isotope == "Mn64")
	{
		Z = 25;
		A = 63.95373;
		IC = 0;
	}
	else if (isotope == "Mn65")
	{
		Z = 25;
		A = 64.95610;
		IC = 0;
	}
	else if (isotope == "Mn66")
	{
		Z = 25;
		A = 65.96082;
		IC = 0;
	}
	else if (isotope == "Mn67")
	{
		Z = 25;
		A = 66.96382;
		IC = 0;
	}
	else if (isotope == "Fe45")
	{
		Z = 26;
		A = 45.01456;
		IC = 0;
	}
	else if (isotope == "Fe46")
	{
		Z = 26;
		A = 46.00081;
		IC = 0;
	}
	else if (isotope == "Fe47")
	{
		Z = 26;
		A = 46.99289;
		IC = 0;
	}
	else if (isotope == "Fe48")
	{
		Z = 26;
		A = 47.98056;
		IC = 0;
	}
	else if (isotope == "Fe49")
	{
		Z = 26;
		A = 48.97361;
		IC = 0;
	}
	else if (isotope == "Fe50")
	{
		Z = 26;
		A = 49.962990;
		IC = 0;
	}
	else if (isotope == "Fe51")
	{
		Z = 26;
		A = 50.956825;
		IC = 0;
	}
	else if (isotope == "Fe52")
	{
		Z = 26;
		A = 51.948117;
		IC = 0;
	}
	else if (isotope == "Fe53")
	{
		Z = 26;
		A = 52.9453123;
		IC = 0;
	}
	else if (isotope == "Fe")
	{
		Z = 26;
		A = 55.845;
		IC = 1.0;
	}
	else if (isotope == "Fe54")
	{
		Z = 26;
		A = 53.9396148;
		IC = 0.05845;
	}
	else if (isotope == "Fe55")
	{
		Z = 26;
		A = 54.9382980;
		IC = 0;
	}
	else if (isotope == "Fe56")
	{
		Z = 26;
		A = 55.9349421;
		IC = 0.91754;
	}
	else if (isotope == "Fe57")
	{
		Z = 26;
		A = 56.9353987;
		IC = 0.02119;
	}
	else if (isotope == "Fe58")
	{
		Z = 26;
		A = 57.9332805;
		IC = 0.00282;
	}
	else if (isotope == "Fe59")
	{
		Z = 26;
		A = 58.9348805;
		IC = 0;
	}
	else if (isotope == "Fe60")
	{
		Z = 26;
		A = 59.934077;
		IC = 0;
	}
	else if (isotope == "Fe61")
	{
		Z = 26;
		A = 60.936749;
		IC = 0;
	}
	else if (isotope == "Fe62")
	{
		Z = 26;
		A = 61.936770;
		IC = 0;
	}
	else if (isotope == "Fe63")
	{
		Z = 26;
		A = 62.94012;
		IC = 0;
	}
	else if (isotope == "Fe64")
	{
		Z = 26;
		A = 63.94087;
		IC = 0;
	}
	else if (isotope == "Fe65")
	{
		Z = 26;
		A = 64.94494;
		IC = 0;
	}
	else if (isotope == "Fe66")
	{
		Z = 26;
		A = 65.94598;
		IC = 0;
	}
	else if (isotope == "Fe67")
	{
		Z = 26;
		A = 66.95000;
		IC = 0;
	}
	else if (isotope == "Fe68")
	{
		Z = 26;
		A = 67.95251;
		IC = 0;
	}
	else if (isotope == "Fe69")
	{
		Z = 26;
		A = 68.95770;
		IC = 0;
	}
	else if (isotope == "Co48")
	{
		Z = 27;
		A = 48.00176;
		IC = 0;
	}
	else if (isotope == "Co49")
	{
		Z = 27;
		A = 48.98972;
		IC = 0;
	}
	else if (isotope == "Co50")
	{
		Z = 27;
		A = 49.98154;
		IC = 0;
	}
	else if (isotope == "Co51")
	{
		Z = 27;
		A = 50.97072;
		IC = 0;
	}
	else if (isotope == "Co52")
	{
		Z = 27;
		A = 51.963590;
		IC = 0;
	}
	else if (isotope == "Co53")
	{
		Z = 27;
		A = 52.954225;
		IC = 0;
	}
	else if (isotope == "Co54")
	{
		Z = 27;
		A = 53.9484641;
		IC = 0;
	}
	else if (isotope == "Co55")
	{
		Z = 27;
		A = 54.9420031;
		IC = 0;
	}
	else if (isotope == "Co56")
	{
		Z = 27;
		A = 55.9398439;
		IC = 0;
	}
	else if (isotope == "Co57")
	{
		Z = 27;
		A = 56.9362962;
		IC = 0;
	}
	else if (isotope == "Co58")
	{
		Z = 27;
		A = 57.9357576;
		IC = 0;
	}
	else if (isotope == "Co")
	{
		Z = 27;
		A = 58.933200;
		IC = 1.0;
	}
	else if (isotope == "Co59")
	{
		Z = 27;
		A = 58.9332002;
		IC = 1;
	}
	else if (isotope == "Co60")
	{
		Z = 27;
		A = 59.9338222;
		IC = 0;
	}
	else if (isotope == "Co61")
	{
		Z = 27;
		A = 60.9324794;
		IC = 0;
	}
	else if (isotope == "Co62")
	{
		Z = 27;
		A = 61.934054;
		IC = 0;
	}
	else if (isotope == "Co63")
	{
		Z = 27;
		A = 62.933615;
		IC = 0;
	}
	else if (isotope == "Co64")
	{
		Z = 27;
		A = 63.935814;
		IC = 0;
	}
	else if (isotope == "Co65")
	{
		Z = 27;
		A = 64.936485;
		IC = 0;
	}
	else if (isotope == "Co66")
	{
		Z = 27;
		A = 65.93983;
		IC = 0;
	}
	else if (isotope == "Co67")
	{
		Z = 27;
		A = 66.94061;
		IC = 0;
	}
	else if (isotope == "Co68")
	{
		Z = 27;
		A = 67.94436;
		IC = 0;
	}
	else if (isotope == "Co69")
	{
		Z = 27;
		A = 68.94520;
		IC = 0;
	}
	else if (isotope == "Co70")
	{
		Z = 27;
		A = 69.94981;
		IC = 0;
	}
	else if (isotope == "Co71")
	{
		Z = 27;
		A = 70.95173;
		IC = 0;
	}
	else if (isotope == "Co72")
	{
		Z = 27;
		A = 71.95641;
		IC = 0;
	}
	else if (isotope == "Ni50")
	{
		Z = 28;
		A = 49.99593;
		IC = 0;
	}
	else if (isotope == "Ni51")
	{
		Z = 28;
		A = 50.98772;
		IC = 0;
	}
	else if (isotope == "Ni52")
	{
		Z = 28;
		A = 51.975680;
		IC = 0;
	}
	else if (isotope == "Ni53")
	{
		Z = 28;
		A = 52.96846;
		IC = 0;
	}
	else if (isotope == "Ni54")
	{
		Z = 28;
		A = 53.957910;
		IC = 0;
	}
	else if (isotope == "Ni55")
	{
		Z = 28;
		A = 54.951336;
		IC = 0;
	}
	else if (isotope == "Ni56")
	{
		Z = 28;
		A = 55.942136;
		IC = 0;
	}
	else if (isotope == "Ni57")
	{
		Z = 28;
		A = 56.939800;
		IC = 0;
	}
	else if (isotope == "Ni")
	{
		Z = 28;
		A = 58.6934;
		IC = 1.0;
	}
	else if (isotope == "Ni58")
	{
		Z = 28;
		A = 57.9353479;
		IC = 0.680769;
	}
	else if (isotope == "Ni59")
	{
		Z = 28;
		A = 58.9343516;
		IC = 0;
	}
	else if (isotope == "Ni60")
	{
		Z = 28;
		A = 59.9307906;
		IC = 0.262231;
	}
	else if (isotope == "Ni61")
	{
		Z = 28;
		A = 60.9310604;
		IC = 0.011399;
	}
	else if (isotope == "Ni62")
	{
		Z = 28;
		A = 61.9283488;
		IC = 0.036345;
	}
	else if (isotope == "Ni63")
	{
		Z = 28;
		A = 62.9296729;
		IC = 0;
	}
	else if (isotope == "Ni64")
	{
		Z = 28;
		A = 63.9279696;
		IC = 0.009256;
	}
	else if (isotope == "Ni65")
	{
		Z = 28;
		A = 64.9300880;
		IC = 0;
	}
	else if (isotope == "Ni66")
	{
		Z = 28;
		A = 65.929115;
		IC = 0;
	}
	else if (isotope == "Ni67")
	{
		Z = 28;
		A = 66.931570;
		IC = 0;
	}
	else if (isotope == "Ni68")
	{
		Z = 28;
		A = 67.931845;
		IC = 0;
	}
	else if (isotope == "Ni69")
	{
		Z = 28;
		A = 68.93518;
		IC = 0;
	}
	else if (isotope == "Ni70")
	{
		Z = 28;
		A = 69.93614;
		IC = 0;
	}
	else if (isotope == "Ni71")
	{
		Z = 28;
		A = 70.94000;
		IC = 0;
	}
	else if (isotope == "Ni72")
	{
		Z = 28;
		A = 71.94130;
		IC = 0;
	}
	else if (isotope == "Ni73")
	{
		Z = 28;
		A = 72.94608;
		IC = 0;
	}
	else if (isotope == "Ni74")
	{
		Z = 28;
		A = 73.94791;
		IC = 0;
	}
	else if (isotope == "Ni75")
	{
		Z = 28;
		A = 74.95297;
		IC = 0;
	}
	else if (isotope == "Ni76")
	{
		Z = 28;
		A = 75.95533;
		IC = 0;
	}
	else if (isotope == "Ni77")
	{
		Z = 28;
		A = 76.96083;
		IC = 0;
	}
	else if (isotope == "Ni78")
	{
		Z = 28;
		A = 77.96380;
		IC = 0;
	}
	else if (isotope == "Cu52")
	{
		Z = 29;
		A = 51.99718;
		IC = 0;
	}
	else if (isotope == "Cu53")
	{
		Z = 29;
		A = 52.98555;
		IC = 0;
	}
	else if (isotope == "Cu54")
	{
		Z = 29;
		A = 53.97671;
		IC = 0;
	}
	else if (isotope == "Cu55")
	{
		Z = 29;
		A = 54.96605;
		IC = 0;
	}
	else if (isotope == "Cu56")
	{
		Z = 29;
		A = 55.95856;
		IC = 0;
	}
	else if (isotope == "Cu57")
	{
		Z = 29;
		A = 56.949216;
		IC = 0;
	}
	else if (isotope == "Cu58")
	{
		Z = 29;
		A = 57.9445407;
		IC = 0;
	}
	else if (isotope == "Cu59")
	{
		Z = 29;
		A = 58.9395041;
		IC = 0;
	}
	else if (isotope == "Cu60")
	{
		Z = 29;
		A = 59.9373681;
		IC = 0;
	}
	else if (isotope == "Cu61")
	{
		Z = 29;
		A = 60.9334622;
		IC = 0;
	}
	else if (isotope == "Cu62")
	{
		Z = 29;
		A = 61.932587;
		IC = 0;
	}
	else if (isotope == "Cu")
	{
		Z = 29;
		A = 63.546;
		IC = 1.0;
	}
	else if (isotope == "Cu63")
	{
		Z = 29;
		A = 62.9296011;
		IC = 0.6917;
	}
	else if (isotope == "Cu64")
	{
		Z = 29;
		A = 63.9297679;
		IC = 0;
	}
	else if (isotope == "Cu65")
	{
		Z = 29;
		A = 64.9277937;
		IC = 0.3083;
	}
	else if (isotope == "Cu66")
	{
		Z = 29;
		A = 65.9288730;
		IC = 0;
	}
	else if (isotope == "Cu67")
	{
		Z = 29;
		A = 66.927750;
		IC = 0;
	}
	else if (isotope == "Cu68")
	{
		Z = 29;
		A = 67.929640;
		IC = 0;
	}
	else if (isotope == "Cu69")
	{
		Z = 29;
		A = 68.929425;
		IC = 0;
	}
	else if (isotope == "Cu70")
	{
		Z = 29;
		A = 69.932409;
		IC = 0;
	}
	else if (isotope == "Cu71")
	{
		Z = 29;
		A = 70.932620;
		IC = 0;
	}
	else if (isotope == "Cu72")
	{
		Z = 29;
		A = 71.93552;
		IC = 0;
	}
	else if (isotope == "Cu73")
	{
		Z = 29;
		A = 72.93649;
		IC = 0;
	}
	else if (isotope == "Cu74")
	{
		Z = 29;
		A = 73.94020;
		IC = 0;
	}
	else if (isotope == "Cu75")
	{
		Z = 29;
		A = 74.94170;
		IC = 0;
	}
	else if (isotope == "Cu76")
	{
		Z = 29;
		A = 75.94599;
		IC = 0;
	}
	else if (isotope == "Cu77")
	{
		Z = 29;
		A = 76.94795;
		IC = 0;
	}
	else if (isotope == "Cu78")
	{
		Z = 29;
		A = 77.95281;
		IC = 0;
	}
	else if (isotope == "Cu79")
	{
		Z = 29;
		A = 78.95528;
		IC = 0;
	}
	else if (isotope == "Cu80")
	{
		Z = 29;
		A = 79.96189;
		IC = 0;
	}
	else if (isotope == "Zn54")
	{
		Z = 30;
		A = 53.99295;
		IC = 0;
	}
	else if (isotope == "Zn55")
	{
		Z = 30;
		A = 54.98398;
		IC = 0;
	}
	else if (isotope == "Zn56")
	{
		Z = 30;
		A = 55.97238;
		IC = 0;
	}
	else if (isotope == "Zn57")
	{
		Z = 30;
		A = 56.96491;
		IC = 0;
	}
	else if (isotope == "Zn58")
	{
		Z = 30;
		A = 57.954600;
		IC = 0;
	}
	else if (isotope == "Zn59")
	{
		Z = 30;
		A = 58.949270;
		IC = 0;
	}
	else if (isotope == "Zn60")
	{
		Z = 30;
		A = 59.941832;
		IC = 0;
	}
	else if (isotope == "Zn61")
	{
		Z = 30;
		A = 60.939514;
		IC = 0;
	}
	else if (isotope == "Zn62")
	{
		Z = 30;
		A = 61.934334;
		IC = 0;
	}
	else if (isotope == "Zn63")
	{
		Z = 30;
		A = 62.9332156;
		IC = 0;
	}
	else if (isotope == "Zn")
	{
		Z = 30;
		A = 65.409;
		IC = 1.0;
	}
	else if (isotope == "Zn64")
	{
		Z = 30;
		A = 63.9291466;
		IC = 0.4863;
	}
	else if (isotope == "Zn65")
	{
		Z = 30;
		A = 64.9292451;
		IC = 0;
	}
	else if (isotope == "Zn66")
	{
		Z = 30;
		A = 65.9260368;
		IC = 0.279;
	}
	else if (isotope == "Zn67")
	{
		Z = 30;
		A = 66.9271309;
		IC = 0.041;
	}
	else if (isotope == "Zn68")
	{
		Z = 30;
		A = 67.9248476;
		IC = 0.1875;
	}
	else if (isotope == "Zn69")
	{
		Z = 30;
		A = 68.9265535;
		IC = 0;
	}
	else if (isotope == "Zn70")
	{
		Z = 30;
		A = 69.925325;
		IC = 0.0062;
	}
	else if (isotope == "Zn71")
	{
		Z = 30;
		A = 70.927727;
		IC = 0;
	}
	else if (isotope == "Zn72")
	{
		Z = 30;
		A = 71.926861;
		IC = 0;
	}
	else if (isotope == "Zn73")
	{
		Z = 30;
		A = 72.929780;
		IC = 0;
	}
	else if (isotope == "Zn74")
	{
		Z = 30;
		A = 73.929460;
		IC = 0;
	}
	else if (isotope == "Zn75")
	{
		Z = 30;
		A = 74.932940;
		IC = 0;
	}
	else if (isotope == "Zn76")
	{
		Z = 30;
		A = 75.93339;
		IC = 0;
	}
	else if (isotope == "Zn77")
	{
		Z = 30;
		A = 76.93709;
		IC = 0;
	}
	else if (isotope == "Zn78")
	{
		Z = 30;
		A = 77.93857;
		IC = 0;
	}
	else if (isotope == "Zn79")
	{
		Z = 30;
		A = 78.94268;
		IC = 0;
	}
	else if (isotope == "Zn80")
	{
		Z = 30;
		A = 79.94441;
		IC = 0;
	}
	else if (isotope == "Zn81")
	{
		Z = 30;
		A = 80.95048;
		IC = 0;
	}
	else if (isotope == "Zn82")
	{
		Z = 30;
		A = 81.95484;
		IC = 0;
	}
	else if (isotope == "Ga56")
	{
		Z = 31;
		A = 55.99491;
		IC = 0;
	}
	else if (isotope == "Ga57")
	{
		Z = 31;
		A = 56.98293;
		IC = 0;
	}
	else if (isotope == "Ga58")
	{
		Z = 31;
		A = 57.97425;
		IC = 0;
	}
	else if (isotope == "Ga59")
	{
		Z = 31;
		A = 58.96337;
		IC = 0;
	}
	else if (isotope == "Ga60")
	{
		Z = 31;
		A = 59.95706;
		IC = 0;
	}
	else if (isotope == "Ga61")
	{
		Z = 31;
		A = 60.94917;
		IC = 0;
	}
	else if (isotope == "Ga62")
	{
		Z = 31;
		A = 61.944180;
		IC = 0;
	}
	else if (isotope == "Ga63")
	{
		Z = 31;
		A = 62.93914;
		IC = 0;
	}
	else if (isotope == "Ga64")
	{
		Z = 31;
		A = 63.936838;
		IC = 0;
	}
	else if (isotope == "Ga65")
	{
		Z = 31;
		A = 64.9327393;
		IC = 0;
	}
	else if (isotope == "Ga66")
	{
		Z = 31;
		A = 65.931592;
		IC = 0;
	}
	else if (isotope == "Ga67")
	{
		Z = 31;
		A = 66.9282049;
		IC = 0;
	}
	else if (isotope == "Ga68")
	{
		Z = 31;
		A = 67.9279835;
		IC = 0;
	}
	else if (isotope == "Ga")
	{
		Z = 31;
		A = 69.723;
		IC = 1.0;
	}
	else if (isotope == "Ga69")
	{
		Z = 31;
		A = 68.925581;
		IC = 0.60108;
	}
	else if (isotope == "Ga70")
	{
		Z = 31;
		A = 69.926028;
		IC = 0;
	}
	else if (isotope == "Ga71")
	{
		Z = 31;
		A = 70.9247050;
		IC = 0.39892;
	}
	else if (isotope == "Ga72")
	{
		Z = 31;
		A = 71.9263694;
		IC = 0;
	}
	else if (isotope == "Ga73")
	{
		Z = 31;
		A = 72.925170;
		IC = 0;
	}
	else if (isotope == "Ga74")
	{
		Z = 31;
		A = 73.926940;
		IC = 0;
	}
	else if (isotope == "Ga75")
	{
		Z = 31;
		A = 74.926501;
		IC = 0;
	}
	else if (isotope == "Ga76")
	{
		Z = 31;
		A = 75.92893;
		IC = 0;
	}
	else if (isotope == "Ga77")
	{
		Z = 31;
		A = 76.929280;
		IC = 0;
	}
	else if (isotope == "Ga78")
	{
		Z = 31;
		A = 77.931660;
		IC = 0;
	}
	else if (isotope == "Ga79")
	{
		Z = 31;
		A = 78.93292;
		IC = 0;
	}
	else if (isotope == "Ga80")
	{
		Z = 31;
		A = 79.93659;
		IC = 0;
	}
	else if (isotope == "Ga81")
	{
		Z = 31;
		A = 80.93775;
		IC = 0;
	}
	else if (isotope == "Ga82")
	{
		Z = 31;
		A = 81.94316;
		IC = 0;
	}
	else if (isotope == "Ga83")
	{
		Z = 31;
		A = 82.94687;
		IC = 0;
	}
	else if (isotope == "Ga84")
	{
		Z = 31;
		A = 83.95234;
		IC = 0;
	}
	else if (isotope == "Ge58")
	{
		Z = 32;
		A = 57.99101;
		IC = 0;
	}
	else if (isotope == "Ge59")
	{
		Z = 32;
		A = 58.98175;
		IC = 0;
	}
	else if (isotope == "Ge60")
	{
		Z = 32;
		A = 59.97019;
		IC = 0;
	}
	else if (isotope == "Ge61")
	{
		Z = 32;
		A = 60.96379;
		IC = 0;
	}
	else if (isotope == "Ge62")
	{
		Z = 32;
		A = 61.95465;
		IC = 0;
	}
	else if (isotope == "Ge63")
	{
		Z = 32;
		A = 62.94964;
		IC = 0;
	}
	else if (isotope == "Ge64")
	{
		Z = 32;
		A = 63.94157;
		IC = 0;
	}
	else if (isotope == "Ge65")
	{
		Z = 32;
		A = 64.93944;
		IC = 0;
	}
	else if (isotope == "Ge66")
	{
		Z = 32;
		A = 65.933850;
		IC = 0;
	}
	else if (isotope == "Ge67")
	{
		Z = 32;
		A = 66.932738;
		IC = 0;
	}
	else if (isotope == "Ge68")
	{
		Z = 32;
		A = 67.928097;
		IC = 0;
	}
	else if (isotope == "Ge69")
	{
		Z = 32;
		A = 68.927972;
		IC = 0;
	}
	else if (isotope == "Ge")
	{
		Z = 32;
		A = 72.64;
		IC = 1.0;
	}
	else if (isotope == "Ge70")
	{
		Z = 32;
		A = 69.9242504;
		IC = 0.2084;
	}
	else if (isotope == "Ge71")
	{
		Z = 32;
		A = 70.9249540;
		IC = 0;
	}
	else if (isotope == "Ge72")
	{
		Z = 32;
		A = 71.9220762;
		IC = 0.2754;
	}
	else if (isotope == "Ge73")
	{
		Z = 32;
		A = 72.9234594;
		IC = 0.0773;
	}
	else if (isotope == "Ge74")
	{
		Z = 32;
		A = 73.9211782;
		IC = 0.3628;
	}
	else if (isotope == "Ge75")
	{
		Z = 32;
		A = 74.9228595;
		IC = 0;
	}
	else if (isotope == "Ge76")
	{
		Z = 32;
		A = 75.9214027;
		IC = 0.0761;
	}
	else if (isotope == "Ge77")
	{
		Z = 32;
		A = 76.9235485;
		IC = 0;
	}
	else if (isotope == "Ge78")
	{
		Z = 32;
		A = 77.922853;
		IC = 0;
	}
	else if (isotope == "Ge79")
	{
		Z = 32;
		A = 78.92540;
		IC = 0;
	}
	else if (isotope == "Ge80")
	{
		Z = 32;
		A = 79.925445;
		IC = 0;
	}
	else if (isotope == "Ge81")
	{
		Z = 32;
		A = 80.92882;
		IC = 0;
	}
	else if (isotope == "Ge82")
	{
		Z = 32;
		A = 81.92955;
		IC = 0;
	}
	else if (isotope == "Ge83")
	{
		Z = 32;
		A = 82.93451;
		IC = 0;
	}
	else if (isotope == "Ge84")
	{
		Z = 32;
		A = 83.93731;
		IC = 0;
	}
	else if (isotope == "Ge85")
	{
		Z = 32;
		A = 84.94269;
		IC = 0;
	}
	else if (isotope == "Ge86")
	{
		Z = 32;
		A = 85.94627;
		IC = 0;
	}
	else if (isotope == "As60")
	{
		Z = 33;
		A = 59.99313;
		IC = 0;
	}
	else if (isotope == "As61")
	{
		Z = 33;
		A = 60.98062;
		IC = 0;
	}
	else if (isotope == "As62")
	{
		Z = 33;
		A = 61.97320;
		IC = 0;
	}
	else if (isotope == "As63")
	{
		Z = 33;
		A = 62.96369;
		IC = 0;
	}
	else if (isotope == "As64")
	{
		Z = 33;
		A = 63.95757;
		IC = 0;
	}
	else if (isotope == "As65")
	{
		Z = 33;
		A = 64.94948;
		IC = 0;
	}
	else if (isotope == "As66")
	{
		Z = 33;
		A = 65.94437;
		IC = 0;
	}
	else if (isotope == "As67")
	{
		Z = 33;
		A = 66.93919;
		IC = 0;
	}
	else if (isotope == "As68")
	{
		Z = 33;
		A = 67.93679;
		IC = 0;
	}
	else if (isotope == "As69")
	{
		Z = 33;
		A = 68.932280;
		IC = 0;
	}
	else if (isotope == "As70")
	{
		Z = 33;
		A = 69.930930;
		IC = 0;
	}
	else if (isotope == "As71")
	{
		Z = 33;
		A = 70.927115;
		IC = 0;
	}
	else if (isotope == "As72")
	{
		Z = 33;
		A = 71.926753;
		IC = 0;
	}
	else if (isotope == "As73")
	{
		Z = 33;
		A = 72.923825;
		IC = 0;
	}
	else if (isotope == "As74")
	{
		Z = 33;
		A = 73.9239291;
		IC = 0;
	}
	else if (isotope == "As")
	{
		Z = 33;
		A = 74.92160;
		IC = 1.0;
	}
	else if (isotope == "As75")
	{
		Z = 33;
		A = 74.9215964;
		IC = 1;
	}
	else if (isotope == "As76")
	{
		Z = 33;
		A = 75.9223939;
		IC = 0;
	}
	else if (isotope == "As77")
	{
		Z = 33;
		A = 76.9206477;
		IC = 0;
	}
	else if (isotope == "As78")
	{
		Z = 33;
		A = 77.921829;
		IC = 0;
	}
	else if (isotope == "As79")
	{
		Z = 33;
		A = 78.920948;
		IC = 0;
	}
	else if (isotope == "As80")
	{
		Z = 33;
		A = 79.922578;
		IC = 0;
	}
	else if (isotope == "As81")
	{
		Z = 33;
		A = 80.922133;
		IC = 0;
	}
	else if (isotope == "As82")
	{
		Z = 33;
		A = 81.92450;
		IC = 0;
	}
	else if (isotope == "As83")
	{
		Z = 33;
		A = 82.92498;
		IC = 0;
	}
	else if (isotope == "As84")
	{
		Z = 33;
		A = 83.92906;
		IC = 0;
	}
	else if (isotope == "As85")
	{
		Z = 33;
		A = 84.93181;
		IC = 0;
	}
	else if (isotope == "As86")
	{
		Z = 33;
		A = 85.93623;
		IC = 0;
	}
	else if (isotope == "As87")
	{
		Z = 33;
		A = 86.93958;
		IC = 0;
	}
	else if (isotope == "As88")
	{
		Z = 33;
		A = 87.94456;
		IC = 0;
	}
	else if (isotope == "As89")
	{
		Z = 33;
		A = 88.94923;
		IC = 0;
	}
	else if (isotope == "Se65")
	{
		Z = 34;
		A = 64.96466;
		IC = 0;
	}
	else if (isotope == "Se66")
	{
		Z = 34;
		A = 65.95521;
		IC = 0;
	}
	else if (isotope == "Se67")
	{
		Z = 34;
		A = 66.95009;
		IC = 0;
	}
	else if (isotope == "Se68")
	{
		Z = 34;
		A = 67.94187;
		IC = 0;
	}
	else if (isotope == "Se69")
	{
		Z = 34;
		A = 68.939560;
		IC = 0;
	}
	else if (isotope == "Se70")
	{
		Z = 34;
		A = 69.93350;
		IC = 0;
	}
	else if (isotope == "Se71")
	{
		Z = 34;
		A = 70.93227;
		IC = 0;
	}
	else if (isotope == "Se72")
	{
		Z = 34;
		A = 71.927112;
		IC = 0;
	}
	else if (isotope == "Se73")
	{
		Z = 34;
		A = 72.926767;
		IC = 0;
	}
	else if (isotope == "Se")
	{
		Z = 34;
		A = 78.96;
		IC = 1.0;
	}
	else if (isotope == "Se74")
	{
		Z = 34;
		A = 73.9224766;
		IC = 0.0089;
	}
	else if (isotope == "Se75")
	{
		Z = 34;
		A = 74.9225236;
		IC = 0;
	}
	else if (isotope == "Se76")
	{
		Z = 34;
		A = 75.9192141;
		IC = 0.0937;
	}
	else if (isotope == "Se77")
	{
		Z = 34;
		A = 76.9199146;
		IC = 0.0763;
	}
	else if (isotope == "Se78")
	{
		Z = 34;
		A = 77.9173095;
		IC = 0.2377;
	}
	else if (isotope == "Se79")
	{
		Z = 34;
		A = 78.9184998;
		IC = 0;
	}
	else if (isotope == "Se80")
	{
		Z = 34;
		A = 79.9165218;
		IC = 0.4961;
	}
	else if (isotope == "Se81")
	{
		Z = 34;
		A = 80.9179929;
		IC = 0;
	}
	else if (isotope == "Se82")
	{
		Z = 34;
		A = 81.9167000;
		IC = 0.0873;
	}
	else if (isotope == "Se83")
	{
		Z = 34;
		A = 82.919119;
		IC = 0;
	}
	else if (isotope == "Se84")
	{
		Z = 34;
		A = 83.918465;
		IC = 0;
	}
	else if (isotope == "Se85")
	{
		Z = 34;
		A = 84.922240;
		IC = 0;
	}
	else if (isotope == "Se86")
	{
		Z = 34;
		A = 85.924271;
		IC = 0;
	}
	else if (isotope == "Se87")
	{
		Z = 34;
		A = 86.928520;
		IC = 0;
	}
	else if (isotope == "Se88")
	{
		Z = 34;
		A = 87.931420;
		IC = 0;
	}
	else if (isotope == "Se89")
	{
		Z = 34;
		A = 88.93602;
		IC = 0;
	}
	else if (isotope == "Se90")
	{
		Z = 34;
		A = 89.93942;
		IC = 0;
	}
	else if (isotope == "Se91")
	{
		Z = 34;
		A = 90.94537;
		IC = 0;
	}
	else if (isotope == "Se92")
	{
		Z = 34;
		A = 91.94933;
		IC = 0;
	}
	else if (isotope == "Br67")
	{
		Z = 35;
		A = 66.96479;
		IC = 0;
	}
	else if (isotope == "Br68")
	{
		Z = 35;
		A = 67.95825;
		IC = 0;
	}
	else if (isotope == "Br69")
	{
		Z = 35;
		A = 68.95018;
		IC = 0;
	}
	else if (isotope == "Br70")
	{
		Z = 35;
		A = 69.94462;
		IC = 0;
	}
	else if (isotope == "Br71")
	{
		Z = 35;
		A = 70.93925;
		IC = 0;
	}
	else if (isotope == "Br72")
	{
		Z = 35;
		A = 71.93650;
		IC = 0;
	}
	else if (isotope == "Br73")
	{
		Z = 35;
		A = 72.93179;
		IC = 0;
	}
	else if (isotope == "Br74")
	{
		Z = 35;
		A = 73.929891;
		IC = 0;
	}
	else if (isotope == "Br75")
	{
		Z = 35;
		A = 74.925776;
		IC = 0;
	}
	else if (isotope == "Br76")
	{
		Z = 35;
		A = 75.924542;
		IC = 0;
	}
	else if (isotope == "Br77")
	{
		Z = 35;
		A = 76.921380;
		IC = 0;
	}
	else if (isotope == "Br78")
	{
		Z = 35;
		A = 77.921146;
		IC = 0;
	}
	else if (isotope == "Br")
	{
		Z = 35;
		A = 79.904;
		IC = 1.0;
	}
	else if (isotope == "Br79")
	{
		Z = 35;
		A = 78.9183376;
		IC = 0.5069;
	}
	else if (isotope == "Br80")
	{
		Z = 35;
		A = 79.9185300;
		IC = 0;
	}
	else if (isotope == "Br81")
	{
		Z = 35;
		A = 80.916291;
		IC = 0.4931;
	}
	else if (isotope == "Br82")
	{
		Z = 35;
		A = 81.916805;
		IC = 0;
	}
	else if (isotope == "Br83")
	{
		Z = 35;
		A = 82.915180;
		IC = 0;
	}
	else if (isotope == "Br84")
	{
		Z = 35;
		A = 83.916504;
		IC = 0;
	}
	else if (isotope == "Br85")
	{
		Z = 35;
		A = 84.915608;
		IC = 0;
	}
	else if (isotope == "Br86")
	{
		Z = 35;
		A = 85.918797;
		IC = 0;
	}
	else if (isotope == "Br87")
	{
		Z = 35;
		A = 86.920711;
		IC = 0;
	}
	else if (isotope == "Br88")
	{
		Z = 35;
		A = 87.924070;
		IC = 0;
	}
	else if (isotope == "Br89")
	{
		Z = 35;
		A = 88.926390;
		IC = 0;
	}
	else if (isotope == "Br90")
	{
		Z = 35;
		A = 89.930630;
		IC = 0;
	}
	else if (isotope == "Br91")
	{
		Z = 35;
		A = 90.933970;
		IC = 0;
	}
	else if (isotope == "Br92")
	{
		Z = 35;
		A = 91.939260;
		IC = 0;
	}
	else if (isotope == "Br93")
	{
		Z = 35;
		A = 92.94310;
		IC = 0;
	}
	else if (isotope == "Br94")
	{
		Z = 35;
		A = 93.94868;
		IC = 0;
	}
	else if (isotope == "Kr69")
	{
		Z = 36;
		A = 68.96532;
		IC = 0;
	}
	else if (isotope == "Kr70")
	{
		Z = 36;
		A = 69.95601;
		IC = 0;
	}
	else if (isotope == "Kr71")
	{
		Z = 36;
		A = 70.95051;
		IC = 0;
	}
	else if (isotope == "Kr72")
	{
		Z = 36;
		A = 71.94191;
		IC = 0;
	}
	else if (isotope == "Kr73")
	{
		Z = 36;
		A = 72.93893;
		IC = 0;
	}
	else if (isotope == "Kr74")
	{
		Z = 36;
		A = 73.933260;
		IC = 0;
	}
	else if (isotope == "Kr75")
	{
		Z = 36;
		A = 74.931034;
		IC = 0;
	}
	else if (isotope == "Kr76")
	{
		Z = 36;
		A = 75.925948;
		IC = 0;
	}
	else if (isotope == "Kr77")
	{
		Z = 36;
		A = 76.924668;
		IC = 0;
	}
	else if (isotope == "Kr")
	{
		Z = 36;
		A = 83.798;
		IC = 1.0;
	}
	else if (isotope == "Kr78")
	{
		Z = 36;
		A = 77.920386;
		IC = 0.0035;
	}
	else if (isotope == "Kr79")
	{
		Z = 36;
		A = 78.920083;
		IC = 0;
	}
	else if (isotope == "Kr80")
	{
		Z = 36;
		A = 79.916378;
		IC = 0.0228;
	}
	else if (isotope == "Kr81")
	{
		Z = 36;
		A = 80.916592;
		IC = 0;
	}
	else if (isotope == "Kr82")
	{
		Z = 36;
		A = 81.9134846;
		IC = 0.1158;
	}
	else if (isotope == "Kr83")
	{
		Z = 36;
		A = 82.914136;
		IC = 0.1149;
	}
	else if (isotope == "Kr84")
	{
		Z = 36;
		A = 83.911507;
		IC = 0.57;
	}
	else if (isotope == "Kr85")
	{
		Z = 36;
		A = 84.912527;
		IC = 0;
	}
	else if (isotope == "Kr86")
	{
		Z = 36;
		A = 85.9106103;
		IC = 0.173;
	}
	else if (isotope == "Kr87")
	{
		Z = 36;
		A = 86.9133543;
		IC = 0;
	}
	else if (isotope == "Kr88")
	{
		Z = 36;
		A = 87.914447;
		IC = 0;
	}
	else if (isotope == "Kr89")
	{
		Z = 36;
		A = 88.917630;
		IC = 0;
	}
	else if (isotope == "Kr90")
	{
		Z = 36;
		A = 89.919524;
		IC = 0;
	}
	else if (isotope == "Kr91")
	{
		Z = 36;
		A = 90.923440;
		IC = 0;
	}
	else if (isotope == "Kr92")
	{
		Z = 36;
		A = 91.926153;
		IC = 0;
	}
	else if (isotope == "Kr93")
	{
		Z = 36;
		A = 92.93127;
		IC = 0;
	}
	else if (isotope == "Kr94")
	{
		Z = 36;
		A = 93.93436;
		IC = 0;
	}
	else if (isotope == "Kr95")
	{
		Z = 36;
		A = 94.93984;
		IC = 0;
	}
	else if (isotope == "Kr96")
	{
		Z = 36;
		A = 95.94307;
		IC = 0;
	}
	else if (isotope == "Kr97")
	{
		Z = 36;
		A = 96.94856;
		IC = 0;
	}
	else if (isotope == "Rb71")
	{
		Z = 37;
		A = 70.96532;
		IC = 0;
	}
	else if (isotope == "Rb72")
	{
		Z = 37;
		A = 71.95908;
		IC = 0;
	}
	else if (isotope == "Rb73")
	{
		Z = 37;
		A = 72.95037;
		IC = 0;
	}
	else if (isotope == "Rb74")
	{
		Z = 37;
		A = 73.94447;
		IC = 0;
	}
	else if (isotope == "Rb75")
	{
		Z = 37;
		A = 74.938569;
		IC = 0;
	}
	else if (isotope == "Rb76")
	{
		Z = 37;
		A = 75.935071;
		IC = 0;
	}
	else if (isotope == "Rb77")
	{
		Z = 37;
		A = 76.930407;
		IC = 0;
	}
	else if (isotope == "Rb78")
	{
		Z = 37;
		A = 77.928141;
		IC = 0;
	}
	else if (isotope == "Rb79")
	{
		Z = 37;
		A = 78.923997;
		IC = 0;
	}
	else if (isotope == "Rb80")
	{
		Z = 37;
		A = 79.922519;
		IC = 0;
	}
	else if (isotope == "Rb81")
	{
		Z = 37;
		A = 80.918994;
		IC = 0;
	}
	else if (isotope == "Rb82")
	{
		Z = 37;
		A = 81.918208;
		IC = 0;
	}
	else if (isotope == "Rb83")
	{
		Z = 37;
		A = 82.915112;
		IC = 0;
	}
	else if (isotope == "Rb84")
	{
		Z = 37;
		A = 83.914385;
		IC = 0;
	}
	else if (isotope == "Rb")
	{
		Z = 37;
		A = 85.4678;
		IC = 1.0;
	}
	else if (isotope == "Rb85")
	{
		Z = 37;
		A = 84.9117893;
		IC = 0.7217;
	}
	else if (isotope == "Rb86")
	{
		Z = 37;
		A = 85.9111671;
		IC = 0;
	}
	else if (isotope == "Rb87")
	{
		Z = 37;
		A = 86.9091835;
		IC = 0.2783;
	}
	else if (isotope == "Rb88")
	{
		Z = 37;
		A = 87.911319;
		IC = 0;
	}
	else if (isotope == "Rb89")
	{
		Z = 37;
		A = 88.912280;
		IC = 0;
	}
	else if (isotope == "Rb90")
	{
		Z = 37;
		A = 89.914809;
		IC = 0;
	}
	else if (isotope == "Rb91")
	{
		Z = 37;
		A = 90.916534;
		IC = 0;
	}
	else if (isotope == "Rb92")
	{
		Z = 37;
		A = 91.919725;
		IC = 0;
	}
	else if (isotope == "Rb93")
	{
		Z = 37;
		A = 92.922033;
		IC = 0;
	}
	else if (isotope == "Rb94")
	{
		Z = 37;
		A = 93.926407;
		IC = 0;
	}
	else if (isotope == "Rb95")
	{
		Z = 37;
		A = 94.929319;
		IC = 0;
	}
	else if (isotope == "Rb96")
	{
		Z = 37;
		A = 95.934284;
		IC = 0;
	}
	else if (isotope == "Rb97")
	{
		Z = 37;
		A = 96.937340;
		IC = 0;
	}
	else if (isotope == "Rb98")
	{
		Z = 37;
		A = 97.941700;
		IC = 0;
	}
	else if (isotope == "Rb99")
	{
		Z = 37;
		A = 98.94542;
		IC = 0;
	}
	else if (isotope == "Rb100")
	{
		Z = 37;
		A = 99.94987;
		IC = 0;
	}
	else if (isotope == "Rb101")
	{
		Z = 37;
		A = 100.95320;
		IC = 0;
	}
	else if (isotope == "Rb102")
	{
		Z = 37;
		A = 101.95921;
		IC = 0;
	}
	else if (isotope == "Sr73")
	{
		Z = 38;
		A = 72.96597;
		IC = 0;
	}
	else if (isotope == "Sr74")
	{
		Z = 38;
		A = 73.95631;
		IC = 0;
	}
	else if (isotope == "Sr75")
	{
		Z = 38;
		A = 74.94992;
		IC = 0;
	}
	else if (isotope == "Sr76")
	{
		Z = 38;
		A = 75.94161;
		IC = 0;
	}
	else if (isotope == "Sr77")
	{
		Z = 38;
		A = 76.93776;
		IC = 0;
	}
	else if (isotope == "Sr78")
	{
		Z = 38;
		A = 77.932179;
		IC = 0;
	}
	else if (isotope == "Sr79")
	{
		Z = 38;
		A = 78.929707;
		IC = 0;
	}
	else if (isotope == "Sr80")
	{
		Z = 38;
		A = 79.924525;
		IC = 0;
	}
	else if (isotope == "Sr81")
	{
		Z = 38;
		A = 80.923213;
		IC = 0;
	}
	else if (isotope == "Sr82")
	{
		Z = 38;
		A = 81.918401;
		IC = 0;
	}
	else if (isotope == "Sr83")
	{
		Z = 38;
		A = 82.917555;
		IC = 0;
	}
	else if (isotope == "Sr")
	{
		Z = 38;
		A = 87.62;
		IC = 1.0;
	}
	else if (isotope == "Sr84")
	{
		Z = 38;
		A = 83.913425;
		IC = 0.0056;
	}
	else if (isotope == "Sr85")
	{
		Z = 38;
		A = 84.912933;
		IC = 0;
	}
	else if (isotope == "Sr86")
	{
		Z = 38;
		A = 85.9092624;
		IC = 0.0986;
	}
	else if (isotope == "Sr87")
	{
		Z = 38;
		A = 86.9088793;
		IC = 0.07;
	}
	else if (isotope == "Sr88")
	{
		Z = 38;
		A = 87.9056143;
		IC = 0.8258;
	}
	else if (isotope == "Sr89")
	{
		Z = 38;
		A = 88.9074529;
		IC = 0;
	}
	else if (isotope == "Sr90")
	{
		Z = 38;
		A = 89.9077376;
		IC = 0;
	}
	else if (isotope == "Sr91")
	{
		Z = 38;
		A = 90.910210;
		IC = 0;
	}
	else if (isotope == "Sr92")
	{
		Z = 38;
		A = 91.911030;
		IC = 0;
	}
	else if (isotope == "Sr93")
	{
		Z = 38;
		A = 92.914022;
		IC = 0;
	}
	else if (isotope == "Sr94")
	{
		Z = 38;
		A = 93.915360;
		IC = 0;
	}
	else if (isotope == "Sr95")
	{
		Z = 38;
		A = 94.919358;
		IC = 0;
	}
	else if (isotope == "Sr96")
	{
		Z = 38;
		A = 95.921680;
		IC = 0;
	}
	else if (isotope == "Sr97")
	{
		Z = 38;
		A = 96.926149;
		IC = 0;
	}
	else if (isotope == "Sr98")
	{
		Z = 38;
		A = 97.928471;
		IC = 0;
	}
	else if (isotope == "Sr99")
	{
		Z = 38;
		A = 98.93332;
		IC = 0;
	}
	else if (isotope == "Sr100")
	{
		Z = 38;
		A = 99.93535;
		IC = 0;
	}
	else if (isotope == "Sr101")
	{
		Z = 38;
		A = 100.94052;
		IC = 0;
	}
	else if (isotope == "Sr102")
	{
		Z = 38;
		A = 101.94302;
		IC = 0;
	}
	else if (isotope == "Sr103")
	{
		Z = 38;
		A = 102.94895;
		IC = 0;
	}
	else if (isotope == "Sr104")
	{
		Z = 38;
		A = 103.95233;
		IC = 0;
	}
	else if (isotope == "Y77")
	{
		Z = 39;
		A = 76.94962;
		IC = 0;
	}
	else if (isotope == "Y78")
	{
		Z = 39;
		A = 77.94350;
		IC = 0;
	}
	else if (isotope == "Y79")
	{
		Z = 39;
		A = 78.93735;
		IC = 0;
	}
	else if (isotope == "Y80")
	{
		Z = 39;
		A = 79.93434;
		IC = 0;
	}
	else if (isotope == "Y81")
	{
		Z = 39;
		A = 80.929130;
		IC = 0;
	}
	else if (isotope == "Y82")
	{
		Z = 39;
		A = 81.92679;
		IC = 0;
	}
	else if (isotope == "Y83")
	{
		Z = 39;
		A = 82.922350;
		IC = 0;
	}
	else if (isotope == "Y84")
	{
		Z = 39;
		A = 83.92039;
		IC = 0;
	}
	else if (isotope == "Y85")
	{
		Z = 39;
		A = 84.916427;
		IC = 0;
	}
	else if (isotope == "Y86")
	{
		Z = 39;
		A = 85.914888;
		IC = 0;
	}
	else if (isotope == "Y87")
	{
		Z = 39;
		A = 86.9108778;
		IC = 0;
	}
	else if (isotope == "Y88")
	{
		Z = 39;
		A = 87.9095034;
		IC = 0;
	}
	else if (isotope == "Y")
	{
		Z = 39;
		A = 88.90585;
		IC = 1.0;
	}
	else if (isotope == "Y89")
	{
		Z = 39;
		A = 88.9058479;
		IC = 1;
	}
	else if (isotope == "Y90")
	{
		Z = 39;
		A = 89.9071514;
		IC = 0;
	}
	else if (isotope == "Y91")
	{
		Z = 39;
		A = 90.907303;
		IC = 0;
	}
	else if (isotope == "Y92")
	{
		Z = 39;
		A = 91.908947;
		IC = 0;
	}
	else if (isotope == "Y93")
	{
		Z = 39;
		A = 92.909582;
		IC = 0;
	}
	else if (isotope == "Y94")
	{
		Z = 39;
		A = 93.911594;
		IC = 0;
	}
	else if (isotope == "Y95")
	{
		Z = 39;
		A = 94.912824;
		IC = 0;
	}
	else if (isotope == "Y96")
	{
		Z = 39;
		A = 95.915898;
		IC = 0;
	}
	else if (isotope == "Y97")
	{
		Z = 39;
		A = 96.918131;
		IC = 0;
	}
	else if (isotope == "Y98")
	{
		Z = 39;
		A = 97.922220;
		IC = 0;
	}
	else if (isotope == "Y99")
	{
		Z = 39;
		A = 98.924635;
		IC = 0;
	}
	else if (isotope == "Y100")
	{
		Z = 39;
		A = 99.927760;
		IC = 0;
	}
	else if (isotope == "Y101")
	{
		Z = 39;
		A = 100.93031;
		IC = 0;
	}
	else if (isotope == "Y102")
	{
		Z = 39;
		A = 101.933560;
		IC = 0;
	}
	else if (isotope == "Y103")
	{
		Z = 39;
		A = 102.93694;
		IC = 0;
	}
	else if (isotope == "Y104")
	{
		Z = 39;
		A = 103.94145;
		IC = 0;
	}
	else if (isotope == "Y105")
	{
		Z = 39;
		A = 104.94509;
		IC = 0;
	}
	else if (isotope == "Y106")
	{
		Z = 39;
		A = 105.95022;
		IC = 0;
	}
	else if (isotope == "Zr79")
	{
		Z = 40;
		A = 78.94916;
		IC = 0;
	}
	else if (isotope == "Zr80")
	{
		Z = 40;
		A = 79.94055;
		IC = 0;
	}
	else if (isotope == "Zr81")
	{
		Z = 40;
		A = 80.93682;
		IC = 0;
	}
	else if (isotope == "Zr82")
	{
		Z = 40;
		A = 81.93109;
		IC = 0;
	}
	else if (isotope == "Zr83")
	{
		Z = 40;
		A = 82.92865;
		IC = 0;
	}
	else if (isotope == "Zr84")
	{
		Z = 40;
		A = 83.92325;
		IC = 0;
	}
	else if (isotope == "Zr85")
	{
		Z = 40;
		A = 84.92147;
		IC = 0;
	}
	else if (isotope == "Zr86")
	{
		Z = 40;
		A = 85.916470;
		IC = 0;
	}
	else if (isotope == "Zr87")
	{
		Z = 40;
		A = 86.914817;
		IC = 0;
	}
	else if (isotope == "Zr88")
	{
		Z = 40;
		A = 87.910226;
		IC = 0;
	}
	else if (isotope == "Zr89")
	{
		Z = 40;
		A = 88.908889;
		IC = 0;
	}
	else if (isotope == "Zr")
	{
		Z = 40;
		A = 91.224;
		IC = 1.0;
	}
	else if (isotope == "Zr90")
	{
		Z = 40;
		A = 89.9047037;
		IC = 0.5145;
	}
	else if (isotope == "Zr91")
	{
		Z = 40;
		A = 90.9056450;
		IC = 0.1122;
	}
	else if (isotope == "Zr92")
	{
		Z = 40;
		A = 91.9050401;
		IC = 0.1715;
	}
	else if (isotope == "Zr93")
	{
		Z = 40;
		A = 92.9064756;
		IC = 0;
	}
	else if (isotope == "Zr94")
	{
		Z = 40;
		A = 93.9063158;
		IC = 0.1738;
	}
	else if (isotope == "Zr95")
	{
		Z = 40;
		A = 94.9080427;
		IC = 0;
	}
	else if (isotope == "Zr96")
	{
		Z = 40;
		A = 95.908276;
		IC = 0.028;
	}
	else if (isotope == "Zr97")
	{
		Z = 40;
		A = 96.910951;
		IC = 0;
	}
	else if (isotope == "Zr98")
	{
		Z = 40;
		A = 97.912746;
		IC = 0;
	}
	else if (isotope == "Zr99")
	{
		Z = 40;
		A = 98.916511;
		IC = 0;
	}
	else if (isotope == "Zr100")
	{
		Z = 40;
		A = 99.917760;
		IC = 0;
	}
	else if (isotope == "Zr101")
	{
		Z = 40;
		A = 100.921140;
		IC = 0;
	}
	else if (isotope == "Zr102")
	{
		Z = 40;
		A = 101.922980;
		IC = 0;
	}
	else if (isotope == "Zr103")
	{
		Z = 40;
		A = 102.92660;
		IC = 0;
	}
	else if (isotope == "Zr104")
	{
		Z = 40;
		A = 103.92878;
		IC = 0;
	}
	else if (isotope == "Zr105")
	{
		Z = 40;
		A = 104.93305;
		IC = 0;
	}
	else if (isotope == "Zr106")
	{
		Z = 40;
		A = 105.93591;
		IC = 0;
	}
	else if (isotope == "Zr107")
	{
		Z = 40;
		A = 106.94086;
		IC = 0;
	}
	else if (isotope == "Zr108")
	{
		Z = 40;
		A = 107.94428;
		IC = 0;
	}
	else if (isotope == "Nb81")
	{
		Z = 41;
		A = 80.94905;
		IC = 0;
	}
	else if (isotope == "Nb82")
	{
		Z = 41;
		A = 81.94313;
		IC = 0;
	}
	else if (isotope == "Nb83")
	{
		Z = 41;
		A = 82.93670;
		IC = 0;
	}
	else if (isotope == "Nb84")
	{
		Z = 41;
		A = 83.93357;
		IC = 0;
	}
	else if (isotope == "Nb85")
	{
		Z = 41;
		A = 84.92791;
		IC = 0;
	}
	else if (isotope == "Nb86")
	{
		Z = 41;
		A = 85.925040;
		IC = 0;
	}
	else if (isotope == "Nb87")
	{
		Z = 41;
		A = 86.920360;
		IC = 0;
	}
	else if (isotope == "Nb88")
	{
		Z = 41;
		A = 87.91796;
		IC = 0;
	}
	else if (isotope == "Nb89")
	{
		Z = 41;
		A = 88.913500;
		IC = 0;
	}
	else if (isotope == "Nb90")
	{
		Z = 41;
		A = 89.911264;
		IC = 0;
	}
	else if (isotope == "Nb91")
	{
		Z = 41;
		A = 90.906991;
		IC = 0;
	}
	else if (isotope == "Nb92")
	{
		Z = 41;
		A = 91.9071932;
		IC = 0;
	}
	else if (isotope == "Nb")
	{
		Z = 41;
		A = 92.90638;
		IC = 1.0;
	}
	else if (isotope == "Nb93")
	{
		Z = 41;
		A = 92.9063775;
		IC = 1;
	}
	else if (isotope == "Nb94")
	{
		Z = 41;
		A = 93.9072835;
		IC = 0;
	}
	else if (isotope == "Nb95")
	{
		Z = 41;
		A = 94.9068352;
		IC = 0;
	}
	else if (isotope == "Nb96")
	{
		Z = 41;
		A = 95.908100;
		IC = 0;
	}
	else if (isotope == "Nb97")
	{
		Z = 41;
		A = 96.9080971;
		IC = 0;
	}
	else if (isotope == "Nb98")
	{
		Z = 41;
		A = 97.910331;
		IC = 0;
	}
	else if (isotope == "Nb99")
	{
		Z = 41;
		A = 98.911618;
		IC = 0;
	}
	else if (isotope == "Nb100")
	{
		Z = 41;
		A = 99.914181;
		IC = 0;
	}
	else if (isotope == "Nb101")
	{
		Z = 41;
		A = 100.915252;
		IC = 0;
	}
	else if (isotope == "Nb102")
	{
		Z = 41;
		A = 101.918040;
		IC = 0;
	}
	else if (isotope == "Nb103")
	{
		Z = 41;
		A = 102.919140;
		IC = 0;
	}
	else if (isotope == "Nb104")
	{
		Z = 41;
		A = 103.92246;
		IC = 0;
	}
	else if (isotope == "Nb105")
	{
		Z = 41;
		A = 104.92393;
		IC = 0;
	}
	else if (isotope == "Nb106")
	{
		Z = 41;
		A = 105.92819;
		IC = 0;
	}
	else if (isotope == "Nb107")
	{
		Z = 41;
		A = 106.93031;
		IC = 0;
	}
	else if (isotope == "Nb108")
	{
		Z = 41;
		A = 107.93501;
		IC = 0;
	}
	else if (isotope == "Nb109")
	{
		Z = 41;
		A = 108.93763;
		IC = 0;
	}
	else if (isotope == "Nb110")
	{
		Z = 41;
		A = 109.94268;
		IC = 0;
	}
	else if (isotope == "Mo83")
	{
		Z = 42;
		A = 82.94874;
		IC = 0;
	}
	else if (isotope == "Mo84")
	{
		Z = 42;
		A = 83.94009;
		IC = 0;
	}
	else if (isotope == "Mo85")
	{
		Z = 42;
		A = 84.93659;
		IC = 0;
	}
	else if (isotope == "Mo86")
	{
		Z = 42;
		A = 85.93070;
		IC = 0;
	}
	else if (isotope == "Mo87")
	{
		Z = 42;
		A = 86.92733;
		IC = 0;
	}
	else if (isotope == "Mo88")
	{
		Z = 42;
		A = 87.921953;
		IC = 0;
	}
	else if (isotope == "Mo89")
	{
		Z = 42;
		A = 88.919481;
		IC = 0;
	}
	else if (isotope == "Mo90")
	{
		Z = 42;
		A = 89.913936;
		IC = 0;
	}
	else if (isotope == "Mo91")
	{
		Z = 42;
		A = 90.911751;
		IC = 0;
	}
	else if (isotope == "Mo")
	{
		Z = 42;
		A = 95.94;
		IC = 1.0;
	}
	else if (isotope == "Mo92")
	{
		Z = 42;
		A = 91.906810;
		IC = 0.1484;
	}
	else if (isotope == "Mo93")
	{
		Z = 42;
		A = 92.906812;
		IC = 0;
	}
	else if (isotope == "Mo94")
	{
		Z = 42;
		A = 93.9050876;
		IC = 0.0925;
	}
	else if (isotope == "Mo95")
	{
		Z = 42;
		A = 94.9058415;
		IC = 0.1592;
	}
	else if (isotope == "Mo96")
	{
		Z = 42;
		A = 95.9046789;
		IC = 0.1668;
	}
	else if (isotope == "Mo97")
	{
		Z = 42;
		A = 96.9060210;
		IC = 0.0955;
	}
	else if (isotope == "Mo98")
	{
		Z = 42;
		A = 97.9054078;
		IC = 0.2413;
	}
	else if (isotope == "Mo99")
	{
		Z = 42;
		A = 98.9077116;
		IC = 0;
	}
	else if (isotope == "Mo100")
	{
		Z = 42;
		A = 99.907477;
		IC = 0.0963;
	}
	else if (isotope == "Mo101")
	{
		Z = 42;
		A = 100.910347;
		IC = 0;
	}
	else if (isotope == "Mo102")
	{
		Z = 42;
		A = 101.910297;
		IC = 0;
	}
	else if (isotope == "Mo103")
	{
		Z = 42;
		A = 102.913200;
		IC = 0;
	}
	else if (isotope == "Mo104")
	{
		Z = 42;
		A = 103.913760;
		IC = 0;
	}
	else if (isotope == "Mo105")
	{
		Z = 42;
		A = 104.916970;
		IC = 0;
	}
	else if (isotope == "Mo106")
	{
		Z = 42;
		A = 105.918134;
		IC = 0;
	}
	else if (isotope == "Mo107")
	{
		Z = 42;
		A = 106.92169;
		IC = 0;
	}
	else if (isotope == "Mo108")
	{
		Z = 42;
		A = 107.92358;
		IC = 0;
	}
	else if (isotope == "Mo109")
	{
		Z = 42;
		A = 108.92781;
		IC = 0;
	}
	else if (isotope == "Mo110")
	{
		Z = 42;
		A = 109.92973;
		IC = 0;
	}
	else if (isotope == "Mo111")
	{
		Z = 42;
		A = 110.93451;
		IC = 0;
	}
	else if (isotope == "Mo112")
	{
		Z = 42;
		A = 111.93684;
		IC = 0;
	}
	else if (isotope == "Mo113")
	{
		Z = 42;
		A = 112.94203;
		IC = 0;
	}
	else if (isotope == "Tc85")
	{
		Z = 43;
		A = 84.94894;
		IC = 0;
	}
	else if (isotope == "Tc86")
	{
		Z = 43;
		A = 85.94288;
		IC = 0;
	}
	else if (isotope == "Tc87")
	{
		Z = 43;
		A = 86.93653;
		IC = 0;
	}
	else if (isotope == "Tc88")
	{
		Z = 43;
		A = 87.93283;
		IC = 0;
	}
	else if (isotope == "Tc89")
	{
		Z = 43;
		A = 88.92754;
		IC = 0;
	}
	else if (isotope == "Tc90")
	{
		Z = 43;
		A = 89.92356;
		IC = 0;
	}
	else if (isotope == "Tc91")
	{
		Z = 43;
		A = 90.91843;
		IC = 0;
	}
	else if (isotope == "Tc92")
	{
		Z = 43;
		A = 91.915260;
		IC = 0;
	}
	else if (isotope == "Tc93")
	{
		Z = 43;
		A = 92.910248;
		IC = 0;
	}
	else if (isotope == "Tc94")
	{
		Z = 43;
		A = 93.909656;
		IC = 0;
	}
	else if (isotope == "Tc95")
	{
		Z = 43;
		A = 94.907656;
		IC = 0;
	}
	else if (isotope == "Tc96")
	{
		Z = 43;
		A = 95.907871;
		IC = 0;
	}
	else if (isotope == "Tc97")
	{
		Z = 43;
		A = 96.906365;
		IC = 0;
	}
	else if (isotope == "Tc98")
	{
		Z = 43;
		A = 97.907216;
		IC = 0;
	}
	else if (isotope == "Tc99")
	{
		Z = 43;
		A = 98.9062546;
		IC = 0;
	}
	else if (isotope == "Tc100")
	{
		Z = 43;
		A = 99.9076576;
		IC = 0;
	}
	else if (isotope == "Tc101")
	{
		Z = 43;
		A = 100.907314;
		IC = 0;
	}
	else if (isotope == "Tc102")
	{
		Z = 43;
		A = 101.909213;
		IC = 0;
	}
	else if (isotope == "Tc103")
	{
		Z = 43;
		A = 102.909179;
		IC = 0;
	}
	else if (isotope == "Tc104")
	{
		Z = 43;
		A = 103.911440;
		IC = 0;
	}
	else if (isotope == "Tc105")
	{
		Z = 43;
		A = 104.911660;
		IC = 0;
	}
	else if (isotope == "Tc106")
	{
		Z = 43;
		A = 105.914355;
		IC = 0;
	}
	else if (isotope == "Tc107")
	{
		Z = 43;
		A = 106.91508;
		IC = 0;
	}
	else if (isotope == "Tc108")
	{
		Z = 43;
		A = 107.91848;
		IC = 0;
	}
	else if (isotope == "Tc109")
	{
		Z = 43;
		A = 108.91963;
		IC = 0;
	}
	else if (isotope == "Tc110")
	{
		Z = 43;
		A = 109.92339;
		IC = 0;
	}
	else if (isotope == "Tc111")
	{
		Z = 43;
		A = 110.92505;
		IC = 0;
	}
	else if (isotope == "Tc112")
	{
		Z = 43;
		A = 111.92924;
		IC = 0;
	}
	else if (isotope == "Tc113")
	{
		Z = 43;
		A = 112.93133;
		IC = 0;
	}
	else if (isotope == "Tc114")
	{
		Z = 43;
		A = 113.93588;
		IC = 0;
	}
	else if (isotope == "Tc115")
	{
		Z = 43;
		A = 114.93828;
		IC = 0;
	}
	else if (isotope == "Ru87")
	{
		Z = 44;
		A = 86.94918;
		IC = 0;
	}
	else if (isotope == "Ru88")
	{
		Z = 44;
		A = 87.94042;
		IC = 0;
	}
	else if (isotope == "Ru89")
	{
		Z = 44;
		A = 88.93611;
		IC = 0;
	}
	else if (isotope == "Ru90")
	{
		Z = 44;
		A = 89.92978;
		IC = 0;
	}
	else if (isotope == "Ru91")
	{
		Z = 44;
		A = 90.92638;
		IC = 0;
	}
	else if (isotope == "Ru92")
	{
		Z = 44;
		A = 91.92012;
		IC = 0;
	}
	else if (isotope == "Ru93")
	{
		Z = 44;
		A = 92.917050;
		IC = 0;
	}
	else if (isotope == "Ru94")
	{
		Z = 44;
		A = 93.911360;
		IC = 0;
	}
	else if (isotope == "Ru95")
	{
		Z = 44;
		A = 94.910413;
		IC = 0;
	}
	else if (isotope == "Ru")
	{
		Z = 44;
		A = 101.07;
		IC = 1.0;
	}
	else if (isotope == "Ru96")
	{
		Z = 44;
		A = 95.907598;
		IC = 0.0554;
	}
	else if (isotope == "Ru97")
	{
		Z = 44;
		A = 96.907555;
		IC = 0;
	}
	else if (isotope == "Ru98")
	{
		Z = 44;
		A = 97.905287;
		IC = 0.0187;
	}
	else if (isotope == "Ru99")
	{
		Z = 44;
		A = 98.9059393;
		IC = 0.1276;
	}
	else if (isotope == "Ru100")
	{
		Z = 44;
		A = 99.9042197;
		IC = 0.126;
	}
	else if (isotope == "Ru101")
	{
		Z = 44;
		A = 100.9055822;
		IC = 0.1706;
	}
	else if (isotope == "Ru102")
	{
		Z = 44;
		A = 101.9043495;
		IC = 0.3155;
	}
	else if (isotope == "Ru103")
	{
		Z = 44;
		A = 102.9063237;
		IC = 0;
	}
	else if (isotope == "Ru104")
	{
		Z = 44;
		A = 103.905430;
		IC = 0.1862;
	}
	else if (isotope == "Ru105")
	{
		Z = 44;
		A = 104.907750;
		IC = 0;
	}
	else if (isotope == "Ru106")
	{
		Z = 44;
		A = 105.907327;
		IC = 0;
	}
	else if (isotope == "Ru107")
	{
		Z = 44;
		A = 106.90991;
		IC = 0;
	}
	else if (isotope == "Ru108")
	{
		Z = 44;
		A = 107.91019;
		IC = 0;
	}
	else if (isotope == "Ru109")
	{
		Z = 44;
		A = 108.913200;
		IC = 0;
	}
	else if (isotope == "Ru110")
	{
		Z = 44;
		A = 109.91397;
		IC = 0;
	}
	else if (isotope == "Ru111")
	{
		Z = 44;
		A = 110.91756;
		IC = 0;
	}
	else if (isotope == "Ru112")
	{
		Z = 44;
		A = 111.91855;
		IC = 0;
	}
	else if (isotope == "Ru113")
	{
		Z = 44;
		A = 112.92254;
		IC = 0;
	}
	else if (isotope == "Ru114")
	{
		Z = 44;
		A = 113.92400;
		IC = 0;
	}
	else if (isotope == "Ru115")
	{
		Z = 44;
		A = 114.92831;
		IC = 0;
	}
	else if (isotope == "Ru116")
	{
		Z = 44;
		A = 115.93016;
		IC = 0;
	}
	else if (isotope == "Ru117")
	{
		Z = 44;
		A = 116.93479;
		IC = 0;
	}
	else if (isotope == "Ru118")
	{
		Z = 44;
		A = 117.93703;
		IC = 0;
	}
	else if (isotope == "Rh89")
	{
		Z = 45;
		A = 88.94938;
		IC = 0;
	}
	else if (isotope == "Rh90")
	{
		Z = 45;
		A = 89.94287;
		IC = 0;
	}
	else if (isotope == "Rh91")
	{
		Z = 45;
		A = 90.93655;
		IC = 0;
	}
	else if (isotope == "Rh92")
	{
		Z = 45;
		A = 91.93198;
		IC = 0;
	}
	else if (isotope == "Rh93")
	{
		Z = 45;
		A = 92.92574;
		IC = 0;
	}
	else if (isotope == "Rh94")
	{
		Z = 45;
		A = 93.92170;
		IC = 0;
	}
	else if (isotope == "Rh95")
	{
		Z = 45;
		A = 94.91590;
		IC = 0;
	}
	else if (isotope == "Rh96")
	{
		Z = 45;
		A = 95.914518;
		IC = 0;
	}
	else if (isotope == "Rh97")
	{
		Z = 45;
		A = 96.911340;
		IC = 0;
	}
	else if (isotope == "Rh98")
	{
		Z = 45;
		A = 97.910716;
		IC = 0;
	}
	else if (isotope == "Rh99")
	{
		Z = 45;
		A = 98.908132;
		IC = 0;
	}
	else if (isotope == "Rh100")
	{
		Z = 45;
		A = 99.908117;
		IC = 0;
	}
	else if (isotope == "Rh101")
	{
		Z = 45;
		A = 100.906164;
		IC = 0;
	}
	else if (isotope == "Rh102")
	{
		Z = 45;
		A = 101.906843;
		IC = 0;
	}
	else if (isotope == "Rh")
	{
		Z = 45;
		A = 102.90550;
		IC = 1.0;
	}
	else if (isotope == "Rh103")
	{
		Z = 45;
		A = 102.905504;
		IC = 1;
	}
	else if (isotope == "Rh104")
	{
		Z = 45;
		A = 103.906655;
		IC = 0;
	}
	else if (isotope == "Rh105")
	{
		Z = 45;
		A = 104.905692;
		IC = 0;
	}
	else if (isotope == "Rh106")
	{
		Z = 45;
		A = 105.907285;
		IC = 0;
	}
	else if (isotope == "Rh107")
	{
		Z = 45;
		A = 106.906751;
		IC = 0;
	}
	else if (isotope == "Rh108")
	{
		Z = 45;
		A = 107.90873;
		IC = 0;
	}
	else if (isotope == "Rh109")
	{
		Z = 45;
		A = 108.908736;
		IC = 0;
	}
	else if (isotope == "Rh110")
	{
		Z = 45;
		A = 109.91095;
		IC = 0;
	}
	else if (isotope == "Rh111")
	{
		Z = 45;
		A = 110.91166;
		IC = 0;
	}
	else if (isotope == "Rh112")
	{
		Z = 45;
		A = 111.91461;
		IC = 0;
	}
	else if (isotope == "Rh113")
	{
		Z = 45;
		A = 112.91542;
		IC = 0;
	}
	else if (isotope == "Rh114")
	{
		Z = 45;
		A = 113.91885;
		IC = 0;
	}
	else if (isotope == "Rh115")
	{
		Z = 45;
		A = 114.92012;
		IC = 0;
	}
	else if (isotope == "Rh116")
	{
		Z = 45;
		A = 115.92371;
		IC = 0;
	}
	else if (isotope == "Rh117")
	{
		Z = 45;
		A = 116.92535;
		IC = 0;
	}
	else if (isotope == "Rh118")
	{
		Z = 45;
		A = 117.92943;
		IC = 0;
	}
	else if (isotope == "Rh119")
	{
		Z = 45;
		A = 118.93136;
		IC = 0;
	}
	else if (isotope == "Rh120")
	{
		Z = 45;
		A = 119.93578;
		IC = 0;
	}
	else if (isotope == "Rh121")
	{
		Z = 45;
		A = 120.93808;
		IC = 0;
	}
	else if (isotope == "Pd91")
	{
		Z = 46;
		A = 90.94948;
		IC = 0;
	}
	else if (isotope == "Pd92")
	{
		Z = 46;
		A = 91.94042;
		IC = 0;
	}
	else if (isotope == "Pd93")
	{
		Z = 46;
		A = 92.93591;
		IC = 0;
	}
	else if (isotope == "Pd94")
	{
		Z = 46;
		A = 93.92877;
		IC = 0;
	}
	else if (isotope == "Pd95")
	{
		Z = 46;
		A = 94.92469;
		IC = 0;
	}
	else if (isotope == "Pd96")
	{
		Z = 46;
		A = 95.91822;
		IC = 0;
	}
	else if (isotope == "Pd97")
	{
		Z = 46;
		A = 96.91648;
		IC = 0;
	}
	else if (isotope == "Pd98")
	{
		Z = 46;
		A = 97.912721;
		IC = 0;
	}
	else if (isotope == "Pd99")
	{
		Z = 46;
		A = 98.911768;
		IC = 0;
	}
	else if (isotope == "Pd100")
	{
		Z = 46;
		A = 99.908505;
		IC = 0;
	}
	else if (isotope == "Pd101")
	{
		Z = 46;
		A = 100.908289;
		IC = 0;
	}
	else if (isotope == "Pd")
	{
		Z = 46;
		A = 106.42;
		IC = 1.0;
	}
	else if (isotope == "Pd102")
	{
		Z = 46;
		A = 101.905608;
		IC = 0.0102;
	}
	else if (isotope == "Pd103")
	{
		Z = 46;
		A = 102.906087;
		IC = 0;
	}
	else if (isotope == "Pd104")
	{
		Z = 46;
		A = 103.904035;
		IC = 0.1114;
	}
	else if (isotope == "Pd105")
	{
		Z = 46;
		A = 104.905084;
		IC = 0.2233;
	}
	else if (isotope == "Pd106")
	{
		Z = 46;
		A = 105.903483;
		IC = 0.2733;
	}
	else if (isotope == "Pd107")
	{
		Z = 46;
		A = 106.905128;
		IC = 0;
	}
	else if (isotope == "Pd108")
	{
		Z = 46;
		A = 107.903894;
		IC = 0.2646;
	}
	else if (isotope == "Pd109")
	{
		Z = 46;
		A = 108.905954;
		IC = 0;
	}
	else if (isotope == "Pd110")
	{
		Z = 46;
		A = 109.905152;
		IC = 0.1172;
	}
	else if (isotope == "Pd111")
	{
		Z = 46;
		A = 110.907640;
		IC = 0;
	}
	else if (isotope == "Pd112")
	{
		Z = 46;
		A = 111.907313;
		IC = 0;
	}
	else if (isotope == "Pd113")
	{
		Z = 46;
		A = 112.910150;
		IC = 0;
	}
	else if (isotope == "Pd114")
	{
		Z = 46;
		A = 113.910365;
		IC = 0;
	}
	else if (isotope == "Pd115")
	{
		Z = 46;
		A = 114.913680;
		IC = 0;
	}
	else if (isotope == "Pd116")
	{
		Z = 46;
		A = 115.914160;
		IC = 0;
	}
	else if (isotope == "Pd117")
	{
		Z = 46;
		A = 116.91784;
		IC = 0;
	}
	else if (isotope == "Pd118")
	{
		Z = 46;
		A = 117.91898;
		IC = 0;
	}
	else if (isotope == "Pd119")
	{
		Z = 46;
		A = 118.92268;
		IC = 0;
	}
	else if (isotope == "Pd120")
	{
		Z = 46;
		A = 119.92403;
		IC = 0;
	}
	else if (isotope == "Pd121")
	{
		Z = 46;
		A = 120.92818;
		IC = 0;
	}
	else if (isotope == "Pd122")
	{
		Z = 46;
		A = 121.92980;
		IC = 0;
	}
	else if (isotope == "Pd123")
	{
		Z = 46;
		A = 122.93426;
		IC = 0;
	}
	else if (isotope == "Ag94")
	{
		Z = 47;
		A = 93.94278;
		IC = 0;
	}
	else if (isotope == "Ag95")
	{
		Z = 47;
		A = 94.93548;
		IC = 0;
	}
	else if (isotope == "Ag96")
	{
		Z = 47;
		A = 95.93068;
		IC = 0;
	}
	else if (isotope == "Ag97")
	{
		Z = 47;
		A = 96.92400;
		IC = 0;
	}
	else if (isotope == "Ag98")
	{
		Z = 47;
		A = 97.92176;
		IC = 0;
	}
	else if (isotope == "Ag99")
	{
		Z = 47;
		A = 98.91760;
		IC = 0;
	}
	else if (isotope == "Ag100")
	{
		Z = 47;
		A = 99.916070;
		IC = 0;
	}
	else if (isotope == "Ag101")
	{
		Z = 47;
		A = 100.91280;
		IC = 0;
	}
	else if (isotope == "Ag102")
	{
		Z = 47;
		A = 101.912000;
		IC = 0;
	}
	else if (isotope == "Ag103")
	{
		Z = 47;
		A = 102.908972;
		IC = 0;
	}
	else if (isotope == "Ag104")
	{
		Z = 47;
		A = 103.908628;
		IC = 0;
	}
	else if (isotope == "Ag105")
	{
		Z = 47;
		A = 104.906528;
		IC = 0;
	}
	else if (isotope == "Ag106")
	{
		Z = 47;
		A = 105.906666;
		IC = 0;
	}
	else if (isotope == "Ag")
	{
		Z = 47;
		A = 107.8682;
		IC = 1.0;
	}
	else if (isotope == "Ag107")
	{
		Z = 47;
		A = 106.905093;
		IC = 0.51839;
	}
	else if (isotope == "Ag108")
	{
		Z = 47;
		A = 107.905954;
		IC = 0;
	}
	else if (isotope == "Ag109")
	{
		Z = 47;
		A = 108.904756;
		IC = 0.48161;
	}
	else if (isotope == "Ag110")
	{
		Z = 47;
		A = 109.906110;
		IC = 0;
	}
	else if (isotope == "Ag111")
	{
		Z = 47;
		A = 110.905295;
		IC = 0;
	}
	else if (isotope == "Ag112")
	{
		Z = 47;
		A = 111.907004;
		IC = 0;
	}
	else if (isotope == "Ag113")
	{
		Z = 47;
		A = 112.906566;
		IC = 0;
	}
	else if (isotope == "Ag114")
	{
		Z = 47;
		A = 113.908808;
		IC = 0;
	}
	else if (isotope == "Ag115")
	{
		Z = 47;
		A = 114.908760;
		IC = 0;
	}
	else if (isotope == "Ag116")
	{
		Z = 47;
		A = 115.911360;
		IC = 0;
	}
	else if (isotope == "Ag117")
	{
		Z = 47;
		A = 116.911680;
		IC = 0;
	}
	else if (isotope == "Ag118")
	{
		Z = 47;
		A = 117.914580;
		IC = 0;
	}
	else if (isotope == "Ag119")
	{
		Z = 47;
		A = 118.91567;
		IC = 0;
	}
	else if (isotope == "Ag120")
	{
		Z = 47;
		A = 119.918790;
		IC = 0;
	}
	else if (isotope == "Ag121")
	{
		Z = 47;
		A = 120.91985;
		IC = 0;
	}
	else if (isotope == "Ag122")
	{
		Z = 47;
		A = 121.92332;
		IC = 0;
	}
	else if (isotope == "Ag123")
	{
		Z = 47;
		A = 122.92490;
		IC = 0;
	}
	else if (isotope == "Ag124")
	{
		Z = 47;
		A = 123.92853;
		IC = 0;
	}
	else if (isotope == "Ag125")
	{
		Z = 47;
		A = 124.93054;
		IC = 0;
	}
	else if (isotope == "Ag126")
	{
		Z = 47;
		A = 125.93450;
		IC = 0;
	}
	else if (isotope == "Ag127")
	{
		Z = 47;
		A = 126.93688;
		IC = 0;
	}
	else if (isotope == "Cd96")
	{
		Z = 48;
		A = 95.93977;
		IC = 0;
	}
	else if (isotope == "Cd97")
	{
		Z = 48;
		A = 96.93494;
		IC = 0;
	}
	else if (isotope == "Cd98")
	{
		Z = 48;
		A = 97.92758;
		IC = 0;
	}
	else if (isotope == "Cd99")
	{
		Z = 48;
		A = 98.92501;
		IC = 0;
	}
	else if (isotope == "Cd100")
	{
		Z = 48;
		A = 99.92023;
		IC = 0;
	}
	else if (isotope == "Cd101")
	{
		Z = 48;
		A = 100.91868;
		IC = 0;
	}
	else if (isotope == "Cd102")
	{
		Z = 48;
		A = 101.914780;
		IC = 0;
	}
	else if (isotope == "Cd103")
	{
		Z = 48;
		A = 102.913419;
		IC = 0;
	}
	else if (isotope == "Cd104")
	{
		Z = 48;
		A = 103.909848;
		IC = 0;
	}
	else if (isotope == "Cd105")
	{
		Z = 48;
		A = 104.909468;
		IC = 0;
	}
	else if (isotope == "Cd")
	{
		Z = 48;
		A = 112.411;
		IC = 1.0;
	}
	else if (isotope == "Cd106")
	{
		Z = 48;
		A = 105.906458;
		IC = 0.0125;
	}
	else if (isotope == "Cd107")
	{
		Z = 48;
		A = 106.906614;
		IC = 0;
	}
	else if (isotope == "Cd108")
	{
		Z = 48;
		A = 107.904183;
		IC = 0.0089;
	}
	else if (isotope == "Cd109")
	{
		Z = 48;
		A = 108.904986;
		IC = 0;
	}
	else if (isotope == "Cd110")
	{
		Z = 48;
		A = 109.903006;
		IC = 0.1249;
	}
	else if (isotope == "Cd111")
	{
		Z = 48;
		A = 110.904182;
		IC = 0.128;
	}
	else if (isotope == "Cd112")
	{
		Z = 48;
		A = 111.9027572;
		IC = 0.2413;
	}
	else if (isotope == "Cd113")
	{
		Z = 48;
		A = 112.9044009;
		IC = 0.1222;
	}
	else if (isotope == "Cd114")
	{
		Z = 48;
		A = 113.9033581;
		IC = 0.2873;
	}
	else if (isotope == "Cd115")
	{
		Z = 48;
		A = 114.905431;
		IC = 0;
	}
	else if (isotope == "Cd116")
	{
		Z = 48;
		A = 115.904755;
		IC = 0.0749;
	}
	else if (isotope == "Cd117")
	{
		Z = 48;
		A = 116.907218;
		IC = 0;
	}
	else if (isotope == "Cd118")
	{
		Z = 48;
		A = 117.906914;
		IC = 0;
	}
	else if (isotope == "Cd119")
	{
		Z = 48;
		A = 118.909920;
		IC = 0;
	}
	else if (isotope == "Cd120")
	{
		Z = 48;
		A = 119.909851;
		IC = 0;
	}
	else if (isotope == "Cd121")
	{
		Z = 48;
		A = 120.912980;
		IC = 0;
	}
	else if (isotope == "Cd122")
	{
		Z = 48;
		A = 121.91350;
		IC = 0;
	}
	else if (isotope == "Cd123")
	{
		Z = 48;
		A = 122.917000;
		IC = 0;
	}
	else if (isotope == "Cd124")
	{
		Z = 48;
		A = 123.917650;
		IC = 0;
	}
	else if (isotope == "Cd125")
	{
		Z = 48;
		A = 124.921250;
		IC = 0;
	}
	else if (isotope == "Cd126")
	{
		Z = 48;
		A = 125.922350;
		IC = 0;
	}
	else if (isotope == "Cd127")
	{
		Z = 48;
		A = 126.926430;
		IC = 0;
	}
	else if (isotope == "Cd128")
	{
		Z = 48;
		A = 127.92776;
		IC = 0;
	}
	else if (isotope == "Cd129")
	{
		Z = 48;
		A = 128.93226;
		IC = 0;
	}
	else if (isotope == "Cd130")
	{
		Z = 48;
		A = 129.93398;
		IC = 0;
	}
	else if (isotope == "In98")
	{
		Z = 49;
		A = 97.94224;
		IC = 0;
	}
	else if (isotope == "In99")
	{
		Z = 49;
		A = 98.93461;
		IC = 0;
	}
	else if (isotope == "In100")
	{
		Z = 49;
		A = 99.93115;
		IC = 0;
	}
	else if (isotope == "In101")
	{
		Z = 49;
		A = 100.92656;
		IC = 0;
	}
	else if (isotope == "In102")
	{
		Z = 49;
		A = 101.92471;
		IC = 0;
	}
	else if (isotope == "In103")
	{
		Z = 49;
		A = 102.919914;
		IC = 0;
	}
	else if (isotope == "In104")
	{
		Z = 49;
		A = 103.91834;
		IC = 0;
	}
	else if (isotope == "In105")
	{
		Z = 49;
		A = 104.914673;
		IC = 0;
	}
	else if (isotope == "In106")
	{
		Z = 49;
		A = 105.913461;
		IC = 0;
	}
	else if (isotope == "In107")
	{
		Z = 49;
		A = 106.910292;
		IC = 0;
	}
	else if (isotope == "In108")
	{
		Z = 49;
		A = 107.909720;
		IC = 0;
	}
	else if (isotope == "In109")
	{
		Z = 49;
		A = 108.907154;
		IC = 0;
	}
	else if (isotope == "In110")
	{
		Z = 49;
		A = 109.907169;
		IC = 0;
	}
	else if (isotope == "In111")
	{
		Z = 49;
		A = 110.905111;
		IC = 0;
	}
	else if (isotope == "In112")
	{
		Z = 49;
		A = 111.905533;
		IC = 0;
	}
	else if (isotope == "In")
	{
		Z = 49;
		A = 114.818;
		IC = 1.0;
	}
	else if (isotope == "In113")
	{
		Z = 49;
		A = 112.904061;
		IC = 0.0429;
	}
	else if (isotope == "In114")
	{
		Z = 49;
		A = 113.904917;
		IC = 0;
	}
	else if (isotope == "In115")
	{
		Z = 49;
		A = 114.903878;
		IC = 0.9571;
	}
	else if (isotope == "In116")
	{
		Z = 49;
		A = 115.905260;
		IC = 0;
	}
	else if (isotope == "In117")
	{
		Z = 49;
		A = 116.904516;
		IC = 0;
	}
	else if (isotope == "In118")
	{
		Z = 49;
		A = 117.906355;
		IC = 0;
	}
	else if (isotope == "In119")
	{
		Z = 49;
		A = 118.905846;
		IC = 0;
	}
	else if (isotope == "In120")
	{
		Z = 49;
		A = 119.907960;
		IC = 0;
	}
	else if (isotope == "In121")
	{
		Z = 49;
		A = 120.907849;
		IC = 0;
	}
	else if (isotope == "In122")
	{
		Z = 49;
		A = 121.910280;
		IC = 0;
	}
	else if (isotope == "In123")
	{
		Z = 49;
		A = 122.910439;
		IC = 0;
	}
	else if (isotope == "In124")
	{
		Z = 49;
		A = 123.913180;
		IC = 0;
	}
	else if (isotope == "In125")
	{
		Z = 49;
		A = 124.913600;
		IC = 0;
	}
	else if (isotope == "In126")
	{
		Z = 49;
		A = 125.916460;
		IC = 0;
	}
	else if (isotope == "In127")
	{
		Z = 49;
		A = 126.917340;
		IC = 0;
	}
	else if (isotope == "In128")
	{
		Z = 49;
		A = 127.920170;
		IC = 0;
	}
	else if (isotope == "In129")
	{
		Z = 49;
		A = 128.92166;
		IC = 0;
	}
	else if (isotope == "In130")
	{
		Z = 49;
		A = 129.924850;
		IC = 0;
	}
	else if (isotope == "In131")
	{
		Z = 49;
		A = 130.926770;
		IC = 0;
	}
	else if (isotope == "In132")
	{
		Z = 49;
		A = 131.932920;
		IC = 0;
	}
	else if (isotope == "In133")
	{
		Z = 49;
		A = 132.93834;
		IC = 0;
	}
	else if (isotope == "In134")
	{
		Z = 49;
		A = 133.94466;
		IC = 0;
	}
	else if (isotope == "Sn100")
	{
		Z = 50;
		A = 99.93895;
		IC = 0;
	}
	else if (isotope == "Sn101")
	{
		Z = 50;
		A = 100.93606;
		IC = 0;
	}
	else if (isotope == "Sn102")
	{
		Z = 50;
		A = 101.93049;
		IC = 0;
	}
	else if (isotope == "Sn103")
	{
		Z = 50;
		A = 102.92813;
		IC = 0;
	}
	else if (isotope == "Sn104")
	{
		Z = 50;
		A = 103.92319;
		IC = 0;
	}
	else if (isotope == "Sn105")
	{
		Z = 50;
		A = 104.92139;
		IC = 0;
	}
	else if (isotope == "Sn106")
	{
		Z = 50;
		A = 105.916880;
		IC = 0;
	}
	else if (isotope == "Sn107")
	{
		Z = 50;
		A = 106.915670;
		IC = 0;
	}
	else if (isotope == "Sn108")
	{
		Z = 50;
		A = 107.911970;
		IC = 0;
	}
	else if (isotope == "Sn109")
	{
		Z = 50;
		A = 108.911287;
		IC = 0;
	}
	else if (isotope == "Sn110")
	{
		Z = 50;
		A = 109.907853;
		IC = 0;
	}
	else if (isotope == "Sn111")
	{
		Z = 50;
		A = 110.907735;
		IC = 0;
	}
	else if (isotope == "Sn")
	{
		Z = 50;
		A = 118.710;
		IC = 1.0;
	}
	else if (isotope == "Sn112")
	{
		Z = 50;
		A = 111.904821;
		IC = 0.0097;
	}
	else if (isotope == "Sn113")
	{
		Z = 50;
		A = 112.905173;
		IC = 0;
	}
	else if (isotope == "Sn114")
	{
		Z = 50;
		A = 113.902782;
		IC = 0.0066;
	}
	else if (isotope == "Sn115")
	{
		Z = 50;
		A = 114.903346;
		IC = 0.0034;
	}
	else if (isotope == "Sn116")
	{
		Z = 50;
		A = 115.901744;
		IC = 0.1454;
	}
	else if (isotope == "Sn117")
	{
		Z = 50;
		A = 116.902954;
		IC = 0.0768;
	}
	else if (isotope == "Sn118")
	{
		Z = 50;
		A = 117.901606;
		IC = 0.2422;
	}
	else if (isotope == "Sn119")
	{
		Z = 50;
		A = 118.903309;
		IC = 0.0859;
	}
	else if (isotope == "Sn120")
	{
		Z = 50;
		A = 119.9021966;
		IC = 0.3258;
	}
	else if (isotope == "Sn121")
	{
		Z = 50;
		A = 120.9042369;
		IC = 0;
	}
	else if (isotope == "Sn122")
	{
		Z = 50;
		A = 121.9034401;
		IC = 0.0463;
	}
	else if (isotope == "Sn123")
	{
		Z = 50;
		A = 122.9057219;
		IC = 0;
	}
	else if (isotope == "Sn124")
	{
		Z = 50;
		A = 123.9052746;
		IC = 0.0579;
	}
	else if (isotope == "Sn125")
	{
		Z = 50;
		A = 124.9077849;
		IC = 0;
	}
	else if (isotope == "Sn126")
	{
		Z = 50;
		A = 125.907654;
		IC = 0;
	}
	else if (isotope == "Sn127")
	{
		Z = 50;
		A = 126.910351;
		IC = 0;
	}
	else if (isotope == "Sn128")
	{
		Z = 50;
		A = 127.910535;
		IC = 0;
	}
	else if (isotope == "Sn129")
	{
		Z = 50;
		A = 128.91344;
		IC = 0;
	}
	else if (isotope == "Sn130")
	{
		Z = 50;
		A = 129.913850;
		IC = 0;
	}
	else if (isotope == "Sn131")
	{
		Z = 50;
		A = 130.916920;
		IC = 0;
	}
	else if (isotope == "Sn132")
	{
		Z = 50;
		A = 131.917744;
		IC = 0;
	}
	else if (isotope == "Sn133")
	{
		Z = 50;
		A = 132.923810;
		IC = 0;
	}
	else if (isotope == "Sn134")
	{
		Z = 50;
		A = 133.92846;
		IC = 0;
	}
	else if (isotope == "Sn135")
	{
		Z = 50;
		A = 134.93473;
		IC = 0;
	}
	else if (isotope == "Sn136")
	{
		Z = 50;
		A = 135.93934;
		IC = 0;
	}
	else if (isotope == "Sn137")
	{
		Z = 50;
		A = 136.94579;
		IC = 0;
	}
	else if (isotope == "Sb103")
	{
		Z = 51;
		A = 102.94012;
		IC = 0;
	}
	else if (isotope == "Sb104")
	{
		Z = 51;
		A = 103.93629;
		IC = 0;
	}
	else if (isotope == "Sb105")
	{
		Z = 51;
		A = 104.93153;
		IC = 0;
	}
	else if (isotope == "Sb106")
	{
		Z = 51;
		A = 105.92876;
		IC = 0;
	}
	else if (isotope == "Sb107")
	{
		Z = 51;
		A = 106.92415;
		IC = 0;
	}
	else if (isotope == "Sb108")
	{
		Z = 51;
		A = 107.92216;
		IC = 0;
	}
	else if (isotope == "Sb109")
	{
		Z = 51;
		A = 108.918136;
		IC = 0;
	}
	else if (isotope == "Sb110")
	{
		Z = 51;
		A = 109.91676;
		IC = 0;
	}
	else if (isotope == "Sb111")
	{
		Z = 51;
		A = 110.91321;
		IC = 0;
	}
	else if (isotope == "Sb112")
	{
		Z = 51;
		A = 111.912395;
		IC = 0;
	}
	else if (isotope == "Sb113")
	{
		Z = 51;
		A = 112.909378;
		IC = 0;
	}
	else if (isotope == "Sb114")
	{
		Z = 51;
		A = 113.90910;
		IC = 0;
	}
	else if (isotope == "Sb115")
	{
		Z = 51;
		A = 114.906599;
		IC = 0;
	}
	else if (isotope == "Sb116")
	{
		Z = 51;
		A = 115.906797;
		IC = 0;
	}
	else if (isotope == "Sb117")
	{
		Z = 51;
		A = 116.904840;
		IC = 0;
	}
	else if (isotope == "Sb118")
	{
		Z = 51;
		A = 117.905532;
		IC = 0;
	}
	else if (isotope == "Sb119")
	{
		Z = 51;
		A = 118.903946;
		IC = 0;
	}
	else if (isotope == "Sb120")
	{
		Z = 51;
		A = 119.905074;
		IC = 0;
	}
	else if (isotope == "Sb")
	{
		Z = 51;
		A = 121.760;
		IC = 1.0;
	}
	else if (isotope == "Sb121")
	{
		Z = 51;
		A = 120.9038180;
		IC = 0.5721;
	}
	else if (isotope == "Sb122")
	{
		Z = 51;
		A = 121.9051754;
		IC = 0;
	}
	else if (isotope == "Sb123")
	{
		Z = 51;
		A = 122.9042157;
		IC = 0.4279;
	}
	else if (isotope == "Sb124")
	{
		Z = 51;
		A = 123.9059375;
		IC = 0;
	}
	else if (isotope == "Sb125")
	{
		Z = 51;
		A = 124.905248;
		IC = 0;
	}
	else if (isotope == "Sb126")
	{
		Z = 51;
		A = 125.907250;
		IC = 0;
	}
	else if (isotope == "Sb127")
	{
		Z = 51;
		A = 126.906915;
		IC = 0;
	}
	else if (isotope == "Sb128")
	{
		Z = 51;
		A = 127.909167;
		IC = 0;
	}
	else if (isotope == "Sb129")
	{
		Z = 51;
		A = 128.909150;
		IC = 0;
	}
	else if (isotope == "Sb130")
	{
		Z = 51;
		A = 129.911546;
		IC = 0;
	}
	else if (isotope == "Sb131")
	{
		Z = 51;
		A = 130.911950;
		IC = 0;
	}
	else if (isotope == "Sb132")
	{
		Z = 51;
		A = 131.914413;
		IC = 0;
	}
	else if (isotope == "Sb133")
	{
		Z = 51;
		A = 132.915240;
		IC = 0;
	}
	else if (isotope == "Sb134")
	{
		Z = 51;
		A = 133.920550;
		IC = 0;
	}
	else if (isotope == "Sb135")
	{
		Z = 51;
		A = 134.92517;
		IC = 0;
	}
	else if (isotope == "Sb136")
	{
		Z = 51;
		A = 135.93066;
		IC = 0;
	}
	else if (isotope == "Sb137")
	{
		Z = 51;
		A = 136.93531;
		IC = 0;
	}
	else if (isotope == "Sb138")
	{
		Z = 51;
		A = 137.94096;
		IC = 0;
	}
	else if (isotope == "Sb139")
	{
		Z = 51;
		A = 138.94571;
		IC = 0;
	}
	else if (isotope == "Te106")
	{
		Z = 52;
		A = 105.93770;
		IC = 0;
	}
	else if (isotope == "Te107")
	{
		Z = 52;
		A = 106.93504;
		IC = 0;
	}
	else if (isotope == "Te108")
	{
		Z = 52;
		A = 107.92949;
		IC = 0;
	}
	else if (isotope == "Te109")
	{
		Z = 52;
		A = 108.927460;
		IC = 0;
	}
	else if (isotope == "Te110")
	{
		Z = 52;
		A = 109.922410;
		IC = 0;
	}
	else if (isotope == "Te111")
	{
		Z = 52;
		A = 110.921120;
		IC = 0;
	}
	else if (isotope == "Te112")
	{
		Z = 52;
		A = 111.91706;
		IC = 0;
	}
	else if (isotope == "Te113")
	{
		Z = 52;
		A = 112.91593;
		IC = 0;
	}
	else if (isotope == "Te114")
	{
		Z = 52;
		A = 113.91206;
		IC = 0;
	}
	else if (isotope == "Te115")
	{
		Z = 52;
		A = 114.91158;
		IC = 0;
	}
	else if (isotope == "Te116")
	{
		Z = 52;
		A = 115.90842;
		IC = 0;
	}
	else if (isotope == "Te117")
	{
		Z = 52;
		A = 116.908634;
		IC = 0;
	}
	else if (isotope == "Te118")
	{
		Z = 52;
		A = 117.905825;
		IC = 0;
	}
	else if (isotope == "Te119")
	{
		Z = 52;
		A = 118.906408;
		IC = 0;
	}
	else if (isotope == "Te")
	{
		Z = 52;
		A = 127.60;
		IC = 1.0;
	}
	else if (isotope == "Te120")
	{
		Z = 52;
		A = 119.904020;
		IC = 0.0009;
	}
	else if (isotope == "Te121")
	{
		Z = 52;
		A = 120.904930;
		IC = 0;
	}
	else if (isotope == "Te122")
	{
		Z = 52;
		A = 121.9030471;
		IC = 0.0255;
	}
	else if (isotope == "Te123")
	{
		Z = 52;
		A = 122.9042730;
		IC = 0.0089;
	}
	else if (isotope == "Te124")
	{
		Z = 52;
		A = 123.9028195;
		IC = 0.0474;
	}
	else if (isotope == "Te125")
	{
		Z = 52;
		A = 124.9044247;
		IC = 0.0707;
	}
	else if (isotope == "Te126")
	{
		Z = 52;
		A = 125.9033055;
		IC = 0.1884;
	}
	else if (isotope == "Te127")
	{
		Z = 52;
		A = 126.905217;
		IC = 0;
	}
	else if (isotope == "Te128")
	{
		Z = 52;
		A = 127.9044614;
		IC = 0.3174;
	}
	else if (isotope == "Te129")
	{
		Z = 52;
		A = 128.906596;
		IC = 0;
	}
	else if (isotope == "Te130")
	{
		Z = 52;
		A = 129.9062228;
		IC = 0.3408;
	}
	else if (isotope == "Te131")
	{
		Z = 52;
		A = 130.9085219;
		IC = 0;
	}
	else if (isotope == "Te132")
	{
		Z = 52;
		A = 131.908524;
		IC = 0;
	}
	else if (isotope == "Te133")
	{
		Z = 52;
		A = 132.910940;
		IC = 0;
	}
	else if (isotope == "Te134")
	{
		Z = 52;
		A = 133.911540;
		IC = 0;
	}
	else if (isotope == "Te135")
	{
		Z = 52;
		A = 134.91645;
		IC = 0;
	}
	else if (isotope == "Te136")
	{
		Z = 52;
		A = 135.920100;
		IC = 0;
	}
	else if (isotope == "Te137")
	{
		Z = 52;
		A = 136.92532;
		IC = 0;
	}
	else if (isotope == "Te138")
	{
		Z = 52;
		A = 137.92922;
		IC = 0;
	}
	else if (isotope == "Te139")
	{
		Z = 52;
		A = 138.93473;
		IC = 0;
	}
	else if (isotope == "Te140")
	{
		Z = 52;
		A = 139.93870;
		IC = 0;
	}
	else if (isotope == "Te141")
	{
		Z = 52;
		A = 140.94439;
		IC = 0;
	}
	else if (isotope == "Te142")
	{
		Z = 52;
		A = 141.94850;
		IC = 0;
	}
	else if (isotope == "I108")
	{
		Z = 53;
		A = 107.94329;
		IC = 0;
	}
	else if (isotope == "I109")
	{
		Z = 53;
		A = 108.93819;
		IC = 0;
	}
	else if (isotope == "I110")
	{
		Z = 53;
		A = 109.93521;
		IC = 0;
	}
	else if (isotope == "I111")
	{
		Z = 53;
		A = 110.93028;
		IC = 0;
	}
	else if (isotope == "I112")
	{
		Z = 53;
		A = 111.92797;
		IC = 0;
	}
	else if (isotope == "I113")
	{
		Z = 53;
		A = 112.923640;
		IC = 0;
	}
	else if (isotope == "I114")
	{
		Z = 53;
		A = 113.92185;
		IC = 0;
	}
	else if (isotope == "I115")
	{
		Z = 53;
		A = 114.91792;
		IC = 0;
	}
	else if (isotope == "I116")
	{
		Z = 53;
		A = 115.91674;
		IC = 0;
	}
	else if (isotope == "I117")
	{
		Z = 53;
		A = 116.913650;
		IC = 0;
	}
	else if (isotope == "I118")
	{
		Z = 53;
		A = 117.913380;
		IC = 0;
	}
	else if (isotope == "I119")
	{
		Z = 53;
		A = 118.910180;
		IC = 0;
	}
	else if (isotope == "I120")
	{
		Z = 53;
		A = 119.910048;
		IC = 0;
	}
	else if (isotope == "I121")
	{
		Z = 53;
		A = 120.907366;
		IC = 0;
	}
	else if (isotope == "I122")
	{
		Z = 53;
		A = 121.907592;
		IC = 0;
	}
	else if (isotope == "I123")
	{
		Z = 53;
		A = 122.905598;
		IC = 0;
	}
	else if (isotope == "I124")
	{
		Z = 53;
		A = 123.9062114;
		IC = 0;
	}
	else if (isotope == "I125")
	{
		Z = 53;
		A = 124.9046241;
		IC = 0;
	}
	else if (isotope == "I126")
	{
		Z = 53;
		A = 125.905619;
		IC = 0;
	}
	else if (isotope == "I")
	{
		Z = 53;
		A = 126.90447;
		IC = 1.0;
	}
	else if (isotope == "I127")
	{
		Z = 53;
		A = 126.904468;
		IC = 1;
	}
	else if (isotope == "I128")
	{
		Z = 53;
		A = 127.905805;
		IC = 0;
	}
	else if (isotope == "I129")
	{
		Z = 53;
		A = 128.904987;
		IC = 0;
	}
	else if (isotope == "I130")
	{
		Z = 53;
		A = 129.906674;
		IC = 0;
	}
	else if (isotope == "I131")
	{
		Z = 53;
		A = 130.9061242;
		IC = 0;
	}
	else if (isotope == "I132")
	{
		Z = 53;
		A = 131.907995;
		IC = 0;
	}
	else if (isotope == "I133")
	{
		Z = 53;
		A = 132.907806;
		IC = 0;
	}
	else if (isotope == "I134")
	{
		Z = 53;
		A = 133.909877;
		IC = 0;
	}
	else if (isotope == "I135")
	{
		Z = 53;
		A = 134.910050;
		IC = 0;
	}
	else if (isotope == "I136")
	{
		Z = 53;
		A = 135.914660;
		IC = 0;
	}
	else if (isotope == "I137")
	{
		Z = 53;
		A = 136.917873;
		IC = 0;
	}
	else if (isotope == "I138")
	{
		Z = 53;
		A = 137.922380;
		IC = 0;
	}
	else if (isotope == "I139")
	{
		Z = 53;
		A = 138.926090;
		IC = 0;
	}
	else if (isotope == "I140")
	{
		Z = 53;
		A = 139.93121;
		IC = 0;
	}
	else if (isotope == "I141")
	{
		Z = 53;
		A = 140.93483;
		IC = 0;
	}
	else if (isotope == "I142")
	{
		Z = 53;
		A = 141.94018;
		IC = 0;
	}
	else if (isotope == "I143")
	{
		Z = 53;
		A = 142.94407;
		IC = 0;
	}
	else if (isotope == "I144")
	{
		Z = 53;
		A = 143.94961;
		IC = 0;
	}
	else if (isotope == "Xe110")
	{
		Z = 54;
		A = 109.94448;
		IC = 0;
	}
	else if (isotope == "Xe111")
	{
		Z = 54;
		A = 110.94163;
		IC = 0;
	}
	else if (isotope == "Xe112")
	{
		Z = 54;
		A = 111.93567;
		IC = 0;
	}
	else if (isotope == "Xe113")
	{
		Z = 54;
		A = 112.93338;
		IC = 0;
	}
	else if (isotope == "Xe114")
	{
		Z = 54;
		A = 113.92815;
		IC = 0;
	}
	else if (isotope == "Xe115")
	{
		Z = 54;
		A = 114.92654;
		IC = 0;
	}
	else if (isotope == "Xe116")
	{
		Z = 54;
		A = 115.92174;
		IC = 0;
	}
	else if (isotope == "Xe117")
	{
		Z = 54;
		A = 116.92056;
		IC = 0;
	}
	else if (isotope == "Xe118")
	{
		Z = 54;
		A = 117.91657;
		IC = 0;
	}
	else if (isotope == "Xe119")
	{
		Z = 54;
		A = 118.91555;
		IC = 0;
	}
	else if (isotope == "Xe120")
	{
		Z = 54;
		A = 119.912150;
		IC = 0;
	}
	else if (isotope == "Xe121")
	{
		Z = 54;
		A = 120.911386;
		IC = 0;
	}
	else if (isotope == "Xe122")
	{
		Z = 54;
		A = 121.908550;
		IC = 0;
	}
	else if (isotope == "Xe123")
	{
		Z = 54;
		A = 122.908471;
		IC = 0;
	}
	else if (isotope == "Xe")
	{
		Z = 54;
		A = 131.293;
		IC = 1.0;
	}
	else if (isotope == "Xe124")
	{
		Z = 54;
		A = 123.9058958;
		IC = 0.0009;
	}
	else if (isotope == "Xe125")
	{
		Z = 54;
		A = 124.9063982;
		IC = 0;
	}
	else if (isotope == "Xe126")
	{
		Z = 54;
		A = 125.904269;
		IC = 0.0009;
	}
	else if (isotope == "Xe127")
	{
		Z = 54;
		A = 126.905180;
		IC = 0;
	}
	else if (isotope == "Xe128")
	{
		Z = 54;
		A = 127.9035304;
		IC = 0.0192;
	}
	else if (isotope == "Xe129")
	{
		Z = 54;
		A = 128.9047795;
		IC = 0.2644;
	}
	else if (isotope == "Xe130")
	{
		Z = 54;
		A = 129.9035079;
		IC = 0.0408;
	}
	else if (isotope == "Xe131")
	{
		Z = 54;
		A = 130.9050819;
		IC = 0.2118;
	}
	else if (isotope == "Xe132")
	{
		Z = 54;
		A = 131.9041545;
		IC = 0.2689;
	}
	else if (isotope == "Xe133")
	{
		Z = 54;
		A = 132.905906;
		IC = 0;
	}
	else if (isotope == "Xe134")
	{
		Z = 54;
		A = 133.9053945;
		IC = 0.1044;
	}
	else if (isotope == "Xe135")
	{
		Z = 54;
		A = 134.907207;
		IC = 0;
	}
	else if (isotope == "Xe136")
	{
		Z = 54;
		A = 135.907220;
		IC = 0.0887;
	}
	else if (isotope == "Xe137")
	{
		Z = 54;
		A = 136.911563;
		IC = 0;
	}
	else if (isotope == "Xe138")
	{
		Z = 54;
		A = 137.913990;
		IC = 0;
	}
	else if (isotope == "Xe139")
	{
		Z = 54;
		A = 138.918787;
		IC = 0;
	}
	else if (isotope == "Xe140")
	{
		Z = 54;
		A = 139.921640;
		IC = 0;
	}
	else if (isotope == "Xe141")
	{
		Z = 54;
		A = 140.92665;
		IC = 0;
	}
	else if (isotope == "Xe142")
	{
		Z = 54;
		A = 141.92970;
		IC = 0;
	}
	else if (isotope == "Xe143")
	{
		Z = 54;
		A = 142.93489;
		IC = 0;
	}
	else if (isotope == "Xe144")
	{
		Z = 54;
		A = 143.93823;
		IC = 0;
	}
	else if (isotope == "Xe145")
	{
		Z = 54;
		A = 144.94367;
		IC = 0;
	}
	else if (isotope == "Xe146")
	{
		Z = 54;
		A = 145.94730;
		IC = 0;
	}
	else if (isotope == "Xe147")
	{
		Z = 54;
		A = 146.95301;
		IC = 0;
	}
	else if (isotope == "Cs112")
	{
		Z = 55;
		A = 111.95033;
		IC = 0;
	}
	else if (isotope == "Cs113")
	{
		Z = 55;
		A = 112.94454;
		IC = 0;
	}
	else if (isotope == "Cs114")
	{
		Z = 55;
		A = 113.94142;
		IC = 0;
	}
	else if (isotope == "Cs115")
	{
		Z = 55;
		A = 114.93594;
		IC = 0;
	}
	else if (isotope == "Cs116")
	{
		Z = 55;
		A = 115.93291;
		IC = 0;
	}
	else if (isotope == "Cs117")
	{
		Z = 55;
		A = 116.928640;
		IC = 0;
	}
	else if (isotope == "Cs118")
	{
		Z = 55;
		A = 117.926555;
		IC = 0;
	}
	else if (isotope == "Cs119")
	{
		Z = 55;
		A = 118.922371;
		IC = 0;
	}
	else if (isotope == "Cs120")
	{
		Z = 55;
		A = 119.920678;
		IC = 0;
	}
	else if (isotope == "Cs121")
	{
		Z = 55;
		A = 120.917184;
		IC = 0;
	}
	else if (isotope == "Cs122")
	{
		Z = 55;
		A = 121.916122;
		IC = 0;
	}
	else if (isotope == "Cs123")
	{
		Z = 55;
		A = 122.912990;
		IC = 0;
	}
	else if (isotope == "Cs124")
	{
		Z = 55;
		A = 123.912246;
		IC = 0;
	}
	else if (isotope == "Cs125")
	{
		Z = 55;
		A = 124.909725;
		IC = 0;
	}
	else if (isotope == "Cs126")
	{
		Z = 55;
		A = 125.909448;
		IC = 0;
	}
	else if (isotope == "Cs127")
	{
		Z = 55;
		A = 126.907418;
		IC = 0;
	}
	else if (isotope == "Cs128")
	{
		Z = 55;
		A = 127.907748;
		IC = 0;
	}
	else if (isotope == "Cs129")
	{
		Z = 55;
		A = 128.906063;
		IC = 0;
	}
	else if (isotope == "Cs130")
	{
		Z = 55;
		A = 129.906706;
		IC = 0;
	}
	else if (isotope == "Cs131")
	{
		Z = 55;
		A = 130.905460;
		IC = 0;
	}
	else if (isotope == "Cs132")
	{
		Z = 55;
		A = 131.906430;
		IC = 0;
	}
	else if (isotope == "Cs")
	{
		Z = 55;
		A = 132.90545;
		IC = 1.0;
	}
	else if (isotope == "Cs133")
	{
		Z = 55;
		A = 132.905447;
		IC = 1;
	}
	else if (isotope == "Cs134")
	{
		Z = 55;
		A = 133.906713;
		IC = 0;
	}
	else if (isotope == "Cs135")
	{
		Z = 55;
		A = 134.905972;
		IC = 0;
	}
	else if (isotope == "Cs136")
	{
		Z = 55;
		A = 135.907306;
		IC = 0;
	}
	else if (isotope == "Cs137")
	{
		Z = 55;
		A = 136.907084;
		IC = 0;
	}
	else if (isotope == "Cs138")
	{
		Z = 55;
		A = 137.911011;
		IC = 0;
	}
	else if (isotope == "Cs139")
	{
		Z = 55;
		A = 138.913358;
		IC = 0;
	}
	else if (isotope == "Cs140")
	{
		Z = 55;
		A = 139.917277;
		IC = 0;
	}
	else if (isotope == "Cs141")
	{
		Z = 55;
		A = 140.920044;
		IC = 0;
	}
	else if (isotope == "Cs142")
	{
		Z = 55;
		A = 141.924292;
		IC = 0;
	}
	else if (isotope == "Cs143")
	{
		Z = 55;
		A = 142.927330;
		IC = 0;
	}
	else if (isotope == "Cs144")
	{
		Z = 55;
		A = 143.932030;
		IC = 0;
	}
	else if (isotope == "Cs145")
	{
		Z = 55;
		A = 144.935390;
		IC = 0;
	}
	else if (isotope == "Cs146")
	{
		Z = 55;
		A = 145.940160;
		IC = 0;
	}
	else if (isotope == "Cs147")
	{
		Z = 55;
		A = 146.94386;
		IC = 0;
	}
	else if (isotope == "Cs148")
	{
		Z = 55;
		A = 147.94890;
		IC = 0;
	}
	else if (isotope == "Cs149")
	{
		Z = 55;
		A = 148.95272;
		IC = 0;
	}
	else if (isotope == "Cs150")
	{
		Z = 55;
		A = 149.95797;
		IC = 0;
	}
	else if (isotope == "Cs151")
	{
		Z = 55;
		A = 150.96200;
		IC = 0;
	}
	else if (isotope == "Ba114")
	{
		Z = 56;
		A = 113.95094;
		IC = 0;
	}
	else if (isotope == "Ba115")
	{
		Z = 56;
		A = 114.94771;
		IC = 0;
	}
	else if (isotope == "Ba116")
	{
		Z = 56;
		A = 115.94168;
		IC = 0;
	}
	else if (isotope == "Ba117")
	{
		Z = 56;
		A = 116.93886;
		IC = 0;
	}
	else if (isotope == "Ba118")
	{
		Z = 56;
		A = 117.93344;
		IC = 0;
	}
	else if (isotope == "Ba119")
	{
		Z = 56;
		A = 118.93105;
		IC = 0;
	}
	else if (isotope == "Ba120")
	{
		Z = 56;
		A = 119.92605;
		IC = 0;
	}
	else if (isotope == "Ba121")
	{
		Z = 56;
		A = 120.92449;
		IC = 0;
	}
	else if (isotope == "Ba122")
	{
		Z = 56;
		A = 121.92026;
		IC = 0;
	}
	else if (isotope == "Ba123")
	{
		Z = 56;
		A = 122.91885;
		IC = 0;
	}
	else if (isotope == "Ba124")
	{
		Z = 56;
		A = 123.915088;
		IC = 0;
	}
	else if (isotope == "Ba125")
	{
		Z = 56;
		A = 124.91462;
		IC = 0;
	}
	else if (isotope == "Ba126")
	{
		Z = 56;
		A = 125.911244;
		IC = 0;
	}
	else if (isotope == "Ba127")
	{
		Z = 56;
		A = 126.91112;
		IC = 0;
	}
	else if (isotope == "Ba128")
	{
		Z = 56;
		A = 127.908309;
		IC = 0;
	}
	else if (isotope == "Ba129")
	{
		Z = 56;
		A = 128.908674;
		IC = 0;
	}
	else if (isotope == "Ba")
	{
		Z = 56;
		A = 137.327;
		IC = 1.0;
	}
	else if (isotope == "Ba130")
	{
		Z = 56;
		A = 129.906310;
		IC = 0.00106;
	}
	else if (isotope == "Ba131")
	{
		Z = 56;
		A = 130.906931;
		IC = 0;
	}
	else if (isotope == "Ba132")
	{
		Z = 56;
		A = 131.905056;
		IC = 0.00101;
	}
	else if (isotope == "Ba133")
	{
		Z = 56;
		A = 132.906002;
		IC = 0;
	}
	else if (isotope == "Ba134")
	{
		Z = 56;
		A = 133.904503;
		IC = 0.02417;
	}
	else if (isotope == "Ba135")
	{
		Z = 56;
		A = 134.905683;
		IC = 0.06592;
	}
	else if (isotope == "Ba136")
	{
		Z = 56;
		A = 135.904570;
		IC = 0.07854;
	}
	else if (isotope == "Ba137")
	{
		Z = 56;
		A = 136.905821;
		IC = 0.11232;
	}
	else if (isotope == "Ba138")
	{
		Z = 56;
		A = 137.905241;
		IC = 0.71698;
	}
	else if (isotope == "Ba139")
	{
		Z = 56;
		A = 138.908835;
		IC = 0;
	}
	else if (isotope == "Ba140")
	{
		Z = 56;
		A = 139.910599;
		IC = 0;
	}
	else if (isotope == "Ba141")
	{
		Z = 56;
		A = 140.914406;
		IC = 0;
	}
	else if (isotope == "Ba142")
	{
		Z = 56;
		A = 141.916448;
		IC = 0;
	}
	else if (isotope == "Ba143")
	{
		Z = 56;
		A = 142.920617;
		IC = 0;
	}
	else if (isotope == "Ba144")
	{
		Z = 56;
		A = 143.922940;
		IC = 0;
	}
	else if (isotope == "Ba145")
	{
		Z = 56;
		A = 144.926920;
		IC = 0;
	}
	else if (isotope == "Ba146")
	{
		Z = 56;
		A = 145.930110;
		IC = 0;
	}
	else if (isotope == "Ba147")
	{
		Z = 56;
		A = 146.93399;
		IC = 0;
	}
	else if (isotope == "Ba148")
	{
		Z = 56;
		A = 147.93768;
		IC = 0;
	}
	else if (isotope == "Ba149")
	{
		Z = 56;
		A = 148.94246;
		IC = 0;
	}
	else if (isotope == "Ba150")
	{
		Z = 56;
		A = 149.94562;
		IC = 0;
	}
	else if (isotope == "Ba151")
	{
		Z = 56;
		A = 150.95070;
		IC = 0;
	}
	else if (isotope == "Ba152")
	{
		Z = 56;
		A = 151.95416;
		IC = 0;
	}
	else if (isotope == "Ba153")
	{
		Z = 56;
		A = 152.95961;
		IC = 0;
	}
	else if (isotope == "La117")
	{
		Z = 57;
		A = 116.95001;
		IC = 0;
	}
	else if (isotope == "La118")
	{
		Z = 57;
		A = 117.94657;
		IC = 0;
	}
	else if (isotope == "La119")
	{
		Z = 57;
		A = 118.94099;
		IC = 0;
	}
	else if (isotope == "La120")
	{
		Z = 57;
		A = 119.93807;
		IC = 0;
	}
	else if (isotope == "La121")
	{
		Z = 57;
		A = 120.93301;
		IC = 0;
	}
	else if (isotope == "La122")
	{
		Z = 57;
		A = 121.93071;
		IC = 0;
	}
	else if (isotope == "La123")
	{
		Z = 57;
		A = 122.92624;
		IC = 0;
	}
	else if (isotope == "La124")
	{
		Z = 57;
		A = 123.92453;
		IC = 0;
	}
	else if (isotope == "La125")
	{
		Z = 57;
		A = 124.92067;
		IC = 0;
	}
	else if (isotope == "La126")
	{
		Z = 57;
		A = 125.91937;
		IC = 0;
	}
	else if (isotope == "La127")
	{
		Z = 57;
		A = 126.91616;
		IC = 0;
	}
	else if (isotope == "La128")
	{
		Z = 57;
		A = 127.91545;
		IC = 0;
	}
	else if (isotope == "La129")
	{
		Z = 57;
		A = 128.912670;
		IC = 0;
	}
	else if (isotope == "La130")
	{
		Z = 57;
		A = 129.91232;
		IC = 0;
	}
	else if (isotope == "La131")
	{
		Z = 57;
		A = 130.91011;
		IC = 0;
	}
	else if (isotope == "La132")
	{
		Z = 57;
		A = 131.910110;
		IC = 0;
	}
	else if (isotope == "La133")
	{
		Z = 57;
		A = 132.90840;
		IC = 0;
	}
	else if (isotope == "La134")
	{
		Z = 57;
		A = 133.908490;
		IC = 0;
	}
	else if (isotope == "La135")
	{
		Z = 57;
		A = 134.906971;
		IC = 0;
	}
	else if (isotope == "La136")
	{
		Z = 57;
		A = 135.907650;
		IC = 0;
	}
	else if (isotope == "La137")
	{
		Z = 57;
		A = 136.906470;
		IC = 0;
	}
	else if (isotope == "La")
	{
		Z = 57;
		A = 138.9055;
		IC = 1.0;
	}
	else if (isotope == "La138")
	{
		Z = 57;
		A = 137.907107;
		IC = 0.0009;
	}
	else if (isotope == "La139")
	{
		Z = 57;
		A = 138.906348;
		IC = 0.9991;
	}
	else if (isotope == "La140")
	{
		Z = 57;
		A = 139.909473;
		IC = 0;
	}
	else if (isotope == "La141")
	{
		Z = 57;
		A = 140.910957;
		IC = 0;
	}
	else if (isotope == "La142")
	{
		Z = 57;
		A = 141.914074;
		IC = 0;
	}
	else if (isotope == "La143")
	{
		Z = 57;
		A = 142.916059;
		IC = 0;
	}
	else if (isotope == "La144")
	{
		Z = 57;
		A = 143.919590;
		IC = 0;
	}
	else if (isotope == "La145")
	{
		Z = 57;
		A = 144.921640;
		IC = 0;
	}
	else if (isotope == "La146")
	{
		Z = 57;
		A = 145.925700;
		IC = 0;
	}
	else if (isotope == "La147")
	{
		Z = 57;
		A = 146.927820;
		IC = 0;
	}
	else if (isotope == "La148")
	{
		Z = 57;
		A = 147.93219;
		IC = 0;
	}
	else if (isotope == "La149")
	{
		Z = 57;
		A = 148.93437;
		IC = 0;
	}
	else if (isotope == "La150")
	{
		Z = 57;
		A = 149.93857;
		IC = 0;
	}
	else if (isotope == "La151")
	{
		Z = 57;
		A = 150.94156;
		IC = 0;
	}
	else if (isotope == "La152")
	{
		Z = 57;
		A = 151.94611;
		IC = 0;
	}
	else if (isotope == "La153")
	{
		Z = 57;
		A = 152.94945;
		IC = 0;
	}
	else if (isotope == "La154")
	{
		Z = 57;
		A = 153.95440;
		IC = 0;
	}
	else if (isotope == "La155")
	{
		Z = 57;
		A = 154.95813;
		IC = 0;
	}
	else if (isotope == "Ce119")
	{
		Z = 58;
		A = 118.95276;
		IC = 0;
	}
	else if (isotope == "Ce120")
	{
		Z = 58;
		A = 119.94664;
		IC = 0;
	}
	else if (isotope == "Ce121")
	{
		Z = 58;
		A = 120.94367;
		IC = 0;
	}
	else if (isotope == "Ce122")
	{
		Z = 58;
		A = 121.93801;
		IC = 0;
	}
	else if (isotope == "Ce123")
	{
		Z = 58;
		A = 122.93551;
		IC = 0;
	}
	else if (isotope == "Ce124")
	{
		Z = 58;
		A = 123.93052;
		IC = 0;
	}
	else if (isotope == "Ce125")
	{
		Z = 58;
		A = 124.92854;
		IC = 0;
	}
	else if (isotope == "Ce126")
	{
		Z = 58;
		A = 125.92410;
		IC = 0;
	}
	else if (isotope == "Ce127")
	{
		Z = 58;
		A = 126.92275;
		IC = 0;
	}
	else if (isotope == "Ce128")
	{
		Z = 58;
		A = 127.91887;
		IC = 0;
	}
	else if (isotope == "Ce129")
	{
		Z = 58;
		A = 128.91809;
		IC = 0;
	}
	else if (isotope == "Ce130")
	{
		Z = 58;
		A = 129.91469;
		IC = 0;
	}
	else if (isotope == "Ce131")
	{
		Z = 58;
		A = 130.91442;
		IC = 0;
	}
	else if (isotope == "Ce132")
	{
		Z = 58;
		A = 131.91149;
		IC = 0;
	}
	else if (isotope == "Ce133")
	{
		Z = 58;
		A = 132.91155;
		IC = 0;
	}
	else if (isotope == "Ce134")
	{
		Z = 58;
		A = 133.90903;
		IC = 0;
	}
	else if (isotope == "Ce135")
	{
		Z = 58;
		A = 134.909146;
		IC = 0;
	}
	else if (isotope == "Ce")
	{
		Z = 58;
		A = 140.116;
		IC = 1.0;
	}
	else if (isotope == "Ce136")
	{
		Z = 58;
		A = 135.907140;
		IC = 0.00185;
	}
	else if (isotope == "Ce137")
	{
		Z = 58;
		A = 136.907780;
		IC = 0;
	}
	else if (isotope == "Ce138")
	{
		Z = 58;
		A = 137.905986;
		IC = 0.00251;
	}
	else if (isotope == "Ce139")
	{
		Z = 58;
		A = 138.906647;
		IC = 0;
	}
	else if (isotope == "Ce140")
	{
		Z = 58;
		A = 139.905434;
		IC = 0.8845;
	}
	else if (isotope == "Ce141")
	{
		Z = 58;
		A = 140.908271;
		IC = 0;
	}
	else if (isotope == "Ce142")
	{
		Z = 58;
		A = 141.909240;
		IC = 0.11114;
	}
	else if (isotope == "Ce143")
	{
		Z = 58;
		A = 142.912381;
		IC = 0;
	}
	else if (isotope == "Ce144")
	{
		Z = 58;
		A = 143.913643;
		IC = 0;
	}
	else if (isotope == "Ce145")
	{
		Z = 58;
		A = 144.917230;
		IC = 0;
	}
	else if (isotope == "Ce146")
	{
		Z = 58;
		A = 145.918690;
		IC = 0;
	}
	else if (isotope == "Ce147")
	{
		Z = 58;
		A = 146.922510;
		IC = 0;
	}
	else if (isotope == "Ce148")
	{
		Z = 58;
		A = 147.92439;
		IC = 0;
	}
	else if (isotope == "Ce149")
	{
		Z = 58;
		A = 148.928290;
		IC = 0;
	}
	else if (isotope == "Ce150")
	{
		Z = 58;
		A = 149.93023;
		IC = 0;
	}
	else if (isotope == "Ce151")
	{
		Z = 58;
		A = 150.93404;
		IC = 0;
	}
	else if (isotope == "Ce152")
	{
		Z = 58;
		A = 151.93638;
		IC = 0;
	}
	else if (isotope == "Ce153")
	{
		Z = 58;
		A = 152.94058;
		IC = 0;
	}
	else if (isotope == "Ce154")
	{
		Z = 58;
		A = 153.94332;
		IC = 0;
	}
	else if (isotope == "Ce155")
	{
		Z = 58;
		A = 154.94804;
		IC = 0;
	}
	else if (isotope == "Ce156")
	{
		Z = 58;
		A = 155.95126;
		IC = 0;
	}
	else if (isotope == "Ce157")
	{
		Z = 58;
		A = 156.95634;
		IC = 0;
	}
	else if (isotope == "Pr121")
	{
		Z = 59;
		A = 120.95536;
		IC = 0;
	}
	else if (isotope == "Pr122")
	{
		Z = 59;
		A = 121.95165;
		IC = 0;
	}
	else if (isotope == "Pr123")
	{
		Z = 59;
		A = 122.94596;
		IC = 0;
	}
	else if (isotope == "Pr124")
	{
		Z = 59;
		A = 123.94296;
		IC = 0;
	}
	else if (isotope == "Pr125")
	{
		Z = 59;
		A = 124.93783;
		IC = 0;
	}
	else if (isotope == "Pr126")
	{
		Z = 59;
		A = 125.93531;
		IC = 0;
	}
	else if (isotope == "Pr127")
	{
		Z = 59;
		A = 126.93083;
		IC = 0;
	}
	else if (isotope == "Pr128")
	{
		Z = 59;
		A = 127.92880;
		IC = 0;
	}
	else if (isotope == "Pr129")
	{
		Z = 59;
		A = 128.92486;
		IC = 0;
	}
	else if (isotope == "Pr130")
	{
		Z = 59;
		A = 129.92338;
		IC = 0;
	}
	else if (isotope == "Pr131")
	{
		Z = 59;
		A = 130.92006;
		IC = 0;
	}
	else if (isotope == "Pr132")
	{
		Z = 59;
		A = 131.91912;
		IC = 0;
	}
	else if (isotope == "Pr133")
	{
		Z = 59;
		A = 132.91620;
		IC = 0;
	}
	else if (isotope == "Pr134")
	{
		Z = 59;
		A = 133.91567;
		IC = 0;
	}
	else if (isotope == "Pr135")
	{
		Z = 59;
		A = 134.91314;
		IC = 0;
	}
	else if (isotope == "Pr136")
	{
		Z = 59;
		A = 135.912650;
		IC = 0;
	}
	else if (isotope == "Pr137")
	{
		Z = 59;
		A = 136.910680;
		IC = 0;
	}
	else if (isotope == "Pr138")
	{
		Z = 59;
		A = 137.910749;
		IC = 0;
	}
	else if (isotope == "Pr139")
	{
		Z = 59;
		A = 138.908932;
		IC = 0;
	}
	else if (isotope == "Pr140")
	{
		Z = 59;
		A = 139.909071;
		IC = 0;
	}
	else if (isotope == "Pr")
	{
		Z = 59;
		A = 140.90765;
		IC = 1.0;
	}
	else if (isotope == "Pr141")
	{
		Z = 59;
		A = 140.907648;
		IC = 1;
	}
	else if (isotope == "Pr142")
	{
		Z = 59;
		A = 141.910040;
		IC = 0;
	}
	else if (isotope == "Pr143")
	{
		Z = 59;
		A = 142.910812;
		IC = 0;
	}
	else if (isotope == "Pr144")
	{
		Z = 59;
		A = 143.913301;
		IC = 0;
	}
	else if (isotope == "Pr145")
	{
		Z = 59;
		A = 144.914507;
		IC = 0;
	}
	else if (isotope == "Pr146")
	{
		Z = 59;
		A = 145.917590;
		IC = 0;
	}
	else if (isotope == "Pr147")
	{
		Z = 59;
		A = 146.918980;
		IC = 0;
	}
	else if (isotope == "Pr148")
	{
		Z = 59;
		A = 147.92218;
		IC = 0;
	}
	else if (isotope == "Pr149")
	{
		Z = 59;
		A = 148.923791;
		IC = 0;
	}
	else if (isotope == "Pr150")
	{
		Z = 59;
		A = 149.927000;
		IC = 0;
	}
	else if (isotope == "Pr151")
	{
		Z = 59;
		A = 150.928230;
		IC = 0;
	}
	else if (isotope == "Pr152")
	{
		Z = 59;
		A = 151.93160;
		IC = 0;
	}
	else if (isotope == "Pr153")
	{
		Z = 59;
		A = 152.93365;
		IC = 0;
	}
	else if (isotope == "Pr154")
	{
		Z = 59;
		A = 153.93739;
		IC = 0;
	}
	else if (isotope == "Pr155")
	{
		Z = 59;
		A = 154.93999;
		IC = 0;
	}
	else if (isotope == "Pr156")
	{
		Z = 59;
		A = 155.94412;
		IC = 0;
	}
	else if (isotope == "Pr157")
	{
		Z = 59;
		A = 156.94717;
		IC = 0;
	}
	else if (isotope == "Pr158")
	{
		Z = 59;
		A = 157.95178;
		IC = 0;
	}
	else if (isotope == "Pr159")
	{
		Z = 59;
		A = 158.95523;
		IC = 0;
	}
	else if (isotope == "Nd126")
	{
		Z = 60;
		A = 125.94307;
		IC = 0;
	}
	else if (isotope == "Nd127")
	{
		Z = 60;
		A = 126.94050;
		IC = 0;
	}
	else if (isotope == "Nd128")
	{
		Z = 60;
		A = 127.93539;
		IC = 0;
	}
	else if (isotope == "Nd129")
	{
		Z = 60;
		A = 128.93325;
		IC = 0;
	}
	else if (isotope == "Nd130")
	{
		Z = 60;
		A = 129.92878;
		IC = 0;
	}
	else if (isotope == "Nd131")
	{
		Z = 60;
		A = 130.92710;
		IC = 0;
	}
	else if (isotope == "Nd132")
	{
		Z = 60;
		A = 131.92312;
		IC = 0;
	}
	else if (isotope == "Nd133")
	{
		Z = 60;
		A = 132.92221;
		IC = 0;
	}
	else if (isotope == "Nd134")
	{
		Z = 60;
		A = 133.91865;
		IC = 0;
	}
	else if (isotope == "Nd135")
	{
		Z = 60;
		A = 134.91824;
		IC = 0;
	}
	else if (isotope == "Nd136")
	{
		Z = 60;
		A = 135.915020;
		IC = 0;
	}
	else if (isotope == "Nd137")
	{
		Z = 60;
		A = 136.914640;
		IC = 0;
	}
	else if (isotope == "Nd138")
	{
		Z = 60;
		A = 137.91193;
		IC = 0;
	}
	else if (isotope == "Nd139")
	{
		Z = 60;
		A = 138.911920;
		IC = 0;
	}
	else if (isotope == "Nd140")
	{
		Z = 60;
		A = 139.909310;
		IC = 0;
	}
	else if (isotope == "Nd141")
	{
		Z = 60;
		A = 140.909605;
		IC = 0;
	}
	else if (isotope == "Nd")
	{
		Z = 60;
		A = 144.24;
		IC = 1.0;
	}
	else if (isotope == "Nd142")
	{
		Z = 60;
		A = 141.907719;
		IC = 0.272;
	}
	else if (isotope == "Nd143")
	{
		Z = 60;
		A = 142.909810;
		IC = 0.122;
	}
	else if (isotope == "Nd144")
	{
		Z = 60;
		A = 143.910083;
		IC = 0.238;
	}
	else if (isotope == "Nd145")
	{
		Z = 60;
		A = 144.912569;
		IC = 0.083;
	}
	else if (isotope == "Nd146")
	{
		Z = 60;
		A = 145.913112;
		IC = 0.172;
	}
	else if (isotope == "Nd147")
	{
		Z = 60;
		A = 146.916096;
		IC = 0;
	}
	else if (isotope == "Nd148")
	{
		Z = 60;
		A = 147.916889;
		IC = 0.057;
	}
	else if (isotope == "Nd149")
	{
		Z = 60;
		A = 148.920144;
		IC = 0;
	}
	else if (isotope == "Nd150")
	{
		Z = 60;
		A = 149.920887;
		IC = 0.056;
	}
	else if (isotope == "Nd151")
	{
		Z = 60;
		A = 150.923825;
		IC = 0;
	}
	else if (isotope == "Nd152")
	{
		Z = 60;
		A = 151.924680;
		IC = 0;
	}
	else if (isotope == "Nd153")
	{
		Z = 60;
		A = 152.927695;
		IC = 0;
	}
	else if (isotope == "Nd154")
	{
		Z = 60;
		A = 153.92948;
		IC = 0;
	}
	else if (isotope == "Nd155")
	{
		Z = 60;
		A = 154.93263;
		IC = 0;
	}
	else if (isotope == "Nd156")
	{
		Z = 60;
		A = 155.93520;
		IC = 0;
	}
	else if (isotope == "Nd157")
	{
		Z = 60;
		A = 156.93927;
		IC = 0;
	}
	else if (isotope == "Nd158")
	{
		Z = 60;
		A = 157.94187;
		IC = 0;
	}
	else if (isotope == "Nd159")
	{
		Z = 60;
		A = 158.94639;
		IC = 0;
	}
	else if (isotope == "Nd160")
	{
		Z = 60;
		A = 159.94939;
		IC = 0;
	}
	else if (isotope == "Nd161")
	{
		Z = 60;
		A = 160.95433;
		IC = 0;
	}
	else if (isotope == "Pm128")
	{
		Z = 61;
		A = 127.94826;
		IC = 0;
	}
	else if (isotope == "Pm129")
	{
		Z = 61;
		A = 128.94316;
		IC = 0;
	}
	else if (isotope == "Pm130")
	{
		Z = 61;
		A = 129.94045;
		IC = 0;
	}
	else if (isotope == "Pm131")
	{
		Z = 61;
		A = 130.93580;
		IC = 0;
	}
	else if (isotope == "Pm132")
	{
		Z = 61;
		A = 131.93375;
		IC = 0;
	}
	else if (isotope == "Pm133")
	{
		Z = 61;
		A = 132.92972;
		IC = 0;
	}
	else if (isotope == "Pm134")
	{
		Z = 61;
		A = 133.92849;
		IC = 0;
	}
	else if (isotope == "Pm135")
	{
		Z = 61;
		A = 134.92462;
		IC = 0;
	}
	else if (isotope == "Pm136")
	{
		Z = 61;
		A = 135.92345;
		IC = 0;
	}
	else if (isotope == "Pm137")
	{
		Z = 61;
		A = 136.92071;
		IC = 0;
	}
	else if (isotope == "Pm138")
	{
		Z = 61;
		A = 137.91945;
		IC = 0;
	}
	else if (isotope == "Pm139")
	{
		Z = 61;
		A = 138.916760;
		IC = 0;
	}
	else if (isotope == "Pm140")
	{
		Z = 61;
		A = 139.915800;
		IC = 0;
	}
	else if (isotope == "Pm141")
	{
		Z = 61;
		A = 140.913607;
		IC = 0;
	}
	else if (isotope == "Pm142")
	{
		Z = 61;
		A = 141.912950;
		IC = 0;
	}
	else if (isotope == "Pm143")
	{
		Z = 61;
		A = 142.910928;
		IC = 0;
	}
	else if (isotope == "Pm144")
	{
		Z = 61;
		A = 143.912586;
		IC = 0;
	}
	else if (isotope == "Pm145")
	{
		Z = 61;
		A = 144.912744;
		IC = 0;
	}
	else if (isotope == "Pm146")
	{
		Z = 61;
		A = 145.914692;
		IC = 0;
	}
	else if (isotope == "Pm147")
	{
		Z = 61;
		A = 146.915134;
		IC = 0;
	}
	else if (isotope == "Pm148")
	{
		Z = 61;
		A = 147.917468;
		IC = 0;
	}
	else if (isotope == "Pm149")
	{
		Z = 61;
		A = 148.918329;
		IC = 0;
	}
	else if (isotope == "Pm150")
	{
		Z = 61;
		A = 149.920979;
		IC = 0;
	}
	else if (isotope == "Pm151")
	{
		Z = 61;
		A = 150.921203;
		IC = 0;
	}
	else if (isotope == "Pm152")
	{
		Z = 61;
		A = 151.923490;
		IC = 0;
	}
	else if (isotope == "Pm153")
	{
		Z = 61;
		A = 152.924113;
		IC = 0;
	}
	else if (isotope == "Pm154")
	{
		Z = 61;
		A = 153.926550;
		IC = 0;
	}
	else if (isotope == "Pm155")
	{
		Z = 61;
		A = 154.928100;
		IC = 0;
	}
	else if (isotope == "Pm156")
	{
		Z = 61;
		A = 155.931060;
		IC = 0;
	}
	else if (isotope == "Pm157")
	{
		Z = 61;
		A = 156.93320;
		IC = 0;
	}
	else if (isotope == "Pm158")
	{
		Z = 61;
		A = 157.93669;
		IC = 0;
	}
	else if (isotope == "Pm159")
	{
		Z = 61;
		A = 158.93913;
		IC = 0;
	}
	else if (isotope == "Pm160")
	{
		Z = 61;
		A = 159.94299;
		IC = 0;
	}
	else if (isotope == "Pm161")
	{
		Z = 61;
		A = 160.94586;
		IC = 0;
	}
	else if (isotope == "Pm162")
	{
		Z = 61;
		A = 161.95029;
		IC = 0;
	}
	else if (isotope == "Pm163")
	{
		Z = 61;
		A = 162.95352;
		IC = 0;
	}
	else if (isotope == "Sm130")
	{
		Z = 62;
		A = 129.94863;
		IC = 0;
	}
	else if (isotope == "Sm131")
	{
		Z = 62;
		A = 130.94589;
		IC = 0;
	}
	else if (isotope == "Sm132")
	{
		Z = 62;
		A = 131.94082;
		IC = 0;
	}
	else if (isotope == "Sm133")
	{
		Z = 62;
		A = 132.93873;
		IC = 0;
	}
	else if (isotope == "Sm134")
	{
		Z = 62;
		A = 133.93402;
		IC = 0;
	}
	else if (isotope == "Sm135")
	{
		Z = 62;
		A = 134.93235;
		IC = 0;
	}
	else if (isotope == "Sm136")
	{
		Z = 62;
		A = 135.92830;
		IC = 0;
	}
	else if (isotope == "Sm137")
	{
		Z = 62;
		A = 136.92705;
		IC = 0;
	}
	else if (isotope == "Sm138")
	{
		Z = 62;
		A = 137.92354;
		IC = 0;
	}
	else if (isotope == "Sm139")
	{
		Z = 62;
		A = 138.922302;
		IC = 0;
	}
	else if (isotope == "Sm140")
	{
		Z = 62;
		A = 139.918991;
		IC = 0;
	}
	else if (isotope == "Sm141")
	{
		Z = 62;
		A = 140.918469;
		IC = 0;
	}
	else if (isotope == "Sm142")
	{
		Z = 62;
		A = 141.915193;
		IC = 0;
	}
	else if (isotope == "Sm143")
	{
		Z = 62;
		A = 142.914624;
		IC = 0;
	}
	else if (isotope == "Sm")
	{
		Z = 62;
		A = 150.36;
		IC = 1.0;
	}
	else if (isotope == "Sm144")
	{
		Z = 62;
		A = 143.911995;
		IC = 0.0307;
	}
	else if (isotope == "Sm145")
	{
		Z = 62;
		A = 144.913406;
		IC = 0;
	}
	else if (isotope == "Sm146")
	{
		Z = 62;
		A = 145.913037;
		IC = 0;
	}
	else if (isotope == "Sm147")
	{
		Z = 62;
		A = 146.914893;
		IC = 0.1499;
	}
	else if (isotope == "Sm148")
	{
		Z = 62;
		A = 147.914818;
		IC = 0.1124;
	}
	else if (isotope == "Sm149")
	{
		Z = 62;
		A = 148.917180;
		IC = 0.1382;
	}
	else if (isotope == "Sm150")
	{
		Z = 62;
		A = 149.917271;
		IC = 0.0738;
	}
	else if (isotope == "Sm151")
	{
		Z = 62;
		A = 150.919928;
		IC = 0;
	}
	else if (isotope == "Sm152")
	{
		Z = 62;
		A = 151.919728;
		IC = 0.2675;
	}
	else if (isotope == "Sm153")
	{
		Z = 62;
		A = 152.922094;
		IC = 0;
	}
	else if (isotope == "Sm154")
	{
		Z = 62;
		A = 153.922205;
		IC = 0.2275;
	}
	else if (isotope == "Sm155")
	{
		Z = 62;
		A = 154.924636;
		IC = 0;
	}
	else if (isotope == "Sm156")
	{
		Z = 62;
		A = 155.925526;
		IC = 0;
	}
	else if (isotope == "Sm157")
	{
		Z = 62;
		A = 156.928350;
		IC = 0;
	}
	else if (isotope == "Sm158")
	{
		Z = 62;
		A = 157.929990;
		IC = 0;
	}
	else if (isotope == "Sm159")
	{
		Z = 62;
		A = 158.93320;
		IC = 0;
	}
	else if (isotope == "Sm160")
	{
		Z = 62;
		A = 159.93514;
		IC = 0;
	}
	else if (isotope == "Sm161")
	{
		Z = 62;
		A = 160.93883;
		IC = 0;
	}
	else if (isotope == "Sm162")
	{
		Z = 62;
		A = 161.94122;
		IC = 0;
	}
	else if (isotope == "Sm163")
	{
		Z = 62;
		A = 162.94536;
		IC = 0;
	}
	else if (isotope == "Sm164")
	{
		Z = 62;
		A = 163.94828;
		IC = 0;
	}
	else if (isotope == "Sm165")
	{
		Z = 62;
		A = 164.95298;
		IC = 0;
	}
	else if (isotope == "Eu132")
	{
		Z = 63;
		A = 131.95416;
		IC = 0;
	}
	else if (isotope == "Eu133")
	{
		Z = 63;
		A = 132.94890;
		IC = 0;
	}
	else if (isotope == "Eu134")
	{
		Z = 63;
		A = 133.94632;
		IC = 0;
	}
	else if (isotope == "Eu135")
	{
		Z = 63;
		A = 134.94172;
		IC = 0;
	}
	else if (isotope == "Eu136")
	{
		Z = 63;
		A = 135.93950;
		IC = 0;
	}
	else if (isotope == "Eu137")
	{
		Z = 63;
		A = 136.93521;
		IC = 0;
	}
	else if (isotope == "Eu138")
	{
		Z = 63;
		A = 137.93345;
		IC = 0;
	}
	else if (isotope == "Eu139")
	{
		Z = 63;
		A = 138.92984;
		IC = 0;
	}
	else if (isotope == "Eu140")
	{
		Z = 63;
		A = 139.928080;
		IC = 0;
	}
	else if (isotope == "Eu141")
	{
		Z = 63;
		A = 140.924890;
		IC = 0;
	}
	else if (isotope == "Eu142")
	{
		Z = 63;
		A = 141.923400;
		IC = 0;
	}
	else if (isotope == "Eu143")
	{
		Z = 63;
		A = 142.920287;
		IC = 0;
	}
	else if (isotope == "Eu144")
	{
		Z = 63;
		A = 143.918774;
		IC = 0;
	}
	else if (isotope == "Eu145")
	{
		Z = 63;
		A = 144.916261;
		IC = 0;
	}
	else if (isotope == "Eu146")
	{
		Z = 63;
		A = 145.917200;
		IC = 0;
	}
	else if (isotope == "Eu147")
	{
		Z = 63;
		A = 146.916741;
		IC = 0;
	}
	else if (isotope == "Eu148")
	{
		Z = 63;
		A = 147.918154;
		IC = 0;
	}
	else if (isotope == "Eu149")
	{
		Z = 63;
		A = 148.917926;
		IC = 0;
	}
	else if (isotope == "Eu150")
	{
		Z = 63;
		A = 149.919698;
		IC = 0;
	}
	else if (isotope == "Eu")
	{
		Z = 63;
		A = 151.964;
		IC = 1.0;
	}
	else if (isotope == "Eu151")
	{
		Z = 63;
		A = 150.919846;
		IC = 0.4781;
	}
	else if (isotope == "Eu152")
	{
		Z = 63;
		A = 151.921740;
		IC = 0;
	}
	else if (isotope == "Eu153")
	{
		Z = 63;
		A = 152.921226;
		IC = 0.5219;
	}
	else if (isotope == "Eu154")
	{
		Z = 63;
		A = 153.922975;
		IC = 0;
	}
	else if (isotope == "Eu155")
	{
		Z = 63;
		A = 154.922889;
		IC = 0;
	}
	else if (isotope == "Eu156")
	{
		Z = 63;
		A = 155.924751;
		IC = 0;
	}
	else if (isotope == "Eu157")
	{
		Z = 63;
		A = 156.925419;
		IC = 0;
	}
	else if (isotope == "Eu158")
	{
		Z = 63;
		A = 157.927840;
		IC = 0;
	}
	else if (isotope == "Eu159")
	{
		Z = 63;
		A = 158.929084;
		IC = 0;
	}
	else if (isotope == "Eu160")
	{
		Z = 63;
		A = 159.93197;
		IC = 0;
	}
	else if (isotope == "Eu161")
	{
		Z = 63;
		A = 160.93368;
		IC = 0;
	}
	else if (isotope == "Eu162")
	{
		Z = 63;
		A = 161.93704;
		IC = 0;
	}
	else if (isotope == "Eu163")
	{
		Z = 63;
		A = 162.93921;
		IC = 0;
	}
	else if (isotope == "Eu164")
	{
		Z = 63;
		A = 163.94299;
		IC = 0;
	}
	else if (isotope == "Eu165")
	{
		Z = 63;
		A = 164.94572;
		IC = 0;
	}
	else if (isotope == "Eu166")
	{
		Z = 63;
		A = 165.94997;
		IC = 0;
	}
	else if (isotope == "Eu167")
	{
		Z = 63;
		A = 166.95305;
		IC = 0;
	}
	else if (isotope == "Gd136")
	{
		Z = 64;
		A = 135.94707;
		IC = 0;
	}
	else if (isotope == "Gd137")
	{
		Z = 64;
		A = 136.94465;
		IC = 0;
	}
	else if (isotope == "Gd138")
	{
		Z = 64;
		A = 137.93997;
		IC = 0;
	}
	else if (isotope == "Gd139")
	{
		Z = 64;
		A = 138.93808;
		IC = 0;
	}
	else if (isotope == "Gd140")
	{
		Z = 64;
		A = 139.93395;
		IC = 0;
	}
	else if (isotope == "Gd141")
	{
		Z = 64;
		A = 140.93221;
		IC = 0;
	}
	else if (isotope == "Gd142")
	{
		Z = 64;
		A = 141.92823;
		IC = 0;
	}
	else if (isotope == "Gd143")
	{
		Z = 64;
		A = 142.92674;
		IC = 0;
	}
	else if (isotope == "Gd144")
	{
		Z = 64;
		A = 143.92279;
		IC = 0;
	}
	else if (isotope == "Gd145")
	{
		Z = 64;
		A = 144.921690;
		IC = 0;
	}
	else if (isotope == "Gd146")
	{
		Z = 64;
		A = 145.918305;
		IC = 0;
	}
	else if (isotope == "Gd147")
	{
		Z = 64;
		A = 146.919089;
		IC = 0;
	}
	else if (isotope == "Gd148")
	{
		Z = 64;
		A = 147.918110;
		IC = 0;
	}
	else if (isotope == "Gd149")
	{
		Z = 64;
		A = 148.919336;
		IC = 0;
	}
	else if (isotope == "Gd150")
	{
		Z = 64;
		A = 149.918655;
		IC = 0;
	}
	else if (isotope == "Gd151")
	{
		Z = 64;
		A = 150.920344;
		IC = 0;
	}
	else if (isotope == "Gd")
	{
		Z = 64;
		A = 157.25;
		IC = 1.0;
	}
	else if (isotope == "Gd152")
	{
		Z = 64;
		A = 151.919788;
		IC = 0.002;
	}
	else if (isotope == "Gd153")
	{
		Z = 64;
		A = 152.921746;
		IC = 0;
	}
	else if (isotope == "Gd154")
	{
		Z = 64;
		A = 153.920862;
		IC = 0.0218;
	}
	else if (isotope == "Gd155")
	{
		Z = 64;
		A = 154.922619;
		IC = 0.148;
	}
	else if (isotope == "Gd156")
	{
		Z = 64;
		A = 155.922120;
		IC = 0.2047;
	}
	else if (isotope == "Gd157")
	{
		Z = 64;
		A = 156.923957;
		IC = 0.1565;
	}
	else if (isotope == "Gd158")
	{
		Z = 64;
		A = 157.924101;
		IC = 0.2484;
	}
	else if (isotope == "Gd159")
	{
		Z = 64;
		A = 158.926385;
		IC = 0;
	}
	else if (isotope == "Gd160")
	{
		Z = 64;
		A = 159.927051;
		IC = 0.2186;
	}
	else if (isotope == "Gd161")
	{
		Z = 64;
		A = 160.929666;
		IC = 0;
	}
	else if (isotope == "Gd162")
	{
		Z = 64;
		A = 161.930981;
		IC = 0;
	}
	else if (isotope == "Gd163")
	{
		Z = 64;
		A = 162.93399;
		IC = 0;
	}
	else if (isotope == "Gd164")
	{
		Z = 64;
		A = 163.93586;
		IC = 0;
	}
	else if (isotope == "Gd165")
	{
		Z = 64;
		A = 164.93938;
		IC = 0;
	}
	else if (isotope == "Gd166")
	{
		Z = 64;
		A = 165.94160;
		IC = 0;
	}
	else if (isotope == "Gd167")
	{
		Z = 64;
		A = 166.94557;
		IC = 0;
	}
	else if (isotope == "Gd168")
	{
		Z = 64;
		A = 167.94836;
		IC = 0;
	}
	else if (isotope == "Gd169")
	{
		Z = 64;
		A = 168.95287;
		IC = 0;
	}
	else if (isotope == "Tb138")
	{
		Z = 65;
		A = 137.95287;
		IC = 0;
	}
	else if (isotope == "Tb139")
	{
		Z = 65;
		A = 138.94803;
		IC = 0;
	}
	else if (isotope == "Tb140")
	{
		Z = 65;
		A = 139.94554;
		IC = 0;
	}
	else if (isotope == "Tb141")
	{
		Z = 65;
		A = 140.94116;
		IC = 0;
	}
	else if (isotope == "Tb142")
	{
		Z = 65;
		A = 141.93886;
		IC = 0;
	}
	else if (isotope == "Tb143")
	{
		Z = 65;
		A = 142.93475;
		IC = 0;
	}
	else if (isotope == "Tb144")
	{
		Z = 65;
		A = 143.93253;
		IC = 0;
	}
	else if (isotope == "Tb145")
	{
		Z = 65;
		A = 144.92888;
		IC = 0;
	}
	else if (isotope == "Tb146")
	{
		Z = 65;
		A = 145.927180;
		IC = 0;
	}
	else if (isotope == "Tb147")
	{
		Z = 65;
		A = 146.924037;
		IC = 0;
	}
	else if (isotope == "Tb148")
	{
		Z = 65;
		A = 147.924300;
		IC = 0;
	}
	else if (isotope == "Tb149")
	{
		Z = 65;
		A = 148.923242;
		IC = 0;
	}
	else if (isotope == "Tb150")
	{
		Z = 65;
		A = 149.923654;
		IC = 0;
	}
	else if (isotope == "Tb151")
	{
		Z = 65;
		A = 150.923098;
		IC = 0;
	}
	else if (isotope == "Tb152")
	{
		Z = 65;
		A = 151.924070;
		IC = 0;
	}
	else if (isotope == "Tb153")
	{
		Z = 65;
		A = 152.923431;
		IC = 0;
	}
	else if (isotope == "Tb154")
	{
		Z = 65;
		A = 153.924690;
		IC = 0;
	}
	else if (isotope == "Tb155")
	{
		Z = 65;
		A = 154.923500;
		IC = 0;
	}
	else if (isotope == "Tb156")
	{
		Z = 65;
		A = 155.924744;
		IC = 0;
	}
	else if (isotope == "Tb157")
	{
		Z = 65;
		A = 156.924021;
		IC = 0;
	}
	else if (isotope == "Tb158")
	{
		Z = 65;
		A = 157.925410;
		IC = 0;
	}
	else if (isotope == "Tb")
	{
		Z = 65;
		A = 158.92534;
		IC = 1.0;
	}
	else if (isotope == "Tb159")
	{
		Z = 65;
		A = 158.925343;
		IC = 1;
	}
	else if (isotope == "Tb160")
	{
		Z = 65;
		A = 159.927164;
		IC = 0;
	}
	else if (isotope == "Tb161")
	{
		Z = 65;
		A = 160.927566;
		IC = 0;
	}
	else if (isotope == "Tb162")
	{
		Z = 65;
		A = 161.929480;
		IC = 0;
	}
	else if (isotope == "Tb163")
	{
		Z = 65;
		A = 162.930644;
		IC = 0;
	}
	else if (isotope == "Tb164")
	{
		Z = 65;
		A = 163.93335;
		IC = 0;
	}
	else if (isotope == "Tb165")
	{
		Z = 65;
		A = 164.93488;
		IC = 0;
	}
	else if (isotope == "Tb166")
	{
		Z = 65;
		A = 165.93805;
		IC = 0;
	}
	else if (isotope == "Tb167")
	{
		Z = 65;
		A = 166.94005;
		IC = 0;
	}
	else if (isotope == "Tb168")
	{
		Z = 65;
		A = 167.94364;
		IC = 0;
	}
	else if (isotope == "Tb169")
	{
		Z = 65;
		A = 168.94622;
		IC = 0;
	}
	else if (isotope == "Tb170")
	{
		Z = 65;
		A = 169.95025;
		IC = 0;
	}
	else if (isotope == "Tb171")
	{
		Z = 65;
		A = 170.95330;
		IC = 0;
	}
	else if (isotope == "Dy140")
	{
		Z = 66;
		A = 139.95379;
		IC = 0;
	}
	else if (isotope == "Dy141")
	{
		Z = 66;
		A = 140.95119;
		IC = 0;
	}
	else if (isotope == "Dy142")
	{
		Z = 66;
		A = 141.94627;
		IC = 0;
	}
	else if (isotope == "Dy143")
	{
		Z = 66;
		A = 142.94383;
		IC = 0;
	}
	else if (isotope == "Dy144")
	{
		Z = 66;
		A = 143.93907;
		IC = 0;
	}
	else if (isotope == "Dy145")
	{
		Z = 66;
		A = 144.93695;
		IC = 0;
	}
	else if (isotope == "Dy146")
	{
		Z = 66;
		A = 145.93272;
		IC = 0;
	}
	else if (isotope == "Dy147")
	{
		Z = 66;
		A = 146.930880;
		IC = 0;
	}
	else if (isotope == "Dy148")
	{
		Z = 66;
		A = 147.927180;
		IC = 0;
	}
	else if (isotope == "Dy149")
	{
		Z = 66;
		A = 148.927334;
		IC = 0;
	}
	else if (isotope == "Dy150")
	{
		Z = 66;
		A = 149.925580;
		IC = 0;
	}
	else if (isotope == "Dy151")
	{
		Z = 66;
		A = 150.926180;
		IC = 0;
	}
	else if (isotope == "Dy152")
	{
		Z = 66;
		A = 151.924714;
		IC = 0;
	}
	else if (isotope == "Dy153")
	{
		Z = 66;
		A = 152.925761;
		IC = 0;
	}
	else if (isotope == "Dy154")
	{
		Z = 66;
		A = 153.924422;
		IC = 0;
	}
	else if (isotope == "Dy155")
	{
		Z = 66;
		A = 154.925749;
		IC = 0;
	}
	else if (isotope == "Dy")
	{
		Z = 66;
		A = 162.500;
		IC = 1.0;
	}
	else if (isotope == "Dy156")
	{
		Z = 66;
		A = 155.924278;
		IC = 0.0006;
	}
	else if (isotope == "Dy157")
	{
		Z = 66;
		A = 156.925461;
		IC = 0;
	}
	else if (isotope == "Dy158")
	{
		Z = 66;
		A = 157.924405;
		IC = 0.001;
	}
	else if (isotope == "Dy159")
	{
		Z = 66;
		A = 158.925736;
		IC = 0;
	}
	else if (isotope == "Dy160")
	{
		Z = 66;
		A = 159.925194;
		IC = 0.0234;
	}
	else if (isotope == "Dy161")
	{
		Z = 66;
		A = 160.926930;
		IC = 0.1891;
	}
	else if (isotope == "Dy162")
	{
		Z = 66;
		A = 161.926795;
		IC = 0.2551;
	}
	else if (isotope == "Dy163")
	{
		Z = 66;
		A = 162.928728;
		IC = 0.249;
	}
	else if (isotope == "Dy164")
	{
		Z = 66;
		A = 163.929171;
		IC = 0.2818;
	}
	else if (isotope == "Dy165")
	{
		Z = 66;
		A = 164.931700;
		IC = 0;
	}
	else if (isotope == "Dy166")
	{
		Z = 66;
		A = 165.932803;
		IC = 0;
	}
	else if (isotope == "Dy167")
	{
		Z = 66;
		A = 166.935650;
		IC = 0;
	}
	else if (isotope == "Dy168")
	{
		Z = 66;
		A = 167.93723;
		IC = 0;
	}
	else if (isotope == "Dy169")
	{
		Z = 66;
		A = 168.94030;
		IC = 0;
	}
	else if (isotope == "Dy170")
	{
		Z = 66;
		A = 169.94267;
		IC = 0;
	}
	else if (isotope == "Dy171")
	{
		Z = 66;
		A = 170.94648;
		IC = 0;
	}
	else if (isotope == "Dy172")
	{
		Z = 66;
		A = 171.94911;
		IC = 0;
	}
	else if (isotope == "Dy173")
	{
		Z = 66;
		A = 172.95344;
		IC = 0;
	}
	else if (isotope == "Ho142")
	{
		Z = 67;
		A = 141.95986;
		IC = 0;
	}
	else if (isotope == "Ho143")
	{
		Z = 67;
		A = 142.95469;
		IC = 0;
	}
	else if (isotope == "Ho144")
	{
		Z = 67;
		A = 143.95164;
		IC = 0;
	}
	else if (isotope == "Ho145")
	{
		Z = 67;
		A = 144.94688;
		IC = 0;
	}
	else if (isotope == "Ho146")
	{
		Z = 67;
		A = 145.94410;
		IC = 0;
	}
	else if (isotope == "Ho147")
	{
		Z = 67;
		A = 146.93984;
		IC = 0;
	}
	else if (isotope == "Ho148")
	{
		Z = 67;
		A = 147.93727;
		IC = 0;
	}
	else if (isotope == "Ho149")
	{
		Z = 67;
		A = 148.933790;
		IC = 0;
	}
	else if (isotope == "Ho150")
	{
		Z = 67;
		A = 149.93335;
		IC = 0;
	}
	else if (isotope == "Ho151")
	{
		Z = 67;
		A = 150.931681;
		IC = 0;
	}
	else if (isotope == "Ho152")
	{
		Z = 67;
		A = 151.931740;
		IC = 0;
	}
	else if (isotope == "Ho153")
	{
		Z = 67;
		A = 152.930195;
		IC = 0;
	}
	else if (isotope == "Ho154")
	{
		Z = 67;
		A = 153.930596;
		IC = 0;
	}
	else if (isotope == "Ho155")
	{
		Z = 67;
		A = 154.929079;
		IC = 0;
	}
	else if (isotope == "Ho156")
	{
		Z = 67;
		A = 155.92971;
		IC = 0;
	}
	else if (isotope == "Ho157")
	{
		Z = 67;
		A = 156.928190;
		IC = 0;
	}
	else if (isotope == "Ho158")
	{
		Z = 67;
		A = 157.928950;
		IC = 0;
	}
	else if (isotope == "Ho159")
	{
		Z = 67;
		A = 158.927709;
		IC = 0;
	}
	else if (isotope == "Ho160")
	{
		Z = 67;
		A = 159.928726;
		IC = 0;
	}
	else if (isotope == "Ho161")
	{
		Z = 67;
		A = 160.927852;
		IC = 0;
	}
	else if (isotope == "Ho162")
	{
		Z = 67;
		A = 161.929092;
		IC = 0;
	}
	else if (isotope == "Ho163")
	{
		Z = 67;
		A = 162.928730;
		IC = 0;
	}
	else if (isotope == "Ho164")
	{
		Z = 67;
		A = 163.930231;
		IC = 0;
	}
	else if (isotope == "Ho")
	{
		Z = 67;
		A = 164.93032;
		IC = 1.0;
	}
	else if (isotope == "Ho165")
	{
		Z = 67;
		A = 164.930319;
		IC = 1;
	}
	else if (isotope == "Ho166")
	{
		Z = 67;
		A = 165.932281;
		IC = 0;
	}
	else if (isotope == "Ho167")
	{
		Z = 67;
		A = 166.933126;
		IC = 0;
	}
	else if (isotope == "Ho168")
	{
		Z = 67;
		A = 167.935500;
		IC = 0;
	}
	else if (isotope == "Ho169")
	{
		Z = 67;
		A = 168.936868;
		IC = 0;
	}
	else if (isotope == "Ho170")
	{
		Z = 67;
		A = 169.939610;
		IC = 0;
	}
	else if (isotope == "Ho171")
	{
		Z = 67;
		A = 170.94146;
		IC = 0;
	}
	else if (isotope == "Ho172")
	{
		Z = 67;
		A = 171.94482;
		IC = 0;
	}
	else if (isotope == "Ho173")
	{
		Z = 67;
		A = 172.94729;
		IC = 0;
	}
	else if (isotope == "Ho174")
	{
		Z = 67;
		A = 173.95115;
		IC = 0;
	}
	else if (isotope == "Ho175")
	{
		Z = 67;
		A = 174.95405;
		IC = 0;
	}
	else if (isotope == "Er144")
	{
		Z = 68;
		A = 143.96059;
		IC = 0;
	}
	else if (isotope == "Er145")
	{
		Z = 68;
		A = 144.95746;
		IC = 0;
	}
	else if (isotope == "Er146")
	{
		Z = 68;
		A = 145.95212;
		IC = 0;
	}
	else if (isotope == "Er147")
	{
		Z = 68;
		A = 146.94931;
		IC = 0;
	}
	else if (isotope == "Er148")
	{
		Z = 68;
		A = 147.94444;
		IC = 0;
	}
	else if (isotope == "Er149")
	{
		Z = 68;
		A = 148.94217;
		IC = 0;
	}
	else if (isotope == "Er150")
	{
		Z = 68;
		A = 149.93776;
		IC = 0;
	}
	else if (isotope == "Er151")
	{
		Z = 68;
		A = 150.93746;
		IC = 0;
	}
	else if (isotope == "Er152")
	{
		Z = 68;
		A = 151.935080;
		IC = 0;
	}
	else if (isotope == "Er153")
	{
		Z = 68;
		A = 152.935093;
		IC = 0;
	}
	else if (isotope == "Er154")
	{
		Z = 68;
		A = 153.932777;
		IC = 0;
	}
	else if (isotope == "Er155")
	{
		Z = 68;
		A = 154.933200;
		IC = 0;
	}
	else if (isotope == "Er156")
	{
		Z = 68;
		A = 155.931020;
		IC = 0;
	}
	else if (isotope == "Er157")
	{
		Z = 68;
		A = 156.931950;
		IC = 0;
	}
	else if (isotope == "Er158")
	{
		Z = 68;
		A = 157.92991;
		IC = 0;
	}
	else if (isotope == "Er159")
	{
		Z = 68;
		A = 158.930681;
		IC = 0;
	}
	else if (isotope == "Er160")
	{
		Z = 68;
		A = 159.929080;
		IC = 0;
	}
	else if (isotope == "Er161")
	{
		Z = 68;
		A = 160.930001;
		IC = 0;
	}
	else if (isotope == "Er")
	{
		Z = 68;
		A = 167.259;
		IC = 1.0;
	}
	else if (isotope == "Er162")
	{
		Z = 68;
		A = 161.928775;
		IC = 0.0014;
	}
	else if (isotope == "Er163")
	{
		Z = 68;
		A = 162.930029;
		IC = 0;
	}
	else if (isotope == "Er164")
	{
		Z = 68;
		A = 163.929197;
		IC = 0.0161;
	}
	else if (isotope == "Er165")
	{
		Z = 68;
		A = 164.930723;
		IC = 0;
	}
	else if (isotope == "Er166")
	{
		Z = 68;
		A = 165.930290;
		IC = 0.3361;
	}
	else if (isotope == "Er167")
	{
		Z = 68;
		A = 166.932045;
		IC = 0.2293;
	}
	else if (isotope == "Er168")
	{
		Z = 68;
		A = 167.932368;
		IC = 0.2678;
	}
	else if (isotope == "Er169")
	{
		Z = 68;
		A = 168.934588;
		IC = 0;
	}
	else if (isotope == "Er170")
	{
		Z = 68;
		A = 169.935460;
		IC = 0.1493;
	}
	else if (isotope == "Er171")
	{
		Z = 68;
		A = 170.938026;
		IC = 0;
	}
	else if (isotope == "Er172")
	{
		Z = 68;
		A = 171.939352;
		IC = 0;
	}
	else if (isotope == "Er173")
	{
		Z = 68;
		A = 172.94240;
		IC = 0;
	}
	else if (isotope == "Er174")
	{
		Z = 68;
		A = 173.94434;
		IC = 0;
	}
	else if (isotope == "Er175")
	{
		Z = 68;
		A = 174.94793;
		IC = 0;
	}
	else if (isotope == "Er176")
	{
		Z = 68;
		A = 175.95029;
		IC = 0;
	}
	else if (isotope == "Er177")
	{
		Z = 68;
		A = 176.95437;
		IC = 0;
	}
	else if (isotope == "Tm146")
	{
		Z = 69;
		A = 145.96650;
		IC = 0;
	}
	else if (isotope == "Tm147")
	{
		Z = 69;
		A = 146.96108;
		IC = 0;
	}
	else if (isotope == "Tm148")
	{
		Z = 69;
		A = 147.95755;
		IC = 0;
	}
	else if (isotope == "Tm149")
	{
		Z = 69;
		A = 148.95265;
		IC = 0;
	}
	else if (isotope == "Tm150")
	{
		Z = 69;
		A = 149.94967;
		IC = 0;
	}
	else if (isotope == "Tm151")
	{
		Z = 69;
		A = 150.94543;
		IC = 0;
	}
	else if (isotope == "Tm152")
	{
		Z = 69;
		A = 151.94430;
		IC = 0;
	}
	else if (isotope == "Tm153")
	{
		Z = 69;
		A = 152.942028;
		IC = 0;
	}
	else if (isotope == "Tm154")
	{
		Z = 69;
		A = 153.94142;
		IC = 0;
	}
	else if (isotope == "Tm155")
	{
		Z = 69;
		A = 154.939192;
		IC = 0;
	}
	else if (isotope == "Tm156")
	{
		Z = 69;
		A = 155.939010;
		IC = 0;
	}
	else if (isotope == "Tm157")
	{
		Z = 69;
		A = 156.93676;
		IC = 0;
	}
	else if (isotope == "Tm158")
	{
		Z = 69;
		A = 157.93700;
		IC = 0;
	}
	else if (isotope == "Tm159")
	{
		Z = 69;
		A = 158.934810;
		IC = 0;
	}
	else if (isotope == "Tm160")
	{
		Z = 69;
		A = 159.93509;
		IC = 0;
	}
	else if (isotope == "Tm161")
	{
		Z = 69;
		A = 160.93340;
		IC = 0;
	}
	else if (isotope == "Tm162")
	{
		Z = 69;
		A = 161.933970;
		IC = 0;
	}
	else if (isotope == "Tm163")
	{
		Z = 69;
		A = 162.932648;
		IC = 0;
	}
	else if (isotope == "Tm164")
	{
		Z = 69;
		A = 163.933451;
		IC = 0;
	}
	else if (isotope == "Tm165")
	{
		Z = 69;
		A = 164.932432;
		IC = 0;
	}
	else if (isotope == "Tm166")
	{
		Z = 69;
		A = 165.933553;
		IC = 0;
	}
	else if (isotope == "Tm167")
	{
		Z = 69;
		A = 166.932849;
		IC = 0;
	}
	else if (isotope == "Tm168")
	{
		Z = 69;
		A = 167.934170;
		IC = 0;
	}
	else if (isotope == "Tm")
	{
		Z = 69;
		A = 168.93421;
		IC = 1.0;
	}
	else if (isotope == "Tm169")
	{
		Z = 69;
		A = 168.934211;
		IC = 1;
	}
	else if (isotope == "Tm170")
	{
		Z = 69;
		A = 169.935798;
		IC = 0;
	}
	else if (isotope == "Tm171")
	{
		Z = 69;
		A = 170.936426;
		IC = 0;
	}
	else if (isotope == "Tm172")
	{
		Z = 69;
		A = 171.938396;
		IC = 0;
	}
	else if (isotope == "Tm173")
	{
		Z = 69;
		A = 172.939600;
		IC = 0;
	}
	else if (isotope == "Tm174")
	{
		Z = 69;
		A = 173.942160;
		IC = 0;
	}
	else if (isotope == "Tm175")
	{
		Z = 69;
		A = 174.943830;
		IC = 0;
	}
	else if (isotope == "Tm176")
	{
		Z = 69;
		A = 175.94699;
		IC = 0;
	}
	else if (isotope == "Tm177")
	{
		Z = 69;
		A = 176.94904;
		IC = 0;
	}
	else if (isotope == "Tm178")
	{
		Z = 69;
		A = 177.95264;
		IC = 0;
	}
	else if (isotope == "Tm179")
	{
		Z = 69;
		A = 178.95534;
		IC = 0;
	}
	else if (isotope == "Yb148")
	{
		Z = 70;
		A = 147.96676;
		IC = 0;
	}
	else if (isotope == "Yb149")
	{
		Z = 70;
		A = 148.96348;
		IC = 0;
	}
	else if (isotope == "Yb150")
	{
		Z = 70;
		A = 149.95799;
		IC = 0;
	}
	else if (isotope == "Yb151")
	{
		Z = 70;
		A = 150.95525;
		IC = 0;
	}
	else if (isotope == "Yb152")
	{
		Z = 70;
		A = 151.95017;
		IC = 0;
	}
	else if (isotope == "Yb153")
	{
		Z = 70;
		A = 152.94921;
		IC = 0;
	}
	else if (isotope == "Yb154")
	{
		Z = 70;
		A = 153.94624;
		IC = 0;
	}
	else if (isotope == "Yb155")
	{
		Z = 70;
		A = 154.94579;
		IC = 0;
	}
	else if (isotope == "Yb156")
	{
		Z = 70;
		A = 155.942850;
		IC = 0;
	}
	else if (isotope == "Yb157")
	{
		Z = 70;
		A = 156.942660;
		IC = 0;
	}
	else if (isotope == "Yb158")
	{
		Z = 70;
		A = 157.939858;
		IC = 0;
	}
	else if (isotope == "Yb159")
	{
		Z = 70;
		A = 158.94015;
		IC = 0;
	}
	else if (isotope == "Yb160")
	{
		Z = 70;
		A = 159.93756;
		IC = 0;
	}
	else if (isotope == "Yb161")
	{
		Z = 70;
		A = 160.93785;
		IC = 0;
	}
	else if (isotope == "Yb162")
	{
		Z = 70;
		A = 161.93575;
		IC = 0;
	}
	else if (isotope == "Yb163")
	{
		Z = 70;
		A = 162.93627;
		IC = 0;
	}
	else if (isotope == "Yb164")
	{
		Z = 70;
		A = 163.93452;
		IC = 0;
	}
	else if (isotope == "Yb165")
	{
		Z = 70;
		A = 164.935398;
		IC = 0;
	}
	else if (isotope == "Yb166")
	{
		Z = 70;
		A = 165.933880;
		IC = 0;
	}
	else if (isotope == "Yb167")
	{
		Z = 70;
		A = 166.934947;
		IC = 0;
	}
	else if (isotope == "Yb")
	{
		Z = 70;
		A = 173.04;
		IC = 1.0;
	}
	else if (isotope == "Yb168")
	{
		Z = 70;
		A = 167.933894;
		IC = 0.0013;
	}
	else if (isotope == "Yb169")
	{
		Z = 70;
		A = 168.935187;
		IC = 0;
	}
	else if (isotope == "Yb170")
	{
		Z = 70;
		A = 169.934759;
		IC = 0.0304;
	}
	else if (isotope == "Yb171")
	{
		Z = 70;
		A = 170.936322;
		IC = 0.1428;
	}
	else if (isotope == "Yb172")
	{
		Z = 70;
		A = 171.9363777;
		IC = 0.2183;
	}
	else if (isotope == "Yb173")
	{
		Z = 70;
		A = 172.9382068;
		IC = 0.1613;
	}
	else if (isotope == "Yb174")
	{
		Z = 70;
		A = 173.9388581;
		IC = 0.3183;
	}
	else if (isotope == "Yb175")
	{
		Z = 70;
		A = 174.9412725;
		IC = 0;
	}
	else if (isotope == "Yb176")
	{
		Z = 70;
		A = 175.942568;
		IC = 0.1276;
	}
	else if (isotope == "Yb177")
	{
		Z = 70;
		A = 176.945257;
		IC = 0;
	}
	else if (isotope == "Yb178")
	{
		Z = 70;
		A = 177.946643;
		IC = 0;
	}
	else if (isotope == "Yb179")
	{
		Z = 70;
		A = 178.95017;
		IC = 0;
	}
	else if (isotope == "Yb180")
	{
		Z = 70;
		A = 179.95233;
		IC = 0;
	}
	else if (isotope == "Yb181")
	{
		Z = 70;
		A = 180.95615;
		IC = 0;
	}
	else if (isotope == "Lu150")
	{
		Z = 71;
		A = 149.97267;
		IC = 0;
	}
	else if (isotope == "Lu151")
	{
		Z = 71;
		A = 150.96715;
		IC = 0;
	}
	else if (isotope == "Lu152")
	{
		Z = 71;
		A = 151.96361;
		IC = 0;
	}
	else if (isotope == "Lu153")
	{
		Z = 71;
		A = 152.95869;
		IC = 0;
	}
	else if (isotope == "Lu154")
	{
		Z = 71;
		A = 153.95710;
		IC = 0;
	}
	else if (isotope == "Lu155")
	{
		Z = 71;
		A = 154.95423;
		IC = 0;
	}
	else if (isotope == "Lu156")
	{
		Z = 71;
		A = 155.95291;
		IC = 0;
	}
	else if (isotope == "Lu157")
	{
		Z = 71;
		A = 156.950102;
		IC = 0;
	}
	else if (isotope == "Lu158")
	{
		Z = 71;
		A = 157.94917;
		IC = 0;
	}
	else if (isotope == "Lu159")
	{
		Z = 71;
		A = 158.946620;
		IC = 0;
	}
	else if (isotope == "Lu160")
	{
		Z = 71;
		A = 159.94602;
		IC = 0;
	}
	else if (isotope == "Lu161")
	{
		Z = 71;
		A = 160.94354;
		IC = 0;
	}
	else if (isotope == "Lu162")
	{
		Z = 71;
		A = 161.94322;
		IC = 0;
	}
	else if (isotope == "Lu163")
	{
		Z = 71;
		A = 162.94120;
		IC = 0;
	}
	else if (isotope == "Lu164")
	{
		Z = 71;
		A = 163.94122;
		IC = 0;
	}
	else if (isotope == "Lu165")
	{
		Z = 71;
		A = 164.939610;
		IC = 0;
	}
	else if (isotope == "Lu166")
	{
		Z = 71;
		A = 165.93976;
		IC = 0;
	}
	else if (isotope == "Lu167")
	{
		Z = 71;
		A = 166.93831;
		IC = 0;
	}
	else if (isotope == "Lu168")
	{
		Z = 71;
		A = 167.938700;
		IC = 0;
	}
	else if (isotope == "Lu169")
	{
		Z = 71;
		A = 168.937649;
		IC = 0;
	}
	else if (isotope == "Lu170")
	{
		Z = 71;
		A = 169.938472;
		IC = 0;
	}
	else if (isotope == "Lu171")
	{
		Z = 71;
		A = 170.937910;
		IC = 0;
	}
	else if (isotope == "Lu172")
	{
		Z = 71;
		A = 171.939082;
		IC = 0;
	}
	else if (isotope == "Lu173")
	{
		Z = 71;
		A = 172.938927;
		IC = 0;
	}
	else if (isotope == "Lu174")
	{
		Z = 71;
		A = 173.9403335;
		IC = 0;
	}
	else if (isotope == "Lu")
	{
		Z = 71;
		A = 174.967;
		IC = 1.0;
	}
	else if (isotope == "Lu175")
	{
		Z = 71;
		A = 174.9407679;
		IC = 0.9741;
	}
	else if (isotope == "Lu176")
	{
		Z = 71;
		A = 175.9426824;
		IC = 0.0259;
	}
	else if (isotope == "Lu177")
	{
		Z = 71;
		A = 176.9437550;
		IC = 0;
	}
	else if (isotope == "Lu178")
	{
		Z = 71;
		A = 177.945951;
		IC = 0;
	}
	else if (isotope == "Lu179")
	{
		Z = 71;
		A = 178.947324;
		IC = 0;
	}
	else if (isotope == "Lu180")
	{
		Z = 71;
		A = 179.949880;
		IC = 0;
	}
	else if (isotope == "Lu181")
	{
		Z = 71;
		A = 180.95197;
		IC = 0;
	}
	else if (isotope == "Lu182")
	{
		Z = 71;
		A = 181.95521;
		IC = 0;
	}
	else if (isotope == "Lu183")
	{
		Z = 71;
		A = 182.95757;
		IC = 0;
	}
	else if (isotope == "Lu184")
	{
		Z = 71;
		A = 183.96117;
		IC = 0;
	}
	else if (isotope == "Hf154")
	{
		Z = 72;
		A = 153.96425;
		IC = 0;
	}
	else if (isotope == "Hf155")
	{
		Z = 72;
		A = 154.96276;
		IC = 0;
	}
	else if (isotope == "Hf156")
	{
		Z = 72;
		A = 155.95925;
		IC = 0;
	}
	else if (isotope == "Hf157")
	{
		Z = 72;
		A = 156.95813;
		IC = 0;
	}
	else if (isotope == "Hf158")
	{
		Z = 72;
		A = 157.95465;
		IC = 0;
	}
	else if (isotope == "Hf159")
	{
		Z = 72;
		A = 158.95400;
		IC = 0;
	}
	else if (isotope == "Hf160")
	{
		Z = 72;
		A = 159.950710;
		IC = 0;
	}
	else if (isotope == "Hf161")
	{
		Z = 72;
		A = 160.950330;
		IC = 0;
	}
	else if (isotope == "Hf162")
	{
		Z = 72;
		A = 161.947203;
		IC = 0;
	}
	else if (isotope == "Hf163")
	{
		Z = 72;
		A = 162.94706;
		IC = 0;
	}
	else if (isotope == "Hf164")
	{
		Z = 72;
		A = 163.94442;
		IC = 0;
	}
	else if (isotope == "Hf165")
	{
		Z = 72;
		A = 164.94454;
		IC = 0;
	}
	else if (isotope == "Hf166")
	{
		Z = 72;
		A = 165.94225;
		IC = 0;
	}
	else if (isotope == "Hf167")
	{
		Z = 72;
		A = 166.94260;
		IC = 0;
	}
	else if (isotope == "Hf168")
	{
		Z = 72;
		A = 167.94063;
		IC = 0;
	}
	else if (isotope == "Hf169")
	{
		Z = 72;
		A = 168.941160;
		IC = 0;
	}
	else if (isotope == "Hf170")
	{
		Z = 72;
		A = 169.93965;
		IC = 0;
	}
	else if (isotope == "Hf171")
	{
		Z = 72;
		A = 170.94049;
		IC = 0;
	}
	else if (isotope == "Hf172")
	{
		Z = 72;
		A = 171.939460;
		IC = 0;
	}
	else if (isotope == "Hf173")
	{
		Z = 72;
		A = 172.94065;
		IC = 0;
	}
	else if (isotope == "Hf")
	{
		Z = 72;
		A = 178.49;
		IC = 1.0;
	}
	else if (isotope == "Hf174")
	{
		Z = 72;
		A = 173.940040;
		IC = 0.0016;
	}
	else if (isotope == "Hf175")
	{
		Z = 72;
		A = 174.941503;
		IC = 0;
	}
	else if (isotope == "Hf176")
	{
		Z = 72;
		A = 175.9414018;
		IC = 0.0526;
	}
	else if (isotope == "Hf177")
	{
		Z = 72;
		A = 176.9432200;
		IC = 0.186;
	}
	else if (isotope == "Hf178")
	{
		Z = 72;
		A = 177.9436977;
		IC = 0.2728;
	}
	else if (isotope == "Hf179")
	{
		Z = 72;
		A = 178.9458151;
		IC = 0.1362;
	}
	else if (isotope == "Hf180")
	{
		Z = 72;
		A = 179.9465488;
		IC = 0.3508;
	}
	else if (isotope == "Hf181")
	{
		Z = 72;
		A = 180.9490991;
		IC = 0;
	}
	else if (isotope == "Hf182")
	{
		Z = 72;
		A = 181.950553;
		IC = 0;
	}
	else if (isotope == "Hf183")
	{
		Z = 72;
		A = 182.953530;
		IC = 0;
	}
	else if (isotope == "Hf184")
	{
		Z = 72;
		A = 183.955450;
		IC = 0;
	}
	else if (isotope == "Hf185")
	{
		Z = 72;
		A = 184.95878;
		IC = 0;
	}
	else if (isotope == "Hf186")
	{
		Z = 72;
		A = 185.96092;
		IC = 0;
	}
	else if (isotope == "Ta156")
	{
		Z = 73;
		A = 155.97169;
		IC = 0;
	}
	else if (isotope == "Ta157")
	{
		Z = 73;
		A = 156.96815;
		IC = 0;
	}
	else if (isotope == "Ta158")
	{
		Z = 73;
		A = 157.96637;
		IC = 0;
	}
	else if (isotope == "Ta159")
	{
		Z = 73;
		A = 158.96291;
		IC = 0;
	}
	else if (isotope == "Ta160")
	{
		Z = 73;
		A = 159.96136;
		IC = 0;
	}
	else if (isotope == "Ta161")
	{
		Z = 73;
		A = 160.958370;
		IC = 0;
	}
	else if (isotope == "Ta162")
	{
		Z = 73;
		A = 161.95715;
		IC = 0;
	}
	else if (isotope == "Ta163")
	{
		Z = 73;
		A = 162.954320;
		IC = 0;
	}
	else if (isotope == "Ta164")
	{
		Z = 73;
		A = 163.95357;
		IC = 0;
	}
	else if (isotope == "Ta165")
	{
		Z = 73;
		A = 164.95082;
		IC = 0;
	}
	else if (isotope == "Ta166")
	{
		Z = 73;
		A = 165.95047;
		IC = 0;
	}
	else if (isotope == "Ta167")
	{
		Z = 73;
		A = 166.94797;
		IC = 0;
	}
	else if (isotope == "Ta168")
	{
		Z = 73;
		A = 167.94779;
		IC = 0;
	}
	else if (isotope == "Ta169")
	{
		Z = 73;
		A = 168.94592;
		IC = 0;
	}
	else if (isotope == "Ta170")
	{
		Z = 73;
		A = 169.94609;
		IC = 0;
	}
	else if (isotope == "Ta171")
	{
		Z = 73;
		A = 170.94446;
		IC = 0;
	}
	else if (isotope == "Ta172")
	{
		Z = 73;
		A = 171.94474;
		IC = 0;
	}
	else if (isotope == "Ta173")
	{
		Z = 73;
		A = 172.94354;
		IC = 0;
	}
	else if (isotope == "Ta174")
	{
		Z = 73;
		A = 173.944170;
		IC = 0;
	}
	else if (isotope == "Ta175")
	{
		Z = 73;
		A = 174.94365;
		IC = 0;
	}
	else if (isotope == "Ta176")
	{
		Z = 73;
		A = 175.94474;
		IC = 0;
	}
	else if (isotope == "Ta177")
	{
		Z = 73;
		A = 176.944472;
		IC = 0;
	}
	else if (isotope == "Ta178")
	{
		Z = 73;
		A = 177.94575;
		IC = 0;
	}
	else if (isotope == "Ta179")
	{
		Z = 73;
		A = 178.945934;
		IC = 0;
	}
	else if (isotope == "Ta")
	{
		Z = 73;
		A = 180.9479;
		IC = 1.0;
	}
	else if (isotope == "Ta180")
	{
		Z = 73;
		A = 179.947466;
		IC = 0.00012;
	}
	else if (isotope == "Ta181")
	{
		Z = 73;
		A = 180.947996;
		IC = 0.99988;
	}
	else if (isotope == "Ta182")
	{
		Z = 73;
		A = 181.950152;
		IC = 0;
	}
	else if (isotope == "Ta183")
	{
		Z = 73;
		A = 182.951373;
		IC = 0;
	}
	else if (isotope == "Ta184")
	{
		Z = 73;
		A = 183.954009;
		IC = 0;
	}
	else if (isotope == "Ta185")
	{
		Z = 73;
		A = 184.955559;
		IC = 0;
	}
	else if (isotope == "Ta186")
	{
		Z = 73;
		A = 185.958550;
		IC = 0;
	}
	else if (isotope == "Ta187")
	{
		Z = 73;
		A = 186.96041;
		IC = 0;
	}
	else if (isotope == "Ta188")
	{
		Z = 73;
		A = 187.96371;
		IC = 0;
	}
	else if (isotope == "W158")
	{
		Z = 74;
		A = 157.97394;
		IC = 0;
	}
	else if (isotope == "W159")
	{
		Z = 74;
		A = 158.97228;
		IC = 0;
	}
	else if (isotope == "W160")
	{
		Z = 74;
		A = 159.96837;
		IC = 0;
	}
	else if (isotope == "W161")
	{
		Z = 74;
		A = 160.96709;
		IC = 0;
	}
	else if (isotope == "W162")
	{
		Z = 74;
		A = 161.96334;
		IC = 0;
	}
	else if (isotope == "W163")
	{
		Z = 74;
		A = 162.96253;
		IC = 0;
	}
	else if (isotope == "W164")
	{
		Z = 74;
		A = 163.958980;
		IC = 0;
	}
	else if (isotope == "W165")
	{
		Z = 74;
		A = 164.958340;
		IC = 0;
	}
	else if (isotope == "W166")
	{
		Z = 74;
		A = 165.955020;
		IC = 0;
	}
	else if (isotope == "W167")
	{
		Z = 74;
		A = 166.95467;
		IC = 0;
	}
	else if (isotope == "W168")
	{
		Z = 74;
		A = 167.95186;
		IC = 0;
	}
	else if (isotope == "W169")
	{
		Z = 74;
		A = 168.95176;
		IC = 0;
	}
	else if (isotope == "W170")
	{
		Z = 74;
		A = 169.94929;
		IC = 0;
	}
	else if (isotope == "W171")
	{
		Z = 74;
		A = 170.94946;
		IC = 0;
	}
	else if (isotope == "W172")
	{
		Z = 74;
		A = 171.94742;
		IC = 0;
	}
	else if (isotope == "W173")
	{
		Z = 74;
		A = 172.94783;
		IC = 0;
	}
	else if (isotope == "W174")
	{
		Z = 74;
		A = 173.94616;
		IC = 0;
	}
	else if (isotope == "W175")
	{
		Z = 74;
		A = 174.94677;
		IC = 0;
	}
	else if (isotope == "W176")
	{
		Z = 74;
		A = 175.94559;
		IC = 0;
	}
	else if (isotope == "W177")
	{
		Z = 74;
		A = 176.94662;
		IC = 0;
	}
	else if (isotope == "W178")
	{
		Z = 74;
		A = 177.94585;
		IC = 0;
	}
	else if (isotope == "W179")
	{
		Z = 74;
		A = 178.947072;
		IC = 0;
	}
	else if (isotope == "W")
	{
		Z = 74;
		A = 183.84;
		IC = 1.0;
	}
	else if (isotope == "W180")
	{
		Z = 74;
		A = 179.946706;
		IC = 0.0012;
	}
	else if (isotope == "W181")
	{
		Z = 74;
		A = 180.948198;
		IC = 0;
	}
	else if (isotope == "W182")
	{
		Z = 74;
		A = 181.948206;
		IC = 0.265;
	}
	else if (isotope == "W183")
	{
		Z = 74;
		A = 182.9502245;
		IC = 0.1431;
	}
	else if (isotope == "W184")
	{
		Z = 74;
		A = 183.9509326;
		IC = 0.3064;
	}
	else if (isotope == "W185")
	{
		Z = 74;
		A = 184.9534206;
		IC = 0;
	}
	else if (isotope == "W186")
	{
		Z = 74;
		A = 185.954362;
		IC = 0.2843;
	}
	else if (isotope == "W187")
	{
		Z = 74;
		A = 186.957158;
		IC = 0;
	}
	else if (isotope == "W188")
	{
		Z = 74;
		A = 187.958487;
		IC = 0;
	}
	else if (isotope == "W189")
	{
		Z = 74;
		A = 188.96191;
		IC = 0;
	}
	else if (isotope == "W190")
	{
		Z = 74;
		A = 189.96318;
		IC = 0;
	}
	else if (isotope == "Re160")
	{
		Z = 75;
		A = 159.98149;
		IC = 0;
	}
	else if (isotope == "Re161")
	{
		Z = 75;
		A = 160.97766;
		IC = 0;
	}
	else if (isotope == "Re162")
	{
		Z = 75;
		A = 161.97571;
		IC = 0;
	}
	else if (isotope == "Re163")
	{
		Z = 75;
		A = 162.97197;
		IC = 0;
	}
	else if (isotope == "Re164")
	{
		Z = 75;
		A = 163.97032;
		IC = 0;
	}
	else if (isotope == "Re165")
	{
		Z = 75;
		A = 164.967050;
		IC = 0;
	}
	else if (isotope == "Re166")
	{
		Z = 75;
		A = 165.96580;
		IC = 0;
	}
	else if (isotope == "Re167")
	{
		Z = 75;
		A = 166.96256;
		IC = 0;
	}
	else if (isotope == "Re168")
	{
		Z = 75;
		A = 167.96161;
		IC = 0;
	}
	else if (isotope == "Re169")
	{
		Z = 75;
		A = 168.95883;
		IC = 0;
	}
	else if (isotope == "Re170")
	{
		Z = 75;
		A = 169.95816;
		IC = 0;
	}
	else if (isotope == "Re171")
	{
		Z = 75;
		A = 170.95555;
		IC = 0;
	}
	else if (isotope == "Re172")
	{
		Z = 75;
		A = 171.95529;
		IC = 0;
	}
	else if (isotope == "Re173")
	{
		Z = 75;
		A = 172.95306;
		IC = 0;
	}
	else if (isotope == "Re174")
	{
		Z = 75;
		A = 173.95311;
		IC = 0;
	}
	else if (isotope == "Re175")
	{
		Z = 75;
		A = 174.95139;
		IC = 0;
	}
	else if (isotope == "Re176")
	{
		Z = 75;
		A = 175.95157;
		IC = 0;
	}
	else if (isotope == "Re177")
	{
		Z = 75;
		A = 176.95027;
		IC = 0;
	}
	else if (isotope == "Re178")
	{
		Z = 75;
		A = 177.95085;
		IC = 0;
	}
	else if (isotope == "Re179")
	{
		Z = 75;
		A = 178.949980;
		IC = 0;
	}
	else if (isotope == "Re180")
	{
		Z = 75;
		A = 179.950790;
		IC = 0;
	}
	else if (isotope == "Re181")
	{
		Z = 75;
		A = 180.950065;
		IC = 0;
	}
	else if (isotope == "Re182")
	{
		Z = 75;
		A = 181.95121;
		IC = 0;
	}
	else if (isotope == "Re183")
	{
		Z = 75;
		A = 182.950821;
		IC = 0;
	}
	else if (isotope == "Re184")
	{
		Z = 75;
		A = 183.952524;
		IC = 0;
	}
	else if (isotope == "Re")
	{
		Z = 75;
		A = 186.207;
		IC = 1.0;
	}
	else if (isotope == "Re185")
	{
		Z = 75;
		A = 184.9529557;
		IC = 0.374;
	}
	else if (isotope == "Re186")
	{
		Z = 75;
		A = 185.954987;
		IC = 0;
	}
	else if (isotope == "Re187")
	{
		Z = 75;
		A = 186.9557508;
		IC = 0.626;
	}
	else if (isotope == "Re188")
	{
		Z = 75;
		A = 187.9581123;
		IC = 0;
	}
	else if (isotope == "Re189")
	{
		Z = 75;
		A = 188.959228;
		IC = 0;
	}
	else if (isotope == "Re190")
	{
		Z = 75;
		A = 189.96182;
		IC = 0;
	}
	else if (isotope == "Re191")
	{
		Z = 75;
		A = 190.963124;
		IC = 0;
	}
	else if (isotope == "Re192")
	{
		Z = 75;
		A = 191.96596;
		IC = 0;
	}
	else if (isotope == "Os162")
	{
		Z = 76;
		A = 161.98382;
		IC = 0;
	}
	else if (isotope == "Os163")
	{
		Z = 76;
		A = 162.98205;
		IC = 0;
	}
	else if (isotope == "Os164")
	{
		Z = 76;
		A = 163.97793;
		IC = 0;
	}
	else if (isotope == "Os165")
	{
		Z = 76;
		A = 164.97648;
		IC = 0;
	}
	else if (isotope == "Os166")
	{
		Z = 76;
		A = 165.97253;
		IC = 0;
	}
	else if (isotope == "Os167")
	{
		Z = 76;
		A = 166.97155;
		IC = 0;
	}
	else if (isotope == "Os168")
	{
		Z = 76;
		A = 167.967830;
		IC = 0;
	}
	else if (isotope == "Os169")
	{
		Z = 76;
		A = 168.967080;
		IC = 0;
	}
	else if (isotope == "Os170")
	{
		Z = 76;
		A = 169.963570;
		IC = 0;
	}
	else if (isotope == "Os171")
	{
		Z = 76;
		A = 170.96304;
		IC = 0;
	}
	else if (isotope == "Os172")
	{
		Z = 76;
		A = 171.96008;
		IC = 0;
	}
	else if (isotope == "Os173")
	{
		Z = 76;
		A = 172.95979;
		IC = 0;
	}
	else if (isotope == "Os174")
	{
		Z = 76;
		A = 173.95712;
		IC = 0;
	}
	else if (isotope == "Os175")
	{
		Z = 76;
		A = 174.95708;
		IC = 0;
	}
	else if (isotope == "Os176")
	{
		Z = 76;
		A = 175.95495;
		IC = 0;
	}
	else if (isotope == "Os177")
	{
		Z = 76;
		A = 176.95505;
		IC = 0;
	}
	else if (isotope == "Os178")
	{
		Z = 76;
		A = 177.95335;
		IC = 0;
	}
	else if (isotope == "Os179")
	{
		Z = 76;
		A = 178.95395;
		IC = 0;
	}
	else if (isotope == "Os180")
	{
		Z = 76;
		A = 179.95235;
		IC = 0;
	}
	else if (isotope == "Os181")
	{
		Z = 76;
		A = 180.95327;
		IC = 0;
	}
	else if (isotope == "Os182")
	{
		Z = 76;
		A = 181.952186;
		IC = 0;
	}
	else if (isotope == "Os183")
	{
		Z = 76;
		A = 182.95311;
		IC = 0;
	}
	else if (isotope == "Os")
	{
		Z = 76;
		A = 190.23;
		IC = 1.0;
	}
	else if (isotope == "Os184")
	{
		Z = 76;
		A = 183.952491;
		IC = 0.0002;
	}
	else if (isotope == "Os185")
	{
		Z = 76;
		A = 184.954043;
		IC = 0;
	}
	else if (isotope == "Os186")
	{
		Z = 76;
		A = 185.953838;
		IC = 0.0159;
	}
	else if (isotope == "Os187")
	{
		Z = 76;
		A = 186.9557479;
		IC = 0.0196;
	}
	else if (isotope == "Os188")
	{
		Z = 76;
		A = 187.9558360;
		IC = 0.1324;
	}
	else if (isotope == "Os189")
	{
		Z = 76;
		A = 188.9581449;
		IC = 0.1615;
	}
	else if (isotope == "Os190")
	{
		Z = 76;
		A = 189.958445;
		IC = 0.2626;
	}
	else if (isotope == "Os191")
	{
		Z = 76;
		A = 190.960928;
		IC = 0;
	}
	else if (isotope == "Os192")
	{
		Z = 76;
		A = 191.961479;
		IC = 0.4078;
	}
	else if (isotope == "Os193")
	{
		Z = 76;
		A = 192.964148;
		IC = 0;
	}
	else if (isotope == "Os194")
	{
		Z = 76;
		A = 193.965179;
		IC = 0;
	}
	else if (isotope == "Os195")
	{
		Z = 76;
		A = 194.96812;
		IC = 0;
	}
	else if (isotope == "Os196")
	{
		Z = 76;
		A = 195.969620;
		IC = 0;
	}
	else if (isotope == "Ir165")
	{
		Z = 77;
		A = 164.98758;
		IC = 0;
	}
	else if (isotope == "Ir166")
	{
		Z = 77;
		A = 165.98551;
		IC = 0;
	}
	else if (isotope == "Ir167")
	{
		Z = 77;
		A = 166.98154;
		IC = 0;
	}
	else if (isotope == "Ir168")
	{
		Z = 77;
		A = 167.97997;
		IC = 0;
	}
	else if (isotope == "Ir169")
	{
		Z = 77;
		A = 168.97639;
		IC = 0;
	}
	else if (isotope == "Ir170")
	{
		Z = 77;
		A = 169.97503;
		IC = 0;
	}
	else if (isotope == "Ir171")
	{
		Z = 77;
		A = 170.97178;
		IC = 0;
	}
	else if (isotope == "Ir172")
	{
		Z = 77;
		A = 171.97064;
		IC = 0;
	}
	else if (isotope == "Ir173")
	{
		Z = 77;
		A = 172.96771;
		IC = 0;
	}
	else if (isotope == "Ir174")
	{
		Z = 77;
		A = 173.96680;
		IC = 0;
	}
	else if (isotope == "Ir175")
	{
		Z = 77;
		A = 174.96428;
		IC = 0;
	}
	else if (isotope == "Ir176")
	{
		Z = 77;
		A = 175.96351;
		IC = 0;
	}
	else if (isotope == "Ir177")
	{
		Z = 77;
		A = 176.96117;
		IC = 0;
	}
	else if (isotope == "Ir178")
	{
		Z = 77;
		A = 177.96108;
		IC = 0;
	}
	else if (isotope == "Ir179")
	{
		Z = 77;
		A = 178.95915;
		IC = 0;
	}
	else if (isotope == "Ir180")
	{
		Z = 77;
		A = 179.95925;
		IC = 0;
	}
	else if (isotope == "Ir181")
	{
		Z = 77;
		A = 180.95764;
		IC = 0;
	}
	else if (isotope == "Ir182")
	{
		Z = 77;
		A = 181.95813;
		IC = 0;
	}
	else if (isotope == "Ir183")
	{
		Z = 77;
		A = 182.95681;
		IC = 0;
	}
	else if (isotope == "Ir184")
	{
		Z = 77;
		A = 183.95739;
		IC = 0;
	}
	else if (isotope == "Ir185")
	{
		Z = 77;
		A = 184.95659;
		IC = 0;
	}
	else if (isotope == "Ir186")
	{
		Z = 77;
		A = 185.957951;
		IC = 0;
	}
	else if (isotope == "Ir187")
	{
		Z = 77;
		A = 186.957361;
		IC = 0;
	}
	else if (isotope == "Ir188")
	{
		Z = 77;
		A = 187.958852;
		IC = 0;
	}
	else if (isotope == "Ir189")
	{
		Z = 77;
		A = 188.958716;
		IC = 0;
	}
	else if (isotope == "Ir190")
	{
		Z = 77;
		A = 189.96059;
		IC = 0;
	}
	else if (isotope == "Ir")
	{
		Z = 77;
		A = 192.217;
		IC = 1.0;
	}
	else if (isotope == "Ir191")
	{
		Z = 77;
		A = 190.960591;
		IC = 0.373;
	}
	else if (isotope == "Ir192")
	{
		Z = 77;
		A = 191.962602;
		IC = 0;
	}
	else if (isotope == "Ir193")
	{
		Z = 77;
		A = 192.962924;
		IC = 0.627;
	}
	else if (isotope == "Ir194")
	{
		Z = 77;
		A = 193.965076;
		IC = 0;
	}
	else if (isotope == "Ir195")
	{
		Z = 77;
		A = 194.965977;
		IC = 0;
	}
	else if (isotope == "Ir196")
	{
		Z = 77;
		A = 195.968380;
		IC = 0;
	}
	else if (isotope == "Ir197")
	{
		Z = 77;
		A = 196.969636;
		IC = 0;
	}
	else if (isotope == "Ir198")
	{
		Z = 77;
		A = 197.97228;
		IC = 0;
	}
	else if (isotope == "Ir199")
	{
		Z = 77;
		A = 198.973790;
		IC = 0;
	}
	else if (isotope == "Pt168")
	{
		Z = 78;
		A = 167.98804;
		IC = 0;
	}
	else if (isotope == "Pt169")
	{
		Z = 78;
		A = 168.98642;
		IC = 0;
	}
	else if (isotope == "Pt170")
	{
		Z = 78;
		A = 169.98233;
		IC = 0;
	}
	else if (isotope == "Pt171")
	{
		Z = 78;
		A = 170.98125;
		IC = 0;
	}
	else if (isotope == "Pt172")
	{
		Z = 78;
		A = 171.977380;
		IC = 0;
	}
	else if (isotope == "Pt173")
	{
		Z = 78;
		A = 172.97650;
		IC = 0;
	}
	else if (isotope == "Pt174")
	{
		Z = 78;
		A = 173.972811;
		IC = 0;
	}
	else if (isotope == "Pt175")
	{
		Z = 78;
		A = 174.97228;
		IC = 0;
	}
	else if (isotope == "Pt176")
	{
		Z = 78;
		A = 175.96900;
		IC = 0;
	}
	else if (isotope == "Pt177")
	{
		Z = 78;
		A = 176.96845;
		IC = 0;
	}
	else if (isotope == "Pt178")
	{
		Z = 78;
		A = 177.96571;
		IC = 0;
	}
	else if (isotope == "Pt179")
	{
		Z = 78;
		A = 178.96548;
		IC = 0;
	}
	else if (isotope == "Pt180")
	{
		Z = 78;
		A = 179.96322;
		IC = 0;
	}
	else if (isotope == "Pt181")
	{
		Z = 78;
		A = 180.96318;
		IC = 0;
	}
	else if (isotope == "Pt182")
	{
		Z = 78;
		A = 181.96127;
		IC = 0;
	}
	else if (isotope == "Pt183")
	{
		Z = 78;
		A = 182.96173;
		IC = 0;
	}
	else if (isotope == "Pt184")
	{
		Z = 78;
		A = 183.95990;
		IC = 0;
	}
	else if (isotope == "Pt185")
	{
		Z = 78;
		A = 184.96075;
		IC = 0;
	}
	else if (isotope == "Pt186")
	{
		Z = 78;
		A = 185.959430;
		IC = 0;
	}
	else if (isotope == "Pt187")
	{
		Z = 78;
		A = 186.96056;
		IC = 0;
	}
	else if (isotope == "Pt188")
	{
		Z = 78;
		A = 187.959396;
		IC = 0;
	}
	else if (isotope == "Pt189")
	{
		Z = 78;
		A = 188.960832;
		IC = 0;
	}
	else if (isotope == "Pt")
	{
		Z = 78;
		A = 195.078;
		IC = 1.0;
	}
	else if (isotope == "Pt190")
	{
		Z = 78;
		A = 189.959930;
		IC = 0.00014;
	}
	else if (isotope == "Pt191")
	{
		Z = 78;
		A = 190.961685;
		IC = 0;
	}
	else if (isotope == "Pt192")
	{
		Z = 78;
		A = 191.961035;
		IC = 0.00782;
	}
	else if (isotope == "Pt193")
	{
		Z = 78;
		A = 192.962985;
		IC = 0;
	}
	else if (isotope == "Pt194")
	{
		Z = 78;
		A = 193.962664;
		IC = 0.32967;
	}
	else if (isotope == "Pt195")
	{
		Z = 78;
		A = 194.964774;
		IC = 0.33832;
	}
	else if (isotope == "Pt196")
	{
		Z = 78;
		A = 195.964935;
		IC = 0.25242;
	}
	else if (isotope == "Pt197")
	{
		Z = 78;
		A = 196.967323;
		IC = 0;
	}
	else if (isotope == "Pt198")
	{
		Z = 78;
		A = 197.967876;
		IC = 0.07163;
	}
	else if (isotope == "Pt199")
	{
		Z = 78;
		A = 198.970576;
		IC = 0;
	}
	else if (isotope == "Pt200")
	{
		Z = 78;
		A = 199.971424;
		IC = 0;
	}
	else if (isotope == "Pt201")
	{
		Z = 78;
		A = 200.974500;
		IC = 0;
	}
	else if (isotope == "Pt202")
	{
		Z = 78;
		A = 201.97574;
		IC = 0;
	}
	else if (isotope == "Au171")
	{
		Z = 79;
		A = 170.99177;
		IC = 0;
	}
	else if (isotope == "Au172")
	{
		Z = 79;
		A = 171.99011;
		IC = 0;
	}
	else if (isotope == "Au173")
	{
		Z = 79;
		A = 172.98640;
		IC = 0;
	}
	else if (isotope == "Au174")
	{
		Z = 79;
		A = 173.98492;
		IC = 0;
	}
	else if (isotope == "Au175")
	{
		Z = 79;
		A = 174.98155;
		IC = 0;
	}
	else if (isotope == "Au176")
	{
		Z = 79;
		A = 175.98027;
		IC = 0;
	}
	else if (isotope == "Au177")
	{
		Z = 79;
		A = 176.97722;
		IC = 0;
	}
	else if (isotope == "Au178")
	{
		Z = 79;
		A = 177.97598;
		IC = 0;
	}
	else if (isotope == "Au179")
	{
		Z = 79;
		A = 178.97341;
		IC = 0;
	}
	else if (isotope == "Au180")
	{
		Z = 79;
		A = 179.97240;
		IC = 0;
	}
	else if (isotope == "Au181")
	{
		Z = 79;
		A = 180.96995;
		IC = 0;
	}
	else if (isotope == "Au182")
	{
		Z = 79;
		A = 181.96962;
		IC = 0;
	}
	else if (isotope == "Au183")
	{
		Z = 79;
		A = 182.96762;
		IC = 0;
	}
	else if (isotope == "Au184")
	{
		Z = 79;
		A = 183.96747;
		IC = 0;
	}
	else if (isotope == "Au185")
	{
		Z = 79;
		A = 184.96581;
		IC = 0;
	}
	else if (isotope == "Au186")
	{
		Z = 79;
		A = 185.96600;
		IC = 0;
	}
	else if (isotope == "Au187")
	{
		Z = 79;
		A = 186.96456;
		IC = 0;
	}
	else if (isotope == "Au188")
	{
		Z = 79;
		A = 187.96509;
		IC = 0;
	}
	else if (isotope == "Au189")
	{
		Z = 79;
		A = 188.96389;
		IC = 0;
	}
	else if (isotope == "Au190")
	{
		Z = 79;
		A = 189.964699;
		IC = 0;
	}
	else if (isotope == "Au191")
	{
		Z = 79;
		A = 190.963650;
		IC = 0;
	}
	else if (isotope == "Au192")
	{
		Z = 79;
		A = 191.964810;
		IC = 0;
	}
	else if (isotope == "Au193")
	{
		Z = 79;
		A = 192.964132;
		IC = 0;
	}
	else if (isotope == "Au194")
	{
		Z = 79;
		A = 193.965339;
		IC = 0;
	}
	else if (isotope == "Au195")
	{
		Z = 79;
		A = 194.965018;
		IC = 0;
	}
	else if (isotope == "Au196")
	{
		Z = 79;
		A = 195.966551;
		IC = 0;
	}
	else if (isotope == "Au")
	{
		Z = 79;
		A = 196.96655;
		IC = 1.0;
	}
	else if (isotope == "Au197")
	{
		Z = 79;
		A = 196.966552;
		IC = 1;
	}
	else if (isotope == "Au198")
	{
		Z = 79;
		A = 197.968225;
		IC = 0;
	}
	else if (isotope == "Au199")
	{
		Z = 79;
		A = 198.968748;
		IC = 0;
	}
	else if (isotope == "Au200")
	{
		Z = 79;
		A = 199.970720;
		IC = 0;
	}
	else if (isotope == "Au201")
	{
		Z = 79;
		A = 200.971641;
		IC = 0;
	}
	else if (isotope == "Au202")
	{
		Z = 79;
		A = 201.97379;
		IC = 0;
	}
	else if (isotope == "Au203")
	{
		Z = 79;
		A = 202.975137;
		IC = 0;
	}
	else if (isotope == "Au204")
	{
		Z = 79;
		A = 203.97771;
		IC = 0;
	}
	else if (isotope == "Au205")
	{
		Z = 79;
		A = 204.97961;
		IC = 0;
	}
	else if (isotope == "Hg175")
	{
		Z = 80;
		A = 174.99141;
		IC = 0;
	}
	else if (isotope == "Hg176")
	{
		Z = 80;
		A = 175.987410;
		IC = 0;
	}
	else if (isotope == "Hg177")
	{
		Z = 80;
		A = 176.98634;
		IC = 0;
	}
	else if (isotope == "Hg178")
	{
		Z = 80;
		A = 177.982476;
		IC = 0;
	}
	else if (isotope == "Hg179")
	{
		Z = 80;
		A = 178.98178;
		IC = 0;
	}
	else if (isotope == "Hg180")
	{
		Z = 80;
		A = 179.97832;
		IC = 0;
	}
	else if (isotope == "Hg181")
	{
		Z = 80;
		A = 180.97781;
		IC = 0;
	}
	else if (isotope == "Hg182")
	{
		Z = 80;
		A = 181.97475;
		IC = 0;
	}
	else if (isotope == "Hg183")
	{
		Z = 80;
		A = 182.97456;
		IC = 0;
	}
	else if (isotope == "Hg184")
	{
		Z = 80;
		A = 183.97190;
		IC = 0;
	}
	else if (isotope == "Hg185")
	{
		Z = 80;
		A = 184.97198;
		IC = 0;
	}
	else if (isotope == "Hg186")
	{
		Z = 80;
		A = 185.96946;
		IC = 0;
	}
	else if (isotope == "Hg187")
	{
		Z = 80;
		A = 186.96979;
		IC = 0;
	}
	else if (isotope == "Hg188")
	{
		Z = 80;
		A = 187.96756;
		IC = 0;
	}
	else if (isotope == "Hg189")
	{
		Z = 80;
		A = 188.96813;
		IC = 0;
	}
	else if (isotope == "Hg190")
	{
		Z = 80;
		A = 189.96628;
		IC = 0;
	}
	else if (isotope == "Hg191")
	{
		Z = 80;
		A = 190.967060;
		IC = 0;
	}
	else if (isotope == "Hg192")
	{
		Z = 80;
		A = 191.96557;
		IC = 0;
	}
	else if (isotope == "Hg193")
	{
		Z = 80;
		A = 192.966644;
		IC = 0;
	}
	else if (isotope == "Hg194")
	{
		Z = 80;
		A = 193.965382;
		IC = 0;
	}
	else if (isotope == "Hg195")
	{
		Z = 80;
		A = 194.966640;
		IC = 0;
	}
	else if (isotope == "Hg")
	{
		Z = 80;
		A = 200.59;
		IC = 1.0;
	}
	else if (isotope == "Hg196")
	{
		Z = 80;
		A = 195.965815;
		IC = 0.0015;
	}
	else if (isotope == "Hg197")
	{
		Z = 80;
		A = 196.967195;
		IC = 0;
	}
	else if (isotope == "Hg198")
	{
		Z = 80;
		A = 197.966752;
		IC = 0.0997;
	}
	else if (isotope == "Hg199")
	{
		Z = 80;
		A = 198.968262;
		IC = 0.1687;
	}
	else if (isotope == "Hg200")
	{
		Z = 80;
		A = 199.968309;
		IC = 0.231;
	}
	else if (isotope == "Hg201")
	{
		Z = 80;
		A = 200.970285;
		IC = 0.1318;
	}
	else if (isotope == "Hg202")
	{
		Z = 80;
		A = 201.970626;
		IC = 0.2986;
	}
	else if (isotope == "Hg203")
	{
		Z = 80;
		A = 202.972857;
		IC = 0;
	}
	else if (isotope == "Hg204")
	{
		Z = 80;
		A = 203.973476;
		IC = 0.0687;
	}
	else if (isotope == "Hg205")
	{
		Z = 80;
		A = 204.976056;
		IC = 0;
	}
	else if (isotope == "Hg206")
	{
		Z = 80;
		A = 205.977499;
		IC = 0;
	}
	else if (isotope == "Hg207")
	{
		Z = 80;
		A = 206.98258;
		IC = 0;
	}
	else if (isotope == "Hg208")
	{
		Z = 80;
		A = 207.98594;
		IC = 0;
	}
	else if (isotope == "Tl177")
	{
		Z = 81;
		A = 176.99688;
		IC = 0;
	}
	else if (isotope == "Tl178")
	{
		Z = 81;
		A = 177.99523;
		IC = 0;
	}
	else if (isotope == "Tl179")
	{
		Z = 81;
		A = 178.99147;
		IC = 0;
	}
	else if (isotope == "Tl180")
	{
		Z = 81;
		A = 179.99019;
		IC = 0;
	}
	else if (isotope == "Tl181")
	{
		Z = 81;
		A = 180.98690;
		IC = 0;
	}
	else if (isotope == "Tl182")
	{
		Z = 81;
		A = 181.98561;
		IC = 0;
	}
	else if (isotope == "Tl183")
	{
		Z = 81;
		A = 182.98270;
		IC = 0;
	}
	else if (isotope == "Tl184")
	{
		Z = 81;
		A = 183.98176;
		IC = 0;
	}
	else if (isotope == "Tl185")
	{
		Z = 81;
		A = 184.97910;
		IC = 0;
	}
	else if (isotope == "Tl186")
	{
		Z = 81;
		A = 185.97855;
		IC = 0;
	}
	else if (isotope == "Tl187")
	{
		Z = 81;
		A = 186.97617;
		IC = 0;
	}
	else if (isotope == "Tl188")
	{
		Z = 81;
		A = 187.97592;
		IC = 0;
	}
	else if (isotope == "Tl189")
	{
		Z = 81;
		A = 188.97369;
		IC = 0;
	}
	else if (isotope == "Tl190")
	{
		Z = 81;
		A = 189.97379;
		IC = 0;
	}
	else if (isotope == "Tl191")
	{
		Z = 81;
		A = 190.97189;
		IC = 0;
	}
	else if (isotope == "Tl192")
	{
		Z = 81;
		A = 191.97214;
		IC = 0;
	}
	else if (isotope == "Tl193")
	{
		Z = 81;
		A = 192.97055;
		IC = 0;
	}
	else if (isotope == "Tl194")
	{
		Z = 81;
		A = 193.97105;
		IC = 0;
	}
	else if (isotope == "Tl195")
	{
		Z = 81;
		A = 194.96965;
		IC = 0;
	}
	else if (isotope == "Tl196")
	{
		Z = 81;
		A = 195.97052;
		IC = 0;
	}
	else if (isotope == "Tl197")
	{
		Z = 81;
		A = 196.969540;
		IC = 0;
	}
	else if (isotope == "Tl198")
	{
		Z = 81;
		A = 197.970470;
		IC = 0;
	}
	else if (isotope == "Tl199")
	{
		Z = 81;
		A = 198.96981;
		IC = 0;
	}
	else if (isotope == "Tl200")
	{
		Z = 81;
		A = 199.970945;
		IC = 0;
	}
	else if (isotope == "Tl201")
	{
		Z = 81;
		A = 200.970804;
		IC = 0;
	}
	else if (isotope == "Tl202")
	{
		Z = 81;
		A = 201.972091;
		IC = 0;
	}
	else if (isotope == "Tl")
	{
		Z = 81;
		A = 204.3833;
		IC = 1.0;
	}
	else if (isotope == "Tl203")
	{
		Z = 81;
		A = 202.972329;
		IC = 0.29524;
	}
	else if (isotope == "Tl204")
	{
		Z = 81;
		A = 203.973849;
		IC = 0;
	}
	else if (isotope == "Tl205")
	{
		Z = 81;
		A = 204.974412;
		IC = 0.70476;
	}
	else if (isotope == "Tl206")
	{
		Z = 81;
		A = 205.976095;
		IC = 0;
	}
	else if (isotope == "Tl207")
	{
		Z = 81;
		A = 206.977408;
		IC = 0;
	}
	else if (isotope == "Tl208")
	{
		Z = 81;
		A = 207.982005;
		IC = 0;
	}
	else if (isotope == "Tl209")
	{
		Z = 81;
		A = 208.985349;
		IC = 0;
	}
	else if (isotope == "Tl210")
	{
		Z = 81;
		A = 209.990066;
		IC = 0;
	}
	else if (isotope == "Pb181")
	{
		Z = 82;
		A = 180.99671;
		IC = 0;
	}
	else if (isotope == "Pb182")
	{
		Z = 82;
		A = 181.992676;
		IC = 0;
	}
	else if (isotope == "Pb183")
	{
		Z = 82;
		A = 182.99193;
		IC = 0;
	}
	else if (isotope == "Pb184")
	{
		Z = 82;
		A = 183.98820;
		IC = 0;
	}
	else if (isotope == "Pb185")
	{
		Z = 82;
		A = 184.98758;
		IC = 0;
	}
	else if (isotope == "Pb186")
	{
		Z = 82;
		A = 185.98430;
		IC = 0;
	}
	else if (isotope == "Pb187")
	{
		Z = 82;
		A = 186.98403;
		IC = 0;
	}
	else if (isotope == "Pb188")
	{
		Z = 82;
		A = 187.98106;
		IC = 0;
	}
	else if (isotope == "Pb189")
	{
		Z = 82;
		A = 188.98088;
		IC = 0;
	}
	else if (isotope == "Pb190")
	{
		Z = 82;
		A = 189.97818;
		IC = 0;
	}
	else if (isotope == "Pb191")
	{
		Z = 82;
		A = 190.97820;
		IC = 0;
	}
	else if (isotope == "Pb192")
	{
		Z = 82;
		A = 191.97576;
		IC = 0;
	}
	else if (isotope == "Pb193")
	{
		Z = 82;
		A = 192.97608;
		IC = 0;
	}
	else if (isotope == "Pb194")
	{
		Z = 82;
		A = 193.97397;
		IC = 0;
	}
	else if (isotope == "Pb195")
	{
		Z = 82;
		A = 194.97447;
		IC = 0;
	}
	else if (isotope == "Pb196")
	{
		Z = 82;
		A = 195.97271;
		IC = 0;
	}
	else if (isotope == "Pb197")
	{
		Z = 82;
		A = 196.97338;
		IC = 0;
	}
	else if (isotope == "Pb198")
	{
		Z = 82;
		A = 197.97198;
		IC = 0;
	}
	else if (isotope == "Pb199")
	{
		Z = 82;
		A = 198.972910;
		IC = 0;
	}
	else if (isotope == "Pb200")
	{
		Z = 82;
		A = 199.971816;
		IC = 0;
	}
	else if (isotope == "Pb201")
	{
		Z = 82;
		A = 200.972850;
		IC = 0;
	}
	else if (isotope == "Pb202")
	{
		Z = 82;
		A = 201.972144;
		IC = 0;
	}
	else if (isotope == "Pb203")
	{
		Z = 82;
		A = 202.973375;
		IC = 0;
	}
	else if (isotope == "Pb")
	{
		Z = 82;
		A = 207.2;
		IC = 1.0;
	}
	else if (isotope == "Pb204")
	{
		Z = 82;
		A = 203.973029;
		IC = 0.014;
	}
	else if (isotope == "Pb205")
	{
		Z = 82;
		A = 204.974467;
		IC = 0;
	}
	else if (isotope == "Pb206")
	{
		Z = 82;
		A = 205.974449;
		IC = 0.241;
	}
	else if (isotope == "Pb207")
	{
		Z = 82;
		A = 206.975881;
		IC = 0.221;
	}
	else if (isotope == "Pb208")
	{
		Z = 82;
		A = 207.976636;
		IC = 0.524;
	}
	else if (isotope == "Pb209")
	{
		Z = 82;
		A = 208.981075;
		IC = 0;
	}
	else if (isotope == "Pb210")
	{
		Z = 82;
		A = 209.984173;
		IC = 0;
	}
	else if (isotope == "Pb211")
	{
		Z = 82;
		A = 210.988731;
		IC = 0;
	}
	else if (isotope == "Pb212")
	{
		Z = 82;
		A = 211.9918875;
		IC = 0;
	}
	else if (isotope == "Pb213")
	{
		Z = 82;
		A = 212.99650;
		IC = 0;
	}
	else if (isotope == "Pb214")
	{
		Z = 82;
		A = 213.9997981;
		IC = 0;
	}
	else if (isotope == "Bi185")
	{
		Z = 83;
		A = 184.99771;
		IC = 0;
	}
	else if (isotope == "Bi186")
	{
		Z = 83;
		A = 185.99648;
		IC = 0;
	}
	else if (isotope == "Bi187")
	{
		Z = 83;
		A = 186.99346;
		IC = 0;
	}
	else if (isotope == "Bi188")
	{
		Z = 83;
		A = 187.99217;
		IC = 0;
	}
	else if (isotope == "Bi189")
	{
		Z = 83;
		A = 188.98951;
		IC = 0;
	}
	else if (isotope == "Bi190")
	{
		Z = 83;
		A = 189.98852;
		IC = 0;
	}
	else if (isotope == "Bi191")
	{
		Z = 83;
		A = 190.98605;
		IC = 0;
	}
	else if (isotope == "Bi192")
	{
		Z = 83;
		A = 191.98537;
		IC = 0;
	}
	else if (isotope == "Bi193")
	{
		Z = 83;
		A = 192.98306;
		IC = 0;
	}
	else if (isotope == "Bi194")
	{
		Z = 83;
		A = 193.98275;
		IC = 0;
	}
	else if (isotope == "Bi195")
	{
		Z = 83;
		A = 194.98075;
		IC = 0;
	}
	else if (isotope == "Bi196")
	{
		Z = 83;
		A = 195.98061;
		IC = 0;
	}
	else if (isotope == "Bi197")
	{
		Z = 83;
		A = 196.97893;
		IC = 0;
	}
	else if (isotope == "Bi198")
	{
		Z = 83;
		A = 197.97902;
		IC = 0;
	}
	else if (isotope == "Bi199")
	{
		Z = 83;
		A = 198.97758;
		IC = 0;
	}
	else if (isotope == "Bi200")
	{
		Z = 83;
		A = 199.97814;
		IC = 0;
	}
	else if (isotope == "Bi201")
	{
		Z = 83;
		A = 200.976970;
		IC = 0;
	}
	else if (isotope == "Bi202")
	{
		Z = 83;
		A = 201.977670;
		IC = 0;
	}
	else if (isotope == "Bi203")
	{
		Z = 83;
		A = 202.976868;
		IC = 0;
	}
	else if (isotope == "Bi204")
	{
		Z = 83;
		A = 203.977805;
		IC = 0;
	}
	else if (isotope == "Bi205")
	{
		Z = 83;
		A = 204.977375;
		IC = 0;
	}
	else if (isotope == "Bi206")
	{
		Z = 83;
		A = 205.978483;
		IC = 0;
	}
	else if (isotope == "Bi207")
	{
		Z = 83;
		A = 206.978455;
		IC = 0;
	}
	else if (isotope == "Bi208")
	{
		Z = 83;
		A = 207.979727;
		IC = 0;
	}
	else if (isotope == "Bi")
	{
		Z = 83;
		A = 208.98038;
		IC = 1.0;
	}
	else if (isotope == "Bi209")
	{
		Z = 83;
		A = 208.980383;
		IC = 1;
	}
	else if (isotope == "Bi210")
	{
		Z = 83;
		A = 209.984105;
		IC = 0;
	}
	else if (isotope == "Bi211")
	{
		Z = 83;
		A = 210.987258;
		IC = 0;
	}
	else if (isotope == "Bi212")
	{
		Z = 83;
		A = 211.991272;
		IC = 0;
	}
	else if (isotope == "Bi213")
	{
		Z = 83;
		A = 212.994375;
		IC = 0;
	}
	else if (isotope == "Bi214")
	{
		Z = 83;
		A = 213.998699;
		IC = 0;
	}
	else if (isotope == "Bi215")
	{
		Z = 83;
		A = 215.00183;
		IC = 0;
	}
	else if (isotope == "Bi216")
	{
		Z = 83;
		A = 216.00620;
		IC = 0;
	}
	else if (isotope == "Po190")
	{
		Z = 84;
		A = 189.99511;
		IC = 0;
	}
	else if (isotope == "Po191")
	{
		Z = 84;
		A = 190.99465;
		IC = 0;
	}
	else if (isotope == "Po192")
	{
		Z = 84;
		A = 191.99152;
		IC = 0;
	}
	else if (isotope == "Po193")
	{
		Z = 84;
		A = 192.99110;
		IC = 0;
	}
	else if (isotope == "Po194")
	{
		Z = 84;
		A = 193.98828;
		IC = 0;
	}
	else if (isotope == "Po195")
	{
		Z = 84;
		A = 194.98805;
		IC = 0;
	}
	else if (isotope == "Po196")
	{
		Z = 84;
		A = 195.98551;
		IC = 0;
	}
	else if (isotope == "Po197")
	{
		Z = 84;
		A = 196.98557;
		IC = 0;
	}
	else if (isotope == "Po198")
	{
		Z = 84;
		A = 197.98334;
		IC = 0;
	}
	else if (isotope == "Po199")
	{
		Z = 84;
		A = 198.98360;
		IC = 0;
	}
	else if (isotope == "Po200")
	{
		Z = 84;
		A = 199.98174;
		IC = 0;
	}
	else if (isotope == "Po201")
	{
		Z = 84;
		A = 200.98221;
		IC = 0;
	}
	else if (isotope == "Po202")
	{
		Z = 84;
		A = 201.98070;
		IC = 0;
	}
	else if (isotope == "Po203")
	{
		Z = 84;
		A = 202.981410;
		IC = 0;
	}
	else if (isotope == "Po204")
	{
		Z = 84;
		A = 203.980307;
		IC = 0;
	}
	else if (isotope == "Po205")
	{
		Z = 84;
		A = 204.981170;
		IC = 0;
	}
	else if (isotope == "Po206")
	{
		Z = 84;
		A = 205.980465;
		IC = 0;
	}
	else if (isotope == "Po207")
	{
		Z = 84;
		A = 206.981578;
		IC = 0;
	}
	else if (isotope == "Po208")
	{
		Z = 84;
		A = 207.981231;
		IC = 0;
	}
	else if (isotope == "Po209")
	{
		Z = 84;
		A = 208.982416;
		IC = 0;
	}
	else if (isotope == "Po210")
	{
		Z = 84;
		A = 209.982857;
		IC = 0;
	}
	else if (isotope == "Po211")
	{
		Z = 84;
		A = 210.986637;
		IC = 0;
	}
	else if (isotope == "Po212")
	{
		Z = 84;
		A = 211.988852;
		IC = 0;
	}
	else if (isotope == "Po213")
	{
		Z = 84;
		A = 212.992843;
		IC = 0;
	}
	else if (isotope == "Po214")
	{
		Z = 84;
		A = 213.995186;
		IC = 0;
	}
	else if (isotope == "Po215")
	{
		Z = 84;
		A = 214.999415;
		IC = 0;
	}
	else if (isotope == "Po216")
	{
		Z = 84;
		A = 216.0019052;
		IC = 0;
	}
	else if (isotope == "Po217")
	{
		Z = 84;
		A = 217.00625;
		IC = 0;
	}
	else if (isotope == "Po218")
	{
		Z = 84;
		A = 218.0089658;
		IC = 0;
	}
	else if (isotope == "At193")
	{
		Z = 85;
		A = 193.00019;
		IC = 0;
	}
	else if (isotope == "At194")
	{
		Z = 85;
		A = 193.99897;
		IC = 0;
	}
	else if (isotope == "At195")
	{
		Z = 85;
		A = 194.99655;
		IC = 0;
	}
	else if (isotope == "At196")
	{
		Z = 85;
		A = 195.99570;
		IC = 0;
	}
	else if (isotope == "At197")
	{
		Z = 85;
		A = 196.99329;
		IC = 0;
	}
	else if (isotope == "At198")
	{
		Z = 85;
		A = 197.99275;
		IC = 0;
	}
	else if (isotope == "At199")
	{
		Z = 85;
		A = 198.99063;
		IC = 0;
	}
	else if (isotope == "At200")
	{
		Z = 85;
		A = 199.99029;
		IC = 0;
	}
	else if (isotope == "At201")
	{
		Z = 85;
		A = 200.98849;
		IC = 0;
	}
	else if (isotope == "At202")
	{
		Z = 85;
		A = 201.98845;
		IC = 0;
	}
	else if (isotope == "At203")
	{
		Z = 85;
		A = 202.98685;
		IC = 0;
	}
	else if (isotope == "At204")
	{
		Z = 85;
		A = 203.98726;
		IC = 0;
	}
	else if (isotope == "At205")
	{
		Z = 85;
		A = 204.986040;
		IC = 0;
	}
	else if (isotope == "At206")
	{
		Z = 85;
		A = 205.986600;
		IC = 0;
	}
	else if (isotope == "At207")
	{
		Z = 85;
		A = 206.985776;
		IC = 0;
	}
	else if (isotope == "At208")
	{
		Z = 85;
		A = 207.986583;
		IC = 0;
	}
	else if (isotope == "At209")
	{
		Z = 85;
		A = 208.986159;
		IC = 0;
	}
	else if (isotope == "At210")
	{
		Z = 85;
		A = 209.987131;
		IC = 0;
	}
	else if (isotope == "At211")
	{
		Z = 85;
		A = 210.987481;
		IC = 0;
	}
	else if (isotope == "At212")
	{
		Z = 85;
		A = 211.990735;
		IC = 0;
	}
	else if (isotope == "At213")
	{
		Z = 85;
		A = 212.992921;
		IC = 0;
	}
	else if (isotope == "At214")
	{
		Z = 85;
		A = 213.996356;
		IC = 0;
	}
	else if (isotope == "At215")
	{
		Z = 85;
		A = 214.998641;
		IC = 0;
	}
	else if (isotope == "At216")
	{
		Z = 85;
		A = 216.002409;
		IC = 0;
	}
	else if (isotope == "At217")
	{
		Z = 85;
		A = 217.004710;
		IC = 0;
	}
	else if (isotope == "At218")
	{
		Z = 85;
		A = 218.008681;
		IC = 0;
	}
	else if (isotope == "At219")
	{
		Z = 85;
		A = 219.011300;
		IC = 0;
	}
	else if (isotope == "At220")
	{
		Z = 85;
		A = 220.01530;
		IC = 0;
	}
	else if (isotope == "At221")
	{
		Z = 85;
		A = 221.01814;
		IC = 0;
	}
	else if (isotope == "At222")
	{
		Z = 85;
		A = 222.02233;
		IC = 0;
	}
	else if (isotope == "At223")
	{
		Z = 85;
		A = 223.02534;
		IC = 0;
	}
	else if (isotope == "Rn196")
	{
		Z = 86;
		A = 196.00231;
		IC = 0;
	}
	else if (isotope == "Rn197")
	{
		Z = 86;
		A = 197.00166;
		IC = 0;
	}
	else if (isotope == "Rn198")
	{
		Z = 86;
		A = 197.99878;
		IC = 0;
	}
	else if (isotope == "Rn199")
	{
		Z = 86;
		A = 198.99831;
		IC = 0;
	}
	else if (isotope == "Rn200")
	{
		Z = 86;
		A = 199.99568;
		IC = 0;
	}
	else if (isotope == "Rn201")
	{
		Z = 86;
		A = 200.99554;
		IC = 0;
	}
	else if (isotope == "Rn202")
	{
		Z = 86;
		A = 201.99322;
		IC = 0;
	}
	else if (isotope == "Rn203")
	{
		Z = 86;
		A = 202.99332;
		IC = 0;
	}
	else if (isotope == "Rn204")
	{
		Z = 86;
		A = 203.99137;
		IC = 0;
	}
	else if (isotope == "Rn205")
	{
		Z = 86;
		A = 204.99167;
		IC = 0;
	}
	else if (isotope == "Rn206")
	{
		Z = 86;
		A = 205.99016;
		IC = 0;
	}
	else if (isotope == "Rn207")
	{
		Z = 86;
		A = 206.990730;
		IC = 0;
	}
	else if (isotope == "Rn208")
	{
		Z = 86;
		A = 207.989631;
		IC = 0;
	}
	else if (isotope == "Rn209")
	{
		Z = 86;
		A = 208.990380;
		IC = 0;
	}
	else if (isotope == "Rn210")
	{
		Z = 86;
		A = 209.989680;
		IC = 0;
	}
	else if (isotope == "Rn211")
	{
		Z = 86;
		A = 210.990585;
		IC = 0;
	}
	else if (isotope == "Rn212")
	{
		Z = 86;
		A = 211.990689;
		IC = 0;
	}
	else if (isotope == "Rn213")
	{
		Z = 86;
		A = 212.993868;
		IC = 0;
	}
	else if (isotope == "Rn214")
	{
		Z = 86;
		A = 213.995346;
		IC = 0;
	}
	else if (isotope == "Rn215")
	{
		Z = 86;
		A = 214.998729;
		IC = 0;
	}
	else if (isotope == "Rn216")
	{
		Z = 86;
		A = 216.000258;
		IC = 0;
	}
	else if (isotope == "Rn217")
	{
		Z = 86;
		A = 217.003915;
		IC = 0;
	}
	else if (isotope == "Rn218")
	{
		Z = 86;
		A = 218.005586;
		IC = 0;
	}
	else if (isotope == "Rn219")
	{
		Z = 86;
		A = 219.009475;
		IC = 0;
	}
	else if (isotope == "Rn220")
	{
		Z = 86;
		A = 220.0113841;
		IC = 0;
	}
	else if (isotope == "Rn221")
	{
		Z = 86;
		A = 221.01546;
		IC = 0;
	}
	else if (isotope == "Rn222")
	{
		Z = 86;
		A = 222.0175705;
		IC = 0;
	}
	else if (isotope == "Rn223")
	{
		Z = 86;
		A = 223.02179;
		IC = 0;
	}
	else if (isotope == "Rn224")
	{
		Z = 86;
		A = 224.02409;
		IC = 0;
	}
	else if (isotope == "Rn225")
	{
		Z = 86;
		A = 225.02844;
		IC = 0;
	}
	else if (isotope == "Rn226")
	{
		Z = 86;
		A = 226.03089;
		IC = 0;
	}
	else if (isotope == "Rn227")
	{
		Z = 86;
		A = 227.03541;
		IC = 0;
	}
	else if (isotope == "Rn228")
	{
		Z = 86;
		A = 228.03808;
		IC = 0;
	}
	else if (isotope == "Fr200")
	{
		Z = 87;
		A = 200.00650;
		IC = 0;
	}
	else if (isotope == "Fr201")
	{
		Z = 87;
		A = 201.00399;
		IC = 0;
	}
	else if (isotope == "Fr202")
	{
		Z = 87;
		A = 202.00329;
		IC = 0;
	}
	else if (isotope == "Fr203")
	{
		Z = 87;
		A = 203.00105;
		IC = 0;
	}
	else if (isotope == "Fr204")
	{
		Z = 87;
		A = 204.00059;
		IC = 0;
	}
	else if (isotope == "Fr205")
	{
		Z = 87;
		A = 204.99866;
		IC = 0;
	}
	else if (isotope == "Fr206")
	{
		Z = 87;
		A = 205.99849;
		IC = 0;
	}
	else if (isotope == "Fr207")
	{
		Z = 87;
		A = 206.99686;
		IC = 0;
	}
	else if (isotope == "Fr208")
	{
		Z = 87;
		A = 207.997130;
		IC = 0;
	}
	else if (isotope == "Fr209")
	{
		Z = 87;
		A = 208.995920;
		IC = 0;
	}
	else if (isotope == "Fr210")
	{
		Z = 87;
		A = 209.996398;
		IC = 0;
	}
	else if (isotope == "Fr211")
	{
		Z = 87;
		A = 210.995529;
		IC = 0;
	}
	else if (isotope == "Fr212")
	{
		Z = 87;
		A = 211.996195;
		IC = 0;
	}
	else if (isotope == "Fr213")
	{
		Z = 87;
		A = 212.996175;
		IC = 0;
	}
	else if (isotope == "Fr214")
	{
		Z = 87;
		A = 213.998955;
		IC = 0;
	}
	else if (isotope == "Fr215")
	{
		Z = 87;
		A = 215.000326;
		IC = 0;
	}
	else if (isotope == "Fr216")
	{
		Z = 87;
		A = 216.003188;
		IC = 0;
	}
	else if (isotope == "Fr217")
	{
		Z = 87;
		A = 217.004616;
		IC = 0;
	}
	else if (isotope == "Fr218")
	{
		Z = 87;
		A = 218.007563;
		IC = 0;
	}
	else if (isotope == "Fr219")
	{
		Z = 87;
		A = 219.009241;
		IC = 0;
	}
	else if (isotope == "Fr220")
	{
		Z = 87;
		A = 220.012313;
		IC = 0;
	}
	else if (isotope == "Fr221")
	{
		Z = 87;
		A = 221.014246;
		IC = 0;
	}
	else if (isotope == "Fr222")
	{
		Z = 87;
		A = 222.017544;
		IC = 0;
	}
	else if (isotope == "Fr223")
	{
		Z = 87;
		A = 223.0197307;
		IC = 0;
	}
	else if (isotope == "Fr224")
	{
		Z = 87;
		A = 224.023240;
		IC = 0;
	}
	else if (isotope == "Fr225")
	{
		Z = 87;
		A = 225.025607;
		IC = 0;
	}
	else if (isotope == "Fr226")
	{
		Z = 87;
		A = 226.02934;
		IC = 0;
	}
	else if (isotope == "Fr227")
	{
		Z = 87;
		A = 227.03183;
		IC = 0;
	}
	else if (isotope == "Fr228")
	{
		Z = 87;
		A = 228.03572;
		IC = 0;
	}
	else if (isotope == "Fr229")
	{
		Z = 87;
		A = 229.03843;
		IC = 0;
	}
	else if (isotope == "Fr230")
	{
		Z = 87;
		A = 230.04251;
		IC = 0;
	}
	else if (isotope == "Fr231")
	{
		Z = 87;
		A = 231.04541;
		IC = 0;
	}
	else if (isotope == "Fr232")
	{
		Z = 87;
		A = 232.04965;
		IC = 0;
	}
	else if (isotope == "Ra203")
	{
		Z = 88;
		A = 203.00921;
		IC = 0;
	}
	else if (isotope == "Ra204")
	{
		Z = 88;
		A = 204.00648;
		IC = 0;
	}
	else if (isotope == "Ra205")
	{
		Z = 88;
		A = 205.00619;
		IC = 0;
	}
	else if (isotope == "Ra206")
	{
		Z = 88;
		A = 206.00378;
		IC = 0;
	}
	else if (isotope == "Ra207")
	{
		Z = 88;
		A = 207.00373;
		IC = 0;
	}
	else if (isotope == "Ra208")
	{
		Z = 88;
		A = 208.00178;
		IC = 0;
	}
	else if (isotope == "Ra209")
	{
		Z = 88;
		A = 209.00194;
		IC = 0;
	}
	else if (isotope == "Ra210")
	{
		Z = 88;
		A = 210.00045;
		IC = 0;
	}
	else if (isotope == "Ra211")
	{
		Z = 88;
		A = 211.000890;
		IC = 0;
	}
	else if (isotope == "Ra212")
	{
		Z = 88;
		A = 211.999783;
		IC = 0;
	}
	else if (isotope == "Ra213")
	{
		Z = 88;
		A = 213.000350;
		IC = 0;
	}
	else if (isotope == "Ra214")
	{
		Z = 88;
		A = 214.000091;
		IC = 0;
	}
	else if (isotope == "Ra215")
	{
		Z = 88;
		A = 215.002704;
		IC = 0;
	}
	else if (isotope == "Ra216")
	{
		Z = 88;
		A = 216.003518;
		IC = 0;
	}
	else if (isotope == "Ra217")
	{
		Z = 88;
		A = 217.006306;
		IC = 0;
	}
	else if (isotope == "Ra218")
	{
		Z = 88;
		A = 218.007124;
		IC = 0;
	}
	else if (isotope == "Ra219")
	{
		Z = 88;
		A = 219.010069;
		IC = 0;
	}
	else if (isotope == "Ra220")
	{
		Z = 88;
		A = 220.011015;
		IC = 0;
	}
	else if (isotope == "Ra221")
	{
		Z = 88;
		A = 221.013908;
		IC = 0;
	}
	else if (isotope == "Ra222")
	{
		Z = 88;
		A = 222.015362;
		IC = 0;
	}
	else if (isotope == "Ra223")
	{
		Z = 88;
		A = 223.018497;
		IC = 0;
	}
	else if (isotope == "Ra224")
	{
		Z = 88;
		A = 224.0202020;
		IC = 0;
	}
	else if (isotope == "Ra225")
	{
		Z = 88;
		A = 225.023604;
		IC = 0;
	}
	else if (isotope == "Ra226")
	{
		Z = 88;
		A = 226.0254026;
		IC = 0;
	}
	else if (isotope == "Ra227")
	{
		Z = 88;
		A = 227.0291707;
		IC = 0;
	}
	else if (isotope == "Ra228")
	{
		Z = 88;
		A = 228.0310641;
		IC = 0;
	}
	else if (isotope == "Ra229")
	{
		Z = 88;
		A = 229.034820;
		IC = 0;
	}
	else if (isotope == "Ra230")
	{
		Z = 88;
		A = 230.037080;
		IC = 0;
	}
	else if (isotope == "Ra231")
	{
		Z = 88;
		A = 231.04122;
		IC = 0;
	}
	else if (isotope == "Ra232")
	{
		Z = 88;
		A = 232.04369;
		IC = 0;
	}
	else if (isotope == "Ra233")
	{
		Z = 88;
		A = 233.04800;
		IC = 0;
	}
	else if (isotope == "Ra234")
	{
		Z = 88;
		A = 234.05055;
		IC = 0;
	}
	else if (isotope == "Ac207")
	{
		Z = 89;
		A = 207.01209;
		IC = 0;
	}
	else if (isotope == "Ac208")
	{
		Z = 89;
		A = 208.01149;
		IC = 0;
	}
	else if (isotope == "Ac209")
	{
		Z = 89;
		A = 209.00957;
		IC = 0;
	}
	else if (isotope == "Ac210")
	{
		Z = 89;
		A = 210.00926;
		IC = 0;
	}
	else if (isotope == "Ac211")
	{
		Z = 89;
		A = 211.00765;
		IC = 0;
	}
	else if (isotope == "Ac212")
	{
		Z = 89;
		A = 212.00781;
		IC = 0;
	}
	else if (isotope == "Ac213")
	{
		Z = 89;
		A = 213.006570;
		IC = 0;
	}
	else if (isotope == "Ac214")
	{
		Z = 89;
		A = 214.006890;
		IC = 0;
	}
	else if (isotope == "Ac215")
	{
		Z = 89;
		A = 215.006450;
		IC = 0;
	}
	else if (isotope == "Ac216")
	{
		Z = 89;
		A = 216.008721;
		IC = 0;
	}
	else if (isotope == "Ac217")
	{
		Z = 89;
		A = 217.009333;
		IC = 0;
	}
	else if (isotope == "Ac218")
	{
		Z = 89;
		A = 218.011630;
		IC = 0;
	}
	else if (isotope == "Ac219")
	{
		Z = 89;
		A = 219.012400;
		IC = 0;
	}
	else if (isotope == "Ac220")
	{
		Z = 89;
		A = 220.014750;
		IC = 0;
	}
	else if (isotope == "Ac221")
	{
		Z = 89;
		A = 221.015580;
		IC = 0;
	}
	else if (isotope == "Ac222")
	{
		Z = 89;
		A = 222.017829;
		IC = 0;
	}
	else if (isotope == "Ac223")
	{
		Z = 89;
		A = 223.019126;
		IC = 0;
	}
	else if (isotope == "Ac224")
	{
		Z = 89;
		A = 224.021708;
		IC = 0;
	}
	else if (isotope == "Ac225")
	{
		Z = 89;
		A = 225.023221;
		IC = 0;
	}
	else if (isotope == "Ac226")
	{
		Z = 89;
		A = 226.026090;
		IC = 0;
	}
	else if (isotope == "Ac227")
	{
		Z = 89;
		A = 227.0277470;
		IC = 0;
	}
	else if (isotope == "Ac228")
	{
		Z = 89;
		A = 228.0310148;
		IC = 0;
	}
	else if (isotope == "Ac229")
	{
		Z = 89;
		A = 229.032930;
		IC = 0;
	}
	else if (isotope == "Ac230")
	{
		Z = 89;
		A = 230.03603;
		IC = 0;
	}
	else if (isotope == "Ac231")
	{
		Z = 89;
		A = 231.03855;
		IC = 0;
	}
	else if (isotope == "Ac232")
	{
		Z = 89;
		A = 232.04202;
		IC = 0;
	}
	else if (isotope == "Ac233")
	{
		Z = 89;
		A = 233.04455;
		IC = 0;
	}
	else if (isotope == "Ac234")
	{
		Z = 89;
		A = 234.04842;
		IC = 0;
	}
	else if (isotope == "Ac235")
	{
		Z = 89;
		A = 235.05110;
		IC = 0;
	}
	else if (isotope == "Ac236")
	{
		Z = 89;
		A = 236.05518;
		IC = 0;
	}
	else if (isotope == "Th210")
	{
		Z = 90;
		A = 210.01503;
		IC = 0;
	}
	else if (isotope == "Th211")
	{
		Z = 90;
		A = 211.01486;
		IC = 0;
	}
	else if (isotope == "Th212")
	{
		Z = 90;
		A = 212.01292;
		IC = 0;
	}
	else if (isotope == "Th213")
	{
		Z = 90;
		A = 213.01296;
		IC = 0;
	}
	else if (isotope == "Th214")
	{
		Z = 90;
		A = 214.01145;
		IC = 0;
	}
	else if (isotope == "Th215")
	{
		Z = 90;
		A = 215.011730;
		IC = 0;
	}
	else if (isotope == "Th216")
	{
		Z = 90;
		A = 216.011051;
		IC = 0;
	}
	else if (isotope == "Th217")
	{
		Z = 90;
		A = 217.013070;
		IC = 0;
	}
	else if (isotope == "Th218")
	{
		Z = 90;
		A = 218.013268;
		IC = 0;
	}
	else if (isotope == "Th219")
	{
		Z = 90;
		A = 219.015520;
		IC = 0;
	}
	else if (isotope == "Th220")
	{
		Z = 90;
		A = 220.015733;
		IC = 0;
	}
	else if (isotope == "Th221")
	{
		Z = 90;
		A = 221.018171;
		IC = 0;
	}
	else if (isotope == "Th222")
	{
		Z = 90;
		A = 222.018454;
		IC = 0;
	}
	else if (isotope == "Th223")
	{
		Z = 90;
		A = 223.020795;
		IC = 0;
	}
	else if (isotope == "Th224")
	{
		Z = 90;
		A = 224.021459;
		IC = 0;
	}
	else if (isotope == "Th225")
	{
		Z = 90;
		A = 225.023941;
		IC = 0;
	}
	else if (isotope == "Th226")
	{
		Z = 90;
		A = 226.024891;
		IC = 0;
	}
	else if (isotope == "Th227")
	{
		Z = 90;
		A = 227.027699;
		IC = 0;
	}
	else if (isotope == "Th228")
	{
		Z = 90;
		A = 228.0287313;
		IC = 0;
	}
	else if (isotope == "Th229")
	{
		Z = 90;
		A = 229.031755;
		IC = 0;
	}
	else if (isotope == "Th230")
	{
		Z = 90;
		A = 230.0331266;
		IC = 0;
	}
	else if (isotope == "Th231")
	{
		Z = 90;
		A = 231.0362971;
		IC = 0;
	}
	else if (isotope == "Th")
	{
		Z = 90;
		A = 232.0381;
		IC = 1.0;
	}
	else if (isotope == "Th232")
	{
		Z = 90;
		A = 232.0380504;
		IC = 1;
	}
	else if (isotope == "Th233")
	{
		Z = 90;
		A = 233.0415769;
		IC = 0;
	}
	else if (isotope == "Th234")
	{
		Z = 90;
		A = 234.043595;
		IC = 0;
	}
	else if (isotope == "Th235")
	{
		Z = 90;
		A = 235.047500;
		IC = 0;
	}
	else if (isotope == "Th236")
	{
		Z = 90;
		A = 236.04971;
		IC = 0;
	}
	else if (isotope == "Th237")
	{
		Z = 90;
		A = 237.05389;
		IC = 0;
	}
	else if (isotope == "Th238")
	{
		Z = 90;
		A = 238.05624;
		IC = 0;
	}
	else if (isotope == "Pa213")
	{
		Z = 91;
		A = 213.02118;
		IC = 0;
	}
	else if (isotope == "Pa214")
	{
		Z = 91;
		A = 214.02074;
		IC = 0;
	}
	else if (isotope == "Pa215")
	{
		Z = 91;
		A = 215.01910;
		IC = 0;
	}
	else if (isotope == "Pa216")
	{
		Z = 91;
		A = 216.01911;
		IC = 0;
	}
	else if (isotope == "Pa217")
	{
		Z = 91;
		A = 217.018290;
		IC = 0;
	}
	else if (isotope == "Pa218")
	{
		Z = 91;
		A = 218.020010;
		IC = 0;
	}
	else if (isotope == "Pa219")
	{
		Z = 91;
		A = 219.019880;
		IC = 0;
	}
	else if (isotope == "Pa220")
	{
		Z = 91;
		A = 220.021880;
		IC = 0;
	}
	else if (isotope == "Pa221")
	{
		Z = 91;
		A = 221.021860;
		IC = 0;
	}
	else if (isotope == "Pa222")
	{
		Z = 91;
		A = 222.023730;
		IC = 0;
	}
	else if (isotope == "Pa223")
	{
		Z = 91;
		A = 223.023960;
		IC = 0;
	}
	else if (isotope == "Pa224")
	{
		Z = 91;
		A = 224.025610;
		IC = 0;
	}
	else if (isotope == "Pa225")
	{
		Z = 91;
		A = 225.026120;
		IC = 0;
	}
	else if (isotope == "Pa226")
	{
		Z = 91;
		A = 226.027933;
		IC = 0;
	}
	else if (isotope == "Pa227")
	{
		Z = 91;
		A = 227.028793;
		IC = 0;
	}
	else if (isotope == "Pa228")
	{
		Z = 91;
		A = 228.031037;
		IC = 0;
	}
	else if (isotope == "Pa229")
	{
		Z = 91;
		A = 229.032089;
		IC = 0;
	}
	else if (isotope == "Pa230")
	{
		Z = 91;
		A = 230.034533;
		IC = 0;
	}
	else if (isotope == "Pa")
	{
		Z = 91;
		A = 231.03588;
		IC = 1.0;
	}
	else if (isotope == "Pa231")
	{
		Z = 91;
		A = 231.0358789;
		IC = 1;
	}
	else if (isotope == "Pa232")
	{
		Z = 91;
		A = 232.038582;
		IC = 0;
	}
	else if (isotope == "Pa233")
	{
		Z = 91;
		A = 233.0402402;
		IC = 0;
	}
	else if (isotope == "Pa234")
	{
		Z = 91;
		A = 234.043302;
		IC = 0;
	}
	else if (isotope == "Pa235")
	{
		Z = 91;
		A = 235.045440;
		IC = 0;
	}
	else if (isotope == "Pa236")
	{
		Z = 91;
		A = 236.04868;
		IC = 0;
	}
	else if (isotope == "Pa237")
	{
		Z = 91;
		A = 237.05114;
		IC = 0;
	}
	else if (isotope == "Pa238")
	{
		Z = 91;
		A = 238.054500;
		IC = 0;
	}
	else if (isotope == "Pa239")
	{
		Z = 91;
		A = 239.05713;
		IC = 0;
	}
	else if (isotope == "Pa240")
	{
		Z = 91;
		A = 240.06098;
		IC = 0;
	}
	else if (isotope == "U218")
	{
		Z = 92;
		A = 218.02349;
		IC = 0;
	}
	else if (isotope == "U219")
	{
		Z = 92;
		A = 219.024920;
		IC = 0;
	}
	else if (isotope == "U220")
	{
		Z = 92;
		A = 220.02471;
		IC = 0;
	}
	else if (isotope == "U221")
	{
		Z = 92;
		A = 221.02635;
		IC = 0;
	}
	else if (isotope == "U222")
	{
		Z = 92;
		A = 222.02607;
		IC = 0;
	}
	else if (isotope == "U223")
	{
		Z = 92;
		A = 223.027720;
		IC = 0;
	}
	else if (isotope == "U224")
	{
		Z = 92;
		A = 224.027590;
		IC = 0;
	}
	else if (isotope == "U225")
	{
		Z = 92;
		A = 225.029380;
		IC = 0;
	}
	else if (isotope == "U226")
	{
		Z = 92;
		A = 226.029340;
		IC = 0;
	}
	else if (isotope == "U227")
	{
		Z = 92;
		A = 227.031140;
		IC = 0;
	}
	else if (isotope == "U228")
	{
		Z = 92;
		A = 228.031366;
		IC = 0;
	}
	else if (isotope == "U229")
	{
		Z = 92;
		A = 229.033496;
		IC = 0;
	}
	else if (isotope == "U230")
	{
		Z = 92;
		A = 230.033927;
		IC = 0;
	}
	else if (isotope == "U231")
	{
		Z = 92;
		A = 231.036289;
		IC = 0;
	}
	else if (isotope == "U232")
	{
		Z = 92;
		A = 232.0371463;
		IC = 0;
	}
	else if (isotope == "U233")
	{
		Z = 92;
		A = 233.039628;
		IC = 0;
	}
	else if (isotope == "U")
	{
		Z = 92;
		A = 238.02891;
		IC = 1.0;
	}
	else if (isotope == "U234")
	{
		Z = 92;
		A = 234.0409456;
		IC = 5.5e-05;
	}
	else if (isotope == "U235")
	{
		Z = 92;
		A = 235.0439231;
		IC = 0.0072;
	}
	else if (isotope == "U236")
	{
		Z = 92;
		A = 236.0455619;
		IC = 0;
	}
	else if (isotope == "U237")
	{
		Z = 92;
		A = 237.0487240;
		IC = 0;
	}
	else if (isotope == "U238")
	{
		Z = 92;
		A = 238.0507826;
		IC = 0.992745;
	}
	else if (isotope == "U239")
	{
		Z = 92;
		A = 239.0542878;
		IC = 0;
	}
	else if (isotope == "U240")
	{
		Z = 92;
		A = 240.056586;
		IC = 0;
	}
	else if (isotope == "U241")
	{
		Z = 92;
		A = 241.06033;
		IC = 0;
	}
	else if (isotope == "U242")
	{
		Z = 92;
		A = 242.06293;
		IC = 0;
	}
	else if (isotope == "Np225")
	{
		Z = 93;
		A = 225.033900;
		IC = 0;
	}
	else if (isotope == "Np226")
	{
		Z = 93;
		A = 226.03513;
		IC = 0;
	}
	else if (isotope == "Np227")
	{
		Z = 93;
		A = 227.034960;
		IC = 0;
	}
	else if (isotope == "Np228")
	{
		Z = 93;
		A = 228.03618;
		IC = 0;
	}
	else if (isotope == "Np229")
	{
		Z = 93;
		A = 229.036250;
		IC = 0;
	}
	else if (isotope == "Np230")
	{
		Z = 93;
		A = 230.037810;
		IC = 0;
	}
	else if (isotope == "Np231")
	{
		Z = 93;
		A = 231.038230;
		IC = 0;
	}
	else if (isotope == "Np232")
	{
		Z = 93;
		A = 232.04010;
		IC = 0;
	}
	else if (isotope == "Np233")
	{
		Z = 93;
		A = 233.040730;
		IC = 0;
	}
	else if (isotope == "Np234")
	{
		Z = 93;
		A = 234.042889;
		IC = 0;
	}
	else if (isotope == "Np235")
	{
		Z = 93;
		A = 235.0440559;
		IC = 0;
	}
	else if (isotope == "Np236")
	{
		Z = 93;
		A = 236.046560;
		IC = 0;
	}
	else if (isotope == "Np237")
	{
		Z = 93;
		A = 237.0481673;
		IC = 0;
	}
	else if (isotope == "Np238")
	{
		Z = 93;
		A = 238.0509405;
		IC = 0;
	}
	else if (isotope == "Np239")
	{
		Z = 93;
		A = 239.0529314;
		IC = 0;
	}
	else if (isotope == "Np240")
	{
		Z = 93;
		A = 240.056169;
		IC = 0;
	}
	else if (isotope == "Np241")
	{
		Z = 93;
		A = 241.058250;
		IC = 0;
	}
	else if (isotope == "Np242")
	{
		Z = 93;
		A = 242.06164;
		IC = 0;
	}
	else if (isotope == "Np243")
	{
		Z = 93;
		A = 243.064270;
		IC = 0;
	}
	else if (isotope == "Np244")
	{
		Z = 93;
		A = 244.06785;
		IC = 0;
	}
	else if (isotope == "Pu228")
	{
		Z = 94;
		A = 228.038730;
		IC = 0;
	}
	else if (isotope == "Pu229")
	{
		Z = 94;
		A = 229.040140;
		IC = 0;
	}
	else if (isotope == "Pu230")
	{
		Z = 94;
		A = 230.039646;
		IC = 0;
	}
	else if (isotope == "Pu231")
	{
		Z = 94;
		A = 231.04126;
		IC = 0;
	}
	else if (isotope == "Pu232")
	{
		Z = 94;
		A = 232.041179;
		IC = 0;
	}
	else if (isotope == "Pu233")
	{
		Z = 94;
		A = 233.042990;
		IC = 0;
	}
	else if (isotope == "Pu234")
	{
		Z = 94;
		A = 234.043305;
		IC = 0;
	}
	else if (isotope == "Pu235")
	{
		Z = 94;
		A = 235.045282;
		IC = 0;
	}
	else if (isotope == "Pu236")
	{
		Z = 94;
		A = 236.0460481;
		IC = 0;
	}
	else if (isotope == "Pu237")
	{
		Z = 94;
		A = 237.0484038;
		IC = 0;
	}
	else if (isotope == "Pu238")
	{
		Z = 94;
		A = 238.0495534;
		IC = 0;
	}
	else if (isotope == "Pu239")
	{
		Z = 94;
		A = 239.0521565;
		IC = 0;
	}
	else if (isotope == "Pu240")
	{
		Z = 94;
		A = 240.0538075;
		IC = 0;
	}
	else if (isotope == "Pu241")
	{
		Z = 94;
		A = 241.0568453;
		IC = 0;
	}
	else if (isotope == "Pu242")
	{
		Z = 94;
		A = 242.0587368;
		IC = 0;
	}
	else if (isotope == "Pu243")
	{
		Z = 94;
		A = 243.061997;
		IC = 0;
	}
	else if (isotope == "Pu244")
	{
		Z = 94;
		A = 244.064198;
		IC = 0;
	}
	else if (isotope == "Pu245")
	{
		Z = 94;
		A = 245.067739;
		IC = 0;
	}
	else if (isotope == "Pu246")
	{
		Z = 94;
		A = 246.070198;
		IC = 0;
	}
	else if (isotope == "Pu247")
	{
		Z = 94;
		A = 247.07407;
		IC = 0;
	}
	else if (isotope == "Am231")
	{
		Z = 95;
		A = 231.04556;
		IC = 0;
	}
	else if (isotope == "Am232")
	{
		Z = 95;
		A = 232.04659;
		IC = 0;
	}
	else if (isotope == "Am233")
	{
		Z = 95;
		A = 233.04647;
		IC = 0;
	}
	else if (isotope == "Am234")
	{
		Z = 95;
		A = 234.04779;
		IC = 0;
	}
	else if (isotope == "Am235")
	{
		Z = 95;
		A = 235.04803;
		IC = 0;
	}
	else if (isotope == "Am236")
	{
		Z = 95;
		A = 236.04957;
		IC = 0;
	}
	else if (isotope == "Am237")
	{
		Z = 95;
		A = 237.049970;
		IC = 0;
	}
	else if (isotope == "Am238")
	{
		Z = 95;
		A = 238.051980;
		IC = 0;
	}
	else if (isotope == "Am239")
	{
		Z = 95;
		A = 239.053018;
		IC = 0;
	}
	else if (isotope == "Am240")
	{
		Z = 95;
		A = 240.055288;
		IC = 0;
	}
	else if (isotope == "Am241")
	{
		Z = 95;
		A = 241.0568229;
		IC = 0;
	}
	else if (isotope == "Am242")
	{
		Z = 95;
		A = 242.0595430;
		IC = 0;
	}
	else if (isotope == "Am243")
	{
		Z = 95;
		A = 243.0613727;
		IC = 0;
	}
	else if (isotope == "Am244")
	{
		Z = 95;
		A = 244.0642794;
		IC = 0;
	}
	else if (isotope == "Am245")
	{
		Z = 95;
		A = 245.066445;
		IC = 0;
	}
	else if (isotope == "Am246")
	{
		Z = 95;
		A = 246.069768;
		IC = 0;
	}
	else if (isotope == "Am247")
	{
		Z = 95;
		A = 247.07209;
		IC = 0;
	}
	else if (isotope == "Am248")
	{
		Z = 95;
		A = 248.07575;
		IC = 0;
	}
	else if (isotope == "Am249")
	{
		Z = 95;
		A = 249.07848;
		IC = 0;
	}
	else if (isotope == "Cm233")
	{
		Z = 96;
		A = 233.05080;
		IC = 0;
	}
	else if (isotope == "Cm234")
	{
		Z = 96;
		A = 234.05024;
		IC = 0;
	}
	else if (isotope == "Cm235")
	{
		Z = 96;
		A = 235.05159;
		IC = 0;
	}
	else if (isotope == "Cm236")
	{
		Z = 96;
		A = 236.05141;
		IC = 0;
	}
	else if (isotope == "Cm237")
	{
		Z = 96;
		A = 237.05289;
		IC = 0;
	}
	else if (isotope == "Cm238")
	{
		Z = 96;
		A = 238.053020;
		IC = 0;
	}
	else if (isotope == "Cm239")
	{
		Z = 96;
		A = 239.05495;
		IC = 0;
	}
	else if (isotope == "Cm240")
	{
		Z = 96;
		A = 240.0555190;
		IC = 0;
	}
	else if (isotope == "Cm241")
	{
		Z = 96;
		A = 241.0576467;
		IC = 0;
	}
	else if (isotope == "Cm242")
	{
		Z = 96;
		A = 242.0588293;
		IC = 0;
	}
	else if (isotope == "Cm243")
	{
		Z = 96;
		A = 243.0613822;
		IC = 0;
	}
	else if (isotope == "Cm244")
	{
		Z = 96;
		A = 244.0627463;
		IC = 0;
	}
	else if (isotope == "Cm245")
	{
		Z = 96;
		A = 245.0654856;
		IC = 0;
	}
	else if (isotope == "Cm246")
	{
		Z = 96;
		A = 246.0672176;
		IC = 0;
	}
	else if (isotope == "Cm247")
	{
		Z = 96;
		A = 247.070347;
		IC = 0;
	}
	else if (isotope == "Cm248")
	{
		Z = 96;
		A = 248.072342;
		IC = 0;
	}
	else if (isotope == "Cm249")
	{
		Z = 96;
		A = 249.075947;
		IC = 0;
	}
	else if (isotope == "Cm250")
	{
		Z = 96;
		A = 250.078351;
		IC = 0;
	}
	else if (isotope == "Cm251")
	{
		Z = 96;
		A = 251.082278;
		IC = 0;
	}
	else if (isotope == "Cm252")
	{
		Z = 96;
		A = 252.08487;
		IC = 0;
	}
	else if (isotope == "Bk235")
	{
		Z = 97;
		A = 235.05658;
		IC = 0;
	}
	else if (isotope == "Bk236")
	{
		Z = 97;
		A = 236.05733;
		IC = 0;
	}
	else if (isotope == "Bk237")
	{
		Z = 97;
		A = 237.05713;
		IC = 0;
	}
	else if (isotope == "Bk238")
	{
		Z = 97;
		A = 238.05827;
		IC = 0;
	}
	else if (isotope == "Bk239")
	{
		Z = 97;
		A = 239.05836;
		IC = 0;
	}
	else if (isotope == "Bk240")
	{
		Z = 97;
		A = 240.05975;
		IC = 0;
	}
	else if (isotope == "Bk241")
	{
		Z = 97;
		A = 241.06022;
		IC = 0;
	}
	else if (isotope == "Bk242")
	{
		Z = 97;
		A = 242.06205;
		IC = 0;
	}
	else if (isotope == "Bk243")
	{
		Z = 97;
		A = 243.063002;
		IC = 0;
	}
	else if (isotope == "Bk244")
	{
		Z = 97;
		A = 244.065168;
		IC = 0;
	}
	else if (isotope == "Bk245")
	{
		Z = 97;
		A = 245.0663554;
		IC = 0;
	}
	else if (isotope == "Bk246")
	{
		Z = 97;
		A = 246.068670;
		IC = 0;
	}
	else if (isotope == "Bk247")
	{
		Z = 97;
		A = 247.070299;
		IC = 0;
	}
	else if (isotope == "Bk248")
	{
		Z = 97;
		A = 248.073080;
		IC = 0;
	}
	else if (isotope == "Bk249")
	{
		Z = 97;
		A = 249.074980;
		IC = 0;
	}
	else if (isotope == "Bk250")
	{
		Z = 97;
		A = 250.078311;
		IC = 0;
	}
	else if (isotope == "Bk251")
	{
		Z = 97;
		A = 251.080753;
		IC = 0;
	}
	else if (isotope == "Bk252")
	{
		Z = 97;
		A = 252.08430;
		IC = 0;
	}
	else if (isotope == "Bk253")
	{
		Z = 97;
		A = 253.08688;
		IC = 0;
	}
	else if (isotope == "Bk254")
	{
		Z = 97;
		A = 254.09060;
		IC = 0;
	}
	else if (isotope == "Cf237")
	{
		Z = 98;
		A = 237.06207;
		IC = 0;
	}
	else if (isotope == "Cf238")
	{
		Z = 98;
		A = 238.06141;
		IC = 0;
	}
	else if (isotope == "Cf239")
	{
		Z = 98;
		A = 239.06258;
		IC = 0;
	}
	else if (isotope == "Cf240")
	{
		Z = 98;
		A = 240.06230;
		IC = 0;
	}
	else if (isotope == "Cf241")
	{
		Z = 98;
		A = 241.06372;
		IC = 0;
	}
	else if (isotope == "Cf242")
	{
		Z = 98;
		A = 242.063690;
		IC = 0;
	}
	else if (isotope == "Cf243")
	{
		Z = 98;
		A = 243.06542;
		IC = 0;
	}
	else if (isotope == "Cf244")
	{
		Z = 98;
		A = 244.065990;
		IC = 0;
	}
	else if (isotope == "Cf245")
	{
		Z = 98;
		A = 245.06804;
		IC = 0;
	}
	else if (isotope == "Cf246")
	{
		Z = 98;
		A = 246.0687988;
		IC = 0;
	}
	else if (isotope == "Cf247")
	{
		Z = 98;
		A = 247.070992;
		IC = 0;
	}
	else if (isotope == "Cf248")
	{
		Z = 98;
		A = 248.072178;
		IC = 0;
	}
	else if (isotope == "Cf249")
	{
		Z = 98;
		A = 249.074847;
		IC = 0;
	}
	else if (isotope == "Cf250")
	{
		Z = 98;
		A = 250.0764000;
		IC = 0;
	}
	else if (isotope == "Cf251")
	{
		Z = 98;
		A = 251.079580;
		IC = 0;
	}
	else if (isotope == "Cf252")
	{
		Z = 98;
		A = 252.081620;
		IC = 0;
	}
	else if (isotope == "Cf253")
	{
		Z = 98;
		A = 253.085127;
		IC = 0;
	}
	else if (isotope == "Cf254")
	{
		Z = 98;
		A = 254.087316;
		IC = 0;
	}
	else if (isotope == "Cf255")
	{
		Z = 98;
		A = 255.09104;
		IC = 0;
	}
	else if (isotope == "Cf256")
	{
		Z = 98;
		A = 256.09344;
		IC = 0;
	}
	else if (isotope == "Es240")
	{
		Z = 99;
		A = 240.06892;
		IC = 0;
	}
	else if (isotope == "Es241")
	{
		Z = 99;
		A = 241.06866;
		IC = 0;
	}
	else if (isotope == "Es242")
	{
		Z = 99;
		A = 242.06970;
		IC = 0;
	}
	else if (isotope == "Es243")
	{
		Z = 99;
		A = 243.06963;
		IC = 0;
	}
	else if (isotope == "Es244")
	{
		Z = 99;
		A = 244.07097;
		IC = 0;
	}
	else if (isotope == "Es245")
	{
		Z = 99;
		A = 245.07132;
		IC = 0;
	}
	else if (isotope == "Es246")
	{
		Z = 99;
		A = 246.07297;
		IC = 0;
	}
	else if (isotope == "Es247")
	{
		Z = 99;
		A = 247.073650;
		IC = 0;
	}
	else if (isotope == "Es248")
	{
		Z = 99;
		A = 248.075460;
		IC = 0;
	}
	else if (isotope == "Es249")
	{
		Z = 99;
		A = 249.076410;
		IC = 0;
	}
	else if (isotope == "Es250")
	{
		Z = 99;
		A = 250.07865;
		IC = 0;
	}
	else if (isotope == "Es251")
	{
		Z = 99;
		A = 251.079984;
		IC = 0;
	}
	else if (isotope == "Es252")
	{
		Z = 99;
		A = 252.082970;
		IC = 0;
	}
	else if (isotope == "Es253")
	{
		Z = 99;
		A = 253.084818;
		IC = 0;
	}
	else if (isotope == "Es254")
	{
		Z = 99;
		A = 254.088016;
		IC = 0;
	}
	else if (isotope == "Es255")
	{
		Z = 99;
		A = 255.090266;
		IC = 0;
	}
	else if (isotope == "Es256")
	{
		Z = 99;
		A = 256.09359;
		IC = 0;
	}
	else if (isotope == "Es257")
	{
		Z = 99;
		A = 257.09598;
		IC = 0;
	}
	else if (isotope == "Fm242")
	{
		Z = 100;
		A = 242.07343;
		IC = 0;
	}
	else if (isotope == "Fm243")
	{
		Z = 100;
		A = 243.07451;
		IC = 0;
	}
	else if (isotope == "Fm244")
	{
		Z = 100;
		A = 244.07408;
		IC = 0;
	}
	else if (isotope == "Fm245")
	{
		Z = 100;
		A = 245.07538;
		IC = 0;
	}
	else if (isotope == "Fm246")
	{
		Z = 100;
		A = 246.075280;
		IC = 0;
	}
	else if (isotope == "Fm247")
	{
		Z = 100;
		A = 247.07682;
		IC = 0;
	}
	else if (isotope == "Fm248")
	{
		Z = 100;
		A = 248.077184;
		IC = 0;
	}
	else if (isotope == "Fm249")
	{
		Z = 100;
		A = 249.07902;
		IC = 0;
	}
	else if (isotope == "Fm250")
	{
		Z = 100;
		A = 250.079515;
		IC = 0;
	}
	else if (isotope == "Fm251")
	{
		Z = 100;
		A = 251.081566;
		IC = 0;
	}
	else if (isotope == "Fm252")
	{
		Z = 100;
		A = 252.082460;
		IC = 0;
	}
	else if (isotope == "Fm253")
	{
		Z = 100;
		A = 253.085176;
		IC = 0;
	}
	else if (isotope == "Fm254")
	{
		Z = 100;
		A = 254.086848;
		IC = 0;
	}
	else if (isotope == "Fm255")
	{
		Z = 100;
		A = 255.089955;
		IC = 0;
	}
	else if (isotope == "Fm256")
	{
		Z = 100;
		A = 256.091767;
		IC = 0;
	}
	else if (isotope == "Fm257")
	{
		Z = 100;
		A = 257.095099;
		IC = 0;
	}
	else if (isotope == "Fm258")
	{
		Z = 100;
		A = 258.09707;
		IC = 0;
	}
	else if (isotope == "Fm259")
	{
		Z = 100;
		A = 259.10059;
		IC = 0;
	}
	else if (isotope == "Md245")
	{
		Z = 101;
		A = 245.08102;
		IC = 0;
	}
	else if (isotope == "Md246")
	{
		Z = 101;
		A = 246.08193;
		IC = 0;
	}
	else if (isotope == "Md247")
	{
		Z = 101;
		A = 247.08180;
		IC = 0;
	}
	else if (isotope == "Md248")
	{
		Z = 101;
		A = 248.08291;
		IC = 0;
	}
	else if (isotope == "Md249")
	{
		Z = 101;
		A = 249.08300;
		IC = 0;
	}
	else if (isotope == "Md250")
	{
		Z = 101;
		A = 250.08449;
		IC = 0;
	}
	else if (isotope == "Md251")
	{
		Z = 101;
		A = 251.08492;
		IC = 0;
	}
	else if (isotope == "Md252")
	{
		Z = 101;
		A = 252.08663;
		IC = 0;
	}
	else if (isotope == "Md253")
	{
		Z = 101;
		A = 253.08728;
		IC = 0;
	}
	else if (isotope == "Md254")
	{
		Z = 101;
		A = 254.08973;
		IC = 0;
	}
	else if (isotope == "Md255")
	{
		Z = 101;
		A = 255.091075;
		IC = 0;
	}
	else if (isotope == "Md256")
	{
		Z = 101;
		A = 256.094050;
		IC = 0;
	}
	else if (isotope == "Md257")
	{
		Z = 101;
		A = 257.095535;
		IC = 0;
	}
	else if (isotope == "Md258")
	{
		Z = 101;
		A = 258.098425;
		IC = 0;
	}
	else if (isotope == "Md259")
	{
		Z = 101;
		A = 259.10050;
		IC = 0;
	}
	else if (isotope == "Md260")
	{
		Z = 101;
		A = 260.10365;
		IC = 0;
	}
	else if (isotope == "No249")
	{
		Z = 102;
		A = 249.08782;
		IC = 0;
	}
	else if (isotope == "No250")
	{
		Z = 102;
		A = 250.08749;
		IC = 0;
	}
	else if (isotope == "No251")
	{
		Z = 102;
		A = 251.08896;
		IC = 0;
	}
	else if (isotope == "No252")
	{
		Z = 102;
		A = 252.088966;
		IC = 0;
	}
	else if (isotope == "No253")
	{
		Z = 102;
		A = 253.09065;
		IC = 0;
	}
	else if (isotope == "No254")
	{
		Z = 102;
		A = 254.090949;
		IC = 0;
	}
	else if (isotope == "No255")
	{
		Z = 102;
		A = 255.093232;
		IC = 0;
	}
	else if (isotope == "No256")
	{
		Z = 102;
		A = 256.094276;
		IC = 0;
	}
	else if (isotope == "No257")
	{
		Z = 102;
		A = 257.096850;
		IC = 0;
	}
	else if (isotope == "No258")
	{
		Z = 102;
		A = 258.09820;
		IC = 0;
	}
	else if (isotope == "No259")
	{
		Z = 102;
		A = 259.10102;
		IC = 0;
	}
	else if (isotope == "No260")
	{
		Z = 102;
		A = 260.10264;
		IC = 0;
	}
	else if (isotope == "No261")
	{
		Z = 102;
		A = 261.10574;
		IC = 0;
	}
	else if (isotope == "No262")
	{
		Z = 102;
		A = 262.10752;
		IC = 0;
	}
	else if (isotope == "Lr251")
	{
		Z = 103;
		A = 251.09436;
		IC = 0;
	}
	else if (isotope == "Lr252")
	{
		Z = 103;
		A = 252.09533;
		IC = 0;
	}
	else if (isotope == "Lr253")
	{
		Z = 103;
		A = 253.09526;
		IC = 0;
	}
	else if (isotope == "Lr254")
	{
		Z = 103;
		A = 254.09659;
		IC = 0;
	}
	else if (isotope == "Lr255")
	{
		Z = 103;
		A = 255.09677;
		IC = 0;
	}
	else if (isotope == "Lr256")
	{
		Z = 103;
		A = 256.09876;
		IC = 0;
	}
	else if (isotope == "Lr257")
	{
		Z = 103;
		A = 257.09961;
		IC = 0;
	}
	else if (isotope == "Lr258")
	{
		Z = 103;
		A = 258.10188;
		IC = 0;
	}
	else if (isotope == "Lr259")
	{
		Z = 103;
		A = 259.102990;
		IC = 0;
	}
	else if (isotope == "Lr260")
	{
		Z = 103;
		A = 260.10557;
		IC = 0;
	}
	else if (isotope == "Lr261")
	{
		Z = 103;
		A = 261.10694;
		IC = 0;
	}
	else if (isotope == "Lr262")
	{
		Z = 103;
		A = 262.10969;
		IC = 0;
	}
	else if (isotope == "Lr263")
	{
		Z = 103;
		A = 263.11139;
		IC = 0;
	}
	else if (isotope == "Rf253")
	{
		Z = 104;
		A = 253.10068;
		IC = 0;
	}
	else if (isotope == "Rf254")
	{
		Z = 104;
		A = 254.10017;
		IC = 0;
	}
	else if (isotope == "Rf255")
	{
		Z = 104;
		A = 255.10149;
		IC = 0;
	}
	else if (isotope == "Rf256")
	{
		Z = 104;
		A = 256.101180;
		IC = 0;
	}
	else if (isotope == "Rf257")
	{
		Z = 104;
		A = 257.10307;
		IC = 0;
	}
	else if (isotope == "Rf258")
	{
		Z = 104;
		A = 258.10357;
		IC = 0;
	}
	else if (isotope == "Rf259")
	{
		Z = 104;
		A = 259.105630;
		IC = 0;
	}
	else if (isotope == "Rf260")
	{
		Z = 104;
		A = 260.10643;
		IC = 0;
	}
	else if (isotope == "Rf261")
	{
		Z = 104;
		A = 261.10875;
		IC = 0;
	}
	else if (isotope == "Rf262")
	{
		Z = 104;
		A = 262.10992;
		IC = 0;
	}
	else if (isotope == "Rf263")
	{
		Z = 104;
		A = 263.11254;
		IC = 0;
	}
	else if (isotope == "Rf264")
	{
		Z = 104;
		A = 264.11398;
		IC = 0;
	}
	else if (isotope == "Db255")
	{
		Z = 105;
		A = 255.10740;
		IC = 0;
	}
	else if (isotope == "Db256")
	{
		Z = 105;
		A = 256.10811;
		IC = 0;
	}
	else if (isotope == "Db257")
	{
		Z = 105;
		A = 257.10786;
		IC = 0;
	}
	else if (isotope == "Db258")
	{
		Z = 105;
		A = 258.10944;
		IC = 0;
	}
	else if (isotope == "Db259")
	{
		Z = 105;
		A = 259.10972;
		IC = 0;
	}
	else if (isotope == "Db260")
	{
		Z = 105;
		A = 260.11143;
		IC = 0;
	}
	else if (isotope == "Db261")
	{
		Z = 105;
		A = 261.11211;
		IC = 0;
	}
	else if (isotope == "Db262")
	{
		Z = 105;
		A = 262.11415;
		IC = 0;
	}
	else if (isotope == "Db263")
	{
		Z = 105;
		A = 263.11508;
		IC = 0;
	}
	else if (isotope == "Db264")
	{
		Z = 105;
		A = 264.11747;
		IC = 0;
	}
	else if (isotope == "Db265")
	{
		Z = 105;
		A = 265.11866;
		IC = 0;
	}
	else if (isotope == "Sg258")
	{
		Z = 106;
		A = 258.11315;
		IC = 0;
	}
	else if (isotope == "Sg259")
	{
		Z = 106;
		A = 259.11465;
		IC = 0;
	}
	else if (isotope == "Sg260")
	{
		Z = 106;
		A = 260.114440;
		IC = 0;
	}
	else if (isotope == "Sg261")
	{
		Z = 106;
		A = 261.11620;
		IC = 0;
	}
	else if (isotope == "Sg262")
	{
		Z = 106;
		A = 262.11648;
		IC = 0;
	}
	else if (isotope == "Sg263")
	{
		Z = 106;
		A = 263.11831;
		IC = 0;
	}
	else if (isotope == "Sg264")
	{
		Z = 106;
		A = 264.11892;
		IC = 0;
	}
	else if (isotope == "Sg265")
	{
		Z = 106;
		A = 265.12107;
		IC = 0;
	}
	else if (isotope == "Sg266")
	{
		Z = 106;
		A = 266.12193;
		IC = 0;
	}
	else if (isotope == "Bh260")
	{
		Z = 107;
		A = 260.12180;
		IC = 0;
	}
	else if (isotope == "Bh261")
	{
		Z = 107;
		A = 261.12180;
		IC = 0;
	}
	else if (isotope == "Bh262")
	{
		Z = 107;
		A = 262.12301;
		IC = 0;
	}
	else if (isotope == "Bh263")
	{
		Z = 107;
		A = 263.12315;
		IC = 0;
	}
	else if (isotope == "Bh264")
	{
		Z = 107;
		A = 264.12473;
		IC = 0;
	}
	else if (isotope == "Bh265")
	{
		Z = 107;
		A = 265.12520;
		IC = 0;
	}
	else if (isotope == "Bh266")
	{
		Z = 107;
		A = 266.12701;
		IC = 0;
	}
	else if (isotope == "Bh267")
	{
		Z = 107;
		A = 267.12774;
		IC = 0;
	}
	else if (isotope == "Hs263")
	{
		Z = 108;
		A = 263.12871;
		IC = 0;
	}
	else if (isotope == "Hs264")
	{
		Z = 108;
		A = 264.128410;
		IC = 0;
	}
	else if (isotope == "Hs265")
	{
		Z = 108;
		A = 265.13000;
		IC = 0;
	}
	else if (isotope == "Hs266")
	{
		Z = 108;
		A = 266.13004;
		IC = 0;
	}
	else if (isotope == "Hs267")
	{
		Z = 108;
		A = 267.13177;
		IC = 0;
	}
	else if (isotope == "Hs268")
	{
		Z = 108;
		A = 268.13216;
		IC = 0;
	}
	else if (isotope == "Hs269")
	{
		Z = 108;
		A = 269.13411;
		IC = 0;
	}
	else if (isotope == "Hs277")
	{
		Z = 108;
		A = 277;
		IC = 0;
	}
	else if (isotope == "Mt265")
	{
		Z = 109;
		A = 265.13657;
		IC = 0;
	}
	else if (isotope == "Mt266")
	{
		Z = 109;
		A = 266.13794;
		IC = 0;
	}
	else if (isotope == "Mt267")
	{
		Z = 109;
		A = 267.13753;
		IC = 0;
	}
	else if (isotope == "Mt268")
	{
		Z = 109;
		A = 268.13882;
		IC = 0;
	}
	else if (isotope == "Mt269")
	{
		Z = 109;
		A = 269.13911;
		IC = 0;
	}
	else if (isotope == "Mt270")
	{
		Z = 109;
		A = 270.14072;
		IC = 0;
	}
	else if (isotope == "Mt271")
	{
		Z = 109;
		A = 271.14123;
		IC = 0;
	}
	else if (isotope == "Uun267")
	{
		Z = 110;
		A = 267.14396;
		IC = 0;
	}
	else if (isotope == "Uun268")
	{
		Z = 110;
		A = 268.14353;
		IC = 0;
	}
	else if (isotope == "Uun269")
	{
		Z = 110;
		A = 269.14514;
		IC = 0;
	}
	else if (isotope == "Uun270")
	{
		Z = 110;
		A = 270.14463;
		IC = 0;
	}
	else if (isotope == "Uun271")
	{
		Z = 110;
		A = 271.14608;
		IC = 0;
	}
	else if (isotope == "Uun272")
	{
		Z = 110;
		A = 272.14631;
		IC = 0;
	}
	else if (isotope == "Uun273")
	{
		Z = 110;
		A = 273.14925;
		IC = 0;
	}
	else if (isotope == "Uun281")
	{
		Z = 110;
		A = 281;
		IC = 0;
	}
	else if (isotope == "Uuu272")
	{
		Z = 111;
		A = 272.15348;
		IC = 0;
	}
	else if (isotope == "Uub285")
	{
		Z = 112;
		A = 285;
		IC = 0;
	}
	else if (isotope == "Uuq289")
	{
		Z = 114;
		A = 289;
		IC = 0;
	}
	else if (isotope == "Uuh292")
	{
		Z = 116;
		A = 292;
		IC = 0;
	}
	else
	{	cerr << "(atomic) Unknown isotope: " << isotope << endl;	}
	if (parameter == "Z")
	{	output = Z;	}
	else if (parameter == "A")
	{	output = A;	}
	else if (parameter == "IC")
	{	output = IC;	}
	else
	{	cerr << "(atomic) Unknown paramter: " << parameter << endl;	}
	return output;
}