summaryrefslogtreecommitdiff
path: root/3669/CH7/EX7.6/6.sce
blob: 0a4c65bec97cdd613ff9dc2fbfd4827466dd739b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14

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

//Calculation
H=(B/mew0)-M;    //magnetizing force(A/m)
mewr=1+(M/H);    //relative permeability

//Result
printf('magnetizing force is %0.3f   A/m  \n',int(H))
printf('relative permeability is %0.3f     \n',(mewr))
printf('answer varies due to approximating off errors\n')