%--------------------------------------------------------------------------
%
% PURPOSE: Test the rudder rate limiter routine
% AUTHOR:  Rob McEwen
% DATE:    99/4/22
%
%--------------------------------------------------------------------------
 tdb = [0:500]'/50;
 udb = ones(501,1)*10*pi/180;
 maxDeltaR = pi/12;        % Max tailcone deflection; 15 degrees.
 maxDeltaRDot = pi/90;     % Max tailcone deflection rate; 2 deg/sec.
 deltaRDead = .25*pi/180;  % Rudder deadband; +/- .25 deg = .5 degrees.
 [toutdb] = sim('rudderRateSS',tdb,simset('maxstep',tdb(2)-tdb(1)));
 plot(toutdb,[ydb udb])
 grid on