gusucode.com > matlab编程遗传算法计算匹配电路源码程序 > code1/code/MATLAB源代码/genetic/Test_fns/simdopi2.m

    % SIMDOPI2.M      (Modell of DOPpelINTegrator, s-function)
%
% This function implements the modell of the DOPPELINTEGRATOR.
%
% Syntax:  [sys, x0] = simdopi2(t, x, u, flag)
%
% Input parameters:
%    t         - given time point
%    x         - current state vector
%    u         - input vector
%    flag      - flags
%
% Output parameters:
%    sys       - Vector containing the new state derivatives
%    x0        - initial value            

% Author:     Hartmut Pohlheim
% History:    17.12.93     file created

function [sys, x0] = simdopi2(t, x, u, flag);

% Linear Systems Description

   if abs(flag) == 1
   	sys(1) = u(1);       % Derivatives
   	sys(2) = x(1);       % Derivatives
   elseif abs(flag) == 0
   	sys=[2,0,0,1,0,0]; x0 = [0; -1];
   else
   	sys = [];		% Real time update (ignored).
   end


% End of function