Mercurial > octave-nkf
diff scripts/control/system/sysprune.m @ 4771:b8105302cfe8
[project @ 2004-02-16 17:45:50 by jwe]
author | jwe |
---|---|
date | Mon, 16 Feb 2004 17:45:50 +0000 |
parents | 22bd65326ec1 |
children | 9f7ef92b50b0 |
line wrap: on
line diff
--- a/scripts/control/system/sysprune.m Mon Feb 16 16:22:43 2004 +0000 +++ b/scripts/control/system/sysprune.m Mon Feb 16 17:45:50 2004 +0000 @@ -118,7 +118,7 @@ lst = length(state_idx); if( !isstruct(sys)) - error("Asys must be a system data structure (see ss2sys, tf2sys, or zp2sys)") + error("Asys must be a system data structure (see ss, tf, or zp)") elseif(pp < lo) error([num2str(lo)," output_idx entries, system has only ", ... num2str(pp)," outputs"]); @@ -147,7 +147,7 @@ max_c,state_idx(max_c)); warning("sysprune: sys has %d continuous states, %d discrete states", ... nn,nz); - error("continuous/discrete state partition not preserved ; see ss2sys"); + error("continuous/discrete state partition not preserved ; see ss"); endif endif @@ -168,5 +168,5 @@ stnam = stnam(state_idx); nn1 = length(find(state_idx <= nn)); nz1 = length(find(state_idx > nn)); - sys = ss2sys(aa,bb,cc,dd,tsam,nn1,nz1,stnam,innam,outnam,find(yd)); + sys = ss(aa,bb,cc,dd,tsam,nn1,nz1,stnam,innam,outnam,find(yd)); endfunction