summaryrefslogtreecommitdiff
path: root/3020/CH13/EX13.11/ex13_11.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3020/CH13/EX13.11/ex13_11.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 '3020/CH13/EX13.11/ex13_11.sce')
-rwxr-xr-x3020/CH13/EX13.11/ex13_11.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3020/CH13/EX13.11/ex13_11.sce b/3020/CH13/EX13.11/ex13_11.sce
new file mode 100755
index 000000000..321868b35
--- /dev/null
+++ b/3020/CH13/EX13.11/ex13_11.sce
@@ -0,0 +1,22 @@
+clc;
+clear all;
+p1 = 1.2; // Primitives in Angstom
+p2 = 1.8; // Primitives in Angstom
+p3 = 2; // Primitives in Angstom
+h = 2;// Miller Indices
+k = 3;// Miller Indices
+l = 1;// Miller Indices
+a = 1/h;
+b = 1/k;
+c = 1/l;
+p = [a,b,c];
+[pp fact] = lcm(p);
+i1 = a*(1/fact(3));
+i2 = b*(1/fact(3));
+i3 = c*(1/fact(3));
+l1 = p1*i1;
+l2 = p2*i2;
+l3 = p3*i3;
+l21 = (p1/l1)*l2;
+l31 = (p1/l1)*l3;
+disp('Angstom',l31,l21,'The length of intercept made by Y and Z axes is')