summaryrefslogtreecommitdiff
path: root/3020/CH20/EX20.1/ex20_1.sce
blob: c29437d9998d44fb119aed7385cc8fbdf418fbbe (plain)
1
2
3
4
5
6
7
8
9
10
clc;
clear all;
M=2300;//magnetization in A/m
B=0.00314;//flux density in Wb/m^2
u0=4*%pi*1e-7;//permiability of vacume
H=(B/u0)-M;//magnetic force
ur=(M/H)+1;//relative permiability
disp('A/m',H,'magnetic force is:')
disp('',ur,'relative permiability is:')