www.pudn.com > PSAT.zip > setup.m, change:2007-11-17,size:252b


function a = setup(a)

global Bus

if isempty(a.con), return, end

a.n = length(a.con(:,1));
a.bus = getint(Bus,a.con(:,1));
a.dat = zeros(a.n,2);

if length(a.con(1,:)) < a.ncol
  a.u = ones(a.n,1);
else
  a.u = a.con(:,a.ncol);
end

a.store = a.con;