Mercurial > hg > octave-lyh
diff scripts/control/system/sys2ss.m @ 7136:59dcf01bb3e3
[project @ 2007-11-08 20:18:25 by jwe]
author | jwe |
---|---|
date | Thu, 08 Nov 2007 20:18:26 +0000 |
parents | 1d0d7be2d0f8 |
children |
line wrap: on
line diff
--- a/scripts/control/system/sys2ss.m +++ b/scripts/control/system/sys2ss.m @@ -82,19 +82,19 @@ print_usage (); endif - if( ! isstruct(sys) ) - error("input argument must be a system data structure"); + if (! isstruct (sys)) + error ("input argument must be a system data structure"); endif - sys = sysupdate(sys,"ss"); # make sure state space data is there - [n,nz,m,p] = sysdimensions(sys); - [stname,inname,outname,yd] = sysgetsignals(sys); - tsam = sysgettsam(sys); + sys = sysupdate (sys, "ss"); # make sure state space data is there + [n, nz, m, p] = sysdimensions (sys); + [stname, inname, outname, yd] = sysgetsignals (sys); + tsam = sysgettsam (sys); - cont = sum(yd == 0) + n; - dig = sum(yd != 0) + nz + tsam; - if(cont*dig) - warning("sys2ss: input system is mixed continuous/discrete"); + cont = sum (yd == 0) + n; + dig = sum (yd != 0) + nz + tsam; + if (cont*dig) + warning ("sys2ss: input system is mixed continuous/discrete"); endif a = sys.a;