blob: fcddaa5fa0bf13c199fed3cd59b11e369b79f2c7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
//Chapter 10 : Crystallography and Crystal Imperfections
clear;
//Variable declaration
r=1.278 //atomic weigth
No=6.02*10**26 //Avagadro's No.
//Calculations
a=2*sqrt(2)*r
//Result
mprintf("Lattice constant a= %.3f Armstrong",a)
|
