# HG changeset patch
# User Rik <code@nomad.inbox5.com>
# Date 1271972338 25200
# Node ID e9d1a974a517f2bb7ac02764d7f6174c94e210b6
# Parent  952d4df5b68673a624fd44dc573aaf3d424a63bf
Eliminate repmat (Inf, x , y) and simply use Inf (x,y)

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+2010-04-22  Rik <octave@nomad.inbox5.com>
+
+	* optimization/glpk.m: Eliminate repmat (Inf, x , y) and just use Inf (x,y)
+
 2010-04-22  Rik <octave@nomad.inbox5.com>
 
 	* general/rat.m, sparse/gplot.m, strings/base2dec.m, geometry/triplot.m
diff --git a/scripts/optimization/glpk.m b/scripts/optimization/glpk.m
--- a/scripts/optimization/glpk.m
+++ b/scripts/optimization/glpk.m
@@ -475,13 +475,13 @@
 
   if (nargin > 4)
     if (isempty (ub))
-      ub = repmat (Inf, nx, 1);
+      ub = Inf (nx, 1);
     elseif (! isreal (ub) || all (size (ub) > 1) || length (ub) != nx)
       error ("UB must be a real valued %d by 1 column vector", nx);
       return;
     endif
   else
-    ub = repmat (Inf, nx, 1);
+    ub = Inf (nx, 1);
   endif
 
   ## 6) Sense of each constraint