summaryrefslogtreecommitdiff
path: root/3523/CH16/EX16.7.4/Ex16_4.sce
blob: 9f8d862a98955191645ffe7bba45ff5be50fc4a2 (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
36
37
38
39
40
41
42
43
44
45
clear all
clc
close

f=50;//Power frequency
xl=8/100;//leakage reactance
r=3.5/100;//resistance
Vc=500;//Charging voltage in kV
Ic=4;//Charging current in A
capc=100;//kVA rating of transformer
vhigh=250;//Voltage rating of secondary of transformer in kV
vlow=220;//Voltage rating of primary of transformer in V

//Reactance of cable in kiloohm
Xc=Vc/Ic

//Leakage recatance of transformer in kiloohm
XL=xl*(vhigh^2/capc)

//Additional series inductance
xh=Xc-XL;

//Inductance of the required series inductor in Henry
L=xh/(2*%pi*f)*1e3;
printf('Inductance of the required series inductor in %f  Henry \n',L)

//Total circuit resistance in kiloohm
R=r*(vhigh^2/capc)

//The maxium current can be supplied by transformer in A
I=capc/vhigh;

Vsec = I*R;
printf("exciting voltage on the transformer secondary %f kV \n",Vsec)

//Exciting voltage of secondary of transformer in kV
Vexsec=I*R;

//Input voltage to primary of transformer in V
Vin=Vexsec*1e3*vlow/(vhigh*1e3);
printf('Input voltage to primary of transformer in  %f V \n',Vin)

//Input power to transformer in kW
Pin=Vin*capc/vlow
printf('Input power to primary of transformer in %f kW \n',Pin)