pes2014/func_deltH.asv

20 lines
624 B
Plaintext
Raw Normal View History

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)+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