glcall.m

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

function Glcall(p)

global DAE Bus

if ~p.n, return, end

DAE.Gl = DAE.Gl + sparse(p.bus,1,p.con(:,3),2*Bus.n,1);
DAE.Gl = DAE.Gl + sparse(p.bus+Bus.n,1,p.con(:,4),2*Bus.n,1);