home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / e / e032 / 3.ddi / FILES / MISCELLA.PAK / CHEMICAL.M < prev    next >
Encoding:
Text File  |  1992-07-29  |  64.3 KB  |  1,617 lines
  1.  
  2. (* :Title: ChemicalElements *)
  3.  
  4. (* :Author: Stephen Wolfram *)
  5.  
  6. (* :Summary: *)
  7.  
  8. (* :Context: Miscellaneous`ChemicalElements` *)
  9.  
  10. (* :Package Version: 1.2 *)
  11.  
  12. (* :Copyright: *)
  13. (* :History:    original version by S. Wolfram; 
  14.         expanded by ECM Nov., 90 *)
  15. (* :Keywords: *)
  16. (* :Source: The Elements, John Emsley, Oxford University Press, 1989; 
  17.         CRC, 69th Edition *)
  18. (* :Warning: *)
  19.  
  20. (* :Mathematica Version: 2.0 *)
  21.  
  22. (* :Limitation: none *)
  23. (* :Discussion: *)
  24.  
  25. BeginPackage["Miscellaneous`ChemicalElements`", "Miscellaneous`Units`",
  26.         "Miscellaneous`SIUnits`"]
  27.  
  28.  
  29. Elements::usage =
  30.     "Elements is a list of the chemical elements described in the
  31.     ChemicalElements package."
  32.  
  33. ElementAbbreviations::usage =
  34.     "ElementAbbreviations is a list of the abbreviations of the chemical
  35.     elements described in the ChemicalElements package."
  36.  
  37. AtomicNumber::usage = 
  38.     "AtomicNumber[element] gives the atomic number of the specified
  39.     element."
  40.  
  41. AtomicWeight::usage = 
  42.     "AtomicWeight[element] gives the atomic weight of the specified
  43.     element."
  44.  
  45. MeltingPoint::usage =
  46.     "MeltingPoint[element] gives the melting point of the specified
  47.     element."
  48.  
  49. BoilingPoint::usage =
  50.     "BoilingPoint[element] gives the boiling point of the specified
  51.     element."
  52.  
  53. HeatOfFusion::usage =
  54.     "HeatOfFusion[element] gives the heat of fusion of the 
  55.     specified element."
  56.  
  57. HeatOfVaporization::usage =
  58.     "HeatOfVaporization[element] gives the heat of vaporization of the
  59.     specified element."
  60.  
  61. Density::usage =
  62.     "Density[element] gives the density of the specified element, usually
  63.     at 298 Kelvin.  A message is issued for other temperatures and for
  64.     special forms of the element."
  65.  
  66. ThermalConductivity::usage =
  67.     "ThermalConductivity[element] gives the thermal conductivity of
  68.     the specified element at 300 K."
  69.  
  70. StableIsotopes::usage =
  71.     "StableIsotopes[element] gives a list of the stable isotopes
  72.     of the specified element."
  73.  
  74. ElectronConfiguration::usage =
  75.     "ElectronConfiguration[element] depicts the electron configuration
  76.     of the specified element in a list of the form
  77.     {{1s},{2s,2p},{3s,3p,3d},{4s,4p,4d,4f},{5s,5p,5d,5f},{6s,6p,6d},{7s}}."
  78.  
  79. ElectronConfigurationFormat::usage =
  80.     "ElectronConfigurationFormat[element] puts the electron
  81.     configuration of the specified element in standard notation."
  82.  
  83. Abbreviation::usage = 
  84.     "Abbreviation[element] gives the standard abbreviation of the
  85.     specified element."
  86.  
  87. Unknown::usage = 
  88.     "Unknown is a symbol returned for unknown element properties."
  89.  
  90. Elements = {Hydrogen, Helium, Lithium, Beryllium, Boron, Carbon, Nitrogen,
  91.    Oxygen, Fluorine, Neon, Sodium, Magnesium, Aluminium, Silicon, Phosphorus,
  92.    Sulfur, Chlorine, Argon, Potassium, Calcium, Scandium, Titanium, Vanadium,
  93.    Chromium, Manganese, Iron, Cobalt, Nickel, Copper, Zinc, Gallium,
  94.    Germanium, Arsenic, Selenium, Bromine, Krypton, Rubidium, Strontium,
  95.    Yttrium, Zirconium, Niobium, Molybdenum, Technetium, Ruthenium, Rhodium,
  96.    Palladium, Silver, Cadmium, Indium, Tin, Antimony, Tellurium, Iodine,
  97.    Xenon, Caesium, Barium, Lanthanum, Cerium, Praseodymium, Neodymium,
  98.    Promethium, Samarium, Europium, Gadolinium, Terbium, Dysprosium, Holmium,
  99.    Erbium, Thulium, Ytterbium, Lutetium, Hafnium, Tantalum, Tungsten,
  100.    Rhenium, Osmium, Iridium, Platinum, Gold, Mercury, Thallium, Lead,
  101.    Bismuth, Polonium, Astatine, Radon, Francium, Radium, Actinium, Thorium,
  102.    Protactinium, Uranium, Neptunium, Plutonium, Americium, Curium, Berkelium,
  103.    Californium, Einsteinium, Fermium, Mendelevium, Nobelium, Lawrencium,
  104.    Unnilquadium, Unnilpentium, Unnilhexium}
  105.  
  106. Map[(#::"usage" =
  107.     StringJoin[ToString[#]," is a chemical element."])&,
  108.    Elements]
  109.  
  110. Map[(Evaluate[#[[1]]]::"usage" =
  111.     StringJoin[ToString[#[[1]]],", commonly known as ",
  112.            ToString[#[[2]]],", is a chemical element."])&,
  113.    {{Natrium,Sodium},{Aluminum,Aluminium},{Sulphur,Sulfur},{Kalium,Potassium},
  114.     {Stibium,Antimony},{Cesium,Caesium},{Wolfram,Tungsten},
  115.     {Kurchatovium,Unnilquadium},{Rutherfordium,Unnilquadium},
  116.     {Hahnium,Unnilpentium}}]
  117.  
  118.  
  119. Begin["`Private`"]
  120.  
  121. AtomicWeight::unstable =
  122.     "No stable isotope of `1` exists."
  123. (* Atomic mass number of isotope having the longest known half life returned. *)
  124. MeltingPoint::form =
  125.     "Returned melting point is for the `2` form of `1`."
  126. BoilingPoint::form =
  127.     "Returned boiling point is for the `2` form of `1`."
  128. HeatOfFusion::form =
  129.     "Returned heat of fusion is for the `2` form of `1`."
  130. HeatOfVaporization::form =
  131.     "Returned heat of vaporization is for the `2` form of `1`."
  132. Density::form =
  133.     "Returned density is for the `2` form of `1`."
  134. Density::temp =
  135.     "Returned density is for `1` at `2` Kelvin."
  136. Density::tempform =
  137.     "Returned density is for the `3` form of `1` at `2` Kelvin."
  138. ThermalConductivity::form =
  139.     "Returned thermal conductivity is for the `2` form of `1`."
  140.  
  141. AtomicWeightUnstable[name_Symbol, number_] :=
  142.     (Message[AtomicWeight::unstable, name]; number)
  143. MeltingPointException[name_Symbol, mp_, form_?StringQ] :=
  144.     (Message[MeltingPoint::form, name, form]; mp Kelvin)
  145. BoilingPointException[name_Symbol, bp_, form_?StringQ] :=
  146.     (Message[BoilingPoint::form, name, form]; bp Kelvin)
  147. HeatOfFusionException[name_Symbol, hof_, form_?StringQ] :=
  148.     (Message[HeatOfFusion::form, name, form]; hof Kilo Joule / Mole)
  149. HeatOfVaporizationException[name_Symbol, hov_, form_?StringQ] :=
  150.     (Message[HeatOfVaporization::form, name, form]; hov Kilo Joule / Mole)
  151. DensityException[name_Symbol, den_, temp_?NumberQ] :=
  152.     (Message[Density::temp, name, temp]; den Kilogram/(Meter)^3)
  153. DensityException[name_Symbol, den_, form_?StringQ] :=
  154.     (Message[Density::form, name, form]; den Kilogram/(Meter)^3)
  155. DensityException[name_Symbol, den_, temp_?NumberQ, form_?StringQ] :=
  156.      (Message[Density::tempform, name, temp, form]; den Kilogram/(Meter)^3)
  157. ThermalConductivityException[name_Symbol, tc_, form_?StringQ] :=
  158.     (Message[ThermalConductivity::form, name, form]; tc Watt/(Meter Kelvin)) 
  159. MeltingPointNA[name_Symbol] :=
  160.     (Message[MeltingPoint::unknown, name]; Unknown)
  161. BoilingPointNA[name_Symbol] :=
  162.     (Message[BoilingPoint::unknown, name]; Unknown)
  163. HeatOfFusionNA[name_Symbol] :=
  164.     (Message[HeatOfFusion::unknown, name]; Unknown)
  165. HeatOfVaporizationNA[name_Symbol] :=
  166.     (Message[HeatOfVaporization::unknown, name]; Unknown)
  167. DensityNA[name_Symbol] :=
  168.     (Message[Density::unknown, name]; Unknown)
  169. ThermalConductivityNA[name_Symbol] :=
  170.     (Message[ThermalConductivity::unknown, name]; Unknown)
  171. ElectronConfigurationNA[name_Symbol] :=
  172.     (Message[ElectronConfiguration::unknown, name]; Unknown)
  173.  
  174. MeltingPoint::unknown =
  175.     "The melting point of `1` is not known."
  176. BoilingPoint::unknown =
  177.     "The boiling point of `1` is not known."
  178. HeatOfFusion::unknown =
  179.     "The heat of fusion of `1` is not known."
  180. HeatOfVaporization::unknown =
  181.     "The heat of vaporization of `1` is not known."
  182. Density::unknown =
  183.     "The density of `1` is not known."
  184. ThermalConductivity::unknown =
  185.     "The thermal conductivity of `1` is not known."
  186. ElectronConfiguration::unknown =
  187.     "The electron configuration of `1` is not known."
  188.  
  189.  
  190. ElectronConfigurationFormat[name_Symbol] :=
  191.     Module[{l=ElectronConfiguration[name],i,j,orbital={"s","p","d","f"}},
  192.        If[!SameQ[l,Unknown],    
  193.         Apply[SequenceForm,Drop[Flatten[
  194.             Table[
  195.             Append[
  196.                 Table[{ToString[i],orbital[[j]],
  197.                    Superscript[l[[i,j]]]},
  198.                    {j,1,Length[l[[i]]]}],
  199.                 " "
  200.             ],
  201.             {i,1,Length[l]}
  202.             ]
  203.         ],-1]],
  204.         Unknown
  205.        ]
  206.     ] 
  207.  
  208.  
  209. ElementAbbreviations =
  210.     {"H","He","Li","Be","B","C","N","O","F","Ne","Na","Mg","Al","Si","P",
  211.      "S","Cl","Ar","K","Ca","Sc","Ti","V","Cr","Mn","Fe","Co","Ni","Cu",
  212.      "Zn","Ga","Ge","As","Se","Br","Kr","Rb","Sr","Y","Zr","Nb","Mo","Tc",
  213.      "Ru","Rh","Pd","Ag","Cd","In","Sn","Sb","Te","I","Xe","Cs","Ba","La",
  214.      "Ce","Pr","Nd","Pm","Sm","Eu","Gd","Tb","Dy","Ho","Er","Tm","Yb",
  215.      "Lu","Hf","Ta","W","Re","Os","Ir","Pt","Au","Hg","Tl","Pb","Bi","Po",
  216.      "At","Rn","Fr","Ra","Ac","Th","Pa","U","Np","Pu","Am","Cm","Bk","Cf",
  217.      "Es","Fm","Md","No","Lr","Unq","Unp","Unh"}
  218.  
  219.  
  220. Scan[SetAttributes[#,Listable]&,
  221.     {AtomicNumber,AtomicWeight,MeltingPoint,BoilingPoint,HeatOfFusion,
  222.      HeatOfVaporization,Density,ThermalConductivity,StableIsotopes,
  223.      ElectronConfiguration,ElectronConfigurationFormat,Abbreviation}]
  224.  
  225.  
  226.  
  227.  
  228. AtomicNumber[Hydrogen] ^= 1
  229. AtomicWeight[Hydrogen] ^= 1.00794
  230. MeltingPoint[Hydrogen] ^= 14.01 Kelvin
  231. BoilingPoint[Hydrogen] ^= 20.28 Kelvin
  232. HeatOfFusion[Hydrogen] ^=  0.12 Kilo Joule / Mole
  233. HeatOfVaporization[Hydrogen] ^= 0.46 Kilo Joule / Mole
  234. Density[Hydrogen] ^:=  DensityException[Hydrogen, 76.0, 11]
  235. ThermalConductivity[Hydrogen] ^:= ThermalConductivityException[Hydrogen,
  236.                     0.1815, "gaseous"]
  237. StableIsotopes[Hydrogen] ^= {1,2} 
  238. ElectronConfiguration[Hydrogen] ^= {{1}}
  239. Abbreviation[Hydrogen] ^= "H"
  240.  
  241. AtomicNumber[Helium] ^= 2
  242. AtomicWeight[Helium] ^= 4.0026
  243. MeltingPoint[Helium] ^= 0.95 Kelvin            (* under pressure *)
  244. BoilingPoint[Helium] ^= 4.216 Kelvin
  245. HeatOfFusion[Helium] ^= 0.021 Kilo Joule / Mole
  246. HeatOfVaporization[Helium] ^= 0.082 Kilo Joule / Mole
  247. Density[Helium] ^:= DensityException[Helium, 124.8, 4, "liquid"] 
  248. ThermalConductivity[Helium] ^:= ThermalConductivityException[Helium,
  249.                     0.152, "gaseous"]
  250. StableIsotopes[Helium] ^= {3,4}
  251. ElectronConfiguration[Helium] ^= {{2}}
  252. Abbreviation[Helium] ^= "He"
  253.  
  254. AtomicNumber[Lithium] ^= 3
  255. AtomicWeight[Lithium] ^= 6.941
  256. MeltingPoint[Lithium] ^= 453.69 Kelvin
  257. BoilingPoint[Lithium] ^= 1620. Kelvin
  258. HeatOfFusion[Lithium] ^= 4.60 Kilo Joule / Mole
  259. HeatOfVaporization[Lithium] ^= 147.7  Kilo Joule / Mole
  260. Density[Lithium] ^=  534. Kilogram/(Meter)^3
  261. ThermalConductivity[Lithium] ^= 84.7 Watt/(Meter Kelvin)
  262. StableIsotopes[Lithium] ^=  {6,7}
  263. ElectronConfiguration[Lithium] ^= {{2},{1}}
  264. Abbreviation[Lithium] ^= "Li"
  265.  
  266. AtomicNumber[Beryllium] ^= 4
  267. AtomicWeight[Beryllium] ^= 9.01218
  268. MeltingPoint[Beryllium] ^= 1551. Kelvin         (*  +- 5. Kelvin *)
  269. BoilingPoint[Beryllium] ^= 3243. Kelvin
  270. HeatOfFusion[Beryllium] ^= 9.80 Kilo Joule / Mole
  271. HeatOfVaporization[Beryllium] ^= 308.8 Kilo Joule / Mole
  272. Density[Beryllium] ^= 1847.7 Kilogram/(Meter)^3 
  273. ThermalConductivity[Beryllium] ^= 200. Watt/(Meter Kelvin) 
  274. StableIsotopes[Beryllium] ^= {9} 
  275. ElectronConfiguration[Beryllium] ^= {{2},{2}}
  276. Abbreviation[Beryllium] ^= "Be"
  277.  
  278. AtomicNumber[Boron] ^= 5
  279. AtomicWeight[Boron] ^= 10.81
  280. MeltingPoint[Boron] ^= 2573. Kelvin
  281. BoilingPoint[Boron] ^= 3931. Kelvin
  282. HeatOfFusion[Boron] ^= 22.2 Kilo Joule / Mole
  283. HeatOfVaporization[Boron] ^= 504.5 Kilo Joule / Mole
  284. Density[Boron] ^=  2340. Kilogram/(Meter)^3
  285. ThermalConductivity[Boron] ^= 27.0 Watt/(Meter Kelvin) 
  286. StableIsotopes[Boron] ^= {10,11} 
  287. ElectronConfiguration[Boron] ^= {{2},{2,1}}
  288. Abbreviation[Boron] ^= "B"
  289.  
  290. AtomicNumber[Carbon] ^= 6
  291. AtomicWeight[Carbon] ^= 12.011
  292. MeltingPoint[Carbon] ^:= MeltingPointException[Carbon,
  293.                 3820., "diamond"]
  294. BoilingPoint[Carbon] ^= 5100. Kelvin     (* temperature at which C sublimes *)
  295. HeatOfFusion[Carbon] ^= 105.0 Kilo Joule / Mole 
  296. HeatOfVaporization[Carbon] ^= 710.9 Kilo Joule / Mole
  297. Density[Carbon] ^:= DensityException[Carbon,3513.,"diamond"]
  298. ThermalConductivity[Carbon] ^:= ThermalConductivityException[Carbon,
  299.                 1960., "graphite"]
  300. StableIsotopes[Carbon] ^=  {12,13}
  301. ElectronConfiguration[Carbon] ^= {{2},{2,2}}
  302. Abbreviation[Carbon] ^= "C"
  303.  
  304. AtomicNumber[Nitrogen] ^= 7
  305. AtomicWeight[Nitrogen] ^= 14.0067
  306. MeltingPoint[Nitrogen] ^= 63.29 Kelvin
  307. BoilingPoint[Nitrogen] ^= 77.4 Kelvin
  308. HeatOfFusion[Nitrogen] ^= 0.720 Kilo Joule / Mole
  309. HeatOfVaporization[Nitrogen] ^= 5.577  Kilo Joule / Mole
  310. Density[Nitrogen] ^:= DensityException[Nitrogen,1026.,21]
  311. ThermalConductivity[Nitrogen] ^:= ThermalConductivityException[Nitrogen,
  312.                 0.02598, "gaseous"]
  313. StableIsotopes[Nitrogen] ^= {14,15}  
  314. ElectronConfiguration[Nitrogen] ^= {{2},{2,3}}
  315. Abbreviation[Nitrogen] ^= "N"
  316.  
  317. AtomicNumber[Oxygen] ^= 8
  318. AtomicWeight[Oxygen] ^= 15.9994
  319. MeltingPoint[Oxygen] ^= 54.8 Kelvin
  320. BoilingPoint[Oxygen] ^= 90.19 Kelvin
  321. HeatOfFusion[Oxygen] ^= 0.444 Kilo Joule / Mole
  322. HeatOfVaporization[Oxygen] ^= 6.82 Kilo Joule / Mole
  323. Density[Oxygen] ^:= DensityException[Oxygen,2000.,55]
  324. ThermalConductivity[Oxygen] ^:= ThermalConductivityException[Oxygen,
  325.                 0.02674, "gaseous"]
  326. StableIsotopes[Oxygen] ^= {16,17,18} 
  327. ElectronConfiguration[Oxygen] ^= {{2},{2,4}}
  328. Abbreviation[Oxygen] ^= "O"
  329.  
  330. AtomicNumber[Fluorine] ^= 9
  331. AtomicWeight[Fluorine] ^= 19.998403
  332. MeltingPoint[Fluorine] ^= 53.53 Kelvin
  333. BoilingPoint[Fluorine] ^= 85.01 Kelvin
  334. HeatOfFusion[Fluorine] ^= 1.02 Kilo Joule / Mole
  335. HeatOfVaporization[Fluorine] ^= 3.26  Kilo Joule / Mole
  336. Density[Fluorine] ^:= DensityException[Fluorine,1516.,85,"liquid"]
  337. ThermalConductivity[Fluorine] ^:= ThermalConductivityException[Fluorine,
  338.                 0.0279, "gaseous"]
  339. StableIsotopes[Fluorine] ^=  {19}
  340. ElectronConfiguration[Fluorine] ^= {{2},{2,5}}
  341. Abbreviation[Fluorine] ^= "F"
  342.  
  343. AtomicNumber[Neon] ^= 10
  344. AtomicWeight[Neon] ^= 20.179
  345. MeltingPoint[Neon] ^= 24.48 Kelvin
  346. BoilingPoint[Neon] ^= 27.10 Kelvin
  347. HeatOfFusion[Neon] ^= 0.324 Kilo Joule / Mole
  348. HeatOfVaporization[Neon] ^= 1.736  Kilo Joule / Mole
  349. Density[Neon] ^:= DensityException[Neon,1444.,24]
  350. ThermalConductivity[Neon] ^:= ThermalConductivityException[Neon,
  351.                 0.0493, "gaseous"]
  352. StableIsotopes[Neon] ^=  {20,21,22}
  353. ElectronConfiguration[Neon] ^= {{2},{2,6}}
  354. Abbreviation[Neon] ^= "Ne"
  355.  
  356. Natrium = Sodium
  357. AtomicNumber[Sodium] ^= 11
  358. AtomicWeight[Sodium] ^= 22.98977
  359. MeltingPoint[Sodium] ^= 370.96 Kelvin
  360. BoilingPoint[Sodium] ^= 1156.1 Kelvin
  361. HeatOfFusion[Sodium] ^=  2.64 Kilo Joule / Mole
  362. HeatOfVaporization[Sodium] ^= 99.2  Kilo Joule / Mole
  363. Density[Sodium] ^= 971. Kilogram/(Meter)^3 
  364. ThermalConductivity[Sodium] ^= 141. Watt/(Meter Kelvin) 
  365. StableIsotopes[Sodium] ^=  {23}
  366. ElectronConfiguration[Sodium] ^= {{2},{2,6},{1}}
  367. Abbreviation[Sodium] ^= "Na"
  368.  
  369. AtomicNumber[Magnesium] ^= 12
  370. AtomicWeight[Magnesium] ^= 24.305
  371. MeltingPoint[Magnesium] ^= 922.0 Kelvin
  372. BoilingPoint[Magnesium] ^= 1363. Kelvin
  373. HeatOfFusion[Magnesium] ^= 9.04 Kilo Joule / Mole
  374. HeatOfVaporization[Magnesium] ^= 127.6  Kilo Joule / Mole
  375. Density[Magnesium] ^= 1738. Kilogram/(Meter)^3 
  376. ThermalConductivity[Magnesium] ^= 156. Watt/(Meter Kelvin) 
  377. StableIsotopes[Magnesium] ^=  {24,25,26}
  378. ElectronConfiguration[Magnesium] ^= {{2},{2,6},{2}}
  379. Abbreviation[Magnesium] ^= "Mg"
  380.  
  381. Aluminum = Aluminium
  382. AtomicNumber[Aluminium] ^= 13
  383. AtomicWeight[Aluminium] ^= 26.98154
  384. MeltingPoint[Aluminium] ^= 933.5 Kelvin
  385. BoilingPoint[Aluminium] ^= 2740. Kelvin
  386. HeatOfFusion[Aluminium] ^= 10.67 Kilo Joule / Mole
  387. HeatOfVaporization[Aluminium] ^= 290.8  Kilo Joule / Mole
  388. Density[Aluminium] ^=  2698. Kilogram/(Meter)^3
  389. ThermalConductivity[Aluminium] ^= 237. Watt/(Meter Kelvin) 
  390. StableIsotopes[Aluminium] ^= {27} 
  391. ElectronConfiguration[Aluminium] ^= {{2},{2,6},{2,1}}
  392. Abbreviation[Aluminium] ^= "Al"
  393.  
  394. AtomicNumber[Silicon] ^= 14
  395. AtomicWeight[Silicon] ^= 28.0855
  396. MeltingPoint[Silicon] ^= 1683. Kelvin
  397. BoilingPoint[Silicon] ^= 2628. Kelvin
  398. HeatOfFusion[Silicon] ^= 39.6  Kilo Joule / Mole
  399. HeatOfVaporization[Silicon] ^= 383.3  Kilo Joule / Mole
  400. Density[Silicon] ^=  2329. Kilogram/(Meter)^3
  401. ThermalConductivity[Silicon] ^=  148 Watt/(Meter Kelvin)
  402. StableIsotopes[Silicon] ^=  {28,29,30}
  403. ElectronConfiguration[Silicon] ^= {{2},{2,6},{2,2}}
  404. Abbreviation[Silicon] ^= "Si"
  405.  
  406. AtomicNumber[Phosphorus] ^= 15
  407. AtomicWeight[Phosphorus] ^= 30.97376
  408. MeltingPoint[Phosphorus] ^:= MeltingPointException[Phosphorus, 317.3,"P4"]
  409. BoilingPoint[Phosphorus] ^:= BoilingPointException[Phosphorus, 553., "P4"]
  410. HeatOfFusion[Phosphorus] ^:= HeatOfFusionException[Phosphorus, 2.51, "P4"]
  411. HeatOfVaporization[Phosphorus] ^:= HeatOfVaporizationException[Phosphorus,
  412.                     51.9, "P4"]
  413. Density[Phosphorus] ^:= DensityException[Phosphorus,1820., "P4"]
  414. ThermalConductivity[Phosphorus] ^=  0.235 Watt/(Meter Kelvin)
  415. StableIsotopes[Phosphorus] ^=  {31}
  416. ElectronConfiguration[Phosphorus] ^= {{2},{2,6},{2,3}}
  417. Abbreviation[Phosphorus] ^= "P"
  418.  
  419. Sulphur = Sulfur
  420. AtomicNumber[Sulfur] ^= 16
  421. AtomicWeight[Sulfur] ^= 32.06
  422. MeltingPoint[Sulfur] ^:= MeltingPointException[Sulfur, 386.0, "alpha"]
  423. BoilingPoint[Sulfur] ^= 717.824 Kelvin
  424. HeatOfFusion[Sulfur] ^= 1.23 Kilo Joule / Mole
  425. HeatOfVaporization[Sulfur] ^= 9.62  Kilo Joule / Mole
  426. Density[Sulfur] ^:= DensityException[Sulfur,2070.,"alpha"]
  427. ThermalConductivity[Sulfur] ^:= ThermalConductivityException[Sulfur,
  428.                 0.269, "alpha"]
  429. StableIsotopes[Sulfur] ^=   {32,33,34,36}
  430. ElectronConfiguration[Sulfur] ^= {{2},{2,6},{2,4}}
  431. Abbreviation[Sulfur] ^= "S"
  432.  
  433. AtomicNumber[Chlorine] ^= 17
  434. AtomicWeight[Chlorine] ^= 35.453
  435. MeltingPoint[Chlorine] ^= 172.2 Kelvin
  436. BoilingPoint[Chlorine] ^= 239.6 Kelvin
  437. HeatOfFusion[Chlorine] ^= 6.41 Kilo Joule / Mole
  438. HeatOfVaporization[Chlorine] ^= 20.4033  Kilo Joule / Mole
  439. Density[Chlorine] ^:= DensityException[Chlorine,2030.,113]
  440. ThermalConductivity[Chlorine] ^:= ThermalConductivityException[Chlorine,
  441.                     0.0089, "gaseous"]
  442. StableIsotopes[Chlorine] ^= {35,37}
  443. ElectronConfiguration[Chlorine] ^= {{2},{2,6},{2,5}}
  444. Abbreviation[Chlorine] ^= "Cl"
  445.  
  446. AtomicNumber[Argon] ^= 18
  447. AtomicWeight[Argon] ^= 39.948
  448. MeltingPoint[Argon] ^= 83.8 Kelvin
  449. BoilingPoint[Argon] ^= 87.3 Kelvin
  450. HeatOfFusion[Argon] ^= 1.21  Kilo Joule / Mole
  451. HeatOfVaporization[Argon] ^= 6.53  Kilo Joule / Mole
  452. Density[Argon] ^:= DensityException[Argon,1656.,40]
  453. ThermalConductivity[Argon] ^:= ThermalConductivityException[Argon,
  454.                 0.01772, "gaseous"]
  455. StableIsotopes[Argon] ^= {36,38,40} 
  456. ElectronConfiguration[Argon] ^= {{2},{2,6},{2,6}}
  457. Abbreviation[Argon] ^= "Ar"
  458.  
  459. Kalium = Potassium
  460. AtomicNumber[Potassium] ^= 19
  461. AtomicWeight[Potassium] ^= 39.0983
  462. MeltingPoint[Potassium] ^= 336.8 Kelvin
  463. BoilingPoint[Potassium] ^= 1047. Kelvin
  464. HeatOfFusion[Potassium] ^=  2.40 Kilo Joule / Mole
  465. HeatOfVaporization[Potassium] ^= 79.1  Kilo Joule / Mole
  466. Density[Potassium] ^= 862. Kilogram/(Meter)^3 
  467. ThermalConductivity[Potassium] ^=  102.4 Watt/(Meter Kelvin)
  468. StableIsotopes[Potassium] ^=  {39,41}
  469. ElectronConfiguration[Potassium] ^= {{2},{2,6},{2,6},{1}}
  470. Abbreviation[Potassium] ^= "K"
  471.  
  472. AtomicNumber[Calcium] ^= 20
  473. AtomicWeight[Calcium] ^= 40.08
  474. MeltingPoint[Calcium] ^= 1112. Kelvin
  475. BoilingPoint[Calcium] ^= 1757. Kelvin
  476. HeatOfFusion[Calcium] ^= 9.33  Kilo Joule / Mole
  477. HeatOfVaporization[Calcium] ^= 150.6  Kilo Joule / Mole
  478. Density[Calcium] ^=  1550. Kilogram/(Meter)^3
  479. ThermalConductivity[Calcium] ^=  200. Watt/(Meter Kelvin)
  480. StableIsotopes[Calcium] ^=  {40,42,43,44,46,48}
  481. ElectronConfiguration[Calcium] ^= {{2},{2,6},{2,6},{2}}
  482. Abbreviation[Calcium] ^= "Ca"
  483.  
  484. AtomicNumber[Scandium] ^= 21
  485. AtomicWeight[Scandium] ^= 44.9559
  486. MeltingPoint[Scandium] ^= 1814. Kelvin 
  487. BoilingPoint[Scandium] ^= 3104. Kelvin
  488. HeatOfFusion[Scandium] ^=  15.9 Kilo Joule / Mole
  489. HeatOfVaporization[Scandium] ^= 376.1  Kilo Joule / Mole
  490. Density[Scandium] ^=   2989. Kilogram/(Meter)^3
  491. ThermalConductivity[Scandium] ^=  15.8 Watt/(Meter Kelvin)
  492. StableIsotopes[Scandium] ^=  {45}
  493. ElectronConfiguration[Scandium] ^= {{2},{2,6},{2,6,1},{2}}
  494. Abbreviation[Scandium] ^= "Sc"
  495.  
  496. AtomicNumber[Titanium] ^= 22
  497. AtomicWeight[Titanium] ^= 47.88
  498. MeltingPoint[Titanium] ^= 1933. Kelvin
  499. BoilingPoint[Titanium] ^= 3560. Kelvin
  500. HeatOfFusion[Titanium] ^= 20.9  Kilo Joule / Mole
  501. HeatOfVaporization[Titanium] ^= 425.5  Kilo Joule / Mole
  502. Density[Titanium] ^=  4540. Kilogram/(Meter)^3
  503. ThermalConductivity[Titanium] ^=  21.9 Watt/(Meter Kelvin)
  504. StableIsotopes[Titanium] ^=  {46,47,48,49,50}
  505. ElectronConfiguration[Titanium] ^= {{2},{2,6},{2,6,2},{2}}
  506. Abbreviation[Titanium] ^= "Ti"
  507.  
  508. AtomicNumber[Vanadium] ^= 23
  509. AtomicWeight[Vanadium] ^= 50.9415
  510. MeltingPoint[Vanadium] ^= 2160. Kelvin
  511. BoilingPoint[Vanadium] ^= 3650. Kelvin
  512. HeatOfFusion[Vanadium] ^= 17.6 Kilo Joule / Mole
  513. HeatOfVaporization[Vanadium] ^= 459.70  Kilo Joule / Mole
  514. Density[Vanadium] ^=  6110. Kilogram/(Meter)^3
  515. ThermalConductivity[Vanadium] ^=  30.7 Watt/(Meter Kelvin)
  516. StableIsotopes[Vanadium] ^=  {51}
  517. ElectronConfiguration[Vanadium] ^= {{2},{2,6},{2,6,3},{2}}
  518. Abbreviation[Vanadium] ^= "V"
  519.  
  520. AtomicNumber[Chromium] ^= 24
  521. AtomicWeight[Chromium] ^= 51.996
  522. MeltingPoint[Chromium] ^= 2130. Kelvin             (* +- 20. Kelvin *)
  523. BoilingPoint[Chromium] ^= 2945. Kelvin
  524. HeatOfFusion[Chromium] ^= 15.3  Kilo Joule / Mole
  525. HeatOfVaporization[Chromium] ^= 341.8  Kilo Joule / Mole
  526. Density[Chromium] ^=  7190. Kilogram/(Meter)^3
  527. ThermalConductivity[Chromium] ^=  93.7 Watt/(Meter Kelvin)
  528. StableIsotopes[Chromium] ^=  {50,52,53,54}
  529. ElectronConfiguration[Chromium] ^= {{2},{2,6},{2,6,5},{1}}
  530. Abbreviation[Chromium] ^= "Cr"
  531.  
  532. AtomicNumber[Manganese] ^= 25
  533. AtomicWeight[Manganese] ^= 54.938
  534. MeltingPoint[Manganese] ^= 1517. Kelvin
  535. BoilingPoint[Manganese] ^= 2235. Kelvin
  536. HeatOfFusion[Manganese] ^=  14.4 Kilo Joule / Mole
  537. HeatOfVaporization[Manganese] ^= 220.5  Kilo Joule / Mole
  538. Density[Manganese] ^=  7440. Kilogram/(Meter)^3
  539. ThermalConductivity[Manganese] ^=  7.82 Watt/(Meter Kelvin)
  540. StableIsotopes[Manganese] ^=  {55}
  541. ElectronConfiguration[Manganese] ^= {{2},{2,6},{2,6,5},{2}}
  542. Abbreviation[Manganese] ^= "Mn"
  543.  
  544. AtomicNumber[Iron] ^= 26
  545. AtomicWeight[Iron] ^= 55.847
  546. MeltingPoint[Iron] ^= 1808. Kelvin
  547. BoilingPoint[Iron] ^= 3023. Kelvin
  548. HeatOfFusion[Iron] ^= 14.9  Kilo Joule / Mole
  549. HeatOfVaporization[Iron] ^= 340.2  Kilo Joule / Mole
  550. Density[Iron] ^=  7874. Kilogram/(Meter)^3
  551. ThermalConductivity[Iron] ^=  80.2 Watt/(Meter Kelvin)
  552. StableIsotopes[Iron] ^=  {54,56,57,58}
  553. ElectronConfiguration[Iron] ^= {{2},{2,6},{2,6,6},{2}}
  554. Abbreviation[Iron] ^= "Fe"
  555.  
  556. AtomicNumber[Cobalt] ^= 27
  557. AtomicWeight[Cobalt] ^= 58.9332
  558. MeltingPoint[Cobalt] ^= 1768. Kelvin
  559. BoilingPoint[Cobalt] ^= 3143. Kelvin
  560. HeatOfFusion[Cobalt] ^= 15.2  Kilo Joule / Mole
  561. HeatOfVaporization[Cobalt] ^= 382.4  Kilo Joule / Mole
  562. Density[Cobalt] ^=  8900. Kilogram/(Meter)^3
  563. ThermalConductivity[Cobalt] ^=  100. Watt/(Meter Kelvin)
  564. StableIsotopes[Cobalt] ^=  {59}
  565. ElectronConfiguration[Cobalt] ^= {{2},{2,6},{2,6,7},{2}}
  566. Abbreviation[Cobalt] ^= "Co"
  567.  
  568. AtomicNumber[Nickel] ^= 28
  569. AtomicWeight[Nickel] ^= 58.69
  570. MeltingPoint[Nickel] ^= 1726. Kelvin
  571. BoilingPoint[Nickel] ^= 3005. Kelvin
  572. HeatOfFusion[Nickel] ^= 17.6 Kilo Joule / Mole
  573. HeatOfVaporization[Nickel] ^= 374.8  Kilo Joule / Mole
  574. Density[Nickel] ^=  8902. Kilogram/(Meter)^3
  575. ThermalConductivity[Nickel] ^=  90.7 Watt/(Meter Kelvin)
  576. StableIsotopes[Nickel] ^=  {58,60,61,62,64}
  577. ElectronConfiguration[Nickel] ^= {{2},{2,6},{2,6,8},{2}}
  578. Abbreviation[Nickel] ^= "Ni"
  579.  
  580. AtomicNumber[Copper] ^= 29
  581. AtomicWeight[Copper] ^= 63.546
  582. MeltingPoint[Copper] ^= 1356.6 Kelvin
  583. BoilingPoint[Copper] ^= 2840 Kelvin
  584. HeatOfFusion[Copper] ^= 13.0  Kilo Joule / Mole
  585. HeatOfVaporization[Copper] ^= 306.7  Kilo Joule / Mole
  586. Density[Copper] ^=  8960. Kilogram/(Meter)^3
  587. ThermalConductivity[Copper] ^=   401. Watt/(Meter Kelvin)
  588. StableIsotopes[Copper] ^=  {63,65}
  589. ElectronConfiguration[Copper] ^= {{2},{2,6},{2,6,10},{1}}
  590. Abbreviation[Copper] ^= "Cu"
  591.  
  592. AtomicNumber[Zinc] ^= 30
  593. AtomicWeight[Zinc] ^= 65.38
  594. MeltingPoint[Zinc] ^= 692.73 Kelvin
  595. BoilingPoint[Zinc] ^= 1180. Kelvin
  596. HeatOfFusion[Zinc] ^= 6.67  Kilo Joule / Mole
  597. HeatOfVaporization[Zinc] ^= 114.2  Kilo Joule / Mole
  598. Density[Zinc] ^=  7133. Kilogram/(Meter)^3
  599. ThermalConductivity[Zinc] ^=  116. Watt/(Meter Kelvin)
  600. StableIsotopes[Zinc] ^=  {66,67,68,70}
  601. ElectronConfiguration[Zinc] ^= {{2},{2,6},{2,6,10},{2}}
  602. Abbreviation[Zinc] ^= "Zn"
  603.  
  604. AtomicNumber[Gallium] ^= 31
  605. AtomicWeight[Gallium] ^= 69.72
  606. MeltingPoint[Gallium] ^= 302.93 Kelvin
  607. BoilingPoint[Gallium] ^= 2676. Kelvin
  608. HeatOfFusion[Gallium] ^= 5.59  Kilo Joule / Mole
  609. HeatOfVaporization[Gallium] ^= 270.3  Kilo Joule / Mole
  610. Density[Gallium] ^=  5907. Kilogram/(Meter)^3
  611. ThermalConductivity[Gallium] ^=  40.6 Watt/(Meter Kelvin)
  612. StableIsotopes[Gallium] ^=  {69,71}
  613. ElectronConfiguration[Gallium] ^= {{2},{2,6},{2,6,10},{2,1}}
  614. Abbreviation[Gallium] ^= "Ga"
  615.  
  616. AtomicNumber[Germanium] ^= 32
  617. AtomicWeight[Germanium] ^= 72.59
  618. MeltingPoint[Germanium] ^= 1210.6 Kelvin
  619. BoilingPoint[Germanium] ^= 3103. Kelvin
  620. HeatOfFusion[Germanium] ^= 34.7 Kilo Joule / Mole
  621. HeatOfVaporization[Germanium] ^= 327.6 Kilo Joule / Mole
  622. Density[Germanium] ^=  5323. Kilogram/(Meter)^3
  623. ThermalConductivity[Germanium] ^=  59.9 Watt/(Meter Kelvin)
  624. StableIsotopes[Germanium] ^=  {70,72,73,74,76}
  625. ElectronConfiguration[Germanium] ^= {{2},{2,6},{2,6,10},{2,2}}
  626. Abbreviation[Germanium] ^= "Ge"
  627.  
  628. AtomicNumber[Arsenic] ^= 33
  629. AtomicWeight[Arsenic] ^= 74.9216
  630. MeltingPoint[Arsenic] ^= 83.78 Kelvin
  631. BoilingPoint[Arsenic] ^= 889 Kelvin     (* temperature at which As sublimes *)
  632. HeatOfFusion[Arsenic] ^= 27.7 Kilo Joule / Mole
  633. HeatOfVaporization[Arsenic] ^= 31.9 Kilo Joule / Mole
  634. Density[Arsenic] ^:= DensityException[Arsenic,5780.,"alpha"]
  635. ThermalConductivity[Arsenic] ^:= ThermalConductivityException[Arsenic,
  636.                 50.0, "alpha"]
  637. StableIsotopes[Arsenic] ^=  {75}
  638. ElectronConfiguration[Arsenic] ^= {{2},{2,6},{2,6,10},{2,3}}
  639. Abbreviation[Arsenic] ^= "As"
  640.  
  641. AtomicNumber[Selenium] ^= 34
  642. AtomicWeight[Selenium] ^= 78.96
  643. MeltingPoint[Selenium] ^= 490. Kelvin
  644. BoilingPoint[Selenium] ^= 958.1 Kelvin
  645. HeatOfFusion[Selenium] ^=  5.1 Kilo Joule / Mole
  646. HeatOfVaporization[Selenium] ^= 90. Kilo Joule / Mole 
  647. Density[Selenium] ^=  4790. Kilogram/(Meter)^3
  648. ThermalConductivity[Selenium] ^=  2.04 Watt/(Meter Kelvin)
  649. StableIsotopes[Selenium] ^=  {74,76,77,78,80,82}
  650. ElectronConfiguration[Selenium] ^= {{2},{2,6},{2,6,10},{2,4}}
  651. Abbreviation[Selenium] ^= "Se"
  652.  
  653. AtomicNumber[Bromine] ^= 35
  654. AtomicWeight[Bromine] ^= 79.904
  655. MeltingPoint[Bromine] ^= 265.9 Kelvin
  656. BoilingPoint[Bromine] ^= 331.9 Kelvin
  657. HeatOfFusion[Bromine] ^= 10.8  Kilo Joule / Mole
  658. HeatOfVaporization[Bromine] ^= 30.5  Kilo Joule / Mole
  659. Density[Bromine] ^:= DensityException[Bromine,4050.,123]
  660. ThermalConductivity[Bromine] ^:= ThermalConductivityException[Bromine,
  661.                 0.122, "liquid"]
  662. StableIsotopes[Bromine] ^=  {79,81}
  663. ElectronConfiguration[Bromine] ^= {{2},{2,6},{2,6,10},{2,5}}
  664. Abbreviation[Bromine] ^= "Br"
  665.  
  666. AtomicNumber[Krypton] ^= 36
  667. AtomicWeight[Krypton] ^= 83.8
  668. MeltingPoint[Krypton] ^= 116.6 Kelvin
  669. BoilingPoint[Krypton] ^= 120.85 Kelvin
  670. HeatOfFusion[Krypton] ^= 1.64  Kilo Joule / Mole
  671. HeatOfVaporization[Krypton] ^= 9.05  Kilo Joule / Mole
  672. Density[Krypton] ^:= DensityException[Krypton,2823.,117]
  673. ThermalConductivity[Krypton] ^:= ThermalConductivityException[Krypton,
  674.                 0.00949, "gaseous"]
  675. StableIsotopes[Krypton] ^=  {78,80,82,83,84,86}
  676. ElectronConfiguration[Krypton] ^= {{2},{2,6},{2,6,10},{2,6}}
  677. Abbreviation[Krypton] ^= "Kr"
  678.  
  679. AtomicNumber[Rubidium] ^= 37
  680. AtomicWeight[Rubidium] ^= 85.4678
  681. MeltingPoint[Rubidium] ^= 312.2 Kelvin
  682. BoilingPoint[Rubidium] ^= 961. Kelvin
  683. HeatOfFusion[Rubidium] ^= 2.20  Kilo Joule / Mole
  684. HeatOfVaporization[Rubidium] ^= 75.7  Kilo Joule / Mole
  685. Density[Rubidium] ^= 1532.   Kilogram/(Meter)^3
  686. ThermalConductivity[Rubidium] ^=  58.2 Watt/(Meter Kelvin)
  687. StableIsotopes[Rubidium] ^=  {85}
  688. ElectronConfiguration[Rubidium] ^= {{2},{2,6},{2,6,10},{2,6},{1}}
  689. Abbreviation[Rubidium] ^= "Rb"
  690.  
  691. AtomicNumber[Strontium] ^= 38
  692. AtomicWeight[Strontium] ^= 87.62
  693. MeltingPoint[Strontium] ^= 1042. Kelvin
  694. BoilingPoint[Strontium] ^= 1657 Kelvin
  695. HeatOfFusion[Strontium] ^= 9.16  Kilo Joule / Mole
  696. HeatOfVaporization[Strontium] ^= 154.4  Kilo Joule / Mole
  697. Density[Strontium] ^=  2540. Kilogram/(Meter)^3
  698. ThermalConductivity[Strontium] ^=  35.3 Watt/(Meter Kelvin)
  699. StableIsotopes[Strontium] ^=  {84,86,87,88}
  700. ElectronConfiguration[Strontium] ^= {{2},{2,6},{2,6,10},{2,6},{2}}
  701. Abbreviation[Strontium] ^= "Sr"
  702.  
  703. AtomicNumber[Yttrium] ^= 39
  704. AtomicWeight[Yttrium] ^= 88.9059
  705. MeltingPoint[Yttrium] ^= 1795. Kelvin
  706. BoilingPoint[Yttrium] ^= 3611. Kelvin
  707. HeatOfFusion[Yttrium] ^= 17.2 Kilo Joule / Mole
  708. HeatOfVaporization[Yttrium] ^= 367.4 Kilo Joule / Mole
  709. Density[Yttrium] ^=  4469. Kilogram/(Meter)^3
  710. ThermalConductivity[Yttrium] ^= 17.2 Watt/(Meter Kelvin) 
  711. StableIsotopes[Yttrium] ^=  {89}
  712. ElectronConfiguration[Yttrium] ^= {{2},{2,6},{2,6,10},{2,6,1},{2}}
  713. Abbreviation[Yttrium] ^= "Y"
  714.  
  715. AtomicNumber[Zirconium] ^= 40
  716. AtomicWeight[Zirconium] ^= 91.22
  717. MeltingPoint[Zirconium] ^= 2125. Kelvin
  718. BoilingPoint[Zirconium] ^= 4650. Kelvin
  719. HeatOfFusion[Zirconium] ^= 23.0  Kilo Joule / Mole
  720. HeatOfVaporization[Zirconium] ^= 566.7 Kilo Joule / Mole
  721. Density[Zirconium] ^=  6506. Kilogram/(Meter)^3
  722. ThermalConductivity[Zirconium] ^=  22.7 Watt/(Meter Kelvin)
  723. StableIsotopes[Zirconium] ^=  {90,91,92,94}
  724. ElectronConfiguration[Zirconium] ^= {{2},{2,6},{2,6,10},{2,6,2},{2}}
  725. Abbreviation[Zirconium] ^= "Zr"
  726.  
  727. AtomicNumber[Niobium] ^= 41
  728. AtomicWeight[Niobium] ^= 92.9064
  729. MeltingPoint[Niobium] ^= 2741. Kelvin 
  730. BoilingPoint[Niobium] ^= 5015. Kelvin 
  731. HeatOfFusion[Niobium] ^= 27.2  Kilo Joule / Mole
  732. HeatOfVaporization[Niobium] ^= 680.19  Kilo Joule / Mole
  733. Density[Niobium] ^=  8570. Kilogram/(Meter)^3
  734. ThermalConductivity[Niobium] ^=  53.7 Watt/(Meter Kelvin)
  735. StableIsotopes[Niobium] ^=  {93}
  736. ElectronConfiguration[Niobium] ^= {{2},{2,6},{2,6,10},{2,6,4},{1}}
  737. Abbreviation[Niobium] ^= "Nb"
  738.  
  739. AtomicNumber[Molybdenum] ^= 42
  740. AtomicWeight[Molybdenum] ^= 95.94
  741. MeltingPoint[Molybdenum] ^= 2890. Kelvin
  742. BoilingPoint[Molybdenum] ^= 4885. Kelvin
  743. HeatOfFusion[Molybdenum] ^= 27.6 Kilo Joule / Mole
  744. HeatOfVaporization[Molybdenum] ^= 589.9  Kilo Joule / Mole
  745. Density[Molybdenum] ^=  10220. Kilogram/(Meter)^3
  746. ThermalConductivity[Molybdenum] ^=  138. Watt/(Meter Kelvin)
  747. StableIsotopes[Molybdenum] ^=  {92,94,95,96,97,98,100}
  748. ElectronConfiguration[Molybdenum] ^=
  749.     {{2},{2,6},{2,6,10},{2,6,5},{1}}
  750. Abbreviation[Molybdenum] ^= "Mo"
  751.  
  752. AtomicNumber[Technetium] ^= 43
  753. AtomicWeight[Technetium] ^:= AtomicWeightUnstable[Technetium, 99]
  754. MeltingPoint[Technetium] ^= 2445. Kelvin
  755. BoilingPoint[Technetium] ^= 5150. Kelvin
  756. HeatOfFusion[Technetium] ^= 23.81 Kilo Joule / Mole
  757. HeatOfVaporization[Technetium] ^= 585.22 Kilo Joule / Mole
  758. Density[Technetium] ^=  11500. Kilogram/(Meter)^3
  759. ThermalConductivity[Technetium] ^=  50.6 Watt/(Meter Kelvin)
  760. StableIsotopes[Technetium] ^=  {}
  761. ElectronConfiguration[Technetium] ^=
  762.     {{2},{2,6},{2,6,10},{2,6,5},{2}}
  763. Abbreviation[Technetium] ^= "Tc"
  764.  
  765. AtomicNumber[Ruthenium] ^= 44
  766. AtomicWeight[Ruthenium] ^= 101.07
  767. MeltingPoint[Ruthenium] ^= 2583. Kelvin 
  768. BoilingPoint[Ruthenium] ^= 4173. Kelvin 
  769. HeatOfFusion[Ruthenium] ^= 23.7  Kilo Joule / Mole
  770. HeatOfVaporization[Ruthenium] ^= 567.  Kilo Joule / Mole
  771. Density[Ruthenium] ^=  12370. Kilogram/(Meter)^3
  772. ThermalConductivity[Ruthenium] ^=  117. Watt/(Meter Kelvin)
  773. StableIsotopes[Ruthenium] ^=  {96,98,99,100,101,102,104}
  774. ElectronConfiguration[Ruthenium] ^= {{2},{2,6},{2,6,10},{2,6,7},{1}}
  775. Abbreviation[Ruthenium] ^= "Ru"
  776.  
  777. AtomicNumber[Rhodium] ^= 45
  778. AtomicWeight[Rhodium] ^= 102.9055
  779. MeltingPoint[Rhodium] ^= 2239. Kelvin 
  780. BoilingPoint[Rhodium] ^= 4000. Kelvin 
  781. HeatOfFusion[Rhodium] ^= 21.55 Kilo Joule / Mole
  782. HeatOfVaporization[Rhodium] ^= 494.34 Kilo Joule / Mole
  783. Density[Rhodium] ^=  12410. Kilogram/(Meter)^3
  784. ThermalConductivity[Rhodium] ^=  150. Watt/(Meter Kelvin)
  785. StableIsotopes[Rhodium] ^=  {103}
  786. ElectronConfiguration[Rhodium] ^= {{2},{2,6},{2,6,10},{2,6,8},{1}}
  787. Abbreviation[Rhodium] ^= "Rh"
  788.  
  789. AtomicNumber[Palladium] ^= 46
  790. AtomicWeight[Palladium] ^= 106.42
  791. MeltingPoint[Palladium] ^= 1825. Kelvin
  792. BoilingPoint[Palladium] ^= 3413. Kelvin
  793. HeatOfFusion[Palladium] ^= 17.2 Kilo Joule / Mole
  794. HeatOfVaporization[Palladium] ^= 361.5 Kilo Joule / Mole
  795. Density[Palladium] ^=  12020. Kilogram/(Meter)^3
  796. ThermalConductivity[Palladium] ^=  71.8 Watt/(Meter Kelvin)
  797. StableIsotopes[Palladium] ^=  {102,104,105,106,108,110}
  798. ElectronConfiguration[Palladium] ^= {{2},{2,6},{2,6,10},{2,6,10}}
  799. Abbreviation[Palladium] ^= "Pd"
  800.  
  801. AtomicNumber[Silver] ^= 47
  802. AtomicWeight[Silver] ^= 107.8682
  803. MeltingPoint[Silver] ^= 1235.08 Kelvin
  804. BoilingPoint[Silver] ^= 2485. Kelvin
  805. HeatOfFusion[Silver] ^= 11.3 Kilo Joule / Mole
  806. HeatOfVaporization[Silver] ^= 257.7  Kilo Joule / Mole
  807. Density[Silver] ^=  10500. Kilogram/(Meter)^3
  808. ThermalConductivity[Silver] ^=  429. Watt/(Meter Kelvin)
  809. StableIsotopes[Silver] ^=  {107,109}
  810. ElectronConfiguration[Silver] ^= {{2},{2,6},{2,6,10},{2,6,10},{1}}
  811. Abbreviation[Silver] ^= "Ag"
  812.  
  813. AtomicNumber[Cadmium] ^= 48
  814. AtomicWeight[Cadmium] ^= 112.41
  815. MeltingPoint[Cadmium] ^= 594.1 Kelvin
  816. BoilingPoint[Cadmium] ^= 1038. Kelvin
  817. HeatOfFusion[Cadmium] ^= 6.11  Kilo Joule / Mole
  818. HeatOfVaporization[Cadmium] ^= 100.0  Kilo Joule / Mole
  819. Density[Cadmium] ^=  8650. Kilogram/(Meter)^3
  820. ThermalConductivity[Cadmium] ^=  96.8 Watt/(Meter Kelvin)
  821. StableIsotopes[Cadmium] ^=  {106,108,110,111,112,113,114,116}
  822. ElectronConfiguration[Cadmium] ^= {{2},{2,6},{2,6,10},{2,6,10},{2}}
  823. Abbreviation[Cadmium] ^= "Cd"
  824.  
  825. AtomicNumber[Indium] ^= 49
  826. AtomicWeight[Indium] ^= 114.82
  827. MeltingPoint[Indium] ^= 429.32 Kelvin
  828. BoilingPoint[Indium] ^= 2353. Kelvin 
  829. HeatOfFusion[Indium] ^= 3.27 Kilo Joule / Mole
  830. HeatOfVaporization[Indium] ^= 231.8  Kilo Joule / Mole
  831. Density[Indium] ^=  7310. Kilogram/(Meter)^3
  832. ThermalConductivity[Indium] ^=  81.6 Watt/(Meter Kelvin)
  833. StableIsotopes[Indium] ^=  {113}
  834. ElectronConfiguration[Indium] ^= {{2},{2,6},{2,6,10},{2,6,10},{2,1}}
  835. Abbreviation[Indium] ^= "In"
  836.  
  837. AtomicNumber[Tin] ^= 50
  838. AtomicWeight[Tin] ^= 118.69
  839. MeltingPoint[Tin] ^= 505.118 Kelvin
  840. BoilingPoint[Tin] ^= 2543. Kelvin
  841. HeatOfFusion[Tin] ^= 7.20 Kilo Joule / Mole
  842. HeatOfVaporization[Tin] ^= 296.2  Kilo Joule / Mole
  843. Density[Tin] ^:= DensityException[Tin,7310.,"beta"]
  844. ThermalConductivity[Tin] ^:= ThermalConductivityException[Tin,
  845.                 66.6, "alpha"]
  846. StableIsotopes[Tin] ^=  {112,114,115,116,117,118,119,120,122,124}
  847. ElectronConfiguration[Tin] ^= {{2},{2,6},{2,6,10},{2,6,10},{2,2}}
  848. Abbreviation[Tin] ^= "Sn"
  849.  
  850. Stibium = Antimony
  851. AtomicNumber[Antimony] ^= 51
  852. AtomicWeight[Antimony] ^= 121.75
  853. MeltingPoint[Antimony] ^= 903.89 Kelvin
  854. BoilingPoint[Antimony] ^= 1908. Kelvin
  855. HeatOfFusion[Antimony] ^= 20.9  Kilo Joule / Mole
  856. HeatOfVaporization[Antimony] ^= 165.8  Kilo Joule / Mole
  857. Density[Antimony] ^=  6691. Kilogram/(Meter)^3
  858. ThermalConductivity[Antimony] ^=  243. Watt/(Meter Kelvin)
  859. StableIsotopes[Antimony] ^=  {121,123}
  860. ElectronConfiguration[Antimony] ^= {{2},{2,6},{2,6,10},{2,6,10},{2,3}}
  861. Abbreviation[Antimony] ^= "Sb"
  862.  
  863. AtomicNumber[Tellurium] ^= 52
  864. AtomicWeight[Tellurium] ^= 127.6
  865. MeltingPoint[Tellurium] ^= 722.7 Kelvin
  866. BoilingPoint[Tellurium] ^= 1263. Kelvin
  867. HeatOfFusion[Tellurium] ^=  13.5 Kilo Joule / Mole
  868. HeatOfVaporization[Tellurium] ^= 104.6 Kilo Joule / Mole
  869. Density[Tellurium] ^= 6240. Kilogram/(Meter)^3
  870. ThermalConductivity[Tellurium] ^= 2.35 Watt/(Meter Kelvin)
  871. StableIsotopes[Tellurium] ^= {120,122,124,125,126,128,130}
  872. ElectronConfiguration[Tellurium] ^=
  873.     {{2},{2,6},{2,6,10},{2,6,10},{2,4}}
  874. Abbreviation[Tellurium] ^= "Te"
  875.  
  876. AtomicNumber[Iodine] ^= 53
  877. AtomicWeight[Iodine] ^= 126.9045
  878. MeltingPoint[Iodine] ^= 386.7 Kelvin
  879. BoilingPoint[Iodine] ^= 457.50 Kelvin
  880. HeatOfFusion[Iodine] ^=  15.27 Kilo Joule / Mole
  881. HeatOfVaporization[Iodine] ^= 41.67 Kilo Joule / Mole
  882. Density[Iodine] ^=  4930. Kilogram/(Meter)^3
  883. ThermalConductivity[Iodine] ^=  0.449 Watt/(Meter Kelvin)
  884. StableIsotopes[Iodine] ^=  {127}
  885. ElectronConfiguration[Iodine] ^= {{2},{2,6},{2,6,10},{2,6,10},{2,5}}
  886. Abbreviation[Iodine] ^= "I"
  887.  
  888. AtomicNumber[Xenon] ^= 54
  889. AtomicWeight[Xenon] ^= 131.29
  890. MeltingPoint[Xenon] ^= 161.3 Kelvin
  891. BoilingPoint[Xenon] ^= 166.1 Kelvin
  892. HeatOfFusion[Xenon] ^=  3.10 Kilo Joule / Mole
  893. HeatOfVaporization[Xenon] ^= 12.65  Kilo Joule / Mole
  894. Density[Xenon] ^=  3540. Kilogram/(Meter)^3
  895. ThermalConductivity[Xenon] ^:= ThermalConductivityException[Xenon,
  896.                 0.00569, "gaseous"]
  897. StableIsotopes[Xenon] ^=  {129,130,131,132,134,136}
  898. ElectronConfiguration[Xenon] ^= {{2},{2,6},{2,6,10},{2,6,10},{2,6}}
  899. Abbreviation[Xenon] ^= "Xe"
  900.  
  901. Cesium = Caesium
  902. AtomicNumber[Caesium] ^= 55
  903. AtomicWeight[Caesium] ^= 132.9054
  904. MeltingPoint[Caesium] ^= 301.55 Kelvin
  905. BoilingPoint[Caesium] ^= 951.6 Kelvin
  906. HeatOfFusion[Caesium] ^=  2.09 Kilo Joule / Mole
  907. HeatOfVaporization[Caesium] ^= 66.5  Kilo Joule / Mole
  908. Density[Caesium] ^= 1873. Kilogram/(Meter)^3
  909. ThermalConductivity[Caesium] ^= 35.9 Watt/(Meter Kelvin)
  910. StableIsotopes[Caesium] ^= {133}
  911. ElectronConfiguration[Caesium] ^=
  912.     {{2},{2,6},{2,6,10},{2,6,10},{2,6},{1}}
  913. Abbreviation[Caesium] ^= "Cs"
  914.  
  915. AtomicNumber[Barium] ^= 56
  916. AtomicWeight[Barium] ^= 137.33
  917. MeltingPoint[Barium] ^= 1002. Kelvin
  918. BoilingPoint[Barium] ^= 1910. Kelvin
  919. HeatOfFusion[Barium] ^=  7.66 Kilo Joule / Mole
  920. HeatOfVaporization[Barium] ^= 150.9  Kilo Joule / Mole
  921. Density[Barium] ^=  3594. Kilogram/(Meter)^3
  922. ThermalConductivity[Barium] ^=  18.4 Watt/(Meter Kelvin)
  923. StableIsotopes[Barium] ^=  {130,132,134,135,136,137,138}
  924. ElectronConfiguration[Barium] ^= {{2},{2,6},{2,6,10},{2,6,10},{2,6},{2}}
  925. Abbreviation[Barium] ^= "Ba"
  926.  
  927. AtomicNumber[Lanthanum] ^= 57
  928. AtomicWeight[Lanthanum] ^= 138.9055
  929. MeltingPoint[Lanthanum] ^= 1194. Kelvin
  930. BoilingPoint[Lanthanum] ^= 3730. Kelvin 
  931. HeatOfFusion[Lanthanum] ^=  10.04 Kilo Joule / Mole
  932. HeatOfVaporization[Lanthanum] ^= 402.1     Kilo Joule / Mole
  933. Density[Lanthanum] ^=  6145. Kilogram/(Meter)^3
  934. ThermalConductivity[Lanthanum] ^=  13.5 Watt/(Meter Kelvin)
  935. StableIsotopes[Lanthanum] ^=  {138}
  936. ElectronConfiguration[Lanthanum] ^=
  937.     {{2},{2,6},{2,6,10},{2,6,10},{2,6,1},{2}}
  938. Abbreviation[Lanthanum] ^= "La"
  939.  
  940. AtomicNumber[Cerium] ^= 58
  941. AtomicWeight[Cerium] ^= 140.12
  942. MeltingPoint[Cerium] ^= 1072. Kelvin 
  943. BoilingPoint[Cerium] ^= 3699. Kelvin 
  944. HeatOfFusion[Cerium] ^= 8.87 Kilo Joule / Mole
  945. HeatOfVaporization[Cerium] ^= 398. Kilo Joule / Mole
  946. Density[Cerium] ^:= DensityException[Cerium,8240.,"alpha"]
  947. ThermalConductivity[Cerium] ^=  11.4 Watt/(Meter Kelvin)
  948. StableIsotopes[Cerium] ^=  {136,138,140,142}
  949. ElectronConfiguration[Cerium] ^=
  950.     {{2},{2,6},{2,6,10},{2,6,10,2},{2,6},{2}}
  951. Abbreviation[Cerium] ^= "Ce"
  952.  
  953. AtomicNumber[Praseodymium] ^= 59
  954. AtomicWeight[Praseodymium] ^= 140.9077
  955. MeltingPoint[Praseodymium] ^= 1204. Kelvin
  956. BoilingPoint[Praseodymium] ^= 3785. Kelvin
  957. HeatOfFusion[Praseodymium] ^=  11.3 Kilo Joule / Mole
  958. HeatOfVaporization[Praseodymium] ^= 357. Kilo Joule / Mole
  959. Density[Praseodymium] ^= 6773. Kilogram/(Meter)^3
  960. ThermalConductivity[Praseodymium] ^=  12.5 Watt/(Meter Kelvin)
  961. StableIsotopes[Praseodymium] ^=  {141}
  962. ElectronConfiguration[Praseodymium] ^= 
  963.     {{2},{2,6},{2,6,10},{2,6,10,3},{2,6},{2}}
  964. Abbreviation[Praseodymium] ^= "Pr"
  965.  
  966. AtomicNumber[Neodymium] ^= 60
  967. AtomicWeight[Neodymium] ^= 144.24
  968. MeltingPoint[Neodymium] ^= 1294. Kelvin 
  969. BoilingPoint[Neodymium] ^= 3341. Kelvin
  970. HeatOfFusion[Neodymium] ^= 7.113 Kilo Joule / Mole
  971. HeatOfVaporization[Neodymium] ^= 328. Kilo Joule / Mole
  972. Density[Neodymium] ^= 7007. Kilogram/(Meter)^3 
  973. ThermalConductivity[Neodymium] ^=  16.5 Watt/(Meter Kelvin)
  974. StableIsotopes[Neodymium] ^=  {142,143,145,146,148,150}
  975. ElectronConfiguration[Neodymium] ^= 
  976.     {{2},{2,6},{2,6,10},{2,6,10,4},{2,6},{2}}
  977. Abbreviation[Neodymium] ^= "Nd"
  978.  
  979. AtomicNumber[Promethium] ^= 61
  980. AtomicWeight[Promethium] ^:= AtomicWeightUnstable[Promethium, 145] 
  981. MeltingPoint[Promethium] ^= 1441. Kelvin
  982. BoilingPoint[Promethium] ^= 3000. Kelvin     (* "circa" or "estimated" *)
  983. HeatOfFusion[Promethium] ^= 12.6 Kilo Joule / Mole
  984. HeatOfVaporization[Promethium] ^:= HeatOfVaporizationNA[Promethium]
  985. Density[Promethium] ^=  7220. Kilogram/(Meter)^3
  986. ThermalConductivity[Promethium] ^=  17.9 Watt/(Meter Kelvin)   (* "estimated" *)
  987. StableIsotopes[Promethium] ^=  {}
  988. ElectronConfiguration[Promethium] ^= 
  989.     {{2},{2,6},{2,6,10},{2,6,10,5},{2,6},{2}}
  990. Abbreviation[Promethium] ^= "Pm"
  991.  
  992. AtomicNumber[Samarium] ^= 62
  993. AtomicWeight[Samarium] ^= 150.36
  994. MeltingPoint[Samarium] ^= 1350. Kelvin
  995. BoilingPoint[Samarium] ^= 2064. Kelvin
  996. HeatOfFusion[Samarium] ^= 10.9 Kilo Joule / Mole 
  997. HeatOfVaporization[Samarium] ^= 164.8  Kilo Joule / Mole
  998. Density[Samarium] ^= 7520. Kilogram/(Meter)^3
  999. ThermalConductivity[Samarium] ^= 13.3 Watt/(Meter Kelvin)
  1000. StableIsotopes[Samarium] ^= {144,150,152,154}
  1001. ElectronConfiguration[Samarium] ^= 
  1002.     {{2},{2,6},{2,6,10},{2,6,10,6},{2,6},{2}}
  1003. Abbreviation[Samarium] ^= "Sm"
  1004.  
  1005. AtomicNumber[Europium] ^= 63
  1006. AtomicWeight[Europium] ^= 151.96
  1007. MeltingPoint[Europium] ^= 1095. Kelvin 
  1008. BoilingPoint[Europium] ^= 1870. Kelvin
  1009. HeatOfFusion[Europium] ^= 10.5 Kilo Joule / Mole
  1010. HeatOfVaporization[Europium] ^= 176. Kilo Joule / Mole 
  1011. Density[Europium] ^=  5243. Kilogram/(Meter)^3
  1012. ThermalConductivity[Europium] ^=  13.9 Watt/(Meter Kelvin)
  1013. StableIsotopes[Europium] ^=  {151,153}
  1014. ElectronConfiguration[Europium] ^= 
  1015.     {{2},{2,6},{2,6,10},{2,6,10,7},{2,6},{2}}
  1016. Abbreviation[Europium] ^= "Eu"
  1017.  
  1018. AtomicNumber[Gadolinium] ^= 64
  1019. AtomicWeight[Gadolinium] ^= 157.25
  1020. MeltingPoint[Gadolinium] ^= 1586. Kelvin
  1021. BoilingPoint[Gadolinium] ^= 3539. Kelvin
  1022. HeatOfFusion[Gadolinium] ^= 15.5 Kilo Joule / Mole
  1023. HeatOfVaporization[Gadolinium] ^= 301. Kilo Joule / Mole 
  1024. Density[Gadolinium] ^= 7900.4 Kilogram/(Meter)^3
  1025. ThermalConductivity[Gadolinium] ^= 10.6 Watt/(Meter Kelvin)
  1026. StableIsotopes[Gadolinium] ^= {154,155,156,157,158,160}
  1027. ElectronConfiguration[Gadolinium] ^= 
  1028.     {{2},{2,6},{2,6,10},{2,6,10,7},{2,6,1},{2}}
  1029. Abbreviation[Gadolinium] ^= "Gd"
  1030.  
  1031. AtomicNumber[Terbium] ^= 65
  1032. AtomicWeight[Terbium] ^= 158.9254
  1033. MeltingPoint[Terbium] ^= 1629. Kelvin
  1034. BoilingPoint[Terbium] ^= 3396. Kelvin
  1035. HeatOfFusion[Terbium] ^= 16.3 Kilo Joule / Mole
  1036. HeatOfVaporization[Terbium] ^= 391. Kilo Joule / Mole 
  1037. Density[Terbium] ^=  8229. Kilogram/(Meter)^3
  1038. ThermalConductivity[Terbium] ^=  11.1 Watt/(Meter Kelvin)
  1039. StableIsotopes[Terbium] ^=  {159}
  1040. ElectronConfiguration[Terbium] ^= 
  1041.     {{2},{2,6},{2,6,10},{2,6,10,9},{2,6},{2}}
  1042. Abbreviation[Terbium] ^= "Tb "
  1043.  
  1044. AtomicNumber[Dysprosium] ^= 66
  1045. AtomicWeight[Dysprosium] ^= 162.5
  1046. MeltingPoint[Dysprosium] ^= 1685. Kelvin
  1047. BoilingPoint[Dysprosium] ^= 2835. Kelvin
  1048. HeatOfFusion[Dysprosium] ^= 17.2  Kilo Joule / Mole
  1049. HeatOfVaporization[Dysprosium] ^= 293. Kilo Joule / Mole 
  1050. Density[Dysprosium] ^=  8550. Kilogram/(Meter)^3
  1051. ThermalConductivity[Dysprosium] ^=  10.7 Watt/(Meter Kelvin)
  1052. StableIsotopes[Dysprosium] ^=  {156,158,160,161,162,163,164}
  1053. ElectronConfiguration[Dysprosium] ^= 
  1054.     {{2},{2,6},{2,6,10},{2,6,10,10},{2,6},{2}}
  1055. Abbreviation[Dysprosium] ^= "Dy"
  1056.  
  1057. AtomicNumber[Holmium] ^= 67
  1058. AtomicWeight[Holmium] ^= 164.9304
  1059. MeltingPoint[Holmium] ^= 1747. Kelvin
  1060. BoilingPoint[Holmium] ^= 2968. Kelvin
  1061. HeatOfFusion[Holmium] ^= 17.2 Kilo Joule / Mole
  1062. HeatOfVaporization[Holmium] ^= 303. Kilo Joule / Mole 
  1063. Density[Holmium] ^=  8795. Kilogram/(Meter)^3
  1064. ThermalConductivity[Holmium] ^=  16.2 Watt/(Meter Kelvin)
  1065. StableIsotopes[Holmium] ^=  {165}
  1066. ElectronConfiguration[Holmium] ^= 
  1067.     {{2},{2,6},{2,6,10},{2,6,10,11},{2,6},{2}}
  1068. Abbreviation[Holmium] ^= "Ho"
  1069.  
  1070. AtomicNumber[Erbium] ^= 68
  1071. AtomicWeight[Erbium] ^= 167.26
  1072. MeltingPoint[Erbium] ^= 1802. Kelvin
  1073. BoilingPoint[Erbium] ^= 3136. Kelvin
  1074. HeatOfFusion[Erbium] ^=  17.2 Kilo Joule / Mole
  1075. HeatOfVaporization[Erbium] ^= 280. Kilo Joule / Mole 
  1076. Density[Erbium] ^=  9066. Kilogram/(Meter)^3
  1077. ThermalConductivity[Erbium] ^= 14.3  Watt/(Meter Kelvin) 
  1078. StableIsotopes[Erbium] ^=  {162,164,166,167,168,170}
  1079. ElectronConfiguration[Erbium] ^= 
  1080.     {{2},{2,6},{2,6,10},{2,6,10,12},{2,6},{2}}
  1081. Abbreviation[Erbium] ^= "Er"
  1082.  
  1083. AtomicNumber[Thulium] ^= 69
  1084. AtomicWeight[Thulium] ^= 168.9342
  1085. MeltingPoint[Thulium] ^= 1818. Kelvin
  1086. BoilingPoint[Thulium] ^= 2220. Kelvin
  1087. HeatOfFusion[Thulium] ^= 18.4 Kilo Joule / Mole
  1088. HeatOfVaporization[Thulium] ^= 247. Kilo Joule / Mole 
  1089. Density[Thulium] ^= 9321. Kilogram/(Meter)^3 
  1090. ThermalConductivity[Thulium] ^=  16.8 Watt/(Meter Kelvin)
  1091. StableIsotopes[Thulium] ^= {169} 
  1092. ElectronConfiguration[Thulium] ^= 
  1093.     {{2},{2,6},{2,6,10},{2,6,10,13},{2,6},{2}}
  1094. Abbreviation[Thulium] ^= "Tm"
  1095.  
  1096. AtomicNumber[Ytterbium] ^= 70
  1097. AtomicWeight[Ytterbium] ^= 173.04
  1098. MeltingPoint[Ytterbium] ^= 1097. Kelvin
  1099. BoilingPoint[Ytterbium] ^= 1466. Kelvin
  1100. HeatOfFusion[Ytterbium] ^= 9.20 Kilo Joule / Mole
  1101. HeatOfVaporization[Ytterbium] ^= 159. Kilo Joule / Mole 
  1102. Density[Ytterbium] ^= 6965. Kilogram/(Meter)^3  
  1103. ThermalConductivity[Ytterbium] ^= 34.9 Watt/(Meter Kelvin) 
  1104. StableIsotopes[Ytterbium] ^= {168,170,171,172,173,174,176} 
  1105. ElectronConfiguration[Ytterbium] ^= 
  1106.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6},{2}}
  1107. Abbreviation[Ytterbium] ^= "Yb"
  1108.  
  1109. AtomicNumber[Lutetium] ^= 71
  1110. AtomicWeight[Lutetium] ^= 174.967
  1111. MeltingPoint[Lutetium] ^= 1936. Kelvin
  1112. BoilingPoint[Lutetium] ^= 3668. Kelvin
  1113. HeatOfFusion[Lutetium] ^= 19.2 Kilo Joule / Mole
  1114. HeatOfVaporization[Lutetium] ^= 428. Kilo Joule / Mole 
  1115. Density[Lutetium] ^= 9840. Kilogram/(Meter)^3 
  1116. ThermalConductivity[Lutetium] ^= 16.4 Watt/(Meter Kelvin)  
  1117. StableIsotopes[Lutetium] ^= {175} 
  1118. ElectronConfiguration[Lutetium] ^= 
  1119.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,1},{2}}
  1120. Abbreviation[Lutetium] ^= "Lu"
  1121.  
  1122. AtomicNumber[Hafnium] ^= 72
  1123. AtomicWeight[Hafnium] ^= 178.49
  1124. MeltingPoint[Hafnium] ^= 2503. Kelvin
  1125. BoilingPoint[Hafnium] ^= 5470. Kelvin
  1126. HeatOfFusion[Hafnium] ^=  25.5 Kilo Joule / Mole
  1127. HeatOfVaporization[Hafnium] ^= 570.7 Kilo Joule / Mole
  1128. Density[Hafnium] ^= 13310. Kilogram/(Meter)^3 
  1129. ThermalConductivity[Hafnium] ^= 23.0  Watt/(Meter Kelvin)
  1130. StableIsotopes[Hafnium] ^= {176,177,178,179,180} 
  1131. ElectronConfiguration[Hafnium] ^= 
  1132.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,2},{2}}
  1133. Abbreviation[Hafnium] ^= "Hf"
  1134.  
  1135. AtomicNumber[Tantalum] ^= 73
  1136. AtomicWeight[Tantalum] ^= 180.9479
  1137. MeltingPoint[Tantalum] ^= 3269. Kelvin
  1138. BoilingPoint[Tantalum] ^= 5698. Kelvin
  1139. HeatOfFusion[Tantalum] ^=  31.4 Kilo Joule / Mole
  1140. HeatOfVaporization[Tantalum] ^= 758.22  Kilo Joule / Mole
  1141. Density[Tantalum] ^=  16654. Kilogram/(Meter)^3
  1142. ThermalConductivity[Tantalum] ^=  57.5 Watt/(Meter Kelvin)
  1143. StableIsotopes[Tantalum] ^=  {181}
  1144. ElectronConfiguration[Tantalum] ^= 
  1145.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,3},{2}}
  1146. Abbreviation[Tantalum] ^= "Ta"
  1147.  
  1148. Wolfram = Tungsten
  1149. AtomicNumber[Tungsten] ^= 74
  1150. AtomicWeight[Tungsten] ^= 183.85
  1151. MeltingPoint[Tungsten] ^= 3680. Kelvin
  1152. BoilingPoint[Tungsten] ^= 5930. Kelvin
  1153. HeatOfFusion[Tungsten] ^= 35.2 Kilo Joule / Mole 
  1154. HeatOfVaporization[Tungsten] ^= 824.2 Kilo Joule / Mole 
  1155. Density[Tungsten] ^= 19300. Kilogram/(Meter)^3 
  1156. ThermalConductivity[Tungsten] ^= 174. Watt/(Meter Kelvin) 
  1157. StableIsotopes[Tungsten] ^= {180,182,183,184,186} 
  1158. ElectronConfiguration[Tungsten] ^=
  1159.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,4},{2}}
  1160. Abbreviation[Tungsten] ^= "W"
  1161.  
  1162. AtomicNumber[Rhenium] ^= 75
  1163. AtomicWeight[Rhenium] ^= 186.207
  1164. MeltingPoint[Rhenium] ^= 3453. Kelvin
  1165. BoilingPoint[Rhenium] ^= 5900. Kelvin
  1166. HeatOfFusion[Rhenium] ^= 33.1  Kilo Joule / Mole
  1167. HeatOfVaporization[Rhenium] ^= 704.25  Kilo Joule / Mole
  1168. Density[Rhenium] ^= 21020. Kilogram/(Meter)^3 
  1169. ThermalConductivity[Rhenium] ^= 47.9 Watt/(Meter Kelvin) 
  1170. StableIsotopes[Rhenium] ^= {185} 
  1171. ElectronConfiguration[Rhenium] ^= 
  1172.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,5},{2}}
  1173. Abbreviation[Rhenium] ^= "Re"
  1174.  
  1175. AtomicNumber[Osmium] ^= 76
  1176. AtomicWeight[Osmium] ^= 190.2
  1177. MeltingPoint[Osmium] ^= 3327. Kelvin
  1178. BoilingPoint[Osmium] ^= 5300. Kelvin
  1179. HeatOfFusion[Osmium] ^= 29.3 Kilo Joule / Mole
  1180. HeatOfVaporization[Osmium] ^= 738.06 Kilo Joule / Mole
  1181. Density[Osmium] ^=  22590. Kilogram/(Meter)^3
  1182. ThermalConductivity[Osmium] ^=  87.6 Watt/(Meter Kelvin)
  1183. StableIsotopes[Osmium] ^= {184,186,187,188,189,190,192} 
  1184. ElectronConfiguration[Osmium] ^= 
  1185.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,6},{2}}
  1186. Abbreviation[Osmium] ^= "Os"
  1187.  
  1188. AtomicNumber[Iridium] ^= 77
  1189. AtomicWeight[Iridium] ^= 192.22
  1190. MeltingPoint[Iridium] ^= 2683. Kelvin
  1191. BoilingPoint[Iridium] ^= 4403. Kelvin
  1192. HeatOfFusion[Iridium] ^=  26.4 Kilo Joule / Mole
  1193. HeatOfVaporization[Iridium] ^= 612.1 Kilo Joule / Mole
  1194. Density[Iridium] ^= 22420. Kilogram/(Meter)^3 
  1195. ThermalConductivity[Iridium] ^=  147. Watt/(Meter Kelvin)
  1196. StableIsotopes[Iridium] ^= {191,193} 
  1197. ElectronConfiguration[Iridium] ^= 
  1198.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,7},{2}}
  1199. Abbreviation[Iridium] ^= "Ir"
  1200.  
  1201. AtomicNumber[Platinum] ^= 78
  1202. AtomicWeight[Platinum] ^= 195.08
  1203. MeltingPoint[Platinum] ^= 2045. Kelvin
  1204. BoilingPoint[Platinum] ^= 4100. Kelvin             (*  +- 100. Kelvin *)
  1205. HeatOfFusion[Platinum] ^= 19.7 Kilo Joule / Mole
  1206. HeatOfVaporization[Platinum] ^= 469. Kilo Joule / Mole 
  1207. Density[Platinum] ^= 21450. Kilogram/(Meter)^3 
  1208. ThermalConductivity[Platinum] ^= 71.6 Watt/(Meter Kelvin) 
  1209. StableIsotopes[Platinum] ^= {194,195,196,198} 
  1210. ElectronConfiguration[Platinum] ^= 
  1211.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,9},{1}}
  1212. Abbreviation[Platinum] ^= "Pt"
  1213.  
  1214. AtomicNumber[Gold] ^= 79
  1215. AtomicWeight[Gold] ^= 196.9665
  1216. MeltingPoint[Gold] ^= 1337.58 Kelvin
  1217. BoilingPoint[Gold] ^= 3080. Kelvin
  1218. HeatOfFusion[Gold] ^= 12.7  Kilo Joule / Mole
  1219. HeatOfVaporization[Gold] ^= 343.1 Kilo Joule / Mole
  1220. Density[Gold] ^=  19320. Kilogram/(Meter)^3
  1221. ThermalConductivity[Gold] ^= 317. Watt/(Meter Kelvin) 
  1222. StableIsotopes[Gold] ^=  {197}
  1223. ElectronConfiguration[Gold] ^= 
  1224.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{1}}
  1225. Abbreviation[Gold] ^= "Au"
  1226.  
  1227. AtomicNumber[Mercury] ^= 80
  1228. AtomicWeight[Mercury] ^= 200.59
  1229. MeltingPoint[Mercury] ^= 234.28 Kelvin
  1230. BoilingPoint[Mercury] ^= 629.73 Kelvin
  1231. HeatOfFusion[Mercury] ^= 2.331  Kilo Joule / Mole
  1232. HeatOfVaporization[Mercury] ^= 59.11 Kilo Joule / Mole
  1233. Density[Mercury] ^:= DensityException[Mercury, 13546., "liquid"]
  1234. ThermalConductivity[Mercury] ^:= ThermalConductivityException[Mercury,
  1235.                 8.34, "liquid"]
  1236. StableIsotopes[Mercury] ^= {196,198,199,200,201,202, 204} 
  1237. ElectronConfiguration[Mercury] ^= 
  1238.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2}}
  1239. Abbreviation[Mercury] ^= "Hg"
  1240.  
  1241. AtomicNumber[Thallium] ^= 81
  1242. AtomicWeight[Thallium] ^= 204.383
  1243. MeltingPoint[Thallium] ^= 576.6 Kelvin
  1244. BoilingPoint[Thallium] ^= 1730. Kelvin
  1245. HeatOfFusion[Thallium] ^=  4.31 Kilo Joule / Mole
  1246. HeatOfVaporization[Thallium] ^= 166.1 Kilo Joule / Mole
  1247. Density[Thallium] ^= 11850. Kilogram/(Meter)^3 
  1248. ThermalConductivity[Thallium] ^=  46.1 Watt/(Meter Kelvin)
  1249. StableIsotopes[Thallium] ^= {203,205} 
  1250. ElectronConfiguration[Thallium] ^= 
  1251.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,1}}
  1252. Abbreviation[Thallium] ^= "Tl"
  1253.  
  1254. AtomicNumber[Lead] ^= 82
  1255. AtomicWeight[Lead] ^= 207.2
  1256. MeltingPoint[Lead] ^= 600.65 Kelvin
  1257. BoilingPoint[Lead] ^= 2013. Kelvin 
  1258. HeatOfFusion[Lead] ^= 5.121 Kilo Joule / Mole
  1259. HeatOfVaporization[Lead] ^= 177.8 Kilo Joule / Mole
  1260. Density[Lead] ^= 11350. Kilogram/(Meter)^3 
  1261. ThermalConductivity[Lead] ^=  35.3  Watt/(Meter Kelvin)
  1262. StableIsotopes[Lead] ^= {204,206,207,208} 
  1263. ElectronConfiguration[Lead] ^= 
  1264.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,2}}
  1265. Abbreviation[Lead] ^= "Pb"
  1266.  
  1267. AtomicNumber[Bismuth] ^= 83
  1268. AtomicWeight[Bismuth] ^= 208.9804
  1269. MeltingPoint[Bismuth] ^= 544.5 Kelvin
  1270. BoilingPoint[Bismuth] ^= 1883. Kelvin
  1271. HeatOfFusion[Bismuth] ^=  10.48 Kilo Joule / Mole
  1272. HeatOfVaporization[Bismuth] ^= 179.1 Kilo Joule / Mole
  1273. Density[Bismuth] ^:= DensityException[Bismuth, 9747., 293]
  1274. ThermalConductivity[Bismuth] ^=  7.87 Watt/(Meter Kelvin)
  1275. StableIsotopes[Bismuth] ^= {209} 
  1276. ElectronConfiguration[Bismuth] ^= 
  1277.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,3}}
  1278. Abbreviation[Bismuth] ^= "Bi"
  1279.  
  1280. AtomicNumber[Polonium] ^= 84
  1281. AtomicWeight[Polonium] ^:= AtomicWeightUnstable[Polonium, 209]
  1282. MeltingPoint[Polonium] ^= 527. Kelvin
  1283. BoilingPoint[Polonium] ^= 1235. Kelvin
  1284. HeatOfFusion[Polonium] ^= 10. Kilo Joule / Mole 
  1285. HeatOfVaporization[Polonium] ^= 100.8 Kilo Joule / Mole
  1286. Density[Polonium] ^= 9320. Kilogram/(Meter)^3 
  1287. ThermalConductivity[Polonium] ^= 20. Watt/(Meter Kelvin) 
  1288. StableIsotopes[Polonium] ^=  {}
  1289. ElectronConfiguration[Polonium] ^= 
  1290.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,4}}
  1291. Abbreviation[Polonium] ^= "Po"
  1292.  
  1293. AtomicNumber[Astatine] ^= 85
  1294. AtomicWeight[Astatine] ^:= AtomicWeightUnstable[Astatine, 210]
  1295. MeltingPoint[Astatine] ^= 575. Kelvin             (* "estimated" *)
  1296. BoilingPoint[Astatine] ^= 610. Kelvin             (* "estimated" *)
  1297. HeatOfFusion[Astatine] ^= 23.8 Kilo Joule / Mole
  1298. HeatOfVaporization[Astatine] ^:= HeatOfVaporizationNA[Astatine]
  1299. Density[Astatine] ^:= DensityNA[Astatine] 
  1300. ThermalConductivity[Astatine] ^= 1.7 Watt/(Meter Kelvin)
  1301. StableIsotopes[Astatine] ^= {}
  1302. ElectronConfiguration[Astatine] ^= 
  1303.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,5}}
  1304. Abbreviation[Astatine] ^= "At"
  1305.  
  1306. AtomicNumber[Radon] ^= 86
  1307. AtomicWeight[Radon] ^:= AtomicWeightUnstable[Radon, 222]
  1308. MeltingPoint[Radon] ^= 202. Kelvin
  1309. BoilingPoint[Radon] ^= 211.4 Kelvin
  1310. HeatOfFusion[Radon] ^= 2.7 Kilo Joule / Mole        (* "estimated" *) 
  1311. HeatOfVaporization[Radon] ^= 18.1 Kilo Joule / Mole
  1312. Density[Radon] ^:= DensityException[Radon,4400.,211,"liquid"]
  1313. ThermalConductivity[Radon] ^:= ThermalConductivityException[Radon,
  1314.             0.00364, "gaseous"]        (* "estimated" *)
  1315. StableIsotopes[Radon] ^=  {}
  1316. ElectronConfiguration[Radon] ^= 
  1317.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,6}}
  1318. Abbreviation[Radon] ^= "Rn"
  1319.  
  1320. AtomicNumber[Francium] ^= 87
  1321. AtomicWeight[Francium] ^:= AtomicWeightUnstable[Francium, 223]
  1322. MeltingPoint[Francium] ^= 300. Kelvin
  1323. BoilingPoint[Francium] ^= 950. Kelvin
  1324. HeatOfFusion[Francium] ^:=  HeatOfFusionNA[Francium]
  1325. HeatOfVaporization[Francium] ^:= HeatOfVaporizationNA[Francium]
  1326. Density[Francium] ^:=  DensityNA[Francium]
  1327. ThermalConductivity[Francium] ^=  15. Watt/(Meter Kelvin)     (* "estimated" *)
  1328. StableIsotopes[Francium] ^=  {}
  1329. ElectronConfiguration[Francium] ^= 
  1330.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,6},{1}}
  1331. Abbreviation[Francium] ^= "Fr"
  1332.  
  1333. AtomicNumber[Radium] ^= 88
  1334. AtomicWeight[Radium] ^= 226.0254
  1335. MeltingPoint[Radium] ^= 973. Kelvin
  1336. BoilingPoint[Radium] ^= 1413. Kelvin
  1337. HeatOfFusion[Radium] ^= 7.15  Kilo Joule / Mole
  1338. HeatOfVaporization[Radium] ^= 136.7  Kilo Joule / Mole
  1339. Density[Radium] ^= 5000. Kilogram/(Meter)^3               (* "circa" *)
  1340. ThermalConductivity[Radium] ^=  18.6 Watt/(Meter Kelvin)      (* "estimated" *)
  1341. StableIsotopes[Radium] ^=  {}
  1342. ElectronConfiguration[Radium] ^= 
  1343.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,6},{2}}
  1344. Abbreviation[Radium] ^= "Ra"
  1345.  
  1346. AtomicNumber[Actinium] ^= 89
  1347. AtomicWeight[Actinium] ^= 227.0278
  1348. MeltingPoint[Actinium] ^= 1320. Kelvin 
  1349. BoilingPoint[Actinium] ^= 3470. Kelvin
  1350. HeatOfFusion[Actinium] ^= 14.2  Kilo Joule / Mole
  1351. HeatOfVaporization[Actinium] ^= 293  Kilo Joule / Mole
  1352. Density[Actinium] ^=  10060. Kilogram/(Meter)^3 
  1353. ThermalConductivity[Actinium] ^=  12.  Watt/(Meter Kelvin)   
  1354. StableIsotopes[Actinium] ^=  {}
  1355. ElectronConfiguration[Actinium] ^= 
  1356.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,6,1},{2}}
  1357. Abbreviation[Actinium] ^= "Ac"
  1358.  
  1359. AtomicNumber[Thorium] ^= 90
  1360. AtomicWeight[Thorium] ^= 232.0381
  1361. MeltingPoint[Thorium] ^= 2023. Kelvin
  1362. BoilingPoint[Thorium] ^= 5060. Kelvin
  1363. HeatOfFusion[Thorium] ^= 19.2 Kilo Joule / Mole        (* actually "< 19.2" *)
  1364. HeatOfVaporization[Thorium] ^=  513.67 Kilo Joule / Mole
  1365. Density[Thorium] ^=  11720. Kilogram/(Meter)^3
  1366. ThermalConductivity[Thorium] ^=  54.0 Watt/(Meter Kelvin)
  1367. StableIsotopes[Thorium] ^=  {}
  1368. ElectronConfiguration[Thorium] ^= 
  1369.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10},{2,6,2},{2}}
  1370. Abbreviation[Thorium] ^= "Th"
  1371.  
  1372. AtomicNumber[Protactinium] ^= 91
  1373. AtomicWeight[Protactinium] ^= 231.0359
  1374. MeltingPoint[Protactinium] ^= 2113. Kelvin
  1375. BoilingPoint[Protactinium] ^= 4300. Kelvin                  (* "circa" *)
  1376. HeatOfFusion[Protactinium] ^= 16.7 Kilo Joule / Mole
  1377. HeatOfVaporization[Protactinium] ^= 481. Kilo Joule / Mole
  1378. Density[Protactinium] ^= 15370. Kilogram/(Meter)^3           (* "estimated" *)
  1379. ThermalConductivity[Protactinium] ^= 47. Watt/(Meter Kelvin)  (* "estimated" *)
  1380. StableIsotopes[Protactinium] ^= {}
  1381. ElectronConfiguration[Protactinium] ^= 
  1382.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,2},{2,6,1},{2}}
  1383. Abbreviation[Protactinium] ^= "Pa"
  1384.  
  1385. AtomicNumber[Uranium] ^= 92
  1386. AtomicWeight[Uranium] ^= 238.0289
  1387. MeltingPoint[Uranium] ^= 1405.5 Kelvin
  1388. BoilingPoint[Uranium] ^= 4018. Kelvin
  1389. HeatOfFusion[Uranium] ^= 15.5 Kilo Joule / Mole
  1390. HeatOfVaporization[Uranium] ^= 417.1 Kilo Joule / Mole 
  1391. Density[Uranium] ^=  18950. Kilogram/(Meter)^3 
  1392. ThermalConductivity[Uranium] ^= 27.6  Watt/(Meter Kelvin) 
  1393. StableIsotopes[Uranium] ^=  {}
  1394. ElectronConfiguration[Uranium] ^= 
  1395.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,3},{2,6,1},{2}}
  1396. Abbreviation[Uranium] ^= "U"
  1397.  
  1398. AtomicNumber[Neptunium] ^= 93
  1399. AtomicWeight[Neptunium] ^= 237.0482
  1400. MeltingPoint[Neptunium] ^= 913. Kelvin
  1401. BoilingPoint[Neptunium] ^= 4175. Kelvin
  1402. HeatOfFusion[Neptunium] ^= 9.46 Kilo Joule / Mole
  1403. HeatOfVaporization[Neptunium] ^= 336.6 Kilo Joule / Mole
  1404. Density[Neptunium] ^=  20250. Kilogram/(Meter)^3
  1405. ThermalConductivity[Neptunium] ^=  6.3 Watt/(Meter Kelvin)
  1406. StableIsotopes[Neptunium] ^= {} 
  1407. ElectronConfiguration[Neptunium] ^= 
  1408.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,4},{2,6,1},{2}}
  1409. Abbreviation[Neptunium] ^= "Np"
  1410.  
  1411. AtomicNumber[Plutonium] ^= 94
  1412. AtomicWeight[Plutonium] ^:= AtomicWeightUnstable[Plutonium, 244]
  1413. MeltingPoint[Plutonium] ^= 914. Kelvin
  1414. BoilingPoint[Plutonium] ^= 3505. Kelvin
  1415. HeatOfFusion[Plutonium] ^= 2.8 Kilo Joule / Mole
  1416. HeatOfVaporization[Plutonium] ^= 343.5 Kilo Joule / Mole
  1417. Density[Plutonium] ^=  19840. Kilogram/(Meter)^3
  1418. ThermalConductivity[Plutonium] ^= 6.74 Watt/(Meter Kelvin) 
  1419. StableIsotopes[Plutonium] ^=  {}
  1420. ElectronConfiguration[Plutonium] ^= 
  1421.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,6},{2,6},{2}}
  1422. Abbreviation[Plutonium] ^= "Pu"
  1423.  
  1424. AtomicNumber[Americium] ^= 95
  1425. AtomicWeight[Americium] ^:= AtomicWeightUnstable[Americium, 243]
  1426. MeltingPoint[Americium] ^= 1267. Kelvin
  1427. BoilingPoint[Americium] ^= 2880. Kelvin
  1428. HeatOfFusion[Americium] ^= 14.4 Kilo Joule / Mole
  1429. HeatOfVaporization[Americium] ^= 238.5 Kilo Joule / Mole
  1430. Density[Americium] ^=  13670. Kilogram/(Meter)^3
  1431. ThermalConductivity[Americium] ^=  10. Watt/(Meter Kelvin)    (* "estimated" *)
  1432. StableIsotopes[Americium] ^=  {}
  1433. ElectronConfiguration[Americium] ^= 
  1434.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,7},{2,6},{2}}
  1435. Abbreviation[Americium] ^= "Am"
  1436.  
  1437. AtomicNumber[Curium] ^= 96
  1438. AtomicWeight[Curium] ^:= AtomicWeightUnstable[Curium, 247]
  1439. MeltingPoint[Curium] ^= 1610. Kelvin            (* +- 40. Kelvin *)
  1440. BoilingPoint[Curium] ^:= BoilingPointNA[Curium]
  1441. HeatOfFusion[Curium] ^:= HeatOfFusionNA[Curium]
  1442. HeatOfVaporization[Curium] ^:= HeatOfVaporizationNA[Curium]
  1443. Density[Curium] ^:= 13300. Kilogram/(Meter)^3
  1444. ThermalConductivity[Curium] ^= 10. Watt/(Meter Kelvin)
  1445. StableIsotopes[Curium] ^= {}
  1446. ElectronConfiguration[Curium] ^= 
  1447.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,7},{2,6,1},{2}}
  1448. Abbreviation[Curium] ^= "Cm"
  1449.  
  1450. AtomicNumber[Berkelium] ^= 97
  1451. AtomicWeight[Berkelium] ^:= AtomicWeightUnstable[Berkelium, 247]
  1452. MeltingPoint[Berkelium] ^:= MeltingPointNA[Berkelium]
  1453. BoilingPoint[Berkelium] ^:= BoilingPointNA[Berkelium]
  1454. HeatOfFusion[Berkelium] ^:= HeatOfFusionNA[Berkelium]
  1455. HeatOfVaporization[Berkelium] ^:= HeatOfVaporizationNA[Berkelium]
  1456. Density[Berkelium] ^:= 14790. Kilogram/(Meter)^3
  1457. ThermalConductivity[Berkelium] ^= 10. Watt/(Meter Kelvin)
  1458. StableIsotopes[Berkelium] ^= {}
  1459. ElectronConfiguration[Berkelium] ^= 
  1460.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,9},{2,6},{2}}
  1461. Abbreviation[Berkelium] ^= "Bk"
  1462.  
  1463. AtomicNumber[Californium] ^= 98
  1464. AtomicWeight[Californium] ^:= 
  1465.         AtomicWeightUnstable[Californium, 251]
  1466. MeltingPoint[Californium] ^:= MeltingPointNA[Californium]
  1467. BoilingPoint[Californium] ^:= BoilingPointNA[Californium]
  1468. HeatOfFusion[Californium] ^:= HeatOfFusionNA[Californium]
  1469. HeatOfVaporization[Californium] ^:=
  1470.         HeatOfVaporizationNA[Californium]
  1471. Density[Californium] ^:= DensityNA[Californium]        
  1472. ThermalConductivity[Californium] ^= 10. Watt/(Meter Kelvin)
  1473. StableIsotopes[Californium] ^= {}
  1474. ElectronConfiguration[Californium] ^= 
  1475.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,10},{2,6},{2}}
  1476. Abbreviation[Californium] ^= "Cf"
  1477.  
  1478. AtomicNumber[Einsteinium] ^= 99
  1479. AtomicWeight[Einsteinium] ^:= AtomicWeightUnstable[Einsteinium, 254]
  1480. MeltingPoint[Einsteinium] ^:= MeltingPointNA[Einsteinium]
  1481. BoilingPoint[Einsteinium] ^:= BoilingPointNA[Einsteinium]
  1482. HeatOfFusion[Einsteinium] ^:= HeatOfFusionNA[Einsteinium]
  1483. HeatOfVaporization[Einsteinium] ^:= HeatOfVaporizationNA[Einsteinium]
  1484. Density[Einsteinium] ^:= DensityNA[Einsteinium] 
  1485. ThermalConductivity[Einsteinium] ^= 10. Watt/(Meter Kelvin)
  1486. StableIsotopes[Einsteinium] ^= {}
  1487. ElectronConfiguration[Einsteinium] ^= 
  1488.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,11},{2,6},{2}}
  1489. Abbreviation[Einsteinium] ^= "Es"
  1490.  
  1491. AtomicNumber[Fermium] ^= 100
  1492. AtomicWeight[Fermium] ^:= AtomicWeightUnstable[Fermium, 257]
  1493. MeltingPoint[Fermium] ^:= MeltingPointNA[Fermium]
  1494. BoilingPoint[Fermium] ^:= BoilingPointNA[Fermium]
  1495. HeatOfFusion[Fermium] ^:= HeatOfFusionNA[Fermium]
  1496. HeatOfVaporization[Fermium] ^:= HeatOfVaporizationNA[Fermium]
  1497. Density[Fermium] ^:=  DensityNA[Fermium] 
  1498. ThermalConductivity[Fermium] ^=  10. Watt/(Meter Kelvin)
  1499. StableIsotopes[Fermium] ^=  {}
  1500. ElectronConfiguration[Fermium] ^= 
  1501.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,12},{2,6},{2}}
  1502. Abbreviation[Fermium] ^= "Fm"
  1503.  
  1504. AtomicNumber[Mendelevium] ^= 101
  1505. AtomicWeight[Mendelevium] ^:= 
  1506.         AtomicWeightUnstable[Mendelevium, 258]
  1507. MeltingPoint[Mendelevium] ^:= MeltingPointNA[Mendelevium]
  1508. BoilingPoint[Mendelevium] ^:= BoilingPointNA[Mendelevium]
  1509. HeatOfFusion[Mendelevium] ^:= HeatOfFusionNA[Mendelevium]
  1510. HeatOfVaporization[Mendelevium] ^:=
  1511.         HeatOfVaporizationNA[Mendelevium]
  1512. Density[Mendelevium] ^:= DensityNA[Mendelevium] 
  1513. ThermalConductivity[Mendelevium] ^:= 10. Watt/(Meter Kelvin)
  1514. StableIsotopes[Mendelevium] ^= {} 
  1515. ElectronConfiguration[Mendelevium] ^= 
  1516.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,13},{2,6},{2}}
  1517. Abbreviation[Mendelevium] ^= "Md"
  1518.  
  1519. AtomicNumber[Nobelium] ^= 102
  1520. AtomicWeight[Nobelium] ^:= AtomicWeightUnstable[Nobelium, 259]
  1521. MeltingPoint[Nobelium] ^:= MeltingPointNA[Nobelium]
  1522. BoilingPoint[Nobelium] ^:= BoilingPointNA[Nobelium]
  1523. HeatOfFusion[Nobelium] ^:= HeatOfFusionNA[Nobelium]
  1524. HeatOfVaporization[Nobelium] ^:= HeatOfVaporizationNA[Nobelium]
  1525. Density[Nobelium] ^:=   DensityNA[Nobelium] 
  1526. ThermalConductivity[Nobelium] ^:=  10. Watt/(Meter Kelvin)
  1527. StableIsotopes[Nobelium] ^=  {}
  1528. ElectronConfiguration[Nobelium] ^= 
  1529.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,14},{2,6},{2}}
  1530. Abbreviation[Nobelium] ^= "No"
  1531.  
  1532. AtomicNumber[Lawrencium] ^= 103
  1533. AtomicWeight[Lawrencium] ^:= AtomicWeightUnstable[Lawrencium, 260]
  1534. MeltingPoint[Lawrencium] ^:= MeltingPointNA[Lawrencium]
  1535. BoilingPoint[Lawrencium] ^:= BoilingPointNA[Lawrencium]
  1536. HeatOfFusion[Lawrencium] ^:= HeatOfFusionNA[Lawrencium]
  1537. HeatOfVaporization[Lawrencium] ^:= HeatOfVaporizationNA[Lawrencium]
  1538. Density[Lawrencium] ^:=  DensityNA[Lawrencium] 
  1539. ThermalConductivity[Lawrencium] ^=   10. Watt/(Meter Kelvin)
  1540. StableIsotopes[Lawrencium] ^=  {}
  1541. ElectronConfiguration[Lawrencium] ^= 
  1542.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,14},{2,6,1},{2}}
  1543. Abbreviation[Lawrencium] ^= "Lr"
  1544.  
  1545. Kurchatovium = Unnilquadium 
  1546. Rutherfordium = Unnilquadium
  1547. AtomicNumber[Unnilquadium] ^= 104
  1548. AtomicWeight[Unnilquadium] ^:= 
  1549.         AtomicWeightUnstable[Unnilquadium, 261]
  1550. MeltingPoint[Unnilquadium] ^:=  MeltingPointNA[Unnilquadium]
  1551. BoilingPoint[Unnilquadium] ^:=  BoilingPointNA[Unnilquadium]
  1552. HeatOfFusion[Unnilquadium] ^:=  HeatOfFusionNA[Unnilquadium]
  1553. HeatOfVaporization[Unnilquadium] ^:= HeatOfVaporizationNA[Unnilquadium]
  1554. Density[Unnilquadium] ^:=  DensityNA[Unnilquadium] 
  1555. ThermalConductivity[Unnilquadium] ^:=  ThermalConductivityNA[Unnilquadium]
  1556. StableIsotopes[Unnilquadium] ^= {}
  1557. ElectronConfiguration[Unnilquadium] ^= 
  1558.     {{2},{2,6},{2,6,10},{2,6,10,14},{2,6,10,14},{2,6,2},{2}}
  1559.                 (* CRC, 69th Ed., 
  1560.                 "Electronic Configuation of the Elements" *)
  1561. Abbreviation[Unnilquadium] ^= "Unq"
  1562.  
  1563. Hahnium = Unnilpentium
  1564. AtomicNumber[Unnilpentium] ^= 105
  1565. AtomicWeight[Unnilpentium] ^:= 
  1566.             AtomicWeightUnstable[Unnilpentium, 262]
  1567. MeltingPoint[Unnilpentium] ^:= MeltingPointNA[Unnilpentium]
  1568. BoilingPoint[Unnilpentium] ^:= BoilingPointNA[Unnilpentium]
  1569. HeatOfFusion[Unnilpentium] ^:= HeatOfFusionNA[Unnilpentium]
  1570. HeatOfVaporization[Unnilpentium] ^:= HeatOfVaporizationNA[Unnilpentium]
  1571. Density[Unnilpentium] ^:=  DensityNA[Unnilpentium]
  1572. ThermalConductivity[Unnilpentium] ^:= ThermalConductivityNA[Unnilpentium]
  1573. StableIsotopes[Unnilpentium] ^= {}
  1574. ElectronConfiguration[Unnilpentium] ^:= ElectronConfigurationNA[Unnilpentium]
  1575. Abbreviation[Unnilpentium] ^= "Unp"
  1576.  
  1577. AtomicNumber[Unnilhexium] ^= 106
  1578. AtomicWeight[Unnilhexium] ^:= 
  1579.             AtomicWeightUnstable[Unnilhexium, 263]
  1580. MeltingPoint[Unnilhexium] ^:= MeltingPointNA[Unnilhexium]
  1581. BoilingPoint[Unnilhexium] ^:= BoilingPointNA[Unnilhexium]
  1582. HeatOfFusion[Unnilhexium] ^:= HeatOfFusionNA[Unnilhexium]
  1583. HeatOfVaporization[Unnilhexium] ^:= HeatOfVaporizationNA[Unnilhexium]
  1584. Density[Unnilhexium] ^:= DensityNA[Unnilhexium]
  1585. ThermalConductivity[Unnilhexium] ^:=  ThermalConductivityNA[Unnilhexium]
  1586. StableIsotopes[Unnilhexium] ^= {}
  1587. ElectronConfiguration[Unnilhexium] ^:= ElectronConfigurationNA[Unnilhexium]
  1588. Abbreviation[Unnilhexium] ^= "Unh" 
  1589.  
  1590.  
  1591. Scan[
  1592.  (#[x_] := Module[
  1593.            {i=Flatten[Position[ElementAbbreviations,ToString[x]]]},
  1594.                    #[ Elements[[ i[[1]] ]] ] /;
  1595.                !SameQ[i,{}]
  1596.                  ])&,
  1597.  {AtomicNumber,AtomicWeight,MeltingPoint,BoilingPoint,HeatOfFusion,
  1598.   HeatOfVaporization,Density,ThermalConductivity,StableIsotopes,
  1599.   ElectronConfiguration,ElectronConfigurationFormat,Abbreviation}
  1600. ]
  1601. Scan[
  1602.  (#[x_] := Module[
  1603.            {i=Flatten[Position[ElementAbbreviations,ToString[x]]]},
  1604.                    #[ Elements[[ i[[1]] ]] ] /;
  1605.                !SameQ[i,{}]
  1606.                  ])&,
  1607.  {AtomicNumber,AtomicWeight,MeltingPoint,BoilingPoint,HeatOfFusion,
  1608.   HeatOfVaporization,Density,ThermalConductivity,StableIsotopes,
  1609.   ElectronConfiguration,ElectronConfigurationFormat,Abbreviation}
  1610. ]
  1611.      
  1612.  
  1613. End[]
  1614.  
  1615. EndPackage[]
  1616.  
  1617.