summaryrefslogtreecommitdiff
path: root/1826/CH19/EX19.8/ex19_8.sce
blob: 6d555f31f230b6362315fa17e0f1d3ba8ed77f4a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Example 19.8, page no-547
clear
clc
ba=7.1//Bohr Magnetron
aw=1.8*10^6 //A/m
d=7.8*10^3
avg=6.023*10^26
M=157.26
mu=4*%pi*10^-7
k=9.27*10^-24 //Bohr Magnetron
N=d*avg/M
mm=N*ba*k
B=N*mu*k*7.1
printf("\nThe saturation magnetic field of Gd atom is %f Wb/m^2",B)