资源简介
PSAT软件及900页原版教程.rar
PSAT软件 原版教程
工具加教程。
代码片段和文件信息
function check = autorun(msgtype)
% AUTORUN properly launch PSAT routine checking for data
% files and previous power flow solutions
%
% CHECK = AUTORUN(MSG)
% MSG message to be displayed
% TYPE 0 for static analysis 1 for dynamic analysis
% CHECK 1 if everything goes fine 0 otherwise
%
%Author: Federico Milano
%Date: 29-Oct-2003
%Version: 1.0.0
%
%E-mail: Federico.Milano@uclm.es
%Web-site: http://www.uclm.es/area/gsee/Web/Federico
%
% Copyright (C) 2002-2009 Federico Milano
global Settings File Bus
global DAE LIB SNB OPF CPF clpsat Comp
check = 0;
% check for data file
if isempty(File.data)
fm_disp([‘Set a data file before running ‘msg‘.‘]2)
return
end
% check for initial power flow solution
if ~Settings.init
solvepf
if ~Settings.init return end
end
% check for dynamic components if running a static analysis
if ~type & DAE.n & ~clpsat.init
dynlf = sum(prod(Comp.prop(:[3 6 9])2));
iscpf = strcmp(msg‘Continuation Power Flow‘);
if ~Settings.static & ~dynlf
Settings.ok = 0;
uiwait(fm_choice(‘Dynamic components will be discarded. Continue?‘))
if Settings.ok
Settings.static = 1;
solvepf
Settings.static = 0; % reset initial condition
else
return
end
elseif ~Settings.static & ~dynlf & iscpf
Settings.ok = 0;
uiwait(fm_choice([‘Dynamic components can lead to numerical ‘ ...
‘problems discard?‘]))
if Settings.ok
Settings.static = 1;
solvepf
Settings.static = 0; % reset initial condition
end
elseif iscpf
Settings.ok = 1;
%uiwait(fm_choice([‘Dynamic components can lead to numerical ‘ ...
% ‘problems continue?‘]))
%if ~Settings.ok return end
else
uiwait(fm_choice([‘Dynamic components are not supported for ‘ ...
‘static analysis‘]2))
return
end
end
% check for previous CPF & ATC solutions
if strcmp(msg‘SNB Direct Method‘)
one = 1;
else
one = 0;
end
if CPF.init & ~(one & CPF.init == 1)
switch CPF.init
case 1 met = ‘CPF‘;
case 2 met = ‘ATC‘;
case 3 met = ‘N-1 Cont. An.‘;
case 4 met = ‘Continuation OPF (PSAT-GAMS)‘;
end
Settings.ok = 0;
if clpsat.init
Settings.ok = clpsat.refresh;
else
uiwait(fm_choice([met‘ has been run last. Do you want to‘ ...
‘ restore initial PF solution?‘]))
end
if Settings.ok
solvepf
fm_disp([‘Initial PF solution will be used as ‘ ...
‘base case solution.‘])
else
fm_disp([‘Last ‘met‘ solution will be used as ‘ ...
‘base case solution.‘])
end
CPF.init = 0;
end
% check for previous time domain simulations
if Settings.init == 2
Settings.ok = 0;
if clpsat.init
Settings.ok = clpsat.refresh;
else
uiwait(fm_choice([‘TD has been run last. Do you want to‘ ...
‘ restore initial PF solution?‘]))
end
if Settings.ok
solvepf
fm_disp([‘Initial PF solution
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
文件 1007 2008-04-28 00:09 PSAT资料\psat\psat\@ARclass\ARclass.m
文件 262 2008-03-06 10:42 PSAT资料\psat\psat\@ARclass\ba
文件 1269 2008-03-06 20:20 PSAT资料\psat\psat\@ARclass\block.m
文件 37 2008-03-06 10:43 PSAT资料\psat\psat\@ARclass\display.m
文件 162 2008-03-06 10:43 PSAT资料\psat\psat\@ARclass\getidx.m
文件 519 2008-03-06 10:43 PSAT资料\psat\psat\@ARclass\growth.m
文件 1068 2008-03-06 20:19 PSAT资料\psat\psat\@ARclass\idnum.m
文件 109 2008-07-09 08:44 PSAT资料\psat\psat\@ARclass\init.m
文件 155 2008-03-06 12:26 PSAT资料\psat\psat\@ARclass\mask.m
文件 104 2008-03-06 10:43 PSAT资料\psat\psat\@ARclass\restore.m
文件 1789 2008-07-09 19:35 PSAT资料\psat\psat\@ARclass\setup.m
文件 796 2008-03-06 10:43 PSAT资料\psat\psat\@ARclass\subsasgn.m
文件 1111 2008-03-06 10:44 PSAT资料\psat\psat\@ARclass\subsref.m
文件 94 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\add.m
文件 633 2008-04-28 00:08 PSAT资料\psat\psat\@AVclass\AVclass.m
文件 309 2008-05-14 13:07 PSAT资料\psat\psat\@AVclass\bdmatrix.m
文件 1041 2008-09-17 19:07 PSAT资料\psat\psat\@AVclass\block.m
文件 198 2008-09-18 09:08 PSAT资料\psat\psat\@AVclass\ceiling.m
文件 37 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\display.m
文件 694 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\dynidx.m
文件 1178 2008-04-04 17:30 PSAT资料\psat\psat\@AVclass\equiv.m
文件 2347 2008-10-14 18:11 PSAT资料\psat\psat\@AVclass\fcall.m
文件 3839 2008-09-17 19:04 PSAT资料\psat\psat\@AVclass\Fxcall.m
文件 175 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\gcall.m
文件 238 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\getxy.m
文件 109 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\Gycall.m
文件 188 2008-07-09 08:43 PSAT资料\psat\psat\@AVclass\init.m
文件 500 2008-02-22 19:34 PSAT资料\psat\psat\@AVclass\mask.m
文件 327 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\remove.m
文件 104 2007-11-16 19:32 PSAT资料\psat\psat\@AVclass\restore.m
............此处省略1650个文件信息
评论
共有 条评论