summaryrefslogtreecommitdiff
path: root/2441/CH6/EX6.8/Ex6_8.sce
blob: d4bb7a77973ab5794e33575631555af41423b785 (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
31
32
33
34
35
//exa 6.8
clc;clear;close;
format('v',6);
kV1=132;//kV
kV2=33;//kV
kV3=11;//kV
MVA1=75;//MVA
MVA2=50;//MVA
MVA3=25;//MVA
X=0.12;//p.u.
//part(a)
P=60;//MW
V1=125;//kV
V1=V1/kV1;//p.u.
Q=MVA2/MVA1;//p.u.
//V1=Vn+X*Q/Vn
Vn=poly(0,'Vn');
eqn=Vn^2-V1*Vn+X*Q
Vn=roots(eqn);//p.u.
Vn=Vn(1);//p.u.
Vn=Vn*kV1;//kV
k=Vn/kV2;//Transformer ratio
disp(k,"Under Load condition, transformer ratio is ");
//part(b)
V1=140;//kV
V1=V1/kV1;//p.u.
Q=MVA3/MVA1;//p.u.
//V1=Vn+X*Q/Vn
Vn=poly(0,'Vn');
eqn=Vn^2-V1*Vn+X*Q
Vn=roots(eqn);//p.u.
Vn=Vn(1);//p.u.
Vn=Vn*kV1;//kV
k=Vn/kV2;//Transformer ratio
disp(k,"Under No Load condition, transformer ratio is ");