diff scripts/control/system/sysappend.m @ 4030:22bd65326ec1

[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents b5238ac1dca9
children cef48c4b902d
line wrap: on
line diff
--- a/scripts/control/system/sysappend.m
+++ b/scripts/control/system/sysappend.m
@@ -82,9 +82,9 @@
   empty_list_elements_ok = 1;
 
   ## check input arguments
-  if ( (nargin < 2) | (nargin > 7) | (!is_struct(sys)))
+  if ( (nargin < 2) | (nargin > 7) | (!isstruct(sys)))
     usage("retsys = sysappend(sys,b,c[,d,outname,inname,yd]) ");
-  elseif(!is_struct(sys))
+  elseif(!isstruct(sys))
     error("sys must be a system data structure");
   endif
 
@@ -149,7 +149,7 @@
 
     ## construct new yd entries
     if(nargin == 7)
-      if(!is_vector(yd))
+      if(!isvector(yd))
         error(sprintf("yd(%dx%d) must be a vector",rows(yd),columns(yd)))
       elseif(rows(c) != length(yd) & rows(d) != length(yd))
         error(sprintf("length(yd) = %d; c(%dx%d), d(%dx%d); mismatch", ...