# HG changeset patch
# User jwe
# Date 941663101 0
# Node ID f39b97e13cf2ce8f85dd6d796c4a5244a91b9e93
# Parent  5187390bfde6409fa16f4f519ae6f57bae7ad5a4
[project @ 1999-11-03 21:05:01 by jwe]

diff --git a/liboctave/CmplxSVD.cc b/liboctave/CmplxSVD.cc
--- a/liboctave/CmplxSVD.cc
+++ b/liboctave/CmplxSVD.cc
@@ -104,8 +104,10 @@
       // demonstrate the bug, set both jobu and jobv to 'N' and find
       // the singular values of [eye(3), eye(3)].  The result is
       // [-sqrt(2), -sqrt(2), -sqrt(2)].
+      //
+      // For Lapack 3.0, this problem seems to be fixed.
 
-      jobu = 'O';
+      jobu = 'N';
       jobv = 'N';
       ncol_u = nrow_vt = 1;
       break;
diff --git a/liboctave/dbleSVD.cc b/liboctave/dbleSVD.cc
--- a/liboctave/dbleSVD.cc
+++ b/liboctave/dbleSVD.cc
@@ -104,8 +104,10 @@
       // demonstrate the bug, set both jobu and jobv to 'N' and find
       // the singular values of [eye(3), eye(3)].  The result is
       // [-sqrt(2), -sqrt(2), -sqrt(2)].
+      //
+      // For Lapack 3.0, this problem seems to be fixed.
 
-      jobu = 'O';
+      jobu = 'N';
       jobv = 'N';
       ncol_u = nrow_vt = 1;
       break;