1 files changed, 21 insertions, 0 deletions
diff --git a/3753/CH7/EX7.14/Ex7_14.sce b/3753/CH7/EX7.14/Ex7_14.sce
new file mode 100644
index 000000000..643902258
--- /dev/null
+++ b/3753/CH7/EX7.14/Ex7_14.sce
@@ -0,0 +1,21 @@
+//Example number 7.14, Page number 7.19
+
+clc;clear;close
+
+// Variable declaration
+a=4.57 // in m
+h=1// in m
+k=1// in m
+l=1// in m
+lamda=1.52 //in m
+twotheta=33.5*%pi/180// radian
+r=5                  // radius
+// Calculations
+d=a/(h^2+k^2+l^2)^(1/2)// in m
+sintheta=lamda/(2*d)// // unitless
+X=r/tan(twotheta)// in cm
+
+// Result
+printf("d = %.2f Angstorms",d)
+printf("\nsin(theta) = %.3f",sintheta)
+printf("\nX = %.3f cm",X)