Mercurial > octave-nkf

diff scripts/optimization/qp.m @ 5310:2fbcdc356fc7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-04-27 15:38:53 by jwe]
author jwe
date Wed, 27 Apr 2005 15:38:53 +0000
parents 4c8a2e4e0717
children 34f96dd5441b
line wrap: on
line diff
--- a/scripts/optimization/qp.m	Wed Apr 27 07:58:14 2005 +0000
+++ b/scripts/optimization/qp.m	Wed Apr 27 15:38:53 2005 +0000
@@ -166,7 +166,6 @@
 	endif
       endif
     endif
-    n_in = length (bin);
 
     ## Now we should have the following QP:
     ##
@@ -180,6 +179,8 @@
     bin(idx) = [];
     Ain(idx,:) = [];
 
+    n_in = length (bin);
+
     ## Check if the initial guess is feasible.
     rtol = sqrt (eps);