2 files changed, 19 insertions, 0 deletions
diff --git a/3014/CH3/EX3.13/Ex3_13.sce b/3014/CH3/EX3.13/Ex3_13.sce
new file mode 100755
index 000000000..62561d2d8
--- /dev/null
+++ b/3014/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,14 @@
+ clc
+//given that
+lambda = 1 //wavelength in angstrom
+h = 6.63e-34 // Planks constant
+m_e = 9.1e-31 // mass of electron in kg
+c = 3e8 // speed of light in m/sec
+theta = 90 // angle for longest passing wavelength
+printf("Example 3.13")
+d_lambda= h*(1-cos(theta*%pi/180))*1e10/(m_e*c) // calculation of wavelength shift in angstrom
+lambda_n = lambda+d_lambda // Calculation of recoiled electron wavelength
+d_E = h*c*(lambda_n-lambda)*1e10/(1.6e-19*lambda_n*lambda)// Calculation of recoiled electron energy in eV
+printf("\nWavelength shift is %f angstrom.",lambda_n)
+printf("\nEnergy of recoiled electron is %deV. \n\n\n",ceil (d_E))
+
diff --git a/3014/CH3/EX3.13/Ex3_13.txt b/3014/CH3/EX3.13/Ex3_13.txt
new file mode 100755
index 000000000..785500b08
--- /dev/null
+++ b/3014/CH3/EX3.13/Ex3_13.txt
@@ -0,0 +1,5 @@
+
+
+Example 3.13
+Wavelength shift is 1.024286 angstrom.
+Energy of recoiled electron is 295eV.