Mercurial > hg > octave-nkf

diff scripts/control/system/d2c.m @ 4771:b8105302cfe8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-02-16 17:45:50 by jwe]
author jwe
date Mon, 16 Feb 2004 17:45:50 +0000
parents 22bd65326ec1
children bdbee5282954
line wrap: on
line diff
--- a/scripts/control/system/d2c.m
+++ b/scripts/control/system/d2c.m
@@ -106,7 +106,7 @@
     C = tk*(c/(I+a));
     D = d- (c*iab);
     stnamec = strappend(stname,"_c");
-    csys = ss2sys(A,B,C,D,0,rows(A),0,stnamec,inname,outname);
+    csys = ss(A,B,C,D,0,rows(A),0,stnamec,inname,outname);
   elseif(strcmp(opt,"log"))
     sys = sysupdate(sys,"ss");
     [n,nz,m,p] = sysdimensions(sys);
@@ -209,7 +209,7 @@
     if(!isempty(b))
       bb = Mall(1:na,(na+1):(na+nb));
     endif
-    csys = ss2sys(aa,bb,cc,dd,0,na,0,stnam,innam,outnam);
+    csys = ss(aa,bb,cc,dd,0,na,0,stnam,innam,outnam);
 
     ## update names
     nn = sysdimensions(sys);