Mercurial > hg > octave-lyh
changeset 5957:370f785718be
[project @ 2006-08-23 14:09:39 by jwe]
author | jwe |
---|---|
date | Wed, 23 Aug 2006 14:09:40 +0000 |
parents | cdef72fcd206 |
children | 85c7dc4afe6b |
files | scripts/ChangeLog scripts/control/system/sysscale.m |
diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,8 @@ +2006-08-23 A S Hodel <hodelas@auburn.edu> + + * control/system/sysscale.m: Call tf and zp with correct number of + args. + 2006-08-22 David Bateman <dbateman@free.fr> * pkg/pkg.m (extract_pkgadd, create_pkgadd): New functions to
--- a/scripts/control/system/sysscale.m +++ b/scripts/control/system/sysscale.m @@ -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