base.m

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

function p = base(p)

global Bus Settings

if ~p.n, return, end

fm_errv(p.con(:,3),'Slack Bus',p.bus);
p.con(:,6) = p.con(:,6).*p.con(:,2)/Settings.mva;
p.con(:,7) = p.con(:,7).*p.con(:,2)/Settings.mva;
p.con(:,8) = p.con(:,8).*p.con(:,3)./Bus.con(p.bus,2);
p.con(:,9) = p.con(:,9).*p.con(:,3)./Bus.con(p.bus,2);
p.con(:,10) = p.con(:,10).*p.con(:,2)/Settings.mva;
p.pg = p.con(:,10);
p.store = p.con;