summaryrefslogtreecommitdiff
path: root/3020/CH13/EX13.8/ex13_8.sce
blob: 7c023ba772052e966c76915b4bb4a8864c7a27b6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
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')