Revision: 10549
http://octave.svn.sourceforge.net/octave/?rev=10549&view=rev
Author: paramaniac
Date: 2012-05-31 13:51:53 +0000 (Thu, 31 May 2012)
Log Message:
-----------
control-devel: revert example
Modified Paths:
--------------
trunk/octave-forge/extra/control-devel/devel/GlassFurnace.m
Modified: trunk/octave-forge/extra/control-devel/devel/GlassFurnace.m
===================================================================
--- trunk/octave-forge/extra/control-devel/devel/GlassFurnace.m 2012-05-31 13:49:40 UTC (rev 10548)
+++ trunk/octave-forge/extra/control-devel/devel/GlassFurnace.m 2012-05-31 13:51:53 UTC (rev 10549)
@@ -48,12 +48,9 @@
dat = iddata (Y, U)
-[sys, x0, info] = n4sid (dat, 's', 10, 'n', 5) % s=10, n=5
+[sys, x0, info] = moen4 (dat, 's', 10, 'n', 5) % s=10, n=5
-L = chol (info.Ry, 'lower')
-Be = info.K * L
-
[y, t] = lsim (sys, U, [], x0);
err = norm (Y - y, 1) / norm (Y, 1)
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|