[Boost-commit] svn:boost r59003 - sandbox/numeric_bindings/libs/numeric/bindings/lapack/test

Subject: [Boost-commit] svn:boost r59003 - sandbox/numeric_bindings/libs/numeric/bindings/lapack/test
From: rutger_at_[hidden]
Date: 2010-01-14 09:49:47

Author: rutger
Date: 2010-01-14 09:49:46 EST (Thu, 14 Jan 2010)
New Revision: 59003
URL: http://svn.boost.org/trac/boost/changeset/59003

Log:
sync of hseqr regression test

Text files modified: 
   sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/hseqr.cpp |     4 ++--                                    
   1 files changed, 2 insertions(+), 2 deletions(-)

Modified: sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/hseqr.cpp
==============================================================================
--- sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/hseqr.cpp	(original)
+++ sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/hseqr.cpp	2010-01-14 09:49:46 EST (Thu, 14 Jan 2010)
@@ -48,7 +48,7 @@
 
     cout << "\nHSEQR for only eigenvalues." << endl;
     ublas::matrix<double, ublas::column_major> Z_dummy(1,1);
-    lapack::hseqr_2('E', 'N', 1, n, H, values_r, values_i, Z_dummy);
+    lapack::hseqr('E', 'N', 1, n, H, values_r, values_i, Z_dummy);
     traits::detail::interlace(values_r.begin(), values_r.end(), values_i.begin(), values.begin());
     cout << "\nH:\n" << H << endl;
     cout << "\nvalues: " << values << endl;
@@ -56,7 +56,7 @@
     cout << "\nHSEQR for eigenvalues and Schur vectors." << endl;
     Hessenberg(H);
     cout << "H:\n" << H << endl;
-    lapack::hseqr_2('S', 'I', 1, n, H, values_r, values_i, Z);
+    lapack::hseqr('S', 'I', 1, n, H, values_r, values_i, Z);
     traits::detail::interlace(values_r.begin(), values_r.end(), values_i.begin(), values.begin());
     cout << "\nH: " << H << endl;
     cout << "\nvalues: " << values << endl;