1 files changed, 14 insertions, 0 deletions
diff --git a/3537/CH4/EX4.14/Ex4_14.sce b/3537/CH4/EX4.14/Ex4_14.sce
new file mode 100644
index 000000000..2e909d425
--- /dev/null
+++ b/3537/CH4/EX4.14/Ex4_14.sce
@@ -0,0 +1,14 @@
+//Example 4_14
+clc();
+clear;
+//To determine the space of the reflecting plane and the volume of the unit cell
+lemda=3*10^-10                        //units in meters
+theta=40                             //units in degrees
+h=1
+k=0
+l=0
+n=1
+d=(n*lemda)/(2*sin(theta*%pi/180))*10^10
+printf("The space of the reflecting plane is %.3f angstrom",d)
+v=(d*sqrt(h^2+k^2+l^2)*10^-10)^3
+printf("\n\nThe volume of the unit cell is %.33f m^3",v)