summaryrefslogtreecommitdiff
path: root/3020/CH13/EX13.20/ex13_20.sce
blob: 8a18b3c0cde1a4ce0e8b7bac69ddd178da46ed81 (plain)
1
2
3
4
5
6
7
8
9
clc;
clear all;
rho = 7860;//Density of alpha-iron in Kg/m^3
M = 55.85e-3; // Atomic weight of alpha-iron in Kg
n = 2;// Number of atoms per unit cell of BCC
N = 6.022e26; // Avagadro constant
a = ((n*M)/(N*rho))^(1/3);//Lattice constant
r = ((a*sqrt(3))/4);
disp('m',r,'The atomic radius of alpha-iron is')