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

//Variable declaration
mew0=4*%pi*10**-7
B=0.0044       //magnetic flux density(wb/m**2)
M=3300         //magnetisation(A/m)

//Calculation
H=(B/mew0)-M   //magnetising force(amp/m)
mewr=1+(M/H)   //relative permeability

//Result
printf("\n magnetising force is %0.1f  A/m",H)
printf("\n relative permeability is %0.2f  ",mewr)
printf("\n answers given in the book are wrong")