diff options
Diffstat (limited to '3020/CH13/EX13.8/ex13_8.sce')
-rwxr-xr-x | 3020/CH13/EX13.8/ex13_8.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3020/CH13/EX13.8/ex13_8.sce b/3020/CH13/EX13.8/ex13_8.sce new file mode 100755 index 000000000..7c023ba77 --- /dev/null +++ b/3020/CH13/EX13.8/ex13_8.sce @@ -0,0 +1,13 @@ +clc;
+clear all;
+a = 4.2e-10; // Lattice constant in meters
+h1 = 1; //Miller indices of diffracted plane case1
+k1 = 0; //Miller indices of diffracted plane case1
+l1 = 1;// Miller indices of diffracted plane case1
+d = a/sqrt(h1^2+k1^2+l1^2);// Lattice constant
+disp('m',d,'The lattice spacing for plane (1,0,1) is')
+h2 = 2; //Miller indices of diffracted plane case2
+k2 = 2; //Miller indices of diffracted plane case2
+l2 = 1;// Miller indices of diffracted plane case2
+d = a/sqrt(h2^2+k2^2+l2^2);// Lattice constant
+disp('m',d,'The lattice spacing for plane (2,2,1) is')
|