blob: c7623f162e8baeb897a686f945b9796940452c01 (
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
h=1
k=1
l=2
a=2.5
b=a
c=2.6
//Calculations
d=((h**2/a**2)+(k**2/b**2)+(l**2/c**2))**(-0.5)
//Result
mprintf("Inter-planar spacing d= %.3f Armstrong",d)
|
