setpg.m

来自「基于PSAT 软件的多目标最优潮流计算用于中小型电力系统的分析和管理」· M 代码 · 共 12 行

function a = setpg(a,idx,p)

if ~a.n, return, end
if isempty(idx), return, end
if isnumeric(idx)
  a.pg(idx) = p;
  a.store(idx,10) = p;
elseif strcmp(idx,'all')
  a.pg = p;
  a.store(:,10) = p;
end