Ex No:4 Load Flow Analysis by Gauss-Siedel Method
Ex No:4 Load Flow Analysis by Gauss-Siedel Method
yv=(conj(v(i))*yv);
q(i)=-imag(yv);
if q(i)<qmin(i-1)
q(i)=qmin(i-1);
else
q(i)>qmax(i-1)
q(i)=qmax(i-1)
end
yv=0;
for j=1:nb
if i~=j
yv=yv+y(i,j)*v(j);
end
end
v1=(complex(p(i),-q(i))/(conj(v(i)))-yv)/y(i,i);
del(i)=angle(v1);
[re,im]=pol2cart(del(i),v(i));
v(i)=complex(re,im);
end
for i=m+2:nb
yv=0;
for j=1:nb
if i~=j
yv=yv+y(i,j)*v(j);
end
end
v(i)=(complex(-p(i),q(i))/(conj(v(i)))-yv)/y(i,i);
end
for k=2:itrn
for i=2:nb-1
yv=0;
for j=1:nb
if i~=j
yv=y(i,j)*v(j);
end
end
v(i)=(complex(-p(i).q(i))/(conj(v(i)))-yv)/y(i,i);
end
end
disp(['the final value of voltage after the iteration',num2str(itrn),'are']);
disp(v);
OUTPUT:
THE INPUT DATAS ARE AS FOLLOWS
THE NUMBER OF BUSES
5