17 lines
1.1 KiB
Mathematica
17 lines
1.1 KiB
Mathematica
|
function AA=FormAA1(deltG,deltdeltF,ddh,ddg,deltH,Init_L,Init_U,Init_W,Init_Z,Busnum,PVi,PGi,RestraintCount,Balance)
|
|||
|
|
ContrlCount=size(PVi,1)+size(PGi,1)+Busnum*2;
|
|||
|
|
H=-deltdeltF+ddh;%+ddg;
|
|||
|
|
AA=[
|
|||
|
|
H,deltH,deltG,deltG,zeros(ContrlCount,RestraintCount),zeros(ContrlCount,RestraintCount);
|
|||
|
|
deltH',zeros(2*Busnum,2*Busnum),zeros(2*Busnum,RestraintCount),zeros(2*Busnum,RestraintCount),zeros(2*Busnum,RestraintCount),zeros(2*Busnum,RestraintCount);
|
|||
|
|
deltG',zeros(RestraintCount,2*Busnum),zeros(RestraintCount,RestraintCount),zeros(RestraintCount,RestraintCount),-eye(RestraintCount,RestraintCount),zeros(RestraintCount,RestraintCount);
|
|||
|
|
deltG',zeros(RestraintCount,2*Busnum),zeros(RestraintCount),zeros(RestraintCount),zeros(RestraintCount),eye(RestraintCount);
|
|||
|
|
zeros(RestraintCount,ContrlCount),zeros(RestraintCount,2*Busnum),diag(Init_L),zeros(RestraintCount),diag(Init_Z),zeros(RestraintCount);
|
|||
|
|
zeros(RestraintCount,ContrlCount),zeros(RestraintCount,2*Busnum),zeros(RestraintCount),diag(Init_U),zeros(RestraintCount),diag(Init_W);
|
|||
|
|
];
|
|||
|
|
%<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƽ<EFBFBD><EFBFBD><EFBFBD>ڵ<EFBFBD>
|
|||
|
|
t=size(PVi,1)+size(PGi,1);
|
|||
|
|
AA(t+2*Balance-1,:)=0;
|
|||
|
|
AA(:,t+2*Balance-1)=0;
|
|||
|
|
AA(t+2*Balance-1,t+2*Balance-1)=1;
|
|||
|
|
end
|