Notesale: Turn your study into money

Document Preview

Extracts from the notes are below, to see the PDF you'll receive please use the links above

---

Table 3
...


Voltage
magnitude, pu

1
2
3
4
5
6
7
8

Angle
degree

Load
MW
MVAr

Generation
MW
MVAr

Table 4
...
0005 0
...
0013 0
...
0323 0
...
0074 0
...
0103 0
...
0037 0
...
0050 0
...
0053 0
...
0012 0
...
0008 0
...
*X
y=ones(nbr, 1)
...
22; -1
...
76; -0
...
25]
Q = [0; -0
...
67; -0
...
2; 0; 0; -0
...
025; 1; 1; 1; 1; 1; 1; 1];
sum = 0;
for x = 1:25
V
for r = 2:8

for c = 1:8
if r ~= c
sum = sum + Y(r,c)*V(c);
end
end
V(r) = ((P(r) - 1i*Q(r))/conj(V(r)) - sum)/Y(r,r);
sum=0;
end
end
V
%END OF ITERATION
%LINE FLOW CURRENTS
for r = 1:8
for c = 1:8
I(r,c) = -Y(r,c)*(V(r)-V(c));
end
end
I
%END OF ITERATION
%LINE FLOW POWERS
for r = 1:8
for c = 1:8
S(r,c) = V(r)*conj(I(r,c));
end
end
S
%END OF ITERATION
%LINE FLOW LOSSES
for r = 1:8
for c = 1:8
SL(r,c) = S(r,c)+S(c,r);
end
end
SL
%END OF ITERATION
%TOTAL LOSSES
for r = 1:8
TSL (r) = 0;
for c = 1:8
TSL(r) = TSL(r) + SL(r,c);
end
end
TSL
%END

S1 =
conj(V(1))*(Y(1,1)*V(1)+Y(1,2)*V(2)+Y(1,3)*V(3)+Y(1,4)*V(4)+Y(1,5)
*V(5)+Y(1,6)*V(6)+Y(1,7)*V(7)+Y(1,8)*V(8))



---