Mercurial > octave-nkf

diff liboctave/dMatrix.cc @ 11691:c6ce7274fb14 release-3-0-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
one more xGELSD workspace fix
author John W. Eaton <jwe@octave.org>
date Wed, 12 Mar 2008 01:05:55 -0400
parents 8ac2994e4596
children 72830070a17b
line wrap: on
line diff
--- a/liboctave/dMatrix.cc	Tue Mar 11 23:38:00 2008 -0400
+++ b/liboctave/dMatrix.cc	Wed Mar 12 01:05:55 2008 -0400
@@ -2130,9 +2130,9 @@
       double dminmn = static_cast<double> (minmn);
       double dsmlsizp1 = static_cast<double> (smlsiz+1);
 #if defined (HAVE_LOG2)
-      double tmp = log2 (dminmn) / dsmlsizp1;
+      double tmp = log2 (dminmn / dsmlsizp1);
 #else
-      double tmp = log (dminmn) / dsmlsizp1 / log (2.0);
+      double tmp = log (dminmn / dsmlsizp1) / log (2.0);
 #endif
       octave_idx_type nlvl = static_cast<octave_idx_type> (tmp) + 1;
       if (nlvl < 0)