summaryrefslogtreecommitdiff
path: root/2672/CH2/EX2.11/Ex2_11.sce
blob: e6361c0d1dd1a6e935e1dc65a60cffb5da8c1719 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Ex_2_11
clc;
clear;
close;
format('v',6);
//given data : 
lg=0.01/100;//m(airgap)
li=39.99/100;//m(mean length)
mur=2000;//relative permeability
mu0=4*%pi*10^-7;//permeability
N=1000;//turns
A=9/10000;//m^2
fi=1;//mWb
S=li/(mu0*mur*A)+lg/(mu0*A);//AT/Wb
I=fi*10^-3*S/N;//A
disp(I,"Current required(A)");