[Octave-cvsupdate] SF.net SVN: octave:[8165] trunk/octave-forge/main/control/inst/lsim.m

[<par...@us...>]

Revision: 8165
          http://octave.svn.sourceforge.net/octave/?rev=8165&view=rev
Author:   paramaniac
Date:     2011-03-09 19:51:13 +0000 (Wed, 09 Mar 2011)

Log Message:
-----------
control: fix thinko (thanks to Rob Frohne)

Modified Paths:
--------------
    trunk/octave-forge/main/control/inst/lsim.m

Modified: trunk/octave-forge/main/control/inst/lsim.m
===================================================================
--- trunk/octave-forge/main/control/inst/lsim.m	2011-03-07 20:06:05 UTC (rev 8164)
+++ trunk/octave-forge/main/control/inst/lsim.m	2011-03-09 19:51:13 UTC (rev 8165)
@@ -143,7 +143,7 @@
   ## initial conditions
   if (isempty (x0))
     x0 = zeros (n, 1);
-  elseif (n != length (x0) || is_real_vector (x0))
+  elseif (n != length (x0) || ! is_real_vector (x0))
     error ("initial: x0 must be a vector with %d elements", n);
   endif
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.