move2sup.m

电力系统分析计算程序

function a = move2sup(a)

if ~a.n, return, end

global Supply

idx = find(a.u);
data = zeros(a.n,15);
data(:,[1 2 15]) = a.con(:,[1 2 11]);
data(:,3) = a.pg;
Supply = add(Supply,data(idx,:));
a.pg(idx) = 0;