1 files changed, 13 insertions, 0 deletions
diff --git a/1367/CH5/EX5.8/5_8.sce b/1367/CH5/EX5.8/5_8.sce
new file mode 100755
index 000000000..9678cf716
--- /dev/null
+++ b/1367/CH5/EX5.8/5_8.sce
@@ -0,0 +1,13 @@
+//Find Glancing angle and Interplanar spacing of the crystal
+//Ex:5.8
+clc;
+clear;
+close;
+w=0.824;//wavelength in angstorm
+a1=8.58;//angle at n=1 in degrees
+n1=1;
+n3=3;
+a3=asind((n3/n1)*sind(a1));//angle at n=3 in degrees
+disp(a3,"Glancing angle for third order diffraction = ");
+d=w/(2*sind(a1));//in angstorm
+disp(d,"Interplanar spacing of the crystal (in Angstorm) = ");
+\ No newline at end of file