Mercurial > octave-nkf

diff liboctave/dbleQR.cc @ 3069:db6d57d718f7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-07-10 23:34:03 by jwe]
author jwe
date Thu, 10 Jul 1997 23:34:07 +0000
parents 17e2f90e0d3b
children 69b6bd271277
line wrap: on
line diff
--- a/liboctave/dbleQR.cc	Tue Jul 08 02:18:21 1997 +0000
+++ b/liboctave/dbleQR.cc	Thu Jul 10 23:34:07 1997 +0000
@@ -97,7 +97,10 @@
 		A_fact.elem (i, j) *= tau.elem (j);
 	    }
 
-	  q = A_fact;
+	  r = A_fact;
+
+	  if (m > n)
+	    r.resize (m, n);
 	}
       else
 	{