Mercurial > hg > octave-lyh

diff scripts/control/system/sysgettype.m @ 4462:3e48e60a1f8b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-07-12 03:31:41 by jwe]
author jwe
date Sat, 12 Jul 2003 03:31:41 +0000
parents 22bd65326ec1
children b8105302cfe8
line wrap: on
line diff
--- a/scripts/control/system/sysgettype.m
+++ b/scripts/control/system/sysgettype.m
@@ -33,10 +33,11 @@
 
 function systype = sysgettype (sys)
 
-  if(!isstruct(sys))
-    error("sysgettype: input sys is not a structure");
+  if (! isstruct (sys))
+    error ("sysgettype: input sys is not a structure");
   endif
 
-  typestr = list("tf","zp","ss");
-  systype = nth(typestr,sys.sys(1) + 1);
+  typestr = list ("tf", "zp", "ss");
+  systype = nth (typestr, sys.sys(1) + 1);
+
 endfunction