getxy.m

来自「电力系统分析计算程序」· M 代码 · 共 10 行

function [x,y] = getxy(a,bus,x,y)

if ~a.n, return, end

h = find(ismember(a.bus,bus));

if ~isempty(h)
  x = [x; a.m(h)];
end