BUS+Hound 源代码

function a = add(a,data) global Bus newbus = getint(Bus,data(:,1)); if length(data(1,:)) < a.ncol data(:,a.ncol) = 1; end a.…

function a = base(a) if ~a.n, return, end global Bus Settings fm_errv(a.con(:,3),'Shunt',a.bus); Vb2new = getkv(Bus,a.bus,2); V…

function [bus_pmu, bus2] = fm_pmurec(bus1,bus2,bus0) % FM_PMUREC routine for PMU placement % % (...) = FM_PMUREC(...) % % This rou…

function [n,idx,data] = gams(a) global Bus n = int2str(a.n); idx = sparse(a.bus,[1:a.n],1,Bus.n,a.n); data = getzeros(Bus); if a…

function p = base(p) global Bus Settings if ~p.n, return, end fm_errv(p.con(:,3),'PV Bus',p.bus); Vb = getkv(Bus,p.bus,1); p.co…

function [qmax,qmin] = pvlim(a) global Bus if ~a.n qmax = []; qmin = []; return end qmax = find(Bus.Qg(a.bus) > a.con(:,6)…

function a = add(a,data) global Bus newbus = getint(Bus,data(1)); idx = findbus(a,newbus); if isempty(idx) a.n = a.n + 1; i…

function a = setup(a,varargin) if isempty(a.con), return, end global DAE Settings switch nargin case 2 Bus = varargin{1}; o…

function warn(a,idx,msg) global Bus fm_disp(fm_strjoin('Warning: Thermostatically controlled load #', ... int2str(idx),' at …

function warn(a,idx,msg) global Bus fm_disp(fm_strjoin('Warning: Central Area Controller #',int2str(idx), ... ' at bus #…