summaryrefslogtreecommitdiff
path: root/3673/CH9/EX9.a.5/Example_a_9_5.sce
blob: fba0c47084e9f911bf5273c76f2c4ef6ae155607 (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
30
//Example_a_9_5 page no:405
clc;
P=5000;
V=400;
f=50;
cos_pi=0.7;
pi=acosd(cos_pi);
sin_pi=sin(pi);
Il=P/(sqrt(3)*V*cos_pi);
Iph=Il;
Zph=V/(sqrt(3)*Iph);
Rph=Zph*cos_pi;
Xph=Zph*sin_pi;
//calculating line currents if one of the inductors is disconnected
Ir=V/(2*Zph);
Ib=Ir;
Iy=0;
disp("line currents if one of the inductors is disconnected");
disp(Ir,"the current Ir is (in A)");
disp(Ib,"the current Ib is (in A)");
disp(Iy,"the current Iy is (in A)");
//calculating line current if one of the inductor is short circuited
Ir=V/Zph;
Ib=Ir;
Iph=Ib;
Iy=2*Iph*cosd(60/2);
disp("line current if one of the inductor is short circuited");
disp(Ir,"the current Ir is (in A)");
disp(Ib,"the current Ib is (in A)");
disp(Iy,"the current Iy is (in A)");