pqsum.m

来自「这是一个很适合研究和学习用的电力系统仿真软件」· M 代码 · 共 16 行

function pqsum(a,lambda)

global PQ

if ~a.n, return, end

tgd = tanphi(a);

for i = 1:a.n
  idx = findbus(PQ,a.bus(i));
  pd = lambda*a.con(i,7);
  qd = lambda*tgd(i)*a.con(i,7);
  PQ = pqsum(PQ,idx,pd,qd);
end