Mercurial > octave-nkf
diff scripts/control/obsolete/minfo.m @ 7134:ff0b965b65bc
[project @ 2007-11-08 16:36:06 by jwe]
author | jwe |
---|---|
date | Thu, 08 Nov 2007 16:36:06 +0000 |
parents | a1dbe9d80eee |
children |
line wrap: on
line diff
--- a/scripts/control/obsolete/minfo.m Thu Nov 08 16:25:44 2007 +0000 +++ b/scripts/control/obsolete/minfo.m Thu Nov 08 16:36:06 2007 +0000 @@ -44,17 +44,17 @@ function [systype, nout, nin, ncstates, ndstates] = minfo (inmat) - warning("minfo: obsolete. Use sys2ss, sys2tf, or sys2zp."); + warning ("minfo: obsolete. Use sys2ss, sys2tf, or sys2zp."); - if (nargin ~= 1 ) + if (nargin != 1 ) disp ("MINFO: Wrong number of arguments") systype = nout = nin = ncstates = ndstates = []; endif - [rr,cc] = size(inmat); + [rr, cc] = size (inmat); ## Check for empty matrix first! - if (isempty(inmat)) + if (isempty (inmat)) systype = "empty"; nout = nin = ncstates = ndstates = 0; return @@ -91,4 +91,5 @@ ncstates = 0; ndstates = 0; endif + endfunction