summaryrefslogtreecommitdiff
path: root/1985/CH13/EX13.9/Chapter13_example9.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1985/CH13/EX13.9/Chapter13_example9.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1985/CH13/EX13.9/Chapter13_example9.sce')
-rwxr-xr-x1985/CH13/EX13.9/Chapter13_example9.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/1985/CH13/EX13.9/Chapter13_example9.sce b/1985/CH13/EX13.9/Chapter13_example9.sce
new file mode 100755
index 000000000..474f944f3
--- /dev/null
+++ b/1985/CH13/EX13.9/Chapter13_example9.sce
@@ -0,0 +1,12 @@
+clc
+clear
+p1=[1,0,0]//Miller indices of the plane 1
+p2=[1,1,0]//Miller indices of the plane 2
+p3=[1,1,1]//Miller indices of the plane 3
+
+d11=(1/sqrt(p1(1)^2+p1(2)^2+p1(3)^2))//The lattice spacing for the plane in m* a
+d12=(1/sqrt(p2(1)^2+p2(2)^2+p2(3)^2))//The lattice spacing for the plane in m* a
+d13=(1/sqrt(p3(1)^2+p3(2)^2+p3(3)^2))//The lattice spacing for the plane in m* a
+
+//Output
+printf('The seperation between the successive plane (%i %i %i), (%i %i %i) and (%i %i %i) are in the ratio of %3.0f : %3.2f : %3.2f',p1(1),p1(2),p1(3),p2(1),p2(2),p2(3),p3(1),p3(2),p3(3),d11,d12,d13)