summaryrefslogtreecommitdiff
path: root/3816/CH8/EX8.9/8_9.sce
blob: 7c93913798d82da4e625fe9a006f97157eefaa87 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clc;
clear;
disp('Self Excitation')
Sm=24*10^(-3);//minimum capacitive susceptance 
C=Sm/314;
disp(C,'The capacitance at self excitation is:')
disp('For generating 3KV:')
Sm1=43*10^(-3);//Using method of interpolation we get 43ms for 1.73KV/Ph(3KV line)
C1=Sm1/314;
disp(C1,'The capacitance for generating 3KV is:')
disp('To determine the operating conditions for a load(125-20i)A at 3KV 50Hz')
Im=60;
It=10;
Ir=125;
Ix=20;
Ia=Ir+It;
Ia1=Ix+Im;
Ic=104;
Sm2=59.6*10^(-3);
C2=Sm2/314;
disp(Ia1,Ia,'The active currents are:')
disp(Ic,'The capacitive current is:')
disp(C2,'The capacitance in micro farad is:')