summaryrefslogtreecommitdiff
path: root/503/CH3/EX3.6/ch3_6.sci
blob: 9523688a20ea4a09c353a2d559e600ce3a1e4f76 (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
// To find the voltage at the load end of the transformer when load is drawing transformer current

clc;

I=20/2;                    //rated load current(hv side)

Z1=[.25,1.4];                    //impedence of feeder    (REAL,IMAGINERY)
Z2=[.82,1.02];                   //impedence of transformer    (REAL,IMAGINERY)

Z=Z1+Z2;
disp(Z,'Z(ohm)');

pf=.8;
phi=acosd(pf);

//from phasor diagram
      
R=Z(1);
X=Z(2);
AF=I*X*cosd(phi);
FE=I*R*sind(phi);
AE=AF-FE;
OA=2000;
OE=sqrt(OA^2-AE^2);                                                        

BD=I*R*cosd(phi);
DE=I*X*sind(phi);
BE=BD+DE;
V1=OE;   disp(V1,'V1(V)'); 
V2=V1-BE;    disp(V2,'V2(V)');

loadvol=V2/10;                        //referred to LV side
disp(loadvol,'load voltage(V)');