增加多平衡机。

Signed-off-by: facat <dmy@dmy-PC.(none)>
This commit is contained in:
facat
2012-05-27 19:54:38 +08:00
parent 97822756be
commit 54cd254cea
12 changed files with 77 additions and 78 deletions

View File

@@ -1,8 +1,8 @@
function Mat_H=FormH(Busnum,Volt,PG,PD,QG,QD,Y,UAngel,r,c,Angle,QD_NON_ZERO,QD_NON_ZERO_IND)
%%
QDcos=textread('1047glys.txt');
QD(QD~=0)=PD(QD~=0)./tan(QDcos);
QD(QD_NON_ZERO_IND)=QD_NON_ZERO;
% QDcos=textread('1047glys.txt');
% QD(QD~=0)=PD(QD~=0)./tan(QDcos);
% QD(QD_NON_ZERO_IND)=QD_NON_ZERO;
%%
AngleIJ=sparse(r,c,UAngel(r)-UAngel(c)-Angle',Busnum,Busnum);
dP=PG-PD-diag(Volt)*Y.*cos(AngleIJ)*Volt';