pes2014/func_deltF.m

13 lines
261 B
Mathematica
Raw Normal View History

function deltF=func_deltF(PG,PVi,PGi,wG,wD,PG0,PD0,PD,Busnum,Loadi)
t1=2*wG.*(PG(PGi) - PG0(PGi) );
t2=2*wD.*(PD(Loadi)-PD0(Loadi));
2012-05-22 11:33:21 +08:00
deltF=[
sparse(t1);
sparse(size(PVi,1),1);
sparse(t2);
sparse(length(Loadi),1);
sparse(2*Busnum,1);
2012-05-22 11:33:21 +08:00
];
end