changeset 23162:c7fb1f95842e stable

qp.m: Fix regression with incorrect vector dimensions (bug #50067). * qp.m: Substitute two lines from qp.m script from Octave version 4.0.3.
author Rik <rik@octave.org>
date Tue, 07 Feb 2017 21:32:40 -0800
parents 50e3a3e962c0
children d7ea2662a7a8
files scripts/optimization/qp.m
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/optimization/qp.m	Mon Feb 06 20:53:39 2017 +0100
+++ b/scripts/optimization/qp.m	Tue Feb 07 21:32:40 2017 -0800
@@ -373,8 +373,8 @@
             Atmp = [Ain, gamma];
             btmp = bin;
           endif
-          ctmp = [zeros(n, 1); ones(n_in, 1)];
-          lb = [-Inf(n,1); zeros(n_in,1)];
+          ctmp = [zeros(n-n_eq, 1); ones(n_in, 1)];
+          lb = [-Inf(n-n_eq,1); zeros(n_in,1)];
           ub = [];
           ctype = repmat ("L", n_in, 1);
           [P, dummy, status] = glpk (ctmp, Atmp, btmp, lb, ub, ctype);