blob: e2e7d620407b1942b407928dab38d34e8992780f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
//Book Name:Fundamentals of Electrical Engineering
//Author:Rajendra Prasad
//Publisher: PHI Learning Private Limited
//Edition:Third ,2014
//Ex5_8.sce.
clc;
clear;
mew_rA=250;
mew_rB=320;
lA=40e-2;
lB=25e-2;
aA=5e-4;
aB=7e-4;
N=250;
printf("\n (a)")
mew_not=4e-7*%pi;
mew_A=mew_rA*mew_not;
mew_B=mew_rB*mew_not;
R=((lA/(mew_A*aA))+(lB/(mew_B*aB)));
printf("\n The total reluctance=%g*10^3 AT/Wb \n",R*1e-3)
printf("\n (b)")
phi=2.5e-3;
F=phi*R;
I=F/N;
printf("\n The magnetizing current=%2.2f AT \n",I)
//Answer vary dueto round_off error
|
