summaryrefslogtreecommitdiff
path: root/3020/CH20/EX20.11/ex20_11.sce
blob: 2cb6a02ffcc277a96af3f912b8e54605f3d30b2c (plain)
1
2
3
4
5
6
7
8
9
10
clc;
clear all;
rho=7860;//density of gadolinium
m=157.25;//atomic weight of gadolinium
n=64;//atomic number
Na=6.022e26;//avagadra's number
u0=4*%pi*1e-7;//permiability of vacume
b=9.27e-24;
N=rho*Na*8*b/m;//saturation magnetization
disp('A/m',N,'saturation magnetization is:')