Mercurial > octave-nkf

diff scripts/control/system/sysscale.m @ 5957:370f785718be

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-08-23 14:09:39 by jwe]
author jwe
date Wed, 23 Aug 2006 14:09:40 +0000
parents 4c8a2e4e0717
children 34f96dd5441b
line wrap: on
line diff
--- a/scripts/control/system/sysscale.m	Tue Aug 22 20:36:57 2006 +0000
+++ b/scripts/control/system/sysscale.m	Wed Aug 23 14:09:40 2006 +0000
@@ -104,12 +104,12 @@
   if strcmp(sysgettype(sys),"tf")
     [num,den,tsam,innam,outnam] = sys2tf(sys);
     num = num*inscale*outscale;
-    sys = tf(num,den,tsam,innam,outnam,find(sysyd));
+    sys = tf(num,den,tsam,innam,outnam);
     return
   elseif strcmp(sysgettype(sys),"zp")
     [zer,pol,kk,tsam,innam,outnam] = sys2zp(sys);
     kk = kk*inscale*outscale;
-    sys = zp(zer,pol,k,tsam,innam,outnam,find(sysyd));
+    sys = zp(zer,pol,k,tsam,innam,outnam);
     return
   endif