summaryrefslogtreecommitdiff
path: root/1694/CH1/EX1.31/EX1_31.sce
blob: fe8f45456933180621944269b3aba60c177a9823 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clear;
clc;
printf("\nEx1.31\n");
//page no.-38
//given
n=1;..........//order
theta=34;....//angle in degrees
h=2;
k=0;
l=2;
lambda=1.5*10^-10;......//wavelength in m
//By bragg's law

d=(n*lambda)/(2*sind(theta))......//interplanar spacing in m

a=d*sqrt(h^2+k^2+l^2).............//lattice constant in m

printf("\nlattice constant is 3.773 angstrom \n");