Mercurial > hg > octave-nkf

diff scripts/control/base/tzero.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents 7923abdeb4e5
children b8105302cfe8
line wrap: on
line diff
--- a/scripts/control/base/tzero.m
+++ b/scripts/control/base/tzero.m
@@ -55,7 +55,7 @@
   ## get A,B,C,D and Asys variables, regardless of initial form
   if(nargin == 4)
     Asys = ss2sys(A,B,C,D);
-  elseif( (nargin == 1) && (! is_struct(A)))
+  elseif( (nargin == 1) && (! isstruct(A)))
     usage("[zer,gain] = tzero(A,B,C,D) or zer = tzero(Asys)");
   elseif(nargin != 1)
     usage("[zer,gain] = tzero(A,B,C,D) or zer = tzero(Asys)");