summaryrefslogtreecommitdiff
path: root/3840/CH7/EX7.1/Ex7_1.sce
blob: 28938a6935e37df7072c849896f1b5e28d2299e4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clear
//
//
//

//Variable declaration
chi=-0.4*10**-5       //magnetic susceptibility
H=5*10**5             //magnetic field intensity(amp/m)
mew0=4*%pi*10**-7

//Calculation
B=mew0*H*(1+chi)       //magnetic flux density(wb/m**2)
M=chi*H                //magnetic moment(A/m)

//Result
printf("\n magnetic flux density is %0.3f  wb/m**2",B)
printf("\n magnetic moment is %0.3f  A/m",M)