2012-05-22 11:33:21 +08:00
|
|
|
|
function deltH=func_deltH(Busnum,Volt,PVi,AngleIJMat,Y,GB,PGi)
|
|
|
|
|
|
dH_dPg=zeros(size(PGi,1),2*Busnum);
|
|
|
|
|
|
|
|
|
|
|
|
for I=1:size(PGi,1)
|
|
|
|
|
|
%dH_dPg(I,2*PVi(I)-1)=-1;<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵĹ<EFBFBD>ʽ
|
|
|
|
|
|
%dH_dPg(I,2*PGi(I)-1)=1;<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD>20111227
|
|
|
|
|
|
dH_dPg(I,PGi(I))=1;
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
|
|
dH_dQr=zeros(size(PVi,1),2*Busnum);
|
|
|
|
|
|
for I=1:size(PVi,1)
|
|
|
|
|
|
%dH_dQr(I,2*PVi(I))=-1;<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵĹ<EFBFBD>ʽ
|
|
|
|
|
|
%dH_dQr(I,2*PVi(I))=1;<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD>20111227
|
|
|
|
|
|
dH_dQr(I,PVi(I)+Busnum)=1;
|
|
|
|
|
|
end
|
2012-05-23 09:26:35 +08:00
|
|
|
|
dH_dPD=[-eye(Busnum) zeros(Busnum)];
|
2012-05-22 11:33:21 +08:00
|
|
|
|
Angle=angle(GB);
|
|
|
|
|
|
dH_dx = jacobian_M3(Busnum,Volt,Y,Angle,AngleIJMat); %<EFBFBD>γ<EFBFBD><EFBFBD>ſ˱Ⱦ<EFBFBD><EFBFBD><EFBFBD>
|
|
|
|
|
|
%deltH=[dH_dPg;dH_dQr;dH_dx'];%dH_dx <EFBFBD><EFBFBD>Ҫʹ<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD>ת<EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD>
|
2012-05-23 09:26:35 +08:00
|
|
|
|
deltH=[dH_dPg;dH_dQr;dH_dPD;dH_dx'];
|
2012-05-22 11:33:21 +08:00
|
|
|
|
end
|
