Mercurial > forge

changeset 6699:62e12de7ec31 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
control-oo: use rcond to check for singularity
author paramaniac
date Sun, 14 Feb 2010 07:58:41 +0000
parents af8f5fc5111a
children f3e17c129494
files extra/control-oo/inst/@ss/__sysconnect__.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/extra/control-oo/inst/@ss/__sysconnect__.m	Sun Feb 14 07:23:23 2010 +0000
+++ b/extra/control-oo/inst/@ss/__sysconnect__.m	Sun Feb 14 07:58:41 2010 +0000
@@ -73,7 +73,7 @@
   I = eye (p);
   Z = I - D*M;
 
-  if (det (Z) == 0)  # check for singularity
+  if (rcond (Z) < eps)  # check for singularity
     error ("ss: sysconnect: (I - D*M) not invertible because of algebraic loop");
   endif