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

From: thomas.klimpel_at_[hidden]
Date: 2008-08-09 11:53:47

Author: klimpel
Date: 2008-08-09 11:53:46 EDT (Sat, 09 Aug 2008)
New Revision: 48046
URL: http://svn.boost.org/trac/boost/changeset/48046

Log:
renamed lapack.cpp to ublas_getrf_getrs1.cpp

Added:
   sandbox/libs/numeric/bindings/lapack/test/ublas_getrf_getrs1.cpp
      - copied unchanged from r48045, /sandbox/libs/numeric/bindings/lapack/test/lapack.cpp
Removed:
   sandbox/libs/numeric/bindings/lapack/test/lapack.cpp
Text files modified: 
   sandbox/libs/numeric/bindings/lapack/test/Jamfile.v2 |     2 +-                                      
   1 files changed, 1 insertions(+), 1 deletions(-)

Modified: sandbox/libs/numeric/bindings/lapack/test/Jamfile.v2
==============================================================================
--- sandbox/libs/numeric/bindings/lapack/test/Jamfile.v2	(original)
+++ sandbox/libs/numeric/bindings/lapack/test/Jamfile.v2	2008-08-09 11:53:46 EDT (Sat, 09 Aug 2008)
@@ -11,7 +11,6 @@
 import testing ;
 
 alias bindings-lapack-tests :
-    [ run lapack.cpp ]
     [ run hseqr.cpp ]
 
     [ run ublas_geev.cpp ]
@@ -44,6 +43,7 @@
     [ run ublas_sysv.cc : 20 ]
 
     [ run ublas_getrf_getrs.cc : 20 ]
+    [ run ublas_getrf_getrs1.cpp ]
     [ run ublas_hetrf_hetrs.cc ]
     [ run ublas_hptrf_hptrs.cc ]
     [ run ublas_potrf_potrs.cc ]

Deleted: sandbox/libs/numeric/bindings/lapack/test/lapack.cpp
==============================================================================
--- sandbox/libs/numeric/bindings/lapack/test/lapack.cpp	2008-08-09 11:53:46 EDT (Sat, 09 Aug 2008)
+++ (empty file)
@@ -1,46 +0,0 @@
-#include "../../blas/test/blas.hpp"
-#include <boost/numeric/bindings/lapack/lapack.hpp>
-#include <boost/numeric/bindings/traits/ublas_vector.hpp>
-#include <boost/numeric/bindings/traits/ublas_matrix.hpp>
-
-template < typename matrix_type >
-void test_getrf_getrs(matrix_type& lu, matrix_type& x)
-{
-  typedef typename matrix_type::value_type value_type ;
-
-  numerics::matrix< value_type > a( lu ) ; // tmp to verify result
-  numerics::matrix< value_type > b( x ) ;  // tmp to verify result
-  std::vector< int > ipiv( x.size1() ) ;
-
-  boost::numeric::bindings::lapack::getrf( lu, ipiv ) ;
-  boost::numeric::bindings::lapack::getrs( 'N', lu, ipiv, x ) ;
-
-  std::cout << prod(a,x) - b << std::endl ; 
-}
-
-template < typename value_type, typename orientation, int size >
-void test_getrf_getrs_matrix()
-{
-  numerics::matrix< value_type, orientation > a(size,size) ;
-  random_initialise_matrix( a ) ;
-
-  numerics::matrix< value_type, orientation > b(size,1) ;
-  random_initialise_matrix( b ) ;
-
-  test_getrf_getrs( a, b ) ;
-}
-
-int main()
-{
-  const int size = 5 ;
-
-  test_getrf_getrs_matrix< double, numerics::column_major, size >() ;
-  test_getrf_getrs_matrix< std::complex< double >, numerics::column_major, size >() ;
-
-/*
-  test_getrf_getrs_matrix< double, numerics::row_major, size >() ;
-  test_getrf_getrs_matrix< std::complex< double >, numerics::row_major, size >() ;
-*/
-
-  return 0 ;
-}