summaryrefslogtreecommitdiff
path: root/3557/CH18/EX18.5/Ex18_5.sce
blob: 667dfa0622200fcdffd12fc16ac90c133bd4a97b (plain)
1
2
3
4
5
6
7
//Example 18.5//

a=18.4;// measured value of nickel ferrite
ub=9.274*10^-24;//A m^2// ampere-meters square //Moment
v=(0.833*10^-9);//m //meter // volume of unit cell
Ms=(a*ub)/v^3
mprintf("Ms = %e A/m",Ms)