bus+communication 源代码

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

function a = setup(a) global Bus if isempty(a.con), return, end a.n = length(a.con(:,1)); [a.bus,a.vbus] = getbus(Bus,a.con(:,1…

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 p = base(p) global Line Bus if ~p.n, return, end fm_errv(p.con(:,4),'Upfc',p.bus1) Vb = getkv(Bus,p.bus1,1); p.con(:,9…

function a = add(a,data) global Line Bus a.n = a.n + length(data(1,:)); a.con = [a.con; data]; a.line = [a.line; a.con(:,1)]; a.…

function a = setup(a) global Line Bus if isempty(a.con), return, end a.n = length(a.con(:,1)); a.line = a.con(:,1); a.Cp = a.co…

function warn(a,idx,msg) global Bus fm_disp(fm_strjoin('Warning: UPFC #',int2str(idx),' at bus : ',msg))

function warn(a,idx,msg) global Bus fm_disp(fm_strjoin('Warning: JIMMA LOAD #',int2str(idx),' at bus : ',msg))

function p = base(p) global Bus Settings if ~p.n, return, end fm_errv(p.con(:,4),'Dfig',p.bus) Vb2old = p.con(:,4).*p.con(:,4);…

function a = setup(a) global Bus if isempty(a.con), return, end a.n = length(a.con(:,1)); [a.bus,a.vbus] = getbus(Bus,a.con(:,1…