• 大小: 1.75MB
    文件类型: .zip
    金币: 1
    下载: 0 次
    发布日期: 2023-08-16
  • 语言: Matlab
  • 标签: psat  电力系统  matlab  

资源简介

最新版的psat,电力系统专业必备!基于matlab平台,简单易懂!

资源截图

代码片段和文件信息

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-2013 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 s

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2013-02-21 08:59  psat\
     目录           0  2013-01-06 10:05  psat\@ARclass\
     文件        1007  2008-04-28 00:09  psat\@ARclass\ARclass.m
     文件         262  2008-03-06 09:42  psat\@ARclass\base.m
     文件        1269  2008-03-06 19:20  psat\@ARclass\block.m
     文件          37  2008-03-06 09:43  psat\@ARclass\display.m
     文件         162  2008-03-06 09:43  psat\@ARclass\getidx.m
     文件         519  2008-03-06 09:43  psat\@ARclass\growth.m
     文件        1068  2008-03-06 19:19  psat\@ARclass\idnum.m
     文件         109  2008-07-09 08:44  psat\@ARclass\init.m
     文件         155  2008-03-06 11:26  psat\@ARclass\mask.m
     文件         104  2008-03-06 09:43  psat\@ARclass\restore.m
     文件        1796  2010-01-29 11:19  psat\@ARclass\setup.m
     文件         796  2008-03-06 09:43  psat\@ARclass\subsasgn.m
     文件        1111  2008-03-06 09:44  psat\@ARclass\subsref.m
     目录           0  2013-01-06 10:05  psat\@AVclass\
     文件          94  2007-11-16 18:32  psat\@AVclass\add.m
     文件         633  2008-04-28 00:08  psat\@AVclass\AVclass.m
     文件         309  2008-05-14 13:07  psat\@AVclass\bdmatrix.m
     文件        1041  2008-09-17 19:07  psat\@AVclass\block.m
     文件         198  2008-09-18 09:08  psat\@AVclass\ceiling.m
     文件          37  2007-11-16 18:32  psat\@AVclass\display.m
     文件         694  2007-11-16 18:32  psat\@AVclass\dynidx.m
     文件        1179  2012-07-30 07:08  psat\@AVclass\equiv.m
     文件        2347  2008-10-14 18:11  psat\@AVclass\fcall.m
     文件        3839  2008-09-17 19:04  psat\@AVclass\Fxcall.m
     文件         175  2007-11-16 18:32  psat\@AVclass\gcall.m
     文件         238  2007-11-16 18:32  psat\@AVclass\getxy.m
     文件         109  2007-11-16 18:32  psat\@AVclass\Gycall.m
     文件         188  2008-07-09 08:43  psat\@AVclass\init.m
     文件         500  2008-02-22 18:34  psat\@AVclass\mask.m
............此处省略1716个文件信息

评论

共有 条评论