Mercurial > octave-nkf

diff liboctave/fCMatrix.cc @ 10630:832732c2eb80

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
use ID for singularity warning in matrix division
author Jaroslav Hajek <highegg@gmail.com>
date Thu, 13 May 2010 13:47:20 +0200
parents a0728e81ed25
children 2786b7ae3f80
line wrap: on
line diff
--- a/liboctave/fCMatrix.cc	Thu May 13 12:25:26 2010 +0200
+++ b/liboctave/fCMatrix.cc	Thu May 13 13:47:20 2010 +0200
@@ -2694,11 +2694,6 @@
                                  work.fortran_vec (), lwork, 
                                  prwork, piwork, info));
 
-      if (rank < minmn)
-        (*current_liboctave_warning_handler) 
-          ("zgelsd: rank deficient %dx%d matrix, rank = %d, tol = %e",
-           m, n, rank, rcon);
-
       if (s.elem (0) == 0.0)
         rcon = 0.0;
       else
@@ -2862,11 +2857,6 @@
 
       if (rank < minmn)
         {
-          if (rank < minmn)
-            (*current_liboctave_warning_handler) 
-              ("zgelsd: rank deficient %dx%d matrix, rank = %d, tol = %e",
-               m, n, rank, rcon);
-
           if (s.elem (0) == 0.0)
             rcon = 0.0;
           else