diff options
Diffstat (limited to '1736/CH1/EX1.23/Ch01Ex23.sce')
| -rwxr-xr-x | 1736/CH1/EX1.23/Ch01Ex23.sce | 13 |
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 |