initial commit / add all books

5 files changed, 63 insertions, 0 deletions

diff --git a/1847/CH8/EX8.1/Ch08Ex1.sce b/1847/CH8/EX8.1/Ch08Ex1.sce
new file mode 100755
index 000000000..cf1be04dc
--- /dev/null
+++ b/1847/CH8/EX8.1/Ch08Ex1.sce
@@ -0,0 +1,9 @@
+// Scilab Code Ex8.1:: Page-8.8 (2009)

+clc; clear;

+lambda = 31235;   // Wavelength of prominent emission of laser, aangstrom

+E = 12400/lambda;   // Energy difference between the two levels, eV

+

+printf("\nThe difference between upper and lower energy levels for the most prominent wavelength  = %5.3f eV", E);

+

+// Result 

+// The difference between upper and lower energy levels for the most prominent wavelength  = 0.397 eV 

diff --git a/1847/CH8/EX8.2/Ch08Ex2.sce b/1847/CH8/EX8.2/Ch08Ex2.sce
new file mode 100755
index 000000000..baf3bd521
--- /dev/null
+++ b/1847/CH8/EX8.2/Ch08Ex2.sce
@@ -0,0 +1,12 @@
+// Scilab Code Ex8.2:: Page-8.8 (2009)

+clc; clear;

+E = 0.121;   // Energy difference between the two levels, eV

+lambda = 12400/E;   // Wavelength of the radiation, angstrom

+f = 3e+08/(lambda*1e-010);  // Frequency of the radiation, Hz

+

+printf("\nThe wavelength of the radiation = %8.1f angstrom", lambda);

+printf("\nThe frequency of the radiation = %4.2e Hz", f);

+

+// Result 

+// The wavelength of the radiation = 102479.3 angstrom

+// The frequency of the radiation = 2.93e+13 Hz 

diff --git a/1847/CH8/EX8.3/Ch08Ex3.sce b/1847/CH8/EX8.3/Ch08Ex3.sce
new file mode 100755
index 000000000..7a043a0ed
--- /dev/null
+++ b/1847/CH8/EX8.3/Ch08Ex3.sce
@@ -0,0 +1,14 @@
+// Scilab Code Ex8.3:: Page-8.8 (2009)

+clc; clear;

+lambda = 7000;  // Wavelength of the Ruby laser, angstrom

+e = 1.6e-019;   // Energy equivalent of 1 eV, J/eV

+N = 2.8e+019;   // Total number of photons

+E = 12400/lambda;   // Energy of one emitted photon, eV

+E_p = E*e*N;    // Total energy available per laser pulse, joule

+

+printf("\nThe energy of one emitted photon = %4.2e J", E*e);

+printf("\nThe total energy available per laser pulse = %4.2f joule", E_p);

+

+// Result 

+// The energy of one emitted photon = 2.83e-19 J

+// The total energy available per laser pulse = 7.94 joule 

diff --git a/1847/CH8/EX8.4/Ch08Ex4.sce b/1847/CH8/EX8.4/Ch08Ex4.sce
new file mode 100755
index 000000000..23f605cf8
--- /dev/null
+++ b/1847/CH8/EX8.4/Ch08Ex4.sce
@@ -0,0 +1,15 @@
+// Scilab Code Ex8.4:: Page-8.9 (2009)

+clc; clear;

+lambda = 7000;  // Wavelength of the emitted light, angstrom

+k = 8.6e-005;   // Boltzmann constant, eV/K

+dE = 12400/lambda;  // Energy difference of the levels, eV

+T = [300 500];   // Temperatures of first and second states, K

+for i = 1:1:2

+    N2_ratio_N1 = exp(-(dE/(k*T(i))));  // Relative population

+    printf("\nThe relative population at %d K = %3.1e", T(i), N2_ratio_N1);

+end

+

+// Result 

+// The relative population at 300 K = 1.5e-30

+// The relative population at 500 K = 1.3e-18 

+// The answer is given wrong in the textbook for first part.
\ No newline at end of file
diff --git a/1847/CH8/EX8.5/Ch08Ex5.sce b/1847/CH8/EX8.5/Ch08Ex5.sce
new file mode 100755
index 000000000..106783d89
--- /dev/null
+++ b/1847/CH8/EX8.5/Ch08Ex5.sce
@@ -0,0 +1,13 @@
+// Scilab Code Ex8.5:: Page-8.9 (2009)

+clc; clear;

+lambda = 7000;  // Wavelength of the emitted light, angstrom

+k = 8.6e-005;   // Boltzmann constant, eV/K

+dE = 12400/lambda;  // Energy difference of the levels, eV

+T = 27+273;   // Temperatures of the state, K

+N2_ratio_N1 = exp(-(dE/(k*T)));  // Relative population

+printf("\nThe relative population of two states in He-Ne laser at %d K = %3.1e", T, N2_ratio_N1);

+

+

+// Result 

+// The relative population of two states in He-Ne laser at 300 K = 1.5e-30 

+// The answer is given wrong in the textbook
\ No newline at end of file