Mercurial > forge

changeset 10291:83fd5ae52ac6 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
control-devel: get slicot test working again
author paramaniac
date Mon, 21 May 2012 15:33:24 +0000
parents 2dd7c8168ea0
children 377d9258af10
files extra/control-devel/devel/test_slident.m
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/extra/control-devel/devel/test_slident.m	Mon May 21 15:27:49 2012 +0000
+++ b/extra/control-devel/devel/test_slident.m	Mon May 21 15:33:24 2012 +0000
@@ -2032,7 +2032,8 @@
 tol = -1.0;
 n = 0;
 
-[a, b, c, d, q, ry, s, k, x0] = slident (Y, U, nobr, n, meth, alg, jobd, batch, conct, ctrl, rcond, tol)
+% [a, b, c, d, q, ry, s, k, x0] = slident (Y, U, nobr, n, meth, alg, jobd, batch, conct, ctrl, rcond, tol)
+[a, b, c, d, q, ry, s, k, x0] = slident (dat.Y, dat.U, nobr, n, meth, alg, conct, ctrl, rcond, tol)
 
 
 ae = [  0.8924   0.3887   0.1285   0.1716
@@ -2089,7 +2090,7 @@
 
 
 % [y, t] = lsim (P, U);
-[y, t] = lsim (P, U, [], x0);
+[y, t] = lsim (P, U, [], x0{1});
 
 err = norm (Y - y, 1) / norm (Y, 1)