function deltH=func_deltH(busNum,fsY11,Loadi,Balance)
% dH_dPD=[sparse(1:size(Loadi,1),Loadi,-ones(size(Loadi,1),1),size(Loadi,1),Busnum) sparse(size(Loadi,1),Busnum)];
% dH_dQD=[sparse(size(Loadi,1),Busnum) sparse(1:size(Loadi,1),Loadi,-ones(size(Loadi,1),1),size(Loadi,1),Busnum)];
% dH_dx = jacobian(Busnum,Volt,Y,Angle,UAngel,r,c);  %ÐγÉÑſ˱ȾØÕó
% deltH=[dH_dPD;dH_dQD;dH_dx'];
H=[
    real(fsY11),-imag(fsY11);
    imag(fsY11),real(fsY11);
    
];
deltH=[
    H';
    sparse(1:length(Loadi),Loadi,-1,length(Loadi),busNum*2);
    sparse(1:length(Loadi),Loadi+busNum,-1,length(Loadi),busNum*2);
    %sparse(1:length(Balance),Balance,-1,1,busNum*2);
    %sparse(1:length(Balance),Balance+busNum,-1,1,busNum*2);
];
end