4 files changed, 53 insertions, 0 deletions
diff --git a/3717/CH6/EX6.1/Ex6_1.sce b/3717/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..595a7c1ab
--- /dev/null
+++ b/3717/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,10 @@
+// Ex6_1 Page:90 (2014)
+clc;clear;
+a = 2e-010;    // Length of the square well, m
+x1 = 0;    // Lower limit of position, m
+x2 = 0.25e-010;    // Upper limit of position, m
+P = integrate('(sqrt(2/a)*sin(%pi*x/a))^2', 'x', x1, x2); // Probabilitiy of finding the electron in the given region
+printf("\nThe probabilitiy of finding the electron in the region x = 0 to 0.25e-010 = %6.4f ", P);
+
+// Result 
+// The probabilitiy of finding the electron in the region x = 0 to 0.25e-010 = 0.0125 
+\ No newline at end of file
diff --git a/3717/CH6/EX6.2/Ex6_2.sce b/3717/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..61513d8d9
--- /dev/null
+++ b/3717/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,14 @@
+// Ex6_2 Page:96 (2014)
+clc;clear;
+v0 = 6.43e+013;    // The vibrational frequecy of CO molecule, Hz
+e = 1.6e-019;    // Energy conversion factor, J/eV
+mu = 1.1385e-026;    // The reduced mass of CO molecule, kg
+h = 6.626e-034;    // Planck's constant, Js
+E0 = 1/(2*e)*h*v0;    // Zero point energy, eV
+k = 4*(22/7*v0)^2*mu;    // Force constant of the CO bond, N/m
+printf("\nThe zero point energy of the CO bond = %5.3f eV", E0);
+printf("\nThe force constant of the CO bond = %4d N/m", k);
+
+// Result 
+// The zero point energy of the CO bond = 0.133 eV
+// The force constant of the CO bond = 1859 N/m 
+\ No newline at end of file
diff --git a/3717/CH6/EX6.6/Ex6_6.sce b/3717/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..3b83db910
--- /dev/null
+++ b/3717/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,14 @@
+// Ex6_6 Page:104 (2014)
+clc;clear;
+e = 1.6e-019;    // Energy conversion factor, J/eV
+h_cross = 1.054e-034;    // reduced Planck's constant, Js
+r = 1.131e-010;    // Intermolecular separation of CO molecule, m
+m_Carbon = 19.9217e-027;    // Mass of carbon atom, kg
+m_Oxygen = 26.5614e-027;    // Mass of oxygen atom, kg
+mu = m_Carbon*m_Oxygen/(m_Carbon+m_Oxygen);    // Reduced mass of CO molecule, kg
+I = mu*r^2;    // Moment of inertia of CO molecule, kg-Sq.m
+delta_E = h_cross^2/(I*e);    // Energy difference between the first two rotational energy levels of CO molecule, eV
+printf("\nThe energy difference between the first two rotational energy levels of CO molecule = %4.2e eV", delta_E);
+
+// Result 
+// The energy difference between the first two rotational energy levels of CO molecule = 4.77e-004 eV
+\ No newline at end of file
diff --git a/3717/CH6/EX6.7/Ex6_7.sce b/3717/CH6/EX6.7/Ex6_7.sce
new file mode 100644
index 000000000..a66165f05
--- /dev/null
+++ b/3717/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,15 @@
+// Ex6_7 Page:105 (2014)
+clc;clear;
+l = 1;    // Orbital angular momentum quantum number
+m = [1, 0, -1];    // The possible z-components of l
+printf("\nThe possible orientations of vector L with respect to the z-axis are:");
+for i = 1:3
+    theta = acosd(m(i)/sqrt(l*(l+1)));
+    printf("\ntheta = %d degree (m = %d)", theta, m(i));
+end
+
+// Result 
+// The possible orientations of vector L with respect to the z-axis are:
+// theta = 45 degree (m = 1)
+// theta = 90 degree (m = 0)
+// theta = 135 degree (m = -1) 
+\ No newline at end of file