20 lines
624 B
Plaintext
20 lines
624 B
Plaintext
|
|
function deltH=func_deltH(Busnum,Volt,PVi,AngleIJMat,Y,GB,PGi)
|
|||
|
|
dH_dPg=zeros(size(PGi,1)+size(PVi,1),2*Busnum);
|
|||
|
|
|
|||
|
|
for I=1:size(PGi,1)
|
|||
|
|
%dH_dPg(I,2*PVi(I)-1)=-1;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵĹ<CFB5>ʽ
|
|||
|
|
%dH_dPg(I,2*PGi(I)-1)=1;<3B><>ʱ<EFBFBD><CAB1>һ<EFBFBD><D2BB>20111227
|
|||
|
|
dH_dPg(I,PGi(I))=1;
|
|||
|
|
end
|
|||
|
|
|
|||
|
|
dH_dQr=zeros(size(PVi,1)+size(PGi,1),2*Busnum);
|
|||
|
|
for I=1:size(PVi,1)
|
|||
|
|
%dH_dQr(I,2*PVi(I))=-1;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵĹ<CFB5>ʽ
|
|||
|
|
%dH_dQr(I,2*PVi(I))=1;<3B><>ʱ<EFBFBD><CAB1>һ<EFBFBD><D2BB>20111227
|
|||
|
|
dH_dQr(I,PVi(I))=1;
|
|||
|
|
end
|
|||
|
|
Angle=angle(GB);
|
|||
|
|
dH_dx = jacobian_M3(Busnum,Volt,Y,Angle,AngleIJMat); %<25>γ<EFBFBD><CEB3>ſ˱Ⱦ<CBB1><C8BE><EFBFBD>
|
|||
|
|
%deltH=[dH_dPg;dH_dQr;dH_dx'];%dH_dx <20><>Ҫʹ<D2AA><CAB9>һ<EFBFBD><D2BB>ת<EFBFBD><D7AA> <20><>ʱ<EFBFBD><CAB1>һ<EFBFBD><D2BB>
|
|||
|
|
deltH=[dH_dPg;dH_dQr;dH_dx'];
|
|||
|
|
end
|