initial commit / add all books

1 files changed, 13 insertions, 0 deletions

diff --git a/1736/CH1/EX1.23/Ch01Ex23.sce b/1736/CH1/EX1.23/Ch01Ex23.sce
new file mode 100755
index 000000000..fc6e1121a
--- /dev/null
+++ b/1736/CH1/EX1.23/Ch01Ex23.sce
@@ -0,0 +1,13 @@
+// Scilab Code Ex 1.23 Page-34 (2006)
+clc; clear;
+e = 1.6e-019;   // Energy equivalent of 1 eV, J/eV
+h = 6.626e-034;     // Planck's constant, Js
+c = 3.0e+08;    // Speed of light, m/s
+E_K = 13.6*29^2;    // Energy of electron in the K-shell
+E_L = 13.6*29^2/4;  // Energy of electron in the L-shell
+// As E_K - E_L = h*c/lambda, solving for lambda
+lambda = h*c/((E_K - E_L)*e);       // Wavelength of K_alpha radiation of tungsten, m
+printf("\nThe wavelength of K_alpha radiation of Cu = %5.3f angstrom", lambda/1e-010);
+
+// Result
+// The wavelength of K_alpha radiation of Cu = 1.448 angstrom