Mercurial > octave-nkf

comparison scripts/control/base/step.m @ 7126:4a375de63f66

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-08 03:44:14 by jwe]
author jwe
date Thu, 08 Nov 2007 03:44:15 +0000
parents a1dbe9d80eee
children 1d0d7be2d0f8
comparison
equal deleted inserted replaced
7125:f084ba47812b 7126:4a375de63f66
55 ## Created: September 30, 1997 55 ## Created: September 30, 1997
56 ## based on lsim.m of Scottedward Hodel 56 ## based on lsim.m of Scottedward Hodel
57 57
58 function [y, t] = step (sys, inp, tstop, n) 58 function [y, t] = step (sys, inp, tstop, n)
59 59
60 if ((nargin < 1) || (nargin > 4)) 60 if (nargin < 1 || nargin > 4 || nargout > 2)
61 print_usage ();
62 endif
63
64 if (nargout > 2)
65 print_usage (); 61 print_usage ();
66 endif 62 endif
67 63
68 if (! isstruct (sys)) 64 if (! isstruct (sys))
69 error ("step: sys must be a system data structure."); 65 error ("step: sys must be a system data structure.");