pqdir.m

这是一个很适合研究和学习用的电力系统仿真软件

function [p,q] = pqdir(a,idx)

p = 0;
q = 0;

if ~a.n, return, end

if ~isempty(idx)
  p = sum(a.con(idx,3));
  q = sum(a.con(idx,4));
end