3557/CH18/EX18.4/Ex18_4.sce


1
2
3
4
5
6
7
8
9

//Example 18.4//

n=8;//numbers Ni2+/ unit cell
n1=2; //moment of Ni2+
m=n*n1
mprintf("m = %i ",m)
a=18.4;// measured value of nickel ferrite
e=((a-m)/a)*100
mprintf("\ne = %i percent",e)