summaryrefslogtreecommitdiff
path: root/3828/CH10/EX10.7/Ex10_7.sce
blob: 5b2b526d7c7da89c04d692773fa470c013b9309a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Chapter 10 : Crystallography and Crystal Imperfections

clear;

//Variable declaration
x=2                    //x intercept  
y=3                    //y intercept
z=3                    //z intercept

//Calculations          
rx=(1/x)*6             //reciprocal of x intercept
ry=(1/y)*6             //reciprocal of y intercept
rz=(1/z)*6             //reciprocal of z intercept

//Result
mprintf("Miller indices are (%d , %d , %d)",rx,ry,rz)