fm_tcsc.m

来自「基于PSAT 软件的多目标最优潮流计算用于中小型电力系统的分析和管理」· M 代码 · 共 56 行

function  fm_tcsc(flag)
% FM_TCSC defines Synchronous Machines
%
% FM_TCSC(FLAG)
%       FLAG = 0 initializations
%       FLAG = 1 algebraic equations
%       FLAG = 2 algebraic Jacobians
%       FLAG = 3 differential equations
%       FLAG = 4 state matrix
%       FLAG = 5 non-windup limits
%
%Author:    Federico Milano
%Date:      11-Nov-2002
%Version:   1.0.0
%
%E-mail:    [e-mail]
%Web-site:  http://thunderbox.uwaterloo.ca/~fmilano
%
% Copyright (C) 2002-2006 Federico Milano

global Tcsc

switch flag
 case 0 % initialization

  Tcsc = setx0(Tcsc);
  
 case 1 % algebraic equations

  gcall(Tcsc)

 case 2 % algebraic Jacobians

  Gycall(Tcsc)

 case 3 % differential equations

  Tcsc = fcall(Tcsc);

 case 4 % state Jacobians

  Fxcall(Tcsc)

 case 5
  
  windup(Tcsc)

end

% --------------------------------------------------------------------------------------
% function for creating warning messages
function tcscwarn(idx, msg)
global Tcsc
fm_disp(strcat('Warning: TCSC #',int2str(idx),' between buses #', ...
	       int2str(Tcsc.bus1(idx)),' and #',int2str(Tcsc.bus2(idx)),msg))