distributionnetwork-power2current/FormH.m

function Mat_H=FormH(fsY11,Loadi,V1r,V1i,I1r,I1i,BalI1r,BalI1i,Balance)

%%%%һ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ѧ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ĺ<EFBFBD>ʽ
H=[
    real(fsY11),-imag(fsY11);
    imag(fsY11),real(fsY11);
];
busNum=length(fsY11);
% C=sparse(1:length(Loadi),Loadi,1,length(Loadi),busNum*2);
Mat_H=H*[V1r;V1i];

Mat_H=Mat_H+sparse(Loadi,1,-I1r,busNum*2,1)+sparse(Loadi+busNum,1,-I1i,busNum*2,1);
Mat_H(Balance)=Mat_H(Balance)-BalI1r;
Mat_H(Balance+busNum)=Mat_H(Balance+busNum)-BalI1i;

end