path: root/1826/CH19/EX19.9/ex19_9.sce

// Example 19.9, page no-547
clear
clc
bet=9.27*10^-24
V=0.839*10^-9
M=32*bet/V^3
printf("The saturation magnetisation is %.3f *10^5 A/m",M*10^-5)