1 files changed, 19 insertions, 0 deletions
diff --git a/3768/CH4/EX4.1/Ex4_1.sce b/3768/CH4/EX4.1/Ex4_1.sce
new file mode 100644
index 000000000..c0ffb5ecc
--- /dev/null
+++ b/3768/CH4/EX4.1/Ex4_1.sce
@@ -0,0 +1,19 @@
+//Example number 4.1, Page number 66
+
+clc;clear;
+close;
+
+//Variable declaration
+d=0.282*10**-9;    //lattice spacing(m)
+theta=8+(35/60);   //glancing angle(degree)
+n=1;   //order
+Theta=90;    //angle(degree)
+//Calculation
+theta=theta*%pi/180;    //angle(radian)
+Theta=Theta*%pi/180;    //angle(radian)
+lamda=2*d*sin(theta)/n;    //wavelength(m)
+nmax=2*d*sin(Theta)/lamda;    //maximum order of diffraction
+//Result
+printf("wavelength is %.3f Angstrom",lamda*10**10)
+//answer varies due to rounding off errors
+printf("\n maximum order of diffraction is %d",round(nmax))