bus+communication 源代码

function p = base(p) global Bus Settings if ~p.n, return, end fm_errv(p.con(:,4),'Cswt',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…

function p = base(p) global Bus Settings if ~p.n, return, end V1 = getkv(Bus,p.bus1,1); V2 = getkv(Bus,p.bus2,1); VL1 = p.con(…

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

function warn(a,idx,msg) global Bus fm_disp(fm_strjoin('Warning: PHS #',int2str(idx),' between buses and ',msg))

function p = base(p) global Line Bus Settings if ~p.n, return, end [p.B,p.y] = factsbase(Line,p.line,p.Cp,'TCSC'); fm_errv(p.c…

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

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.ty1 = fin…

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…