Subject: [Boost-commit] svn:boost r64977 - in sandbox/numeric_bindings: boost/numeric/bindings/detail boost/numeric/bindings/lapack/auxiliary boost/numeric/bindings/lapack/computational boost/numeric/bindings/lapack/driver libs/numeric/bindings/tools
From: rutger_at_[hidden]
Date: 2010-08-24 03:03:27
Author: rutger
Date: 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
New Revision: 64977
URL: http://svn.boost.org/trac/boost/changeset/64977
Log:
Removed the (template-typed) parameter name in functions which use it for tag dispatching only
Text files modified:
sandbox/numeric_bindings/boost/numeric/bindings/detail/if_left.hpp | 7 ++-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhb.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhe.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhp.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansb.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansp.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansy.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantb.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantp.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantr.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larf.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfb.hpp | 50 +++++++++++++--------------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfx.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larz.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrs.hpp | 22 +++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbrfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbtrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gebak.hpp | 30 +++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gerfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/getrs.hpp | 32 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ggbak.hpp | 32 ++++++++---------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gtrfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gttrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbgst.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbtrd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hecon.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hegst.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/herfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrf.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetri.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hpcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hprfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrd.hpp | 10 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrf.hpp | 10 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptri.hpp | 10 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hsein.hpp | 32 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/opmtr.hpp | 18 ++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/orgtr.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormbr.hpp | 21 +++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormhr.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormlq.hpp | 19 +++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormql.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormqr.hpp | 19 +++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrq.hpp | 19 +++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrz.hpp | 21 +++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormtr.hpp | 19 +++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbequ.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbrfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbstf.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrf.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrf.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftri.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrs.hpp | 26 ++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pocon.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/porfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrf.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potri.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrs.hpp | 30 +++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppequ.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pprfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrf.hpp | 10 ++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptri.hpp | 10 ++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pstrf.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbgst.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbtrd.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/spcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sprfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrd.hpp | 6 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrf.hpp | 10 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptri.hpp | 10 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sycon.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sygst.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/syrfs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrd.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrf.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytri.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrs.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbrfs.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbtrs.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tftri.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgevc.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgsyl.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tpcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tprfs.hpp | 28 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptri.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptrs.hpp | 20 +++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trcon.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trevc.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trrfs.hpp | 28 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtri.hpp | 24 ++++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtrs.hpp | 22 +++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ungtr.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmbr.hpp | 49 +++++++++++++-------------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmhr.hpp | 24 ++++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmlq.hpp | 31 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmql.hpp | 28 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmqr.hpp | 31 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrq.hpp | 31 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrz.hpp | 49 +++++++++++++-------------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmtr.hpp | 31 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/upmtr.hpp | 30 +++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gbsvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gels.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gesvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gtsvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbev.hpp | 32 +++++++----------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevx.hpp | 36 ++++++++++----------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgv.hpp | 26 ++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvx.hpp | 72 ++++++++++++++++++++--------------------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heev.hpp | 27 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevr.hpp | 36 ++++++++++----------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevx.hpp | 32 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegv.hpp | 16 ++++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvd.hpp | 18 +++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpev.hpp | 25 ++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevx.hpp | 42 +++++++++++------------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgv.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvd.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/iter_posv.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posv.hpp | 28 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbev.hpp | 14 +++----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevd.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevx.hpp | 28 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgv.hpp | 18 ++++-----
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvd.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvx.hpp | 32 ++++++++--------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spev.hpp | 11 ++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevd.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevx.hpp | 22 +++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvd.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvx.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsvx.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syev.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevd.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevr.hpp | 28 +++++++-------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevx.hpp | 24 ++++++------
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygv.hpp | 12 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvd.hpp | 14 +++---
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvx.hpp | 4 +-
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysv.hpp | 8 ++--
sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysvx.hpp | 8 ++--
sandbox/numeric_bindings/libs/numeric/bindings/tools/netlib.py | 7 +++
169 files changed, 1186 insertions(+), 1233 deletions(-)
Modified: sandbox/numeric_bindings/boost/numeric/bindings/detail/if_left.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/detail/if_left.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/detail/if_left.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -18,9 +18,10 @@
template< typename Side, typename Left, typename Right >
struct if_left_impl {
+
typedef Right result_type;
- static result_type invoke( Left left, Right right ) {
+ static result_type invoke( Left, Right right ) {
return right;
}
@@ -31,7 +32,7 @@
typedef Left result_type;
- static result_type invoke( Left left, Right right ) {
+ static result_type invoke( Left left, Right ) {
return left;
}
@@ -40,7 +41,7 @@
// by-value
template< typename Side, typename Left, typename Right >
typename if_left_impl< Side, const Left, const Right >::result_type
-if_left( const Side side, const Left left, const Right right ) {
+if_left( const Side, const Left left, const Right right ) {
return if_left_impl< Side, const Left, const Right >::invoke( left, right );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhb.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhb.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhb.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lanhb( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lanhb( const char norm, const UpLo,
const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* ab, const fortran_int_t ldab,
float* work ) {
@@ -69,7 +69,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lanhb( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lanhb( const char norm, const UpLo,
const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* ab, const fortran_int_t ldab,
double* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhe.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhe.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhe.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,7 +52,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lanhe( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lanhe( const char norm, const UpLo,
const fortran_int_t n, const std::complex<float>* a,
const fortran_int_t lda, float* work ) {
fortran_int_t info(0);
@@ -66,7 +66,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lanhe( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lanhe( const char norm, const UpLo,
const fortran_int_t n, const std::complex<double>* a,
const fortran_int_t lda, double* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhp.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhp.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lanhp.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lanhp( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lanhp( const char norm, const UpLo,
const fortran_int_t n, const std::complex<float>* ap, float* work ) {
fortran_int_t info(0);
LAPACK_CLANHP( &norm, &lapack_option< UpLo >::value, &n, ap, work );
@@ -64,7 +64,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lanhp( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lanhp( const char norm, const UpLo,
const fortran_int_t n, const std::complex<double>* ap, double* work ) {
fortran_int_t info(0);
LAPACK_ZLANHP( &norm, &lapack_option< UpLo >::value, &n, ap, work );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansb.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansb.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansb.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansb( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansb( const char norm, const UpLo,
const fortran_int_t n, const fortran_int_t k, const float* ab,
const fortran_int_t ldab, float* work ) {
fortran_int_t info(0);
@@ -68,7 +68,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansb( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansb( const char norm, const UpLo,
const fortran_int_t n, const fortran_int_t k, const double* ab,
const fortran_int_t ldab, double* work ) {
fortran_int_t info(0);
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansb( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansb( const char norm, const UpLo,
const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* ab, const fortran_int_t ldab,
float* work ) {
@@ -99,7 +99,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansb( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansb( const char norm, const UpLo,
const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* ab, const fortran_int_t ldab,
double* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansp.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansp.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansp.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansp( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansp( const char norm, const UpLo,
const fortran_int_t n, const float* ap, float* work ) {
fortran_int_t info(0);
LAPACK_SLANSP( &norm, &lapack_option< UpLo >::value, &n, ap, work );
@@ -64,7 +64,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansp( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansp( const char norm, const UpLo,
const fortran_int_t n, const double* ap, double* work ) {
fortran_int_t info(0);
LAPACK_DLANSP( &norm, &lapack_option< UpLo >::value, &n, ap, work );
@@ -77,7 +77,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansp( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansp( const char norm, const UpLo,
const fortran_int_t n, const std::complex<float>* ap, float* work ) {
fortran_int_t info(0);
LAPACK_CLANSP( &norm, &lapack_option< UpLo >::value, &n, ap, work );
@@ -90,7 +90,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansp( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansp( const char norm, const UpLo,
const fortran_int_t n, const std::complex<double>* ap, double* work ) {
fortran_int_t info(0);
LAPACK_ZLANSP( &norm, &lapack_option< UpLo >::value, &n, ap, work );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansy.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansy.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lansy.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,7 +52,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansy( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansy( const char norm, const UpLo,
const fortran_int_t n, const float* a, const fortran_int_t lda,
float* work ) {
fortran_int_t info(0);
@@ -66,7 +66,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansy( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansy( const char norm, const UpLo,
const fortran_int_t n, const double* a, const fortran_int_t lda,
double* work ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansy( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansy( const char norm, const UpLo,
const fortran_int_t n, const std::complex<float>* a,
const fortran_int_t lda, float* work ) {
fortran_int_t info(0);
@@ -94,7 +94,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t lansy( const char norm, const UpLo uplo,
+inline std::ptrdiff_t lansy( const char norm, const UpLo,
const fortran_int_t n, const std::complex<double>* a,
const fortran_int_t lda, double* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantb.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantb.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantb.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag,
const fortran_int_t n, const fortran_int_t k, const float* ab,
const fortran_int_t ldab, float* work ) {
fortran_int_t info(0);
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag,
const fortran_int_t n, const fortran_int_t k, const double* ab,
const fortran_int_t ldab, double* work ) {
fortran_int_t info(0);
@@ -84,7 +84,7 @@
// * complex<float> value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag,
const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* ab, const fortran_int_t ldab,
float* work ) {
@@ -100,7 +100,7 @@
// * complex<double> value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantb( const char norm, const char uplo, const Diag,
const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* ab, const fortran_int_t ldab,
double* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantp.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantp.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantp.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,7 +52,7 @@
// * float value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag,
const fortran_int_t n, const float* ap, float* work ) {
fortran_int_t info(0);
LAPACK_SLANTP( &norm, &uplo, &lapack_option< Diag >::value, &n, ap, work );
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag,
const fortran_int_t n, const double* ap, double* work ) {
fortran_int_t info(0);
LAPACK_DLANTP( &norm, &uplo, &lapack_option< Diag >::value, &n, ap, work );
@@ -78,7 +78,7 @@
// * complex<float> value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag,
const fortran_int_t n, const std::complex<float>* ap, float* work ) {
fortran_int_t info(0);
LAPACK_CLANTP( &norm, &uplo, &lapack_option< Diag >::value, &n, ap, work );
@@ -91,7 +91,7 @@
// * complex<double> value-type.
//
template< typename Diag >
-inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag diag,
+inline std::ptrdiff_t lantp( const char norm, const char uplo, const Diag,
const fortran_int_t n, const std::complex<double>* ap, double* work ) {
fortran_int_t info(0);
LAPACK_ZLANTP( &norm, &uplo, &lapack_option< Diag >::value, &n, ap, work );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/lantr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t lantr( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t lantr( const char norm, const UpLo, const Diag,
const fortran_int_t m, const fortran_int_t n, const float* a,
const fortran_int_t lda, float* work ) {
fortran_int_t info(0);
@@ -68,7 +68,7 @@
// * double value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t lantr( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t lantr( const char norm, const UpLo, const Diag,
const fortran_int_t m, const fortran_int_t n, const double* a,
const fortran_int_t lda, double* work ) {
fortran_int_t info(0);
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t lantr( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t lantr( const char norm, const UpLo, const Diag,
const fortran_int_t m, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda, float* work ) {
fortran_int_t info(0);
@@ -98,7 +98,7 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t lantr( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t lantr( const char norm, const UpLo, const Diag,
const fortran_int_t m, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
double* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t larf( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larf( const Side, const fortran_int_t m,
const fortran_int_t n, const float* v, const fortran_int_t incv,
const float tau, float* c, const fortran_int_t ldc, float* work ) {
fortran_int_t info(0);
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t larf( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larf( const Side, const fortran_int_t m,
const fortran_int_t n, const double* v, const fortran_int_t incv,
const double tau, double* c, const fortran_int_t ldc, double* work ) {
fortran_int_t info(0);
@@ -85,7 +85,7 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t larf( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larf( const Side, const fortran_int_t m,
const fortran_int_t n, const std::complex<float>* v,
const fortran_int_t incv, const std::complex<float> tau,
std::complex<float>* c, const fortran_int_t ldc,
@@ -102,7 +102,7 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t larf( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larf( const Side, const fortran_int_t m,
const fortran_int_t n, const std::complex<double>* v,
const fortran_int_t incv, const std::complex<double> tau,
std::complex<double>* c, const fortran_int_t ldc,
@@ -197,8 +197,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -279,8 +279,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfb.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfb.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfb.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,12 +57,11 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t larfb( const Side side, const Trans trans,
- const char direct, const char storev, const fortran_int_t m,
- const fortran_int_t n, const fortran_int_t k, const float* v,
- const fortran_int_t ldv, const float* t, const fortran_int_t ldt,
- float* c, const fortran_int_t ldc, float* work,
- const fortran_int_t ldwork ) {
+inline std::ptrdiff_t larfb( const Side, const Trans, const char direct,
+ const char storev, const fortran_int_t m, const fortran_int_t n,
+ const fortran_int_t k, const float* v, const fortran_int_t ldv,
+ const float* t, const fortran_int_t ldt, float* c,
+ const fortran_int_t ldc, float* work, const fortran_int_t ldwork ) {
fortran_int_t info(0);
LAPACK_SLARFB( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &direct, &storev, &m, &n, &k, v, &ldv, t, &ldt, c,
@@ -76,12 +75,11 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t larfb( const Side side, const Trans trans,
- const char direct, const char storev, const fortran_int_t m,
- const fortran_int_t n, const fortran_int_t k, const double* v,
- const fortran_int_t ldv, const double* t, const fortran_int_t ldt,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t ldwork ) {
+inline std::ptrdiff_t larfb( const Side, const Trans, const char direct,
+ const char storev, const fortran_int_t m, const fortran_int_t n,
+ const fortran_int_t k, const double* v, const fortran_int_t ldv,
+ const double* t, const fortran_int_t ldt, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t ldwork ) {
fortran_int_t info(0);
LAPACK_DLARFB( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &direct, &storev, &m, &n, &k, v, &ldv, t, &ldt, c,
@@ -95,13 +93,13 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t larfb( const Side side, const Trans trans,
- const char direct, const char storev, const fortran_int_t m,
- const fortran_int_t n, const fortran_int_t k,
- const std::complex<float>* v, const fortran_int_t ldv,
- const std::complex<float>* t, const fortran_int_t ldt,
- std::complex<float>* c, const fortran_int_t ldc,
- std::complex<float>* work, const fortran_int_t ldwork ) {
+inline std::ptrdiff_t larfb( const Side, const Trans, const char direct,
+ const char storev, const fortran_int_t m, const fortran_int_t n,
+ const fortran_int_t k, const std::complex<float>* v,
+ const fortran_int_t ldv, const std::complex<float>* t,
+ const fortran_int_t ldt, std::complex<float>* c,
+ const fortran_int_t ldc, std::complex<float>* work,
+ const fortran_int_t ldwork ) {
fortran_int_t info(0);
LAPACK_CLARFB( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &direct, &storev, &m, &n, &k, v, &ldv, t, &ldt, c,
@@ -115,13 +113,13 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t larfb( const Side side, const Trans trans,
- const char direct, const char storev, const fortran_int_t m,
- const fortran_int_t n, const fortran_int_t k,
- const std::complex<double>* v, const fortran_int_t ldv,
- const std::complex<double>* t, const fortran_int_t ldt,
- std::complex<double>* c, const fortran_int_t ldc,
- std::complex<double>* work, const fortran_int_t ldwork ) {
+inline std::ptrdiff_t larfb( const Side, const Trans, const char direct,
+ const char storev, const fortran_int_t m, const fortran_int_t n,
+ const fortran_int_t k, const std::complex<double>* v,
+ const fortran_int_t ldv, const std::complex<double>* t,
+ const fortran_int_t ldt, std::complex<double>* c,
+ const fortran_int_t ldc, std::complex<double>* work,
+ const fortran_int_t ldwork ) {
fortran_int_t info(0);
LAPACK_ZLARFB( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &direct, &storev, &m, &n, &k, v, &ldv, t, &ldt, c,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larfx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t larfx( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larfx( const Side, const fortran_int_t m,
const fortran_int_t n, const float* v, const float tau, float* c,
const fortran_int_t ldc, float* work ) {
fortran_int_t info(0);
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t larfx( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larfx( const Side, const fortran_int_t m,
const fortran_int_t n, const double* v, const double tau, double* c,
const fortran_int_t ldc, double* work ) {
fortran_int_t info(0);
@@ -85,7 +85,7 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t larfx( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larfx( const Side, const fortran_int_t m,
const fortran_int_t n, const std::complex<float>* v,
const std::complex<float> tau, std::complex<float>* c,
const fortran_int_t ldc, std::complex<float>* work ) {
@@ -101,7 +101,7 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t larfx( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larfx( const Side, const fortran_int_t m,
const fortran_int_t n, const std::complex<double>* v,
const std::complex<double> tau, std::complex<double>* c,
const fortran_int_t ldc, std::complex<double>* work ) {
@@ -194,8 +194,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
std::ptrdiff_t order = bindings::detail::if_left( side, n, m );
if ( order < 11)
return 1;
@@ -278,8 +278,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
std::ptrdiff_t order = bindings::detail::if_left( side, n, m );
if ( order < 11)
return 1;
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larz.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larz.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/larz.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t larz( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larz( const Side, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t l, const float* v,
const fortran_int_t incv, const float tau, float* c,
const fortran_int_t ldc, float* work ) {
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t larz( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larz( const Side, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t l, const double* v,
const fortran_int_t incv, const double tau, double* c,
const fortran_int_t ldc, double* work ) {
@@ -87,7 +87,7 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t larz( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larz( const Side, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t l,
const std::complex<float>* v, const fortran_int_t incv,
const std::complex<float> tau, std::complex<float>* c,
@@ -104,7 +104,7 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t larz( const Side side, const fortran_int_t m,
+inline std::ptrdiff_t larz( const Side, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t l,
const std::complex<double>* v, const fortran_int_t incv,
const std::complex<double> tau, std::complex<double>* c,
@@ -201,8 +201,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -285,8 +285,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t latrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t latrd( const UpLo, const fortran_int_t n,
const fortran_int_t nb, float* a, const fortran_int_t lda, float* e,
float* tau, float* w, const fortran_int_t ldw ) {
fortran_int_t info(0);
@@ -68,7 +68,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t latrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t latrd( const UpLo, const fortran_int_t n,
const fortran_int_t nb, double* a, const fortran_int_t lda, double* e,
double* tau, double* w, const fortran_int_t ldw ) {
fortran_int_t info(0);
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t latrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t latrd( const UpLo, const fortran_int_t n,
const fortran_int_t nb, std::complex<float>* a,
const fortran_int_t lda, float* e, std::complex<float>* tau,
std::complex<float>* w, const fortran_int_t ldw ) {
@@ -99,7 +99,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t latrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t latrd( const UpLo, const fortran_int_t n,
const fortran_int_t nb, std::complex<double>* a,
const fortran_int_t lda, double* e, std::complex<double>* tau,
std::complex<double>* w, const fortran_int_t ldw ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/latrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,10 +55,9 @@
// * float value-type.
//
template< typename Trans, typename Diag >
-inline std::ptrdiff_t latrs( const char uplo, const Trans trans,
- const Diag diag, const char normin, const fortran_int_t n,
- const float* a, const fortran_int_t lda, float* x, float& scale,
- float* cnorm ) {
+inline std::ptrdiff_t latrs( const char uplo, const Trans, const Diag,
+ const char normin, const fortran_int_t n, const float* a,
+ const fortran_int_t lda, float* x, float& scale, float* cnorm ) {
fortran_int_t info(0);
LAPACK_SLATRS( &uplo, &lapack_option< Trans >::value, &lapack_option<
Diag >::value, &normin, &n, a, &lda, x, &scale, cnorm, &info );
@@ -71,10 +70,9 @@
// * double value-type.
//
template< typename Trans, typename Diag >
-inline std::ptrdiff_t latrs( const char uplo, const Trans trans,
- const Diag diag, const char normin, const fortran_int_t n,
- const double* a, const fortran_int_t lda, double* x, double& scale,
- double* cnorm ) {
+inline std::ptrdiff_t latrs( const char uplo, const Trans, const Diag,
+ const char normin, const fortran_int_t n, const double* a,
+ const fortran_int_t lda, double* x, double& scale, double* cnorm ) {
fortran_int_t info(0);
LAPACK_DLATRS( &uplo, &lapack_option< Trans >::value, &lapack_option<
Diag >::value, &normin, &n, a, &lda, x, &scale, cnorm, &info );
@@ -87,8 +85,8 @@
// * complex<float> value-type.
//
template< typename Trans, typename Diag >
-inline std::ptrdiff_t latrs( const char uplo, const Trans trans,
- const Diag diag, const char normin, const fortran_int_t n,
+inline std::ptrdiff_t latrs( const char uplo, const Trans, const Diag,
+ const char normin, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* x, float& scale, float* cnorm ) {
fortran_int_t info(0);
@@ -103,8 +101,8 @@
// * complex<double> value-type.
//
template< typename Trans, typename Diag >
-inline std::ptrdiff_t latrs( const char uplo, const Trans trans,
- const Diag diag, const char normin, const fortran_int_t n,
+inline std::ptrdiff_t latrs( const char uplo, const Trans, const Diag,
+ const char normin, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* x, double& scale, double* cnorm ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbrfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbrfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbrfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbrfs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const float* ab, const fortran_int_t ldab,
const float* afb, const fortran_int_t ldafb,
@@ -77,7 +77,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbrfs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const double* ab, const fortran_int_t ldab,
const double* afb, const fortran_int_t ldafb,
@@ -97,7 +97,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbrfs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const std::complex<float>* ab,
const fortran_int_t ldab, const std::complex<float>* afb,
@@ -118,7 +118,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbrfs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const std::complex<double>* ab,
const fortran_int_t ldab, const std::complex<double>* afb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbtrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbtrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gbtrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbtrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbtrs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const float* ab, const fortran_int_t ldab,
const fortran_int_t* ipiv, float* b, const fortran_int_t ldb ) {
@@ -67,7 +67,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbtrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbtrs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const double* ab, const fortran_int_t ldab,
const fortran_int_t* ipiv, double* b, const fortran_int_t ldb ) {
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbtrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbtrs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const std::complex<float>* ab,
const fortran_int_t ldab, const fortran_int_t* ipiv,
@@ -100,7 +100,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbtrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gbtrs( const Trans, const fortran_int_t n,
const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, const std::complex<double>* ab,
const fortran_int_t ldab, const fortran_int_t* ipiv,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gebak.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gebak.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gebak.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,10 +52,9 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t gebak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const float* scale, const fortran_int_t m,
- float* v, const fortran_int_t ldv ) {
+inline std::ptrdiff_t gebak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi, const float* scale,
+ const fortran_int_t m, float* v, const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_SGEBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi, scale,
&m, v, &ldv, &info );
@@ -68,10 +67,9 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t gebak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const double* scale, const fortran_int_t m,
- double* v, const fortran_int_t ldv ) {
+inline std::ptrdiff_t gebak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi, const double* scale,
+ const fortran_int_t m, double* v, const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_DGEBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi, scale,
&m, v, &ldv, &info );
@@ -84,10 +82,10 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t gebak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const float* scale, const fortran_int_t m,
- std::complex<float>* v, const fortran_int_t ldv ) {
+inline std::ptrdiff_t gebak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi, const float* scale,
+ const fortran_int_t m, std::complex<float>* v,
+ const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_CGEBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi, scale,
&m, v, &ldv, &info );
@@ -100,10 +98,10 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t gebak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const double* scale, const fortran_int_t m,
- std::complex<double>* v, const fortran_int_t ldv ) {
+inline std::ptrdiff_t gebak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi, const double* scale,
+ const fortran_int_t m, std::complex<double>* v,
+ const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_ZGEBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi, scale,
&m, v, &ldv, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gerfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gerfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gerfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gerfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gerfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const float* af, const fortran_int_t ldaf, const fortran_int_t* ipiv,
const float* b, const fortran_int_t ldb, float* x,
@@ -74,7 +74,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gerfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gerfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const double* af, const fortran_int_t ldaf, const fortran_int_t* ipiv,
const double* b, const fortran_int_t ldb, double* x,
@@ -92,7 +92,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gerfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gerfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const std::complex<float>* af,
const fortran_int_t ldaf, const fortran_int_t* ipiv,
@@ -111,7 +111,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gerfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gerfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* af,
const fortran_int_t ldaf, const fortran_int_t* ipiv,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/getrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/getrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/getrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -60,9 +60,9 @@
// * float value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const int n,
- const int nrhs, const float* a, const int lda, const int* ipiv,
- float* b, const int ldb ) {
+inline std::ptrdiff_t getrs( Order, const Trans, const int n, const int nrhs,
+ const float* a, const int lda, const int* ipiv, float* b,
+ const int ldb ) {
return clapack_sgetrs
( clapack_option< Order >::value, clapack_option< Trans >::value, n, nrhs,
a, lda, ipiv, b, ldb );
@@ -74,9 +74,9 @@
// * double value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const int n,
- const int nrhs, const double* a, const int lda, const int* ipiv,
- double* b, const int ldb ) {
+inline std::ptrdiff_t getrs( Order, const Trans, const int n, const int nrhs,
+ const double* a, const int lda, const int* ipiv, double* b,
+ const int ldb ) {
return clapack_dgetrs
( clapack_option< Order >::value, clapack_option< Trans >::value, n, nrhs,
a, lda, ipiv, b, ldb );
@@ -88,9 +88,9 @@
// * complex<float> value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const int n,
- const int nrhs, const std::complex<float>* a, const int lda,
- const int* ipiv, std::complex<float>* b, const int ldb ) {
+inline std::ptrdiff_t getrs( Order, const Trans, const int n, const int nrhs,
+ const std::complex<float>* a, const int lda, const int* ipiv,
+ std::complex<float>* b, const int ldb ) {
return clapack_cgetrs
( clapack_option< Order >::value, clapack_option< Trans >::value, n, nrhs,
a, lda, ipiv, b, ldb );
@@ -102,9 +102,9 @@
// * complex<double> value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const int n,
- const int nrhs, const std::complex<double>* a, const int lda,
- const int* ipiv, std::complex<double>* b, const int ldb ) {
+inline std::ptrdiff_t getrs( Order, const Trans, const int n, const int nrhs,
+ const std::complex<double>* a, const int lda, const int* ipiv,
+ std::complex<double>* b, const int ldb ) {
return clapack_zgetrs
( clapack_option< Order >::value, clapack_option< Trans >::value, n, nrhs,
a, lda, ipiv, b, ldb );
@@ -117,7 +117,7 @@
// * float value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t getrs( Order, const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const fortran_int_t* ipiv, float* b, const fortran_int_t ldb ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -133,7 +133,7 @@
// * double value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t getrs( Order, const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const fortran_int_t* ipiv, double* b, const fortran_int_t ldb ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -149,7 +149,7 @@
// * complex<float> value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t getrs( Order, const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const fortran_int_t* ipiv,
std::complex<float>* b, const fortran_int_t ldb ) {
@@ -166,7 +166,7 @@
// * complex<double> value-type.
//
template< typename Order, typename Trans >
-inline std::ptrdiff_t getrs( Order, const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t getrs( Order, const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const fortran_int_t* ipiv,
std::complex<double>* b, const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ggbak.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ggbak.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ggbak.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,10 +52,10 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t ggbak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const float* lscale, const float* rscale,
- const fortran_int_t m, float* v, const fortran_int_t ldv ) {
+inline std::ptrdiff_t ggbak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi, const float* lscale,
+ const float* rscale, const fortran_int_t m, float* v,
+ const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_SGGBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi,
lscale, rscale, &m, v, &ldv, &info );
@@ -68,10 +68,10 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t ggbak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const double* lscale, const double* rscale,
- const fortran_int_t m, double* v, const fortran_int_t ldv ) {
+inline std::ptrdiff_t ggbak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi,
+ const double* lscale, const double* rscale, const fortran_int_t m,
+ double* v, const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_DGGBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi,
lscale, rscale, &m, v, &ldv, &info );
@@ -84,10 +84,9 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t ggbak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const float* lscale, const float* rscale,
- const fortran_int_t m, std::complex<float>* v,
+inline std::ptrdiff_t ggbak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi, const float* lscale,
+ const float* rscale, const fortran_int_t m, std::complex<float>* v,
const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_CGGBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi,
@@ -101,11 +100,10 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t ggbak( const char job, const Side side,
- const fortran_int_t n, const fortran_int_t ilo,
- const fortran_int_t ihi, const double* lscale, const double* rscale,
- const fortran_int_t m, std::complex<double>* v,
- const fortran_int_t ldv ) {
+inline std::ptrdiff_t ggbak( const char job, const Side, const fortran_int_t n,
+ const fortran_int_t ilo, const fortran_int_t ihi,
+ const double* lscale, const double* rscale, const fortran_int_t m,
+ std::complex<double>* v, const fortran_int_t ldv ) {
fortran_int_t info(0);
LAPACK_ZGGBAK( &job, &lapack_option< Side >::value, &n, &ilo, &ihi,
lscale, rscale, &m, v, &ldv, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gtrfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gtrfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gtrfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gtrfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const float* dl, const float* d,
const float* du, const float* dlf, const float* df, const float* duf,
const float* du2, const fortran_int_t* ipiv, const float* b,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gtrfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const double* dl, const double* d,
const double* du, const double* dlf, const double* df,
const double* duf, const double* du2, const fortran_int_t* ipiv,
@@ -93,7 +93,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gtrfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* dl,
const std::complex<float>* d, const std::complex<float>* du,
const std::complex<float>* dlf, const std::complex<float>* df,
@@ -115,7 +115,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtrfs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gtrfs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* dl,
const std::complex<double>* d, const std::complex<double>* du,
const std::complex<double>* dlf, const std::complex<double>* df,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gttrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gttrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/gttrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -49,7 +49,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gttrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gttrs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const float* dl, const float* d,
const float* du, const float* du2, const fortran_int_t* ipiv,
float* b, const fortran_int_t ldb ) {
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gttrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gttrs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const double* dl, const double* d,
const double* du, const double* du2, const fortran_int_t* ipiv,
double* b, const fortran_int_t ldb ) {
@@ -81,7 +81,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gttrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gttrs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* dl,
const std::complex<float>* d, const std::complex<float>* du,
const std::complex<float>* du2, const fortran_int_t* ipiv,
@@ -98,7 +98,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gttrs( const Trans trans, const fortran_int_t n,
+inline std::ptrdiff_t gttrs( const Trans, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* dl,
const std::complex<double>* d, const std::complex<double>* du,
const std::complex<double>* du2, const fortran_int_t* ipiv,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbgst.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbgst.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbgst.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgst( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbgst( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
float* ab, const fortran_int_t ldab, const float* bb,
const fortran_int_t ldbb, float* x, const fortran_int_t ldx,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgst( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbgst( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
double* ab, const fortran_int_t ldab, const double* bb,
const fortran_int_t ldbb, double* x, const fortran_int_t ldx,
@@ -90,7 +90,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgst( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbgst( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
std::complex<float>* ab, const fortran_int_t ldab,
const std::complex<float>* bb, const fortran_int_t ldbb,
@@ -108,7 +108,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgst( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbgst( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
std::complex<double>* ab, const fortran_int_t ldab,
const std::complex<double>* bb, const fortran_int_t ldbb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbtrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbtrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hbtrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbtrd( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbtrd( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t kd, float* ab,
const fortran_int_t ldab, float* d, float* e, float* q,
const fortran_int_t ldq, float* work ) {
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbtrd( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbtrd( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t kd, double* ab,
const fortran_int_t ldab, double* d, double* e, double* q,
const fortran_int_t ldq, double* work ) {
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbtrd( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbtrd( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
std::complex<float>* ab, const fortran_int_t ldab, float* d, float* e,
std::complex<float>* q, const fortran_int_t ldq,
@@ -105,7 +105,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbtrd( const char vect, const UpLo uplo,
+inline std::ptrdiff_t hbtrd( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
std::complex<double>* ab, const fortran_int_t ldab, double* d,
double* e, std::complex<double>* q, const fortran_int_t ldq,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hecon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hecon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hecon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,9 +55,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hecon( const UpLo uplo, const fortran_int_t n,
- const float* a, const fortran_int_t lda, const fortran_int_t* ipiv,
- const float anorm, float& rcond, float* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t hecon( const UpLo, const fortran_int_t n, const float* a,
+ const fortran_int_t lda, const fortran_int_t* ipiv, const float anorm,
+ float& rcond, float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_SSYCON( &lapack_option< UpLo >::value, &n, a, &lda, ipiv, &anorm,
&rcond, work, iwork, &info );
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hecon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hecon( const UpLo, const fortran_int_t n,
const double* a, const fortran_int_t lda, const fortran_int_t* ipiv,
const double anorm, double& rcond, double* work,
fortran_int_t* iwork ) {
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hecon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hecon( const UpLo, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, const float anorm, float& rcond,
std::complex<float>* work ) {
@@ -102,7 +102,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hecon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hecon( const UpLo, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, const double anorm, double& rcond,
std::complex<double>* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hegst.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hegst.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hegst.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo uplo,
+inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo,
const fortran_int_t n, float* a, const fortran_int_t lda,
const float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo uplo,
+inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo,
const fortran_int_t n, double* a, const fortran_int_t lda,
const double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo uplo,
+inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo,
const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda, const std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo uplo,
+inline std::ptrdiff_t hegst( const fortran_int_t itype, const UpLo,
const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/herfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/herfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/herfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t herfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t herfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const float* af, const fortran_int_t ldaf, const fortran_int_t* ipiv,
const float* b, const fortran_int_t ldb, float* x,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t herfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t herfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const double* af, const fortran_int_t ldaf, const fortran_int_t* ipiv,
const double* b, const fortran_int_t ldb, double* x,
@@ -91,7 +91,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t herfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t herfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const std::complex<float>* af,
const fortran_int_t ldaf, const fortran_int_t* ipiv,
@@ -110,7 +110,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t herfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t herfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* af,
const fortran_int_t ldaf, const fortran_int_t* ipiv,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrd( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t hetrd( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, float* d, float* e, float* tau, float* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrd( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t hetrd( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, double* d, double* e, double* tau,
double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrd( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda, float* d, float* e,
std::complex<float>* tau, std::complex<float>* work,
const fortran_int_t lwork ) {
@@ -102,7 +102,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrd( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda, double* d,
double* e, std::complex<double>* tau, std::complex<double>* work,
const fortran_int_t lwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrf( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t hetrf( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, fortran_int_t* ipiv, float* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrf( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t hetrf( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, fortran_int_t* ipiv, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrf( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda, fortran_int_t* ipiv,
std::complex<float>* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -101,7 +101,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrf( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda, fortran_int_t* ipiv,
std::complex<double>* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetri( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t hetri( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, const fortran_int_t* ipiv, float* work ) {
fortran_int_t info(0);
LAPACK_SSYTRI( &lapack_option< UpLo >::value, &n, a, &lda, ipiv, work,
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetri( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t hetri( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, const fortran_int_t* ipiv, double* work ) {
fortran_int_t info(0);
LAPACK_DSYTRI( &lapack_option< UpLo >::value, &n, a, &lda, ipiv, work,
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetri( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, std::complex<float>* work ) {
fortran_int_t info(0);
@@ -98,7 +98,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetri( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, std::complex<double>* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hetrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const fortran_int_t* ipiv, float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const fortran_int_t* ipiv, double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const fortran_int_t* ipiv,
std::complex<float>* b, const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hetrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hetrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const fortran_int_t* ipiv,
std::complex<double>* b, const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hpcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hpcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hpcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpcon( const UpLo, const fortran_int_t n,
const float* ap, const fortran_int_t* ipiv, const float anorm,
float& rcond, float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpcon( const UpLo, const fortran_int_t n,
const double* ap, const fortran_int_t* ipiv, const double anorm,
double& rcond, double* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -84,7 +84,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpcon( const UpLo, const fortran_int_t n,
const std::complex<float>* ap, const fortran_int_t* ipiv,
const float anorm, float& rcond, std::complex<float>* work ) {
fortran_int_t info(0);
@@ -99,7 +99,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpcon( const UpLo, const fortran_int_t n,
const std::complex<double>* ap, const fortran_int_t* ipiv,
const double anorm, double& rcond, std::complex<double>* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hprfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hprfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hprfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* ap, const float* afp,
const fortran_int_t* ipiv, const float* b, const fortran_int_t ldb,
float* x, const fortran_int_t ldx, float* ferr, float* berr,
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* ap, const double* afp,
const fortran_int_t* ipiv, const double* b, const fortran_int_t ldb,
double* x, const fortran_int_t ldx, double* ferr, double* berr,
@@ -89,7 +89,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* ap,
const std::complex<float>* afp, const fortran_int_t* ipiv,
const std::complex<float>* b, const fortran_int_t ldb,
@@ -107,7 +107,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* ap,
const std::complex<double>* afp, const fortran_int_t* ipiv,
const std::complex<double>* b, const fortran_int_t ldb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,7 +52,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrd( const UpLo uplo, const fortran_int_t n, float* ap,
+inline std::ptrdiff_t hptrd( const UpLo, const fortran_int_t n, float* ap,
float* d, float* e, float* tau ) {
fortran_int_t info(0);
LAPACK_SSPTRD( &lapack_option< UpLo >::value, &n, ap, d, e, tau, &info );
@@ -65,8 +65,8 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrd( const UpLo uplo, const fortran_int_t n,
- double* ap, double* d, double* e, double* tau ) {
+inline std::ptrdiff_t hptrd( const UpLo, const fortran_int_t n, double* ap,
+ double* d, double* e, double* tau ) {
fortran_int_t info(0);
LAPACK_DSPTRD( &lapack_option< UpLo >::value, &n, ap, d, e, tau, &info );
return info;
@@ -78,7 +78,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrd( const UpLo, const fortran_int_t n,
std::complex<float>* ap, float* d, float* e,
std::complex<float>* tau ) {
fortran_int_t info(0);
@@ -92,7 +92,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrd( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrd( const UpLo, const fortran_int_t n,
std::complex<double>* ap, double* d, double* e,
std::complex<double>* tau ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -49,7 +49,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrf( const UpLo uplo, const fortran_int_t n, float* ap,
+inline std::ptrdiff_t hptrf( const UpLo, const fortran_int_t n, float* ap,
fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_SSPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
@@ -62,8 +62,8 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrf( const UpLo uplo, const fortran_int_t n,
- double* ap, fortran_int_t* ipiv ) {
+inline std::ptrdiff_t hptrf( const UpLo, const fortran_int_t n, double* ap,
+ fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_DSPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
return info;
@@ -75,7 +75,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrf( const UpLo, const fortran_int_t n,
std::complex<float>* ap, fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_CHPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
@@ -88,7 +88,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrf( const UpLo, const fortran_int_t n,
std::complex<double>* ap, fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_ZHPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptri( const UpLo uplo, const fortran_int_t n, float* ap,
+inline std::ptrdiff_t hptri( const UpLo, const fortran_int_t n, float* ap,
const fortran_int_t* ipiv, float* work ) {
fortran_int_t info(0);
LAPACK_SSPTRI( &lapack_option< UpLo >::value, &n, ap, ipiv, work, &info );
@@ -67,8 +67,8 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptri( const UpLo uplo, const fortran_int_t n,
- double* ap, const fortran_int_t* ipiv, double* work ) {
+inline std::ptrdiff_t hptri( const UpLo, const fortran_int_t n, double* ap,
+ const fortran_int_t* ipiv, double* work ) {
fortran_int_t info(0);
LAPACK_DSPTRI( &lapack_option< UpLo >::value, &n, ap, ipiv, work, &info );
return info;
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptri( const UpLo, const fortran_int_t n,
std::complex<float>* ap, const fortran_int_t* ipiv,
std::complex<float>* work ) {
fortran_int_t info(0);
@@ -94,7 +94,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptri( const UpLo, const fortran_int_t n,
std::complex<double>* ap, const fortran_int_t* ipiv,
std::complex<double>* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hptrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* ap, const fortran_int_t* ipiv,
float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* ap, const fortran_int_t* ipiv,
double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* ap,
const fortran_int_t* ipiv, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* ap,
const fortran_int_t* ipiv, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hsein.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hsein.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/hsein.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,12 +54,12 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t hsein( const Side side, const char eigsrc,
- const char initv, fortran_bool_t* select, const fortran_int_t n,
- const float* h, const fortran_int_t ldh, float* wr, const float* wi,
- float* vl, const fortran_int_t ldvl, float* vr,
- const fortran_int_t ldvr, const fortran_int_t mm, fortran_int_t& m,
- float* work, fortran_int_t* ifaill, fortran_int_t* ifailr ) {
+inline std::ptrdiff_t hsein( const Side, const char eigsrc, const char initv,
+ fortran_bool_t* select, const fortran_int_t n, const float* h,
+ const fortran_int_t ldh, float* wr, const float* wi, float* vl,
+ const fortran_int_t ldvl, float* vr, const fortran_int_t ldvr,
+ const fortran_int_t mm, fortran_int_t& m, float* work,
+ fortran_int_t* ifaill, fortran_int_t* ifailr ) {
fortran_int_t info(0);
LAPACK_SHSEIN( &lapack_option< Side >::value, &eigsrc, &initv, select, &n,
h, &ldh, wr, wi, vl, &ldvl, vr, &ldvr, &mm, &m, work, ifaill,
@@ -73,12 +73,12 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t hsein( const Side side, const char eigsrc,
- const char initv, fortran_bool_t* select, const fortran_int_t n,
- const double* h, const fortran_int_t ldh, double* wr,
- const double* wi, double* vl, const fortran_int_t ldvl, double* vr,
- const fortran_int_t ldvr, const fortran_int_t mm, fortran_int_t& m,
- double* work, fortran_int_t* ifaill, fortran_int_t* ifailr ) {
+inline std::ptrdiff_t hsein( const Side, const char eigsrc, const char initv,
+ fortran_bool_t* select, const fortran_int_t n, const double* h,
+ const fortran_int_t ldh, double* wr, const double* wi, double* vl,
+ const fortran_int_t ldvl, double* vr, const fortran_int_t ldvr,
+ const fortran_int_t mm, fortran_int_t& m, double* work,
+ fortran_int_t* ifaill, fortran_int_t* ifailr ) {
fortran_int_t info(0);
LAPACK_DHSEIN( &lapack_option< Side >::value, &eigsrc, &initv, select, &n,
h, &ldh, wr, wi, vl, &ldvl, vr, &ldvr, &mm, &m, work, ifaill,
@@ -92,8 +92,8 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t hsein( const Side side, const char eigsrc,
- const char initv, const fortran_bool_t* select, const fortran_int_t n,
+inline std::ptrdiff_t hsein( const Side, const char eigsrc, const char initv,
+ const fortran_bool_t* select, const fortran_int_t n,
const std::complex<float>* h, const fortran_int_t ldh,
std::complex<float>* w, std::complex<float>* vl,
const fortran_int_t ldvl, std::complex<float>* vr,
@@ -113,8 +113,8 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t hsein( const Side side, const char eigsrc,
- const char initv, const fortran_bool_t* select, const fortran_int_t n,
+inline std::ptrdiff_t hsein( const Side, const char eigsrc, const char initv,
+ const fortran_bool_t* select, const fortran_int_t n,
const std::complex<double>* h, const fortran_int_t ldh,
std::complex<double>* w, std::complex<double>* vl,
const fortran_int_t ldvl, std::complex<double>* vr,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/opmtr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/opmtr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/opmtr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,10 +53,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t opmtr( const Side side, const char uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const float* ap, const float* tau, float* c, const fortran_int_t ldc,
- float* work ) {
+inline std::ptrdiff_t opmtr( const Side, const char uplo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const float* ap,
+ const float* tau, float* c, const fortran_int_t ldc, float* work ) {
fortran_int_t info(0);
LAPACK_SOPMTR( &lapack_option< Side >::value, &uplo, &lapack_option<
Trans >::value, &m, &n, ap, tau, c, &ldc, work, &info );
@@ -69,10 +68,9 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t opmtr( const Side side, const char uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const double* ap, const double* tau, double* c,
- const fortran_int_t ldc, double* work ) {
+inline std::ptrdiff_t opmtr( const Side, const char uplo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const double* ap,
+ const double* tau, double* c, const fortran_int_t ldc, double* work ) {
fortran_int_t info(0);
LAPACK_DOPMTR( &lapack_option< Side >::value, &uplo, &lapack_option<
Trans >::value, &m, &n, ap, tau, c, &ldc, work, &info );
@@ -173,8 +171,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/orgtr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/orgtr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/orgtr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t orgtr( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t orgtr( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, const float* tau, float* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -68,7 +68,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t orgtr( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t orgtr( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, const double* tau, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormbr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormbr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormbr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,11 +54,10 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormbr( const char vect, const Side side,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const fortran_int_t k, const float* a, const fortran_int_t lda,
- const float* tau, float* c, const fortran_int_t ldc, float* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t ormbr( const char vect, const Side, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+ const float* a, const fortran_int_t lda, const float* tau, float* c,
+ const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMBR( &vect, &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -72,10 +71,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormbr( const char vect, const Side side,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const fortran_int_t k, const double* a, const fortran_int_t lda,
- const double* tau, double* c, const fortran_int_t ldc, double* work,
+inline std::ptrdiff_t ormbr( const char vect, const Side, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+ const double* a, const fortran_int_t lda, const double* tau,
+ double* c, const fortran_int_t ldc, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMBR( &vect, &lapack_option< Side >::value, &lapack_option<
@@ -191,8 +190,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormhr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormhr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormhr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,8 +54,8 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormhr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t ilo,
+inline std::ptrdiff_t ormhr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t ilo,
const fortran_int_t ihi, const float* a, const fortran_int_t lda,
const float* tau, float* c, const fortran_int_t ldc, float* work,
const fortran_int_t lwork ) {
@@ -72,8 +72,8 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormhr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t ilo,
+inline std::ptrdiff_t ormhr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t ilo,
const fortran_int_t ihi, const double* a, const fortran_int_t lda,
const double* tau, double* c, const fortran_int_t ldc, double* work,
const fortran_int_t lwork ) {
@@ -189,8 +189,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormlq.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormlq.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormlq.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,9 +54,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormlq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t ormlq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMLQ( &lapack_option< Side >::value, &lapack_option<
@@ -71,11 +71,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormlq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t ormlq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMLQ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -189,8 +188,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormql.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormql.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormql.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,9 +54,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormql( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t ormql( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMQL( &lapack_option< Side >::value, &lapack_option<
@@ -71,9 +71,9 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormql( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- double* a, const fortran_int_t lda, const double* tau, double* c,
+inline std::ptrdiff_t ormql( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, double* a,
+ const fortran_int_t lda, const double* tau, double* c,
const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMQL( &lapack_option< Side >::value, &lapack_option<
@@ -187,8 +187,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormqr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormqr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormqr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,9 +54,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormqr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t ormqr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMQR( &lapack_option< Side >::value, &lapack_option<
@@ -71,11 +71,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormqr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t ormqr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMQR( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -187,8 +186,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrq.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrq.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrq.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,9 +54,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormrq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t ormrq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMRQ( &lapack_option< Side >::value, &lapack_option<
@@ -71,11 +71,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormrq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t ormrq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMRQ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -189,8 +188,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrz.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrz.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormrz.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,11 +54,10 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormrz( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const fortran_int_t l, const float* a, const fortran_int_t lda,
- const float* tau, float* c, const fortran_int_t ldc, float* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t ormrz( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const fortran_int_t l,
+ const float* a, const fortran_int_t lda, const float* tau, float* c,
+ const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMRZ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, &l, a, &lda, tau, c, &ldc, work,
@@ -72,10 +71,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t ormrz( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const fortran_int_t l, const double* a, const fortran_int_t lda,
- const double* tau, double* c, const fortran_int_t ldc, double* work,
+inline std::ptrdiff_t ormrz( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const fortran_int_t l,
+ const double* a, const fortran_int_t lda, const double* tau,
+ double* c, const fortran_int_t ldc, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMRZ( &lapack_option< Side >::value, &lapack_option<
@@ -192,8 +191,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormtr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormtr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ormtr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,9 +55,9 @@
// * float value-type.
//
template< typename Side, typename UpLo, typename Trans >
-inline std::ptrdiff_t ormtr( const Side side, const UpLo uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t ormtr( const Side, const UpLo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMTR( &lapack_option< Side >::value, &lapack_option<
@@ -72,11 +72,10 @@
// * double value-type.
//
template< typename Side, typename UpLo, typename Trans >
-inline std::ptrdiff_t ormtr( const Side side, const UpLo uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t ormtr( const Side, const UpLo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMTR( &lapack_option< Side >::value, &lapack_option<
UpLo >::value, &lapack_option< Trans >::value, &m, &n, a, &lda,
@@ -189,8 +188,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbcon( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const float* ab, const fortran_int_t ldab,
const float anorm, float& rcond, float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbcon( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const double* ab, const fortran_int_t ldab,
const double anorm, double& rcond, double* work,
fortran_int_t* iwork ) {
@@ -87,7 +87,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbcon( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const std::complex<float>* ab,
const fortran_int_t ldab, const float anorm, float& rcond,
std::complex<float>* work, float* rwork ) {
@@ -103,7 +103,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbcon( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const std::complex<double>* ab,
const fortran_int_t ldab, const double anorm, double& rcond,
std::complex<double>* work, double* rwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbequ.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbequ.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbequ.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbequ( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const float* ab, const fortran_int_t ldab,
float* s, float& scond, float& amax ) {
fortran_int_t info(0);
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbequ( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const double* ab, const fortran_int_t ldab,
double* s, double& scond, double& amax ) {
fortran_int_t info(0);
@@ -84,7 +84,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbequ( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const std::complex<float>* ab,
const fortran_int_t ldab, float* s, float& scond, float& amax ) {
fortran_int_t info(0);
@@ -99,7 +99,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbequ( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const std::complex<double>* ab,
const fortran_int_t ldab, double* s, double& scond, double& amax ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbrfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbrfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbrfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbrfs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs, const float* ab,
const fortran_int_t ldab, const float* afb, const fortran_int_t ldafb,
const float* b, const fortran_int_t ldb, float* x,
@@ -74,7 +74,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbrfs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs, const double* ab,
const fortran_int_t ldab, const double* afb,
const fortran_int_t ldafb, const double* b, const fortran_int_t ldb,
@@ -92,7 +92,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbrfs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs,
const std::complex<float>* ab, const fortran_int_t ldab,
const std::complex<float>* afb, const fortran_int_t ldafb,
@@ -111,7 +111,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbrfs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs,
const std::complex<double>* ab, const fortran_int_t ldab,
const std::complex<double>* afb, const fortran_int_t ldafb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbstf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbstf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbstf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbstf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbstf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, float* ab, const fortran_int_t ldab ) {
fortran_int_t info(0);
LAPACK_SPBSTF( &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, &info );
@@ -64,7 +64,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbstf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbstf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, double* ab, const fortran_int_t ldab ) {
fortran_int_t info(0);
LAPACK_DPBSTF( &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, &info );
@@ -77,7 +77,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbstf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbstf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, std::complex<float>* ab,
const fortran_int_t ldab ) {
fortran_int_t info(0);
@@ -91,7 +91,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbstf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbstf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, std::complex<double>* ab,
const fortran_int_t ldab ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, float* ab, const fortran_int_t ldab ) {
fortran_int_t info(0);
LAPACK_SPBTRF( &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, &info );
@@ -64,7 +64,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, double* ab, const fortran_int_t ldab ) {
fortran_int_t info(0);
LAPACK_DPBTRF( &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, &info );
@@ -77,7 +77,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, std::complex<float>* ab,
const fortran_int_t ldab ) {
fortran_int_t info(0);
@@ -91,7 +91,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrf( const UpLo, const fortran_int_t n,
const fortran_int_t kd, std::complex<double>* ab,
const fortran_int_t ldab ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pbtrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs, const float* ab,
const fortran_int_t ldab, float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -66,7 +66,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs, const double* ab,
const fortran_int_t ldab, double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -81,7 +81,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs,
const std::complex<float>* ab, const fortran_int_t ldab,
std::complex<float>* b, const fortran_int_t ldb ) {
@@ -97,7 +97,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbtrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbtrs( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs,
const std::complex<double>* ab, const fortran_int_t ldab,
std::complex<double>* b, const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename TransR >
-inline std::ptrdiff_t pftrf( const TransR transr, const char uplo,
+inline std::ptrdiff_t pftrf( const TransR, const char uplo,
const fortran_int_t n, float* a ) {
fortran_int_t info(0);
LAPACK_SPFTRF( &lapack_option< TransR >::value, &uplo, &n, a, &info );
@@ -64,7 +64,7 @@
// * double value-type.
//
template< typename TransR >
-inline std::ptrdiff_t pftrf( const TransR transr, const char uplo,
+inline std::ptrdiff_t pftrf( const TransR, const char uplo,
const fortran_int_t n, double* a ) {
fortran_int_t info(0);
LAPACK_DPFTRF( &lapack_option< TransR >::value, &uplo, &n, a, &info );
@@ -77,7 +77,7 @@
// * complex<float> value-type.
//
template< typename TransR >
-inline std::ptrdiff_t pftrf( const TransR transr, const char uplo,
+inline std::ptrdiff_t pftrf( const TransR, const char uplo,
const fortran_int_t n, std::complex<float>* a ) {
fortran_int_t info(0);
LAPACK_CPFTRF( &lapack_option< TransR >::value, &uplo, &n, a, &info );
@@ -90,7 +90,7 @@
// * complex<double> value-type.
//
template< typename TransR >
-inline std::ptrdiff_t pftrf( const TransR transr, const char uplo,
+inline std::ptrdiff_t pftrf( const TransR, const char uplo,
const fortran_int_t n, std::complex<double>* a ) {
fortran_int_t info(0);
LAPACK_ZPFTRF( &lapack_option< TransR >::value, &uplo, &n, a, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,8 +51,8 @@
// * float value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftri( const TransR transr, const UpLo uplo,
- const fortran_int_t n, float* a ) {
+inline std::ptrdiff_t pftri( const TransR, const UpLo, const fortran_int_t n,
+ float* a ) {
fortran_int_t info(0);
LAPACK_SPFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, a, &info );
@@ -65,8 +65,8 @@
// * double value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftri( const TransR transr, const UpLo uplo,
- const fortran_int_t n, double* a ) {
+inline std::ptrdiff_t pftri( const TransR, const UpLo, const fortran_int_t n,
+ double* a ) {
fortran_int_t info(0);
LAPACK_DPFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, a, &info );
@@ -79,8 +79,8 @@
// * complex<float> value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftri( const TransR transr, const UpLo uplo,
- const fortran_int_t n, std::complex<float>* a ) {
+inline std::ptrdiff_t pftri( const TransR, const UpLo, const fortran_int_t n,
+ std::complex<float>* a ) {
fortran_int_t info(0);
LAPACK_CPFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, a, &info );
@@ -93,8 +93,8 @@
// * complex<double> value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftri( const TransR transr, const UpLo uplo,
- const fortran_int_t n, std::complex<double>* a ) {
+inline std::ptrdiff_t pftri( const TransR, const UpLo, const fortran_int_t n,
+ std::complex<double>* a ) {
fortran_int_t info(0);
LAPACK_ZPFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, a, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pftrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,9 +51,9 @@
// * float value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftrs( const TransR transr, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t nrhs, const float* a,
- float* b, const fortran_int_t ldb ) {
+inline std::ptrdiff_t pftrs( const TransR, const UpLo, const fortran_int_t n,
+ const fortran_int_t nrhs, const float* a, float* b,
+ const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_SPFTRS( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, &nrhs, a, b, &ldb, &info );
@@ -66,9 +66,9 @@
// * double value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftrs( const TransR transr, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t nrhs, const double* a,
- double* b, const fortran_int_t ldb ) {
+inline std::ptrdiff_t pftrs( const TransR, const UpLo, const fortran_int_t n,
+ const fortran_int_t nrhs, const double* a, double* b,
+ const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_DPFTRS( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, &nrhs, a, b, &ldb, &info );
@@ -81,10 +81,9 @@
// * complex<float> value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftrs( const TransR transr, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t nrhs,
- const std::complex<float>* a, std::complex<float>* b,
- const fortran_int_t ldb ) {
+inline std::ptrdiff_t pftrs( const TransR, const UpLo, const fortran_int_t n,
+ const fortran_int_t nrhs, const std::complex<float>* a,
+ std::complex<float>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_CPFTRS( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, &nrhs, a, b, &ldb, &info );
@@ -97,10 +96,9 @@
// * complex<double> value-type.
//
template< typename TransR, typename UpLo >
-inline std::ptrdiff_t pftrs( const TransR transr, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t nrhs,
- const std::complex<double>* a, std::complex<double>* b,
- const fortran_int_t ldb ) {
+inline std::ptrdiff_t pftrs( const TransR, const UpLo, const fortran_int_t n,
+ const fortran_int_t nrhs, const std::complex<double>* a,
+ std::complex<double>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_ZPFTRS( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &n, &nrhs, a, b, &ldb, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pocon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pocon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pocon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,9 +55,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pocon( const UpLo uplo, const fortran_int_t n,
- const float* a, const fortran_int_t lda, const float anorm,
- float& rcond, float* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t pocon( const UpLo, const fortran_int_t n, const float* a,
+ const fortran_int_t lda, const float anorm, float& rcond, float* work,
+ fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_SPOCON( &lapack_option< UpLo >::value, &n, a, &lda, &anorm, &rcond,
work, iwork, &info );
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pocon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pocon( const UpLo, const fortran_int_t n,
const double* a, const fortran_int_t lda, const double anorm,
double& rcond, double* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -85,7 +85,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pocon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pocon( const UpLo, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda,
const float anorm, float& rcond, std::complex<float>* work,
float* rwork ) {
@@ -101,7 +101,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pocon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pocon( const UpLo, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
const double anorm, double& rcond, std::complex<double>* work,
double* rwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/porfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/porfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/porfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t porfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t porfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const float* af, const fortran_int_t ldaf, const float* b,
const fortran_int_t ldb, float* x, const fortran_int_t ldx,
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t porfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t porfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const double* af, const fortran_int_t ldaf, const double* b,
const fortran_int_t ldb, double* x, const fortran_int_t ldx,
@@ -89,7 +89,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t porfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t porfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const std::complex<float>* af,
const fortran_int_t ldaf, const std::complex<float>* b,
@@ -108,7 +108,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t porfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t porfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* af,
const fortran_int_t ldaf, const std::complex<double>* b,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -59,7 +59,7 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const int n, float* a,
+inline std::ptrdiff_t potrf( Order, const UpLo, const int n, float* a,
const int lda ) {
return clapack_spotrf( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const int n, double* a,
+inline std::ptrdiff_t potrf( Order, const UpLo, const int n, double* a,
const int lda ) {
return clapack_dpotrf( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const int n,
+inline std::ptrdiff_t potrf( Order, const UpLo, const int n,
std::complex<float>* a, const int lda ) {
return clapack_cpotrf( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -95,7 +95,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const int n,
+inline std::ptrdiff_t potrf( Order, const UpLo, const int n,
std::complex<double>* a, const int lda ) {
return clapack_zpotrf( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -108,7 +108,7 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrf( Order, const UpLo, const fortran_int_t n,
float* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -122,7 +122,7 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrf( Order, const UpLo, const fortran_int_t n,
double* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -136,7 +136,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrf( Order, const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -150,7 +150,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrf( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrf( Order, const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -59,7 +59,7 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const int n, float* a,
+inline std::ptrdiff_t potri( Order, const UpLo, const int n, float* a,
const int lda ) {
return clapack_spotri( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const int n, double* a,
+inline std::ptrdiff_t potri( Order, const UpLo, const int n, double* a,
const int lda ) {
return clapack_dpotri( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const int n,
+inline std::ptrdiff_t potri( Order, const UpLo, const int n,
std::complex<float>* a, const int lda ) {
return clapack_cpotri( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -95,7 +95,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const int n,
+inline std::ptrdiff_t potri( Order, const UpLo, const int n,
std::complex<double>* a, const int lda ) {
return clapack_zpotri( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, a, lda );
@@ -108,7 +108,7 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potri( Order, const UpLo, const fortran_int_t n,
float* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -122,7 +122,7 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potri( Order, const UpLo, const fortran_int_t n,
double* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -136,7 +136,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potri( Order, const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -150,7 +150,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potri( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potri( Order, const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/potrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -60,9 +60,8 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const int n,
- const int nrhs, const float* a, const int lda, float* b,
- const int ldb ) {
+inline std::ptrdiff_t potrs( Order, const UpLo, const int n, const int nrhs,
+ const float* a, const int lda, float* b, const int ldb ) {
return clapack_spotrs( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -73,9 +72,8 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const int n,
- const int nrhs, const double* a, const int lda, double* b,
- const int ldb ) {
+inline std::ptrdiff_t potrs( Order, const UpLo, const int n, const int nrhs,
+ const double* a, const int lda, double* b, const int ldb ) {
return clapack_dpotrs( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -86,9 +84,9 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const int n,
- const int nrhs, const std::complex<float>* a, const int lda,
- std::complex<float>* b, const int ldb ) {
+inline std::ptrdiff_t potrs( Order, const UpLo, const int n, const int nrhs,
+ const std::complex<float>* a, const int lda, std::complex<float>* b,
+ const int ldb ) {
return clapack_cpotrs( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -99,9 +97,9 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const int n,
- const int nrhs, const std::complex<double>* a, const int lda,
- std::complex<double>* b, const int ldb ) {
+inline std::ptrdiff_t potrs( Order, const UpLo, const int n, const int nrhs,
+ const std::complex<double>* a, const int lda, std::complex<double>* b,
+ const int ldb ) {
return clapack_zpotrs( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -113,7 +111,7 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrs( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
float* b, const fortran_int_t ldb ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -129,7 +127,7 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrs( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
double* b, const fortran_int_t ldb ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -145,7 +143,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrs( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -162,7 +160,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t potrs( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t potrs( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppcon( const UpLo, const fortran_int_t n,
const float* ap, const float anorm, float& rcond, float* work,
fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppcon( const UpLo, const fortran_int_t n,
const double* ap, const double anorm, double& rcond, double* work,
fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -84,7 +84,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppcon( const UpLo, const fortran_int_t n,
const std::complex<float>* ap, const float anorm, float& rcond,
std::complex<float>* work, float* rwork ) {
fortran_int_t info(0);
@@ -99,7 +99,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppcon( const UpLo, const fortran_int_t n,
const std::complex<double>* ap, const double anorm, double& rcond,
std::complex<double>* work, double* rwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppequ.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppequ.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ppequ.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,7 +52,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppequ( const UpLo, const fortran_int_t n,
const float* ap, float* s, float& scond, float& amax ) {
fortran_int_t info(0);
LAPACK_SPPEQU( &lapack_option< UpLo >::value, &n, ap, s, &scond, &amax,
@@ -66,7 +66,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppequ( const UpLo, const fortran_int_t n,
const double* ap, double* s, double& scond, double& amax ) {
fortran_int_t info(0);
LAPACK_DPPEQU( &lapack_option< UpLo >::value, &n, ap, s, &scond, &amax,
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppequ( const UpLo, const fortran_int_t n,
const std::complex<float>* ap, float* s, float& scond, float& amax ) {
fortran_int_t info(0);
LAPACK_CPPEQU( &lapack_option< UpLo >::value, &n, ap, s, &scond, &amax,
@@ -94,7 +94,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppequ( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppequ( const UpLo, const fortran_int_t n,
const std::complex<double>* ap, double* s, double& scond,
double& amax ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pprfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pprfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pprfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* ap, const float* afp,
const float* b, const fortran_int_t ldb, float* x,
const fortran_int_t ldx, float* ferr, float* berr, float* work,
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* ap, const double* afp,
const double* b, const fortran_int_t ldb, double* x,
const fortran_int_t ldx, double* ferr, double* berr, double* work,
@@ -89,7 +89,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* ap,
const std::complex<float>* afp, const std::complex<float>* b,
const fortran_int_t ldb, std::complex<float>* x,
@@ -107,7 +107,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* ap,
const std::complex<double>* afp, const std::complex<double>* b,
const fortran_int_t ldb, std::complex<double>* x,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -49,8 +49,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrf( const UpLo uplo, const fortran_int_t n,
- float* ap ) {
+inline std::ptrdiff_t pptrf( const UpLo, const fortran_int_t n, float* ap ) {
fortran_int_t info(0);
LAPACK_SPPTRF( &lapack_option< UpLo >::value, &n, ap, &info );
return info;
@@ -62,8 +61,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrf( const UpLo uplo, const fortran_int_t n,
- double* ap ) {
+inline std::ptrdiff_t pptrf( const UpLo, const fortran_int_t n, double* ap ) {
fortran_int_t info(0);
LAPACK_DPPTRF( &lapack_option< UpLo >::value, &n, ap, &info );
return info;
@@ -75,7 +73,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptrf( const UpLo, const fortran_int_t n,
std::complex<float>* ap ) {
fortran_int_t info(0);
LAPACK_CPPTRF( &lapack_option< UpLo >::value, &n, ap, &info );
@@ -88,7 +86,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptrf( const UpLo, const fortran_int_t n,
std::complex<double>* ap ) {
fortran_int_t info(0);
LAPACK_ZPPTRF( &lapack_option< UpLo >::value, &n, ap, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -49,8 +49,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptri( const UpLo uplo, const fortran_int_t n,
- float* ap ) {
+inline std::ptrdiff_t pptri( const UpLo, const fortran_int_t n, float* ap ) {
fortran_int_t info(0);
LAPACK_SPPTRI( &lapack_option< UpLo >::value, &n, ap, &info );
return info;
@@ -62,8 +61,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptri( const UpLo uplo, const fortran_int_t n,
- double* ap ) {
+inline std::ptrdiff_t pptri( const UpLo, const fortran_int_t n, double* ap ) {
fortran_int_t info(0);
LAPACK_DPPTRI( &lapack_option< UpLo >::value, &n, ap, &info );
return info;
@@ -75,7 +73,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptri( const UpLo, const fortran_int_t n,
std::complex<float>* ap ) {
fortran_int_t info(0);
LAPACK_CPPTRI( &lapack_option< UpLo >::value, &n, ap, &info );
@@ -88,7 +86,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptri( const UpLo, const fortran_int_t n,
std::complex<double>* ap ) {
fortran_int_t info(0);
LAPACK_ZPPTRI( &lapack_option< UpLo >::value, &n, ap, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pptrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* ap, float* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* ap, double* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* ap,
std::complex<float>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -95,7 +95,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* ap,
std::complex<double>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pstrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pstrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/pstrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,7 +52,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pstrf( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t pstrf( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, fortran_int_t* piv, fortran_int_t& rank,
const float tol, float* work ) {
fortran_int_t info(0);
@@ -67,7 +67,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pstrf( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t pstrf( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, fortran_int_t* piv, fortran_int_t& rank,
const double tol, double* work ) {
fortran_int_t info(0);
@@ -82,7 +82,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pstrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pstrf( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda, fortran_int_t* piv,
fortran_int_t& rank, const float tol, float* work ) {
fortran_int_t info(0);
@@ -97,7 +97,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pstrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pstrf( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda, fortran_int_t* piv,
fortran_int_t& rank, const double tol, double* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbgst.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbgst.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbgst.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgst( const char vect, const UpLo uplo,
+inline std::ptrdiff_t sbgst( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
float* ab, const fortran_int_t ldab, const float* bb,
const fortran_int_t ldbb, float* x, const fortran_int_t ldx,
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgst( const char vect, const UpLo uplo,
+inline std::ptrdiff_t sbgst( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
double* ab, const fortran_int_t ldab, const double* bb,
const fortran_int_t ldbb, double* x, const fortran_int_t ldx,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbtrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbtrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sbtrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbtrd( const char vect, const UpLo uplo,
+inline std::ptrdiff_t sbtrd( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t kd, float* ab,
const fortran_int_t ldab, float* d, float* e, float* q,
const fortran_int_t ldq, float* work ) {
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbtrd( const char vect, const UpLo uplo,
+inline std::ptrdiff_t sbtrd( const char vect, const UpLo,
const fortran_int_t n, const fortran_int_t kd, double* ab,
const fortran_int_t ldab, double* d, double* e, double* q,
const fortran_int_t ldq, double* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/spcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/spcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/spcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spcon( const UpLo, const fortran_int_t n,
const float* ap, const fortran_int_t* ipiv, const float anorm,
float& rcond, float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spcon( const UpLo, const fortran_int_t n,
const double* ap, const fortran_int_t* ipiv, const double anorm,
double& rcond, double* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -84,7 +84,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spcon( const UpLo, const fortran_int_t n,
const std::complex<float>* ap, const fortran_int_t* ipiv,
const float anorm, float& rcond, std::complex<float>* work ) {
fortran_int_t info(0);
@@ -99,7 +99,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spcon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spcon( const UpLo, const fortran_int_t n,
const std::complex<double>* ap, const fortran_int_t* ipiv,
const double anorm, double& rcond, std::complex<double>* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sprfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sprfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sprfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* ap, const float* afp,
const fortran_int_t* ipiv, const float* b, const fortran_int_t ldb,
float* x, const fortran_int_t ldx, float* ferr, float* berr,
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* ap, const double* afp,
const fortran_int_t* ipiv, const double* b, const fortran_int_t ldb,
double* x, const fortran_int_t ldx, double* ferr, double* berr,
@@ -89,7 +89,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* ap,
const std::complex<float>* afp, const fortran_int_t* ipiv,
const std::complex<float>* b, const fortran_int_t ldb,
@@ -107,7 +107,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sprfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sprfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* ap,
const std::complex<double>* afp, const fortran_int_t* ipiv,
const std::complex<double>* b, const fortran_int_t ldb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -49,7 +49,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrd( const UpLo uplo, const fortran_int_t n, float* ap,
+inline std::ptrdiff_t sptrd( const UpLo, const fortran_int_t n, float* ap,
float* d, float* e, float* tau ) {
fortran_int_t info(0);
LAPACK_SSPTRD( &lapack_option< UpLo >::value, &n, ap, d, e, tau, &info );
@@ -62,8 +62,8 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrd( const UpLo uplo, const fortran_int_t n,
- double* ap, double* d, double* e, double* tau ) {
+inline std::ptrdiff_t sptrd( const UpLo, const fortran_int_t n, double* ap,
+ double* d, double* e, double* tau ) {
fortran_int_t info(0);
LAPACK_DSPTRD( &lapack_option< UpLo >::value, &n, ap, d, e, tau, &info );
return info;
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -49,7 +49,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrf( const UpLo uplo, const fortran_int_t n, float* ap,
+inline std::ptrdiff_t sptrf( const UpLo, const fortran_int_t n, float* ap,
fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_SSPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
@@ -62,8 +62,8 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrf( const UpLo uplo, const fortran_int_t n,
- double* ap, fortran_int_t* ipiv ) {
+inline std::ptrdiff_t sptrf( const UpLo, const fortran_int_t n, double* ap,
+ fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_DSPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
return info;
@@ -75,7 +75,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptrf( const UpLo, const fortran_int_t n,
std::complex<float>* ap, fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_CSPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
@@ -88,7 +88,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptrf( const UpLo, const fortran_int_t n,
std::complex<double>* ap, fortran_int_t* ipiv ) {
fortran_int_t info(0);
LAPACK_ZSPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptri( const UpLo uplo, const fortran_int_t n, float* ap,
+inline std::ptrdiff_t sptri( const UpLo, const fortran_int_t n, float* ap,
const fortran_int_t* ipiv, float* work ) {
fortran_int_t info(0);
LAPACK_SSPTRI( &lapack_option< UpLo >::value, &n, ap, ipiv, work, &info );
@@ -67,8 +67,8 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptri( const UpLo uplo, const fortran_int_t n,
- double* ap, const fortran_int_t* ipiv, double* work ) {
+inline std::ptrdiff_t sptri( const UpLo, const fortran_int_t n, double* ap,
+ const fortran_int_t* ipiv, double* work ) {
fortran_int_t info(0);
LAPACK_DSPTRI( &lapack_option< UpLo >::value, &n, ap, ipiv, work, &info );
return info;
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptri( const UpLo, const fortran_int_t n,
std::complex<float>* ap, const fortran_int_t* ipiv,
std::complex<float>* work ) {
fortran_int_t info(0);
@@ -94,7 +94,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptri( const UpLo, const fortran_int_t n,
std::complex<double>* ap, const fortran_int_t* ipiv,
std::complex<double>* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sptrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* ap, const fortran_int_t* ipiv,
float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* ap, const fortran_int_t* ipiv,
double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* ap,
const fortran_int_t* ipiv, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sptrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sptrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* ap,
const fortran_int_t* ipiv, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sycon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sycon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sycon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,9 +55,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sycon( const UpLo uplo, const fortran_int_t n,
- const float* a, const fortran_int_t lda, const fortran_int_t* ipiv,
- const float anorm, float& rcond, float* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t sycon( const UpLo, const fortran_int_t n, const float* a,
+ const fortran_int_t lda, const fortran_int_t* ipiv, const float anorm,
+ float& rcond, float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_SSYCON( &lapack_option< UpLo >::value, &n, a, &lda, ipiv, &anorm,
&rcond, work, iwork, &info );
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sycon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sycon( const UpLo, const fortran_int_t n,
const double* a, const fortran_int_t lda, const fortran_int_t* ipiv,
const double anorm, double& rcond, double* work,
fortran_int_t* iwork ) {
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sycon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sycon( const UpLo, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, const float anorm, float& rcond,
std::complex<float>* work ) {
@@ -102,7 +102,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sycon( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sycon( const UpLo, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, const double anorm, double& rcond,
std::complex<double>* work ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sygst.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sygst.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sygst.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sygst( const fortran_int_t itype, const UpLo uplo,
+inline std::ptrdiff_t sygst( const fortran_int_t itype, const UpLo,
const fortran_int_t n, float* a, const fortran_int_t lda,
const float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sygst( const fortran_int_t itype, const UpLo uplo,
+inline std::ptrdiff_t sygst( const fortran_int_t itype, const UpLo,
const fortran_int_t n, double* a, const fortran_int_t lda,
const double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/syrfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/syrfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/syrfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t syrfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const float* af, const fortran_int_t ldaf, const fortran_int_t* ipiv,
const float* b, const fortran_int_t ldb, float* x,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t syrfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const double* af, const fortran_int_t ldaf, const fortran_int_t* ipiv,
const double* b, const fortran_int_t ldb, double* x,
@@ -91,7 +91,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t syrfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const std::complex<float>* af,
const fortran_int_t ldaf, const fortran_int_t* ipiv,
@@ -110,7 +110,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syrfs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t syrfs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* af,
const fortran_int_t ldaf, const fortran_int_t* ipiv,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrd( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t sytrd( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, float* d, float* e, float* tau, float* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -68,7 +68,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrd( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t sytrd( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, double* d, double* e, double* tau,
double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrf.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrf.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrf.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrf( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t sytrf( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, fortran_int_t* ipiv, float* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrf( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t sytrf( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, fortran_int_t* ipiv, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytrf( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda, fortran_int_t* ipiv,
std::complex<float>* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -101,7 +101,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrf( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytrf( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda, fortran_int_t* ipiv,
std::complex<double>* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytri( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t sytri( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, const fortran_int_t* ipiv, float* work ) {
fortran_int_t info(0);
LAPACK_SSYTRI( &lapack_option< UpLo >::value, &n, a, &lda, ipiv, work,
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytri( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t sytri( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, const fortran_int_t* ipiv, double* work ) {
fortran_int_t info(0);
LAPACK_DSYTRI( &lapack_option< UpLo >::value, &n, a, &lda, ipiv, work,
@@ -83,7 +83,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytri( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, std::complex<float>* work ) {
fortran_int_t info(0);
@@ -98,7 +98,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytri( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytri( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda,
const fortran_int_t* ipiv, std::complex<double>* work ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/sytrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const float* a, const fortran_int_t lda,
const fortran_int_t* ipiv, float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const double* a, const fortran_int_t lda,
const fortran_int_t* ipiv, double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<float>* a,
const fortran_int_t lda, const fortran_int_t* ipiv,
std::complex<float>* b, const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sytrs( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sytrs( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, const std::complex<double>* a,
const fortran_int_t lda, const fortran_int_t* ipiv,
std::complex<double>* b, const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
// * float value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tbcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tbcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const fortran_int_t kd, const float* ab,
const fortran_int_t ldab, float& rcond, float* work,
fortran_int_t* iwork ) {
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tbcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tbcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const fortran_int_t kd, const double* ab,
const fortran_int_t ldab, double& rcond, double* work,
fortran_int_t* iwork ) {
@@ -89,7 +89,7 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tbcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tbcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const fortran_int_t kd,
const std::complex<float>* ab, const fortran_int_t ldab, float& rcond,
std::complex<float>* work, float* rwork ) {
@@ -105,7 +105,7 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tbcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tbcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const fortran_int_t kd,
const std::complex<double>* ab, const fortran_int_t ldab,
double& rcond, std::complex<double>* work, double* rwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbrfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbrfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbrfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -59,8 +59,8 @@
// * float value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const float* ab, const fortran_int_t ldab,
const float* b, const fortran_int_t ldb, const float* x,
const fortran_int_t ldx, float* ferr, float* berr, float* work,
@@ -78,8 +78,8 @@
// * double value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const double* ab, const fortran_int_t ldab,
const double* b, const fortran_int_t ldb, const double* x,
const fortran_int_t ldx, double* ferr, double* berr, double* work,
@@ -97,8 +97,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const std::complex<float>* ab,
const fortran_int_t ldab, const std::complex<float>* b,
const fortran_int_t ldb, const std::complex<float>* x,
@@ -117,8 +117,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const std::complex<double>* ab,
const fortran_int_t ldab, const std::complex<double>* b,
const fortran_int_t ldb, const std::complex<double>* x,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbtrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbtrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tbtrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,8 +53,8 @@
// * float value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const float* ab, const fortran_int_t ldab,
float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -70,8 +70,8 @@
// * double value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const double* ab, const fortran_int_t ldab,
double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -87,8 +87,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const std::complex<float>* ab,
const fortran_int_t ldab, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -105,8 +105,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tbtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t tbtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, const std::complex<double>* ab,
const fortran_int_t ldab, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tftri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tftri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tftri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,8 +52,8 @@
// * float value-type.
//
template< typename TransR, typename UpLo, typename Diag >
-inline std::ptrdiff_t tftri( const TransR transr, const UpLo uplo,
- const Diag diag, const fortran_int_t n, float* a ) {
+inline std::ptrdiff_t tftri( const TransR, const UpLo, const Diag,
+ const fortran_int_t n, float* a ) {
fortran_int_t info(0);
LAPACK_STFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &lapack_option< Diag >::value, &n, a, &info );
@@ -66,8 +66,8 @@
// * double value-type.
//
template< typename TransR, typename UpLo, typename Diag >
-inline std::ptrdiff_t tftri( const TransR transr, const UpLo uplo,
- const Diag diag, const fortran_int_t n, double* a ) {
+inline std::ptrdiff_t tftri( const TransR, const UpLo, const Diag,
+ const fortran_int_t n, double* a ) {
fortran_int_t info(0);
LAPACK_DTFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &lapack_option< Diag >::value, &n, a, &info );
@@ -80,8 +80,8 @@
// * complex<float> value-type.
//
template< typename TransR, typename UpLo, typename Diag >
-inline std::ptrdiff_t tftri( const TransR transr, const UpLo uplo,
- const Diag diag, const fortran_int_t n, std::complex<float>* a ) {
+inline std::ptrdiff_t tftri( const TransR, const UpLo, const Diag,
+ const fortran_int_t n, std::complex<float>* a ) {
fortran_int_t info(0);
LAPACK_CTFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &lapack_option< Diag >::value, &n, a, &info );
@@ -94,8 +94,8 @@
// * complex<double> value-type.
//
template< typename TransR, typename UpLo, typename Diag >
-inline std::ptrdiff_t tftri( const TransR transr, const UpLo uplo,
- const Diag diag, const fortran_int_t n, std::complex<double>* a ) {
+inline std::ptrdiff_t tftri( const TransR, const UpLo, const Diag,
+ const fortran_int_t n, std::complex<double>* a ) {
fortran_int_t info(0);
LAPACK_ZTFTRI( &lapack_option< TransR >::value, &lapack_option<
UpLo >::value, &lapack_option< Diag >::value, &n, a, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgevc.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgevc.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgevc.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t tgevc( const Side side, const char howmny,
+inline std::ptrdiff_t tgevc( const Side, const char howmny,
const fortran_bool_t* select, const fortran_int_t n, const float* s,
const fortran_int_t lds, const float* p, const fortran_int_t ldp,
float* vl, const fortran_int_t ldvl, float* vr,
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t tgevc( const Side side, const char howmny,
+inline std::ptrdiff_t tgevc( const Side, const char howmny,
const fortran_bool_t* select, const fortran_int_t n, const double* s,
const fortran_int_t lds, const double* p, const fortran_int_t ldp,
double* vl, const fortran_int_t ldvl, double* vr,
@@ -90,7 +90,7 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t tgevc( const Side side, const char howmny,
+inline std::ptrdiff_t tgevc( const Side, const char howmny,
const fortran_bool_t* select, const fortran_int_t n,
const std::complex<float>* s, const fortran_int_t lds,
const std::complex<float>* p, const fortran_int_t ldp,
@@ -110,7 +110,7 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t tgevc( const Side side, const char howmny,
+inline std::ptrdiff_t tgevc( const Side, const char howmny,
const fortran_bool_t* select, const fortran_int_t n,
const std::complex<double>* s, const fortran_int_t lds,
const std::complex<double>* p, const fortran_int_t ldp,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgsyl.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgsyl.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tgsyl.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t tgsyl( const Trans trans, const fortran_int_t ijob,
+inline std::ptrdiff_t tgsyl( const Trans, const fortran_int_t ijob,
const fortran_int_t m, const fortran_int_t n, const float* a,
const fortran_int_t lda, const float* b, const fortran_int_t ldb,
float* c, const fortran_int_t ldc, const float* d,
@@ -77,7 +77,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t tgsyl( const Trans trans, const fortran_int_t ijob,
+inline std::ptrdiff_t tgsyl( const Trans, const fortran_int_t ijob,
const fortran_int_t m, const fortran_int_t n, const double* a,
const fortran_int_t lda, const double* b, const fortran_int_t ldb,
double* c, const fortran_int_t ldc, const double* d,
@@ -97,7 +97,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t tgsyl( const Trans trans, const fortran_int_t ijob,
+inline std::ptrdiff_t tgsyl( const Trans, const fortran_int_t ijob,
const fortran_int_t m, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* b, const fortran_int_t ldb,
@@ -120,7 +120,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t tgsyl( const Trans trans, const fortran_int_t ijob,
+inline std::ptrdiff_t tgsyl( const Trans, const fortran_int_t ijob,
const fortran_int_t m, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* b, const fortran_int_t ldb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tpcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tpcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tpcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tpcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tpcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const float* ap, float& rcond, float* work,
fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -70,7 +70,7 @@
// * double value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tpcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tpcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const double* ap, double& rcond, double* work,
fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -85,7 +85,7 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tpcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tpcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const std::complex<float>* ap, float& rcond,
std::complex<float>* work, float* rwork ) {
fortran_int_t info(0);
@@ -100,7 +100,7 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tpcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t tpcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const std::complex<double>* ap, double& rcond,
std::complex<double>* work, double* rwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tprfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tprfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tprfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -58,11 +58,11 @@
// * float value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tprfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const float* ap, const float* b, const fortran_int_t ldb,
- const float* x, const fortran_int_t ldx, float* ferr, float* berr,
- float* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t tprfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const float* ap,
+ const float* b, const fortran_int_t ldb, const float* x,
+ const fortran_int_t ldx, float* ferr, float* berr, float* work,
+ fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_STPRFS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, ap, b,
@@ -76,11 +76,11 @@
// * double value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tprfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const double* ap, const double* b, const fortran_int_t ldb,
- const double* x, const fortran_int_t ldx, double* ferr, double* berr,
- double* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t tprfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const double* ap,
+ const double* b, const fortran_int_t ldb, const double* x,
+ const fortran_int_t ldx, double* ferr, double* berr, double* work,
+ fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_DTPRFS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, ap, b,
@@ -94,8 +94,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tprfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t tprfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* ap, const std::complex<float>* b,
const fortran_int_t ldb, const std::complex<float>* x,
const fortran_int_t ldx, float* ferr, float* berr,
@@ -113,8 +113,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tprfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t tprfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* ap, const std::complex<double>* b,
const fortran_int_t ldb, const std::complex<double>* x,
const fortran_int_t ldx, double* ferr, double* berr,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,8 +50,8 @@
// * float value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tptri( const UpLo uplo, const Diag diag,
- const fortran_int_t n, float* ap ) {
+inline std::ptrdiff_t tptri( const UpLo, const Diag, const fortran_int_t n,
+ float* ap ) {
fortran_int_t info(0);
LAPACK_STPTRI( &lapack_option< UpLo >::value, &lapack_option<
Diag >::value, &n, ap, &info );
@@ -64,8 +64,8 @@
// * double value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tptri( const UpLo uplo, const Diag diag,
- const fortran_int_t n, double* ap ) {
+inline std::ptrdiff_t tptri( const UpLo, const Diag, const fortran_int_t n,
+ double* ap ) {
fortran_int_t info(0);
LAPACK_DTPTRI( &lapack_option< UpLo >::value, &lapack_option<
Diag >::value, &n, ap, &info );
@@ -78,8 +78,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tptri( const UpLo uplo, const Diag diag,
- const fortran_int_t n, std::complex<float>* ap ) {
+inline std::ptrdiff_t tptri( const UpLo, const Diag, const fortran_int_t n,
+ std::complex<float>* ap ) {
fortran_int_t info(0);
LAPACK_CTPTRI( &lapack_option< UpLo >::value, &lapack_option<
Diag >::value, &n, ap, &info );
@@ -92,8 +92,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t tptri( const UpLo uplo, const Diag diag,
- const fortran_int_t n, std::complex<double>* ap ) {
+inline std::ptrdiff_t tptri( const UpLo, const Diag, const fortran_int_t n,
+ std::complex<double>* ap ) {
fortran_int_t info(0);
LAPACK_ZTPTRI( &lapack_option< UpLo >::value, &lapack_option<
Diag >::value, &n, ap, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/tptrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,9 +52,9 @@
// * float value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tptrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const float* ap, float* b, const fortran_int_t ldb ) {
+inline std::ptrdiff_t tptrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const float* ap,
+ float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_STPTRS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, ap, b,
@@ -68,9 +68,9 @@
// * double value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tptrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const double* ap, double* b, const fortran_int_t ldb ) {
+inline std::ptrdiff_t tptrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const double* ap,
+ double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_DTPTRS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, ap, b,
@@ -84,8 +84,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tptrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t tptrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* ap, std::complex<float>* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -101,8 +101,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t tptrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t tptrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* ap, std::complex<double>* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trcon.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trcon.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trcon.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t trcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const float* a, const fortran_int_t lda,
float& rcond, float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t trcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const double* a, const fortran_int_t lda,
double& rcond, double* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t trcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const std::complex<float>* a,
const fortran_int_t lda, float& rcond, std::complex<float>* work,
float* rwork ) {
@@ -102,7 +102,7 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Diag >
-inline std::ptrdiff_t trcon( const char norm, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trcon( const char norm, const UpLo, const Diag,
const fortran_int_t n, const std::complex<double>* a,
const fortran_int_t lda, double& rcond, std::complex<double>* work,
double* rwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trevc.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trevc.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trevc.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename Side >
-inline std::ptrdiff_t trevc( const Side side, const char howmny,
+inline std::ptrdiff_t trevc( const Side, const char howmny,
fortran_bool_t* select, const fortran_int_t n, const float* t,
const fortran_int_t ldt, float* vl, const fortran_int_t ldvl,
float* vr, const fortran_int_t ldvr, const fortran_int_t mm,
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename Side >
-inline std::ptrdiff_t trevc( const Side side, const char howmny,
+inline std::ptrdiff_t trevc( const Side, const char howmny,
fortran_bool_t* select, const fortran_int_t n, const double* t,
const fortran_int_t ldt, double* vl, const fortran_int_t ldvl,
double* vr, const fortran_int_t ldvr, const fortran_int_t mm,
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename Side >
-inline std::ptrdiff_t trevc( const Side side, const char howmny,
+inline std::ptrdiff_t trevc( const Side, const char howmny,
const fortran_bool_t* select, const fortran_int_t n,
std::complex<float>* t, const fortran_int_t ldt,
std::complex<float>* vl, const fortran_int_t ldvl,
@@ -107,7 +107,7 @@
// * complex<double> value-type.
//
template< typename Side >
-inline std::ptrdiff_t trevc( const Side side, const char howmny,
+inline std::ptrdiff_t trevc( const Side, const char howmny,
const fortran_bool_t* select, const fortran_int_t n,
std::complex<double>* t, const fortran_int_t ldt,
std::complex<double>* vl, const fortran_int_t ldvl,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trrfs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trrfs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trrfs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -58,11 +58,11 @@
// * float value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const float* a, const fortran_int_t lda, const float* b,
- const fortran_int_t ldb, const float* x, const fortran_int_t ldx,
- float* ferr, float* berr, float* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t trrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const float* a,
+ const fortran_int_t lda, const float* b, const fortran_int_t ldb,
+ const float* x, const fortran_int_t ldx, float* ferr, float* berr,
+ float* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_STRRFS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, a, &lda,
@@ -76,11 +76,11 @@
// * double value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const double* a, const fortran_int_t lda, const double* b,
- const fortran_int_t ldb, const double* x, const fortran_int_t ldx,
- double* ferr, double* berr, double* work, fortran_int_t* iwork ) {
+inline std::ptrdiff_t trrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const double* a,
+ const fortran_int_t lda, const double* b, const fortran_int_t ldb,
+ const double* x, const fortran_int_t ldx, double* ferr, double* berr,
+ double* work, fortran_int_t* iwork ) {
fortran_int_t info(0);
LAPACK_DTRRFS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, a, &lda,
@@ -94,8 +94,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t trrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* b, const fortran_int_t ldb,
const std::complex<float>* x, const fortran_int_t ldx, float* ferr,
@@ -113,8 +113,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trrfs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t trrfs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* b, const fortran_int_t ldb,
const std::complex<double>* x, const fortran_int_t ldx, double* ferr,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtri.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtri.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtri.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -60,8 +60,8 @@
// * float value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
- const int n, float* a, const int lda ) {
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag, const int n,
+ float* a, const int lda ) {
return clapack_strtri( clapack_option< Order >::value, clapack_option<
UpLo >::value, clapack_option< Diag >::value, n, a, lda );
}
@@ -72,8 +72,8 @@
// * double value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
- const int n, double* a, const int lda ) {
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag, const int n,
+ double* a, const int lda ) {
return clapack_dtrtri( clapack_option< Order >::value, clapack_option<
UpLo >::value, clapack_option< Diag >::value, n, a, lda );
}
@@ -84,8 +84,8 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
- const int n, std::complex<float>* a, const int lda ) {
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag, const int n,
+ std::complex<float>* a, const int lda ) {
return clapack_ctrtri( clapack_option< Order >::value, clapack_option<
UpLo >::value, clapack_option< Diag >::value, n, a, lda );
}
@@ -96,8 +96,8 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
- const int n, std::complex<double>* a, const int lda ) {
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag, const int n,
+ std::complex<double>* a, const int lda ) {
return clapack_ztrtri( clapack_option< Order >::value, clapack_option<
UpLo >::value, clapack_option< Diag >::value, n, a, lda );
}
@@ -109,7 +109,7 @@
// * float value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag,
const fortran_int_t n, float* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -124,7 +124,7 @@
// * double value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag,
const fortran_int_t n, double* a, const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
fortran_int_t info(0);
@@ -139,7 +139,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag,
const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -155,7 +155,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo, typename Diag >
-inline std::ptrdiff_t trtri( Order, const UpLo uplo, const Diag diag,
+inline std::ptrdiff_t trtri( Order, const UpLo, const Diag,
const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtrs.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtrs.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/trtrs.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,10 +52,9 @@
// * float value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const float* a, const fortran_int_t lda, float* b,
- const fortran_int_t ldb ) {
+inline std::ptrdiff_t trtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const float* a,
+ const fortran_int_t lda, float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_STRTRS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, a, &lda,
@@ -69,10 +68,9 @@
// * double value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
- const double* a, const fortran_int_t lda, double* b,
- const fortran_int_t ldb ) {
+inline std::ptrdiff_t trtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs, const double* a,
+ const fortran_int_t lda, double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
LAPACK_DTRTRS( &lapack_option< UpLo >::value, &lapack_option<
Trans >::value, &lapack_option< Diag >::value, &n, &nrhs, a, &lda,
@@ -86,8 +84,8 @@
// * complex<float> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t trtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -103,8 +101,8 @@
// * complex<double> value-type.
//
template< typename UpLo, typename Trans, typename Diag >
-inline std::ptrdiff_t trtrs( const UpLo uplo, const Trans trans,
- const Diag diag, const fortran_int_t n, const fortran_int_t nrhs,
+inline std::ptrdiff_t trtrs( const UpLo, const Trans, const Diag,
+ const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ungtr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ungtr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/ungtr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ungtr( const UpLo uplo, const fortran_int_t n, float* a,
+inline std::ptrdiff_t ungtr( const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, const float* tau, float* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ungtr( const UpLo uplo, const fortran_int_t n, double* a,
+inline std::ptrdiff_t ungtr( const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, const double* tau, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
@@ -86,7 +86,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ungtr( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ungtr( const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* tau, std::complex<float>* work,
const fortran_int_t lwork ) {
@@ -102,7 +102,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ungtr( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ungtr( const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* tau, std::complex<double>* work,
const fortran_int_t lwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmbr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmbr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmbr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,11 +57,10 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmbr( const char vect, const Side side,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const fortran_int_t k, const float* a, const fortran_int_t lda,
- const float* tau, float* c, const fortran_int_t ldc, float* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmbr( const char vect, const Side, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+ const float* a, const fortran_int_t lda, const float* tau, float* c,
+ const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMBR( &vect, &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -75,10 +74,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmbr( const char vect, const Side side,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const fortran_int_t k, const double* a, const fortran_int_t lda,
- const double* tau, double* c, const fortran_int_t ldc, double* work,
+inline std::ptrdiff_t unmbr( const char vect, const Side, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+ const double* a, const fortran_int_t lda, const double* tau,
+ double* c, const fortran_int_t ldc, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMBR( &vect, &lapack_option< Side >::value, &lapack_option<
@@ -93,12 +92,12 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmbr( const char vect, const Side side,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const fortran_int_t k, const std::complex<float>* a,
- const fortran_int_t lda, const std::complex<float>* tau,
- std::complex<float>* c, const fortran_int_t ldc,
- std::complex<float>* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmbr( const char vect, const Side, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+ const std::complex<float>* a, const fortran_int_t lda,
+ const std::complex<float>* tau, std::complex<float>* c,
+ const fortran_int_t ldc, std::complex<float>* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_CUNMBR( &vect, &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -112,12 +111,12 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmbr( const char vect, const Side side,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const fortran_int_t k, const std::complex<double>* a,
- const fortran_int_t lda, const std::complex<double>* tau,
- std::complex<double>* c, const fortran_int_t ldc,
- std::complex<double>* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmbr( const char vect, const Side, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+ const std::complex<double>* a, const fortran_int_t lda,
+ const std::complex<double>* tau, std::complex<double>* c,
+ const fortran_int_t ldc, std::complex<double>* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_ZUNMBR( &vect, &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -238,8 +237,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -348,8 +347,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmhr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmhr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmhr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,8 +57,8 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmhr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t ilo,
+inline std::ptrdiff_t unmhr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t ilo,
const fortran_int_t ihi, const float* a, const fortran_int_t lda,
const float* tau, float* c, const fortran_int_t ldc, float* work,
const fortran_int_t lwork ) {
@@ -75,8 +75,8 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmhr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t ilo,
+inline std::ptrdiff_t unmhr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t ilo,
const fortran_int_t ihi, const double* a, const fortran_int_t lda,
const double* tau, double* c, const fortran_int_t ldc, double* work,
const fortran_int_t lwork ) {
@@ -93,8 +93,8 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmhr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t ilo,
+inline std::ptrdiff_t unmhr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t ilo,
const fortran_int_t ihi, const std::complex<float>* a,
const fortran_int_t lda, const std::complex<float>* tau,
std::complex<float>* c, const fortran_int_t ldc,
@@ -112,8 +112,8 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmhr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t ilo,
+inline std::ptrdiff_t unmhr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t ilo,
const fortran_int_t ihi, const std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* tau,
std::complex<double>* c, const fortran_int_t ldc,
@@ -236,8 +236,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -345,8 +345,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmlq.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmlq.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmlq.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,9 +57,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmlq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t unmlq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMLQ( &lapack_option< Side >::value, &lapack_option<
@@ -74,11 +74,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmlq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmlq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMLQ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -92,8 +91,8 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmlq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmlq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* tau, std::complex<float>* c,
const fortran_int_t ldc, std::complex<float>* work,
@@ -111,8 +110,8 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmlq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmlq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* tau, std::complex<double>* c,
const fortran_int_t ldc, std::complex<double>* work,
@@ -236,8 +235,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -347,8 +346,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmql.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmql.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmql.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,9 +57,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmql( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t unmql( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMQL( &lapack_option< Side >::value, &lapack_option<
@@ -74,9 +74,9 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmql( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- double* a, const fortran_int_t lda, const double* tau, double* c,
+inline std::ptrdiff_t unmql( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, double* a,
+ const fortran_int_t lda, const double* tau, double* c,
const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMQL( &lapack_option< Side >::value, &lapack_option<
@@ -91,8 +91,8 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmql( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmql( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* tau, std::complex<float>* c,
const fortran_int_t ldc, std::complex<float>* work,
@@ -110,8 +110,8 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmql( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmql( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* tau, std::complex<double>* c,
const fortran_int_t ldc, std::complex<double>* work,
@@ -234,8 +234,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -343,8 +343,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmqr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmqr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmqr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,9 +57,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmqr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t unmqr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMQR( &lapack_option< Side >::value, &lapack_option<
@@ -74,11 +74,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmqr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmqr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMQR( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -92,8 +91,8 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmqr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmqr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* tau, std::complex<float>* c,
const fortran_int_t ldc, std::complex<float>* work,
@@ -111,8 +110,8 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmqr( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmqr( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* tau, std::complex<double>* c,
const fortran_int_t ldc, std::complex<double>* work,
@@ -234,8 +233,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -342,8 +341,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrq.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrq.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrq.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,9 +57,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t unmrq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMRQ( &lapack_option< Side >::value, &lapack_option<
@@ -74,11 +74,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmrq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMRQ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, a, &lda, tau, c, &ldc, work, &lwork,
@@ -92,8 +91,8 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmrq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* tau, std::complex<float>* c,
const fortran_int_t ldc, std::complex<float>* work,
@@ -111,8 +110,8 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrq( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
+inline std::ptrdiff_t unmrq( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* tau, std::complex<double>* c,
const fortran_int_t ldc, std::complex<double>* work,
@@ -236,8 +235,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -347,8 +346,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrz.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrz.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmrz.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,11 +57,10 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrz( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const fortran_int_t l, const float* a, const fortran_int_t lda,
- const float* tau, float* c, const fortran_int_t ldc, float* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmrz( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const fortran_int_t l,
+ const float* a, const fortran_int_t lda, const float* tau, float* c,
+ const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMRZ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, &l, a, &lda, tau, c, &ldc, work,
@@ -75,10 +74,10 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrz( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const fortran_int_t l, const double* a, const fortran_int_t lda,
- const double* tau, double* c, const fortran_int_t ldc, double* work,
+inline std::ptrdiff_t unmrz( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const fortran_int_t l,
+ const double* a, const fortran_int_t lda, const double* tau,
+ double* c, const fortran_int_t ldc, double* work,
const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMRZ( &lapack_option< Side >::value, &lapack_option<
@@ -93,12 +92,12 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrz( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const fortran_int_t l, const std::complex<float>* a,
- const fortran_int_t lda, const std::complex<float>* tau,
- std::complex<float>* c, const fortran_int_t ldc,
- std::complex<float>* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmrz( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const fortran_int_t l,
+ const std::complex<float>* a, const fortran_int_t lda,
+ const std::complex<float>* tau, std::complex<float>* c,
+ const fortran_int_t ldc, std::complex<float>* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_CUNMRZ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, &l, a, &lda, tau, c, &ldc, work,
@@ -112,12 +111,12 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t unmrz( const Side side, const Trans trans,
- const fortran_int_t m, const fortran_int_t n, const fortran_int_t k,
- const fortran_int_t l, const std::complex<double>* a,
- const fortran_int_t lda, const std::complex<double>* tau,
- std::complex<double>* c, const fortran_int_t ldc,
- std::complex<double>* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmrz( const Side, const Trans, const fortran_int_t m,
+ const fortran_int_t n, const fortran_int_t k, const fortran_int_t l,
+ const std::complex<double>* a, const fortran_int_t lda,
+ const std::complex<double>* tau, std::complex<double>* c,
+ const fortran_int_t ldc, std::complex<double>* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_ZUNMRZ( &lapack_option< Side >::value, &lapack_option<
Trans >::value, &m, &n, &k, &l, a, &lda, tau, c, &ldc, work,
@@ -239,8 +238,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -351,8 +350,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmtr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmtr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/unmtr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -58,9 +58,9 @@
// * float value-type.
//
template< typename Side, typename UpLo, typename Trans >
-inline std::ptrdiff_t unmtr( const Side side, const UpLo uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const float* a, const fortran_int_t lda, const float* tau, float* c,
+inline std::ptrdiff_t unmtr( const Side, const UpLo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const float* a,
+ const fortran_int_t lda, const float* tau, float* c,
const fortran_int_t ldc, float* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SORMTR( &lapack_option< Side >::value, &lapack_option<
@@ -75,11 +75,10 @@
// * double value-type.
//
template< typename Side, typename UpLo, typename Trans >
-inline std::ptrdiff_t unmtr( const Side side, const UpLo uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const double* a, const fortran_int_t lda, const double* tau,
- double* c, const fortran_int_t ldc, double* work,
- const fortran_int_t lwork ) {
+inline std::ptrdiff_t unmtr( const Side, const UpLo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const double* a,
+ const fortran_int_t lda, const double* tau, double* c,
+ const fortran_int_t ldc, double* work, const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DORMTR( &lapack_option< Side >::value, &lapack_option<
UpLo >::value, &lapack_option< Trans >::value, &m, &n, a, &lda,
@@ -93,8 +92,8 @@
// * complex<float> value-type.
//
template< typename Side, typename UpLo, typename Trans >
-inline std::ptrdiff_t unmtr( const Side side, const UpLo uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
+inline std::ptrdiff_t unmtr( const Side, const UpLo, const Trans,
+ const fortran_int_t m, const fortran_int_t n,
const std::complex<float>* a, const fortran_int_t lda,
const std::complex<float>* tau, std::complex<float>* c,
const fortran_int_t ldc, std::complex<float>* work,
@@ -112,8 +111,8 @@
// * complex<double> value-type.
//
template< typename Side, typename UpLo, typename Trans >
-inline std::ptrdiff_t unmtr( const Side side, const UpLo uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
+inline std::ptrdiff_t unmtr( const Side, const UpLo, const Trans,
+ const fortran_int_t m, const fortran_int_t n,
const std::complex<double>* a, const fortran_int_t lda,
const std::complex<double>* tau, std::complex<double>* c,
const fortran_int_t ldc, std::complex<double>* work,
@@ -236,8 +235,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -345,8 +344,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/upmtr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/upmtr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/computational/upmtr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,10 +56,9 @@
// * float value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t upmtr( const Side side, const char uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const float* ap, const float* tau, float* c, const fortran_int_t ldc,
- float* work ) {
+inline std::ptrdiff_t upmtr( const Side, const char uplo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const float* ap,
+ const float* tau, float* c, const fortran_int_t ldc, float* work ) {
fortran_int_t info(0);
LAPACK_SOPMTR( &lapack_option< Side >::value, &uplo, &lapack_option<
Trans >::value, &m, &n, ap, tau, c, &ldc, work, &info );
@@ -72,10 +71,9 @@
// * double value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t upmtr( const Side side, const char uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
- const double* ap, const double* tau, double* c,
- const fortran_int_t ldc, double* work ) {
+inline std::ptrdiff_t upmtr( const Side, const char uplo, const Trans,
+ const fortran_int_t m, const fortran_int_t n, const double* ap,
+ const double* tau, double* c, const fortran_int_t ldc, double* work ) {
fortran_int_t info(0);
LAPACK_DOPMTR( &lapack_option< Side >::value, &uplo, &lapack_option<
Trans >::value, &m, &n, ap, tau, c, &ldc, work, &info );
@@ -88,8 +86,8 @@
// * complex<float> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t upmtr( const Side side, const char uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
+inline std::ptrdiff_t upmtr( const Side, const char uplo, const Trans,
+ const fortran_int_t m, const fortran_int_t n,
const std::complex<float>* ap, const std::complex<float>* tau,
std::complex<float>* c, const fortran_int_t ldc,
std::complex<float>* work ) {
@@ -105,8 +103,8 @@
// * complex<double> value-type.
//
template< typename Side, typename Trans >
-inline std::ptrdiff_t upmtr( const Side side, const char uplo,
- const Trans trans, const fortran_int_t m, const fortran_int_t n,
+inline std::ptrdiff_t upmtr( const Side, const char uplo, const Trans,
+ const fortran_int_t m, const fortran_int_t n,
const std::complex<double>* ap, const std::complex<double>* tau,
std::complex<double>* c, const fortran_int_t ldc,
std::complex<double>* work ) {
@@ -216,8 +214,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
@@ -314,8 +312,8 @@
// workspace-array work.
//
template< typename Side >
- static std::ptrdiff_t min_size_work( const Side side,
- const std::ptrdiff_t m, const std::ptrdiff_t n ) {
+ static std::ptrdiff_t min_size_work( const Side, const std::ptrdiff_t m,
+ const std::ptrdiff_t n ) {
return std::max< std::ptrdiff_t >( 1, bindings::detail::if_left( side,
n, m ) );
}
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gbsvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gbsvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gbsvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gbsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, float* ab, const fortran_int_t ldab,
float* afb, const fortran_int_t ldafb, fortran_int_t* ipiv,
@@ -77,7 +77,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gbsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, double* ab, const fortran_int_t ldab,
double* afb, const fortran_int_t ldafb, fortran_int_t* ipiv,
@@ -97,7 +97,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gbsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, std::complex<float>* ab,
const fortran_int_t ldab, std::complex<float>* afb,
@@ -118,7 +118,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gbsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gbsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t kl, const fortran_int_t ku,
const fortran_int_t nrhs, std::complex<double>* ab,
const fortran_int_t ldab, std::complex<double>* afb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gels.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gels.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gels.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gels( const Trans trans, const fortran_int_t m,
+inline std::ptrdiff_t gels( const Trans, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t nrhs, float* a,
const fortran_int_t lda, float* b, const fortran_int_t ldb,
float* work, const fortran_int_t lwork ) {
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gels( const Trans trans, const fortran_int_t m,
+inline std::ptrdiff_t gels( const Trans, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t nrhs, double* a,
const fortran_int_t lda, double* b, const fortran_int_t ldb,
double* work, const fortran_int_t lwork ) {
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gels( const Trans trans, const fortran_int_t m,
+inline std::ptrdiff_t gels( const Trans, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* b, const fortran_int_t ldb,
@@ -105,7 +105,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gels( const Trans trans, const fortran_int_t m,
+inline std::ptrdiff_t gels( const Trans, const fortran_int_t m,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* b, const fortran_int_t ldb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gesvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gesvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gesvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gesvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gesvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs, float* a,
const fortran_int_t lda, float* af, const fortran_int_t ldaf,
fortran_int_t* ipiv, char& equed, float* r, float* c, float* b,
@@ -76,7 +76,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gesvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gesvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs, double* a,
const fortran_int_t lda, double* af, const fortran_int_t ldaf,
fortran_int_t* ipiv, char& equed, double* r, double* c, double* b,
@@ -96,7 +96,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gesvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gesvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* af, const fortran_int_t ldaf,
@@ -117,7 +117,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gesvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gesvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* af, const fortran_int_t ldaf,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gtsvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gtsvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/gtsvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gtsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs, const float* dl,
const float* d, const float* du, float* dlf, float* df, float* duf,
float* du2, fortran_int_t* ipiv, const float* b,
@@ -74,7 +74,7 @@
// * double value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gtsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs, const double* dl,
const double* d, const double* du, double* dlf, double* df,
double* duf, double* du2, fortran_int_t* ipiv, const double* b,
@@ -94,7 +94,7 @@
// * complex<float> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gtsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* dl, const std::complex<float>* d,
const std::complex<float>* du, std::complex<float>* dlf,
@@ -116,7 +116,7 @@
// * complex<double> value-type.
//
template< typename Trans >
-inline std::ptrdiff_t gtsvx( const char fact, const Trans trans,
+inline std::ptrdiff_t gtsvx( const char fact, const Trans,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* dl, const std::complex<double>* d,
const std::complex<double>* du, std::complex<double>* dlf,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbev.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbev.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbev.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,10 +56,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbev( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t kd, float* ab,
- const fortran_int_t ldab, float* w, float* z, const fortran_int_t ldz,
- float* work ) {
+inline std::ptrdiff_t hbev( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t kd, float* ab, const fortran_int_t ldab, float* w,
+ float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSBEV( &jobz, &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, w,
z, &ldz, work, &info );
@@ -72,10 +71,9 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbev( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t kd, double* ab,
- const fortran_int_t ldab, double* w, double* z,
- const fortran_int_t ldz, double* work ) {
+inline std::ptrdiff_t hbev( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t kd, double* ab, const fortran_int_t ldab,
+ double* w, double* z, const fortran_int_t ldz, double* work ) {
fortran_int_t info(0);
LAPACK_DSBEV( &jobz, &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, w,
z, &ldz, work, &info );
@@ -88,11 +86,10 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbev( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t kd,
- std::complex<float>* ab, const fortran_int_t ldab, float* w,
- std::complex<float>* z, const fortran_int_t ldz,
- std::complex<float>* work, float* rwork ) {
+inline std::ptrdiff_t hbev( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t kd, std::complex<float>* ab,
+ const fortran_int_t ldab, float* w, std::complex<float>* z,
+ const fortran_int_t ldz, std::complex<float>* work, float* rwork ) {
fortran_int_t info(0);
LAPACK_CHBEV( &jobz, &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, w,
z, &ldz, work, rwork, &info );
@@ -105,11 +102,10 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbev( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t kd,
- std::complex<double>* ab, const fortran_int_t ldab, double* w,
- std::complex<double>* z, const fortran_int_t ldz,
- std::complex<double>* work, double* rwork ) {
+inline std::ptrdiff_t hbev( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t kd, std::complex<double>* ab,
+ const fortran_int_t ldab, double* w, std::complex<double>* z,
+ const fortran_int_t ldz, std::complex<double>* work, double* rwork ) {
fortran_int_t info(0);
LAPACK_ZHBEV( &jobz, &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, w,
z, &ldz, work, rwork, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbevd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t kd, float* ab,
const fortran_int_t ldab, float* w, float* z, const fortran_int_t ldz,
float* work, const fortran_int_t lwork, fortran_int_t* iwork,
@@ -74,7 +74,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbevd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t kd, double* ab,
const fortran_int_t ldab, double* w, double* z,
const fortran_int_t ldz, double* work, const fortran_int_t lwork,
@@ -91,7 +91,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbevd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
std::complex<float>* ab, const fortran_int_t ldab, float* w,
std::complex<float>* z, const fortran_int_t ldz,
@@ -110,7 +110,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbevd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
std::complex<double>* ab, const fortran_int_t ldab, double* w,
std::complex<double>* z, const fortran_int_t ldz,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbevx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,13 +56,13 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t kd,
- float* ab, const fortran_int_t ldab, float* q,
- const fortran_int_t ldq, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- float* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t hbevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t kd, float* ab,
+ const fortran_int_t ldab, float* q, const fortran_int_t ldq,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, float* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSBEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &kd, ab,
&ldab, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, work,
@@ -76,13 +76,13 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t kd,
- double* ab, const fortran_int_t ldab, double* q,
- const fortran_int_t ldq, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- double* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t hbevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t kd, double* ab,
+ const fortran_int_t ldab, double* q, const fortran_int_t ldq,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, double* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSBEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &kd, ab,
&ldab, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, work,
@@ -96,8 +96,8 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t hbevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t kd,
std::complex<float>* ab, const fortran_int_t ldab,
std::complex<float>* q, const fortran_int_t ldq, const float vl,
const float vu, const fortran_int_t il, const fortran_int_t iu,
@@ -118,8 +118,8 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t kd,
+inline std::ptrdiff_t hbevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t kd,
std::complex<double>* ab, const fortran_int_t ldab,
std::complex<double>* q, const fortran_int_t ldq, const double vl,
const double vu, const fortran_int_t il, const fortran_int_t iu,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,11 +56,10 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgv( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
- float* ab, const fortran_int_t ldab, float* bb,
- const fortran_int_t ldbb, float* w, float* z, const fortran_int_t ldz,
- float* work ) {
+inline std::ptrdiff_t hbgv( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t ka, const fortran_int_t kb, float* ab,
+ const fortran_int_t ldab, float* bb, const fortran_int_t ldbb,
+ float* w, float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSBGV( &jobz, &lapack_option< UpLo >::value, &n, &ka, &kb, ab,
&ldab, bb, &ldbb, w, z, &ldz, work, &info );
@@ -73,11 +72,10 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgv( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
- double* ab, const fortran_int_t ldab, double* bb,
- const fortran_int_t ldbb, double* w, double* z,
- const fortran_int_t ldz, double* work ) {
+inline std::ptrdiff_t hbgv( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t ka, const fortran_int_t kb, double* ab,
+ const fortran_int_t ldab, double* bb, const fortran_int_t ldbb,
+ double* w, double* z, const fortran_int_t ldz, double* work ) {
fortran_int_t info(0);
LAPACK_DSBGV( &jobz, &lapack_option< UpLo >::value, &n, &ka, &kb, ab,
&ldab, bb, &ldbb, w, z, &ldz, work, &info );
@@ -90,8 +88,8 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgv( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+inline std::ptrdiff_t hbgv( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t ka, const fortran_int_t kb,
std::complex<float>* ab, const fortran_int_t ldab,
std::complex<float>* bb, const fortran_int_t ldbb, float* w,
std::complex<float>* z, const fortran_int_t ldz,
@@ -108,8 +106,8 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgv( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+inline std::ptrdiff_t hbgv( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t ka, const fortran_int_t kb,
std::complex<double>* ab, const fortran_int_t ldab,
std::complex<double>* bb, const fortran_int_t ldbb, double* w,
std::complex<double>* z, const fortran_int_t ldz,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbgvd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
float* ab, const fortran_int_t ldab, float* bb,
const fortran_int_t ldbb, float* w, float* z, const fortran_int_t ldz,
@@ -76,7 +76,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbgvd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
double* ab, const fortran_int_t ldab, double* bb,
const fortran_int_t ldbb, double* w, double* z,
@@ -95,7 +95,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbgvd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
std::complex<float>* ab, const fortran_int_t ldab,
std::complex<float>* bb, const fortran_int_t ldbb, float* w,
@@ -116,7 +116,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hbgvd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
std::complex<double>* ab, const fortran_int_t ldab,
std::complex<double>* bb, const fortran_int_t ldbb, double* w,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hbgvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,14 +56,14 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t ka,
- const fortran_int_t kb, float* ab, const fortran_int_t ldab,
- float* bb, const fortran_int_t ldbb, float* q,
- const fortran_int_t ldq, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- float* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t hbgvx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+ float* ab, const fortran_int_t ldab, float* bb,
+ const fortran_int_t ldbb, float* q, const fortran_int_t ldq,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, float* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSBGVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &ka, &kb,
ab, &ldab, bb, &ldbb, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w,
@@ -77,14 +77,14 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t ka,
- const fortran_int_t kb, double* ab, const fortran_int_t ldab,
- double* bb, const fortran_int_t ldbb, double* q,
- const fortran_int_t ldq, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- double* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t hbgvx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+ double* ab, const fortran_int_t ldab, double* bb,
+ const fortran_int_t ldbb, double* q, const fortran_int_t ldq,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, double* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSBGVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &ka, &kb,
ab, &ldab, bb, &ldbb, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w,
@@ -98,16 +98,16 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t ka,
- const fortran_int_t kb, std::complex<float>* ab,
- const fortran_int_t ldab, std::complex<float>* bb,
- const fortran_int_t ldbb, std::complex<float>* q,
- const fortran_int_t ldq, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, std::complex<float>* z,
- const fortran_int_t ldz, std::complex<float>* work, float* rwork,
- fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t hbgvx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+ std::complex<float>* ab, const fortran_int_t ldab,
+ std::complex<float>* bb, const fortran_int_t ldbb,
+ std::complex<float>* q, const fortran_int_t ldq, const float vl,
+ const float vu, const fortran_int_t il, const fortran_int_t iu,
+ const float abstol, fortran_int_t& m, float* w,
+ std::complex<float>* z, const fortran_int_t ldz,
+ std::complex<float>* work, float* rwork, fortran_int_t* iwork,
+ fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_CHBGVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &ka, &kb,
ab, &ldab, bb, &ldbb, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w,
@@ -121,16 +121,16 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hbgvx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t ka,
- const fortran_int_t kb, std::complex<double>* ab,
- const fortran_int_t ldab, std::complex<double>* bb,
- const fortran_int_t ldbb, std::complex<double>* q,
- const fortran_int_t ldq, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, std::complex<double>* z,
- const fortran_int_t ldz, std::complex<double>* work, double* rwork,
- fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t hbgvx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+ std::complex<double>* ab, const fortran_int_t ldab,
+ std::complex<double>* bb, const fortran_int_t ldbb,
+ std::complex<double>* q, const fortran_int_t ldq, const double vl,
+ const double vu, const fortran_int_t il, const fortran_int_t iu,
+ const double abstol, fortran_int_t& m, double* w,
+ std::complex<double>* z, const fortran_int_t ldz,
+ std::complex<double>* work, double* rwork, fortran_int_t* iwork,
+ fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_ZHBGVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &ka, &kb,
ab, &ldab, bb, &ldbb, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heev.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heev.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heev.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,9 +56,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heev( const char jobz, const UpLo uplo,
- const fortran_int_t n, float* a, const fortran_int_t lda, float* w,
- float* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t heev( const char jobz, const UpLo, const fortran_int_t n,
+ float* a, const fortran_int_t lda, float* w, float* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SSYEV( &jobz, &lapack_option< UpLo >::value, &n, a, &lda, w, work,
&lwork, &info );
@@ -71,9 +71,9 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heev( const char jobz, const UpLo uplo,
- const fortran_int_t n, double* a, const fortran_int_t lda, double* w,
- double* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t heev( const char jobz, const UpLo, const fortran_int_t n,
+ double* a, const fortran_int_t lda, double* w, double* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DSYEV( &jobz, &lapack_option< UpLo >::value, &n, a, &lda, w, work,
&lwork, &info );
@@ -86,10 +86,9 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heev( const char jobz, const UpLo uplo,
- const fortran_int_t n, std::complex<float>* a,
- const fortran_int_t lda, float* w, std::complex<float>* work,
- const fortran_int_t lwork, float* rwork ) {
+inline std::ptrdiff_t heev( const char jobz, const UpLo, const fortran_int_t n,
+ std::complex<float>* a, const fortran_int_t lda, float* w,
+ std::complex<float>* work, const fortran_int_t lwork, float* rwork ) {
fortran_int_t info(0);
LAPACK_CHEEV( &jobz, &lapack_option< UpLo >::value, &n, a, &lda, w, work,
&lwork, rwork, &info );
@@ -102,10 +101,10 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heev( const char jobz, const UpLo uplo,
- const fortran_int_t n, std::complex<double>* a,
- const fortran_int_t lda, double* w, std::complex<double>* work,
- const fortran_int_t lwork, double* rwork ) {
+inline std::ptrdiff_t heev( const char jobz, const UpLo, const fortran_int_t n,
+ std::complex<double>* a, const fortran_int_t lda, double* w,
+ std::complex<double>* work, const fortran_int_t lwork,
+ double* rwork ) {
fortran_int_t info(0);
LAPACK_ZHEEV( &jobz, &lapack_option< UpLo >::value, &n, a, &lda, w, work,
&lwork, rwork, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t heevd( const char jobz, const UpLo,
const fortran_int_t n, float* a, const fortran_int_t lda, float* w,
float* work, const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t heevd( const char jobz, const UpLo,
const fortran_int_t n, double* a, const fortran_int_t lda, double* w,
double* work, const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t heevd( const char jobz, const UpLo,
const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda, float* w, std::complex<float>* work,
const fortran_int_t lwork, float* rwork, const fortran_int_t lrwork,
@@ -105,7 +105,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t heevd( const char jobz, const UpLo,
const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda, double* w, std::complex<double>* work,
const fortran_int_t lwork, double* rwork, const fortran_int_t lrwork,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,13 +56,13 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevr( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- fortran_int_t* isuppz, float* work, const fortran_int_t lwork,
- fortran_int_t* iwork, const fortran_int_t liwork ) {
+inline std::ptrdiff_t heevr( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, float* a, const fortran_int_t lda,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, fortran_int_t* isuppz,
+ float* work, const fortran_int_t lwork, fortran_int_t* iwork,
+ const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_SSYEVR( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
&vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, isuppz, work, &lwork,
@@ -76,13 +76,13 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevr( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- fortran_int_t* isuppz, double* work, const fortran_int_t lwork,
- fortran_int_t* iwork, const fortran_int_t liwork ) {
+inline std::ptrdiff_t heevr( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, double* a, const fortran_int_t lda,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, fortran_int_t* isuppz,
+ double* work, const fortran_int_t lwork, fortran_int_t* iwork,
+ const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_DSYEVR( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
&vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, isuppz, work, &lwork,
@@ -96,8 +96,8 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevr( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* a,
+inline std::ptrdiff_t heevr( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda, const float vl, const float vu,
const fortran_int_t il, const fortran_int_t iu, const float abstol,
fortran_int_t& m, float* w, std::complex<float>* z,
@@ -118,8 +118,8 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevr( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* a,
+inline std::ptrdiff_t heevr( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda, const double vl, const double vu,
const fortran_int_t il, const fortran_int_t iu, const double abstol,
fortran_int_t& m, double* w, std::complex<double>* z,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/heevx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,12 +56,12 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- float* work, const fortran_int_t lwork, fortran_int_t* iwork,
+inline std::ptrdiff_t heevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, float* a, const fortran_int_t lda,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, float* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSYEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
@@ -76,12 +76,12 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- double* work, const fortran_int_t lwork, fortran_int_t* iwork,
+inline std::ptrdiff_t heevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, double* a, const fortran_int_t lda,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, double* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSYEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
@@ -96,8 +96,8 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* a,
+inline std::ptrdiff_t heevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda, const float vl, const float vu,
const fortran_int_t il, const fortran_int_t iu, const float abstol,
fortran_int_t& m, float* w, std::complex<float>* z,
@@ -117,8 +117,8 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t heevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* a,
+inline std::ptrdiff_t heevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda, const double vl, const double vu,
const fortran_int_t il, const fortran_int_t iu, const double abstol,
fortran_int_t& m, double* w, std::complex<double>* z,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,9 +57,9 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, float* b, const fortran_int_t ldb, float* w,
- float* work, const fortran_int_t lwork ) {
+ const UpLo, const fortran_int_t n, float* a, const fortran_int_t lda,
+ float* b, const fortran_int_t ldb, float* w, float* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SSYGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
b, &ldb, w, work, &lwork, &info );
@@ -73,9 +73,9 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, double* b, const fortran_int_t ldb,
- double* w, double* work, const fortran_int_t lwork ) {
+ const UpLo, const fortran_int_t n, double* a, const fortran_int_t lda,
+ double* b, const fortran_int_t ldb, double* w, double* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DSYGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
b, &ldb, w, work, &lwork, &info );
@@ -89,7 +89,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* a,
+ const UpLo, const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda, std::complex<float>* b,
const fortran_int_t ldb, float* w, std::complex<float>* work,
const fortran_int_t lwork, float* rwork ) {
@@ -106,7 +106,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* a,
+ const UpLo, const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda, std::complex<double>* b,
const fortran_int_t ldb, double* w, std::complex<double>* work,
const fortran_int_t lwork, double* rwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,9 +57,9 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, float* b, const fortran_int_t ldb, float* w,
- float* work, const fortran_int_t lwork, fortran_int_t* iwork,
+ const UpLo, const fortran_int_t n, float* a, const fortran_int_t lda,
+ float* b, const fortran_int_t ldb, float* w, float* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_SSYGVD( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
@@ -74,10 +74,10 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, double* b, const fortran_int_t ldb,
- double* w, double* work, const fortran_int_t lwork,
- fortran_int_t* iwork, const fortran_int_t liwork ) {
+ const UpLo, const fortran_int_t n, double* a, const fortran_int_t lda,
+ double* b, const fortran_int_t ldb, double* w, double* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
+ const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_DSYGVD( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
b, &ldb, w, work, &lwork, iwork, &liwork, &info );
@@ -91,7 +91,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* a,
+ const UpLo, const fortran_int_t n, std::complex<float>* a,
const fortran_int_t lda, std::complex<float>* b,
const fortran_int_t ldb, float* w, std::complex<float>* work,
const fortran_int_t lwork, float* rwork, const fortran_int_t lrwork,
@@ -109,7 +109,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* a,
+ const UpLo, const fortran_int_t n, std::complex<double>* a,
const fortran_int_t lda, std::complex<double>* b,
const fortran_int_t ldb, double* w, std::complex<double>* work,
const fortran_int_t lwork, double* rwork, const fortran_int_t lrwork,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hegvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,7 +57,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, float* a,
+ const char range, const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, float* b, const fortran_int_t ldb,
const float vl, const float vu, const fortran_int_t il,
const fortran_int_t iu, const float abstol, fortran_int_t& m,
@@ -78,7 +78,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, double* a,
+ const char range, const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, double* b, const fortran_int_t ldb,
const double vl, const double vu, const fortran_int_t il,
const fortran_int_t iu, const double abstol, fortran_int_t& m,
@@ -99,7 +99,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n,
+ const char range, const UpLo, const fortran_int_t n,
std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* b, const fortran_int_t ldb, const float vl,
const float vu, const fortran_int_t il, const fortran_int_t iu,
@@ -121,7 +121,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hegvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n,
+ const char range, const UpLo, const fortran_int_t n,
std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* b, const fortran_int_t ldb, const double vl,
const double vu, const fortran_int_t il, const fortran_int_t iu,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hesv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, float* a, const fortran_int_t lda,
fortran_int_t* ipiv, float* b, const fortran_int_t ldb, float* work,
const fortran_int_t lwork ) {
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hesv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* a, const fortran_int_t lda,
fortran_int_t* ipiv, double* b, const fortran_int_t ldb, double* work,
const fortran_int_t lwork ) {
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hesv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<float>* a,
const fortran_int_t lda, fortran_int_t* ipiv, std::complex<float>* b,
const fortran_int_t ldb, std::complex<float>* work,
@@ -105,7 +105,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hesv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* a,
const fortran_int_t lda, fortran_int_t* ipiv, std::complex<double>* b,
const fortran_int_t ldb, std::complex<double>* work,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hesvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hesvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const float* a,
const fortran_int_t lda, float* af, const fortran_int_t ldaf,
fortran_int_t* ipiv, const float* b, const fortran_int_t ldb,
@@ -76,7 +76,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hesvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const double* a,
const fortran_int_t lda, double* af, const fortran_int_t ldaf,
fortran_int_t* ipiv, const double* b, const fortran_int_t ldb,
@@ -96,7 +96,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hesvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* af, const fortran_int_t ldaf,
@@ -117,7 +117,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hesvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hesvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* af, const fortran_int_t ldaf,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpev.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpev.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpev.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,9 +55,8 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpev( const char jobz, const UpLo uplo,
- const fortran_int_t n, float* ap, float* w, float* z,
- const fortran_int_t ldz, float* work ) {
+inline std::ptrdiff_t hpev( const char jobz, const UpLo, const fortran_int_t n,
+ float* ap, float* w, float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSPEV( &jobz, &lapack_option< UpLo >::value, &n, ap, w, z, &ldz,
work, &info );
@@ -70,9 +69,9 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpev( const char jobz, const UpLo uplo,
- const fortran_int_t n, double* ap, double* w, double* z,
- const fortran_int_t ldz, double* work ) {
+inline std::ptrdiff_t hpev( const char jobz, const UpLo, const fortran_int_t n,
+ double* ap, double* w, double* z, const fortran_int_t ldz,
+ double* work ) {
fortran_int_t info(0);
LAPACK_DSPEV( &jobz, &lapack_option< UpLo >::value, &n, ap, w, z, &ldz,
work, &info );
@@ -85,10 +84,9 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpev( const char jobz, const UpLo uplo,
- const fortran_int_t n, std::complex<float>* ap, float* w,
- std::complex<float>* z, const fortran_int_t ldz,
- std::complex<float>* work, float* rwork ) {
+inline std::ptrdiff_t hpev( const char jobz, const UpLo, const fortran_int_t n,
+ std::complex<float>* ap, float* w, std::complex<float>* z,
+ const fortran_int_t ldz, std::complex<float>* work, float* rwork ) {
fortran_int_t info(0);
LAPACK_CHPEV( &jobz, &lapack_option< UpLo >::value, &n, ap, w, z, &ldz,
work, rwork, &info );
@@ -101,10 +99,9 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpev( const char jobz, const UpLo uplo,
- const fortran_int_t n, std::complex<double>* ap, double* w,
- std::complex<double>* z, const fortran_int_t ldz,
- std::complex<double>* work, double* rwork ) {
+inline std::ptrdiff_t hpev( const char jobz, const UpLo, const fortran_int_t n,
+ std::complex<double>* ap, double* w, std::complex<double>* z,
+ const fortran_int_t ldz, std::complex<double>* work, double* rwork ) {
fortran_int_t info(0);
LAPACK_ZHPEV( &jobz, &lapack_option< UpLo >::value, &n, ap, w, z, &ldz,
work, rwork, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hpevd( const char jobz, const UpLo,
const fortran_int_t n, float* ap, float* w, float* z,
const fortran_int_t ldz, float* work, const fortran_int_t lwork,
fortran_int_t* iwork, const fortran_int_t liwork ) {
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hpevd( const char jobz, const UpLo,
const fortran_int_t n, double* ap, double* w, double* z,
const fortran_int_t ldz, double* work, const fortran_int_t lwork,
fortran_int_t* iwork, const fortran_int_t liwork ) {
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hpevd( const char jobz, const UpLo,
const fortran_int_t n, std::complex<float>* ap, float* w,
std::complex<float>* z, const fortran_int_t ldz,
std::complex<float>* work, const fortran_int_t lwork, float* rwork,
@@ -106,7 +106,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t hpevd( const char jobz, const UpLo,
const fortran_int_t n, std::complex<double>* ap, double* w,
std::complex<double>* z, const fortran_int_t ldz,
std::complex<double>* work, const fortran_int_t lwork, double* rwork,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpevx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,12 +55,11 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, float* ap, const float vl,
- const float vu, const fortran_int_t il, const fortran_int_t iu,
- const float abstol, fortran_int_t& m, float* w, float* z,
- const fortran_int_t ldz, float* work, fortran_int_t* iwork,
- fortran_int_t* ifail ) {
+inline std::ptrdiff_t hpevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, float* ap, const float vl, const float vu,
+ const fortran_int_t il, const fortran_int_t iu, const float abstol,
+ fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
+ float* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSPEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, ap, &vl,
&vu, &il, &iu, &abstol, &m, w, z, &ldz, work, iwork, ifail,
@@ -74,12 +73,11 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, double* ap, const double vl,
- const double vu, const fortran_int_t il, const fortran_int_t iu,
- const double abstol, fortran_int_t& m, double* w, double* z,
- const fortran_int_t ldz, double* work, fortran_int_t* iwork,
- fortran_int_t* ifail ) {
+inline std::ptrdiff_t hpevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, double* ap, const double vl, const double vu,
+ const fortran_int_t il, const fortran_int_t iu, const double abstol,
+ fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
+ double* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSPEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, ap, &vl,
&vu, &il, &iu, &abstol, &m, w, z, &ldz, work, iwork, ifail,
@@ -93,11 +91,11 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* ap,
- const float vl, const float vu, const fortran_int_t il,
- const fortran_int_t iu, const float abstol, fortran_int_t& m,
- float* w, std::complex<float>* z, const fortran_int_t ldz,
+inline std::ptrdiff_t hpevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, std::complex<float>* ap, const float vl,
+ const float vu, const fortran_int_t il, const fortran_int_t iu,
+ const float abstol, fortran_int_t& m, float* w,
+ std::complex<float>* z, const fortran_int_t ldz,
std::complex<float>* work, float* rwork, fortran_int_t* iwork,
fortran_int_t* ifail ) {
fortran_int_t info(0);
@@ -113,11 +111,11 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* ap,
- const double vl, const double vu, const fortran_int_t il,
- const fortran_int_t iu, const double abstol, fortran_int_t& m,
- double* w, std::complex<double>* z, const fortran_int_t ldz,
+inline std::ptrdiff_t hpevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, std::complex<double>* ap, const double vl,
+ const double vu, const fortran_int_t il, const fortran_int_t iu,
+ const double abstol, fortran_int_t& m, double* w,
+ std::complex<double>* z, const fortran_int_t ldz,
std::complex<double>* work, double* rwork, fortran_int_t* iwork,
fortran_int_t* ifail ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,8 +56,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* ap, float* bp,
- float* w, float* z, const fortran_int_t ldz, float* work ) {
+ const UpLo, const fortran_int_t n, float* ap, float* bp, float* w,
+ float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSPGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, ap, bp, w,
z, &ldz, work, &info );
@@ -71,8 +71,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* ap, double* bp,
- double* w, double* z, const fortran_int_t ldz, double* work ) {
+ const UpLo, const fortran_int_t n, double* ap, double* bp, double* w,
+ double* z, const fortran_int_t ldz, double* work ) {
fortran_int_t info(0);
LAPACK_DSPGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, ap, bp, w,
z, &ldz, work, &info );
@@ -86,7 +86,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* ap,
+ const UpLo, const fortran_int_t n, std::complex<float>* ap,
std::complex<float>* bp, float* w, std::complex<float>* z,
const fortran_int_t ldz, std::complex<float>* work, float* rwork ) {
fortran_int_t info(0);
@@ -102,7 +102,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* ap,
+ const UpLo, const fortran_int_t n, std::complex<double>* ap,
std::complex<double>* bp, double* w, std::complex<double>* z,
const fortran_int_t ldz, std::complex<double>* work, double* rwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -57,8 +57,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* ap, float* bp,
- float* w, float* z, const fortran_int_t ldz, float* work,
+ const UpLo, const fortran_int_t n, float* ap, float* bp, float* w,
+ float* z, const fortran_int_t ldz, float* work,
const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
fortran_int_t info(0);
@@ -74,8 +74,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* ap, double* bp,
- double* w, double* z, const fortran_int_t ldz, double* work,
+ const UpLo, const fortran_int_t n, double* ap, double* bp, double* w,
+ double* z, const fortran_int_t ldz, double* work,
const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
fortran_int_t info(0);
@@ -91,7 +91,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<float>* ap,
+ const UpLo, const fortran_int_t n, std::complex<float>* ap,
std::complex<float>* bp, float* w, std::complex<float>* z,
const fortran_int_t ldz, std::complex<float>* work,
const fortran_int_t lwork, float* rwork, const fortran_int_t lrwork,
@@ -109,7 +109,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, std::complex<double>* ap,
+ const UpLo, const fortran_int_t n, std::complex<double>* ap,
std::complex<double>* bp, double* w, std::complex<double>* z,
const fortran_int_t ldz, std::complex<double>* work,
const fortran_int_t lwork, double* rwork, const fortran_int_t lrwork,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpgvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, float* ap,
+ const char range, const UpLo, const fortran_int_t n, float* ap,
float* bp, const float vl, const float vu, const fortran_int_t il,
const fortran_int_t iu, const float abstol, fortran_int_t& m,
float* w, float* z, const fortran_int_t ldz, float* work,
@@ -75,7 +75,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, double* ap,
+ const char range, const UpLo, const fortran_int_t n, double* ap,
double* bp, const double vl, const double vu, const fortran_int_t il,
const fortran_int_t iu, const double abstol, fortran_int_t& m,
double* w, double* z, const fortran_int_t ldz, double* work,
@@ -94,7 +94,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n,
+ const char range, const UpLo, const fortran_int_t n,
std::complex<float>* ap, std::complex<float>* bp, const float vl,
const float vu, const fortran_int_t il, const fortran_int_t iu,
const float abstol, fortran_int_t& m, float* w,
@@ -115,7 +115,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t hpgvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n,
+ const char range, const UpLo, const fortran_int_t n,
std::complex<double>* ap, std::complex<double>* bp, const double vl,
const double vu, const fortran_int_t il, const fortran_int_t iu,
const double abstol, fortran_int_t& m, double* w,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, float* ap, fortran_int_t* ipiv, float* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* ap, fortran_int_t* ipiv, double* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<float>* ap,
fortran_int_t* ipiv, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t hpsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* ap,
fortran_int_t* ipiv, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hpsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const float* ap,
float* afp, fortran_int_t* ipiv, const float* b,
const fortran_int_t ldb, float* x, const fortran_int_t ldx,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hpsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const double* ap,
double* afp, fortran_int_t* ipiv, const double* b,
const fortran_int_t ldb, double* x, const fortran_int_t ldx,
@@ -91,7 +91,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hpsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* ap, std::complex<float>* afp,
fortran_int_t* ipiv, const std::complex<float>* b,
@@ -110,7 +110,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t hpsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t hpsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* ap, std::complex<double>* afp,
fortran_int_t* ipiv, const std::complex<double>* b,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/iter_posv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/iter_posv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/iter_posv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t iter_posv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t iter_posv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* a, const fortran_int_t lda,
const double* b, const fortran_int_t ldb, double* x,
const fortran_int_t ldx, double* work, float* swork,
@@ -72,7 +72,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t iter_posv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t iter_posv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* a,
const fortran_int_t lda, const std::complex<double>* b,
const fortran_int_t ldb, std::complex<double>* x,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -51,7 +51,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbsv( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs, float* ab,
const fortran_int_t ldab, float* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -66,7 +66,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbsv( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs, double* ab,
const fortran_int_t ldab, double* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -81,7 +81,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbsv( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs,
std::complex<float>* ab, const fortran_int_t ldab,
std::complex<float>* b, const fortran_int_t ldb ) {
@@ -97,7 +97,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t pbsv( const UpLo, const fortran_int_t n,
const fortran_int_t kd, const fortran_int_t nrhs,
std::complex<double>* ab, const fortran_int_t ldab,
std::complex<double>* b, const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/pbsvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t pbsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, float* ab, const fortran_int_t ldab,
float* afb, const fortran_int_t ldafb, char& equed, float* s,
@@ -76,7 +76,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t pbsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, double* ab, const fortran_int_t ldab,
double* afb, const fortran_int_t ldafb, char& equed, double* s,
@@ -96,7 +96,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t pbsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, std::complex<float>* ab,
const fortran_int_t ldab, std::complex<float>* afb,
@@ -117,7 +117,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t pbsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t pbsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t kd,
const fortran_int_t nrhs, std::complex<double>* ab,
const fortran_int_t ldab, std::complex<double>* afb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -60,8 +60,8 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const int n,
- const int nrhs, float* a, const int lda, float* b, const int ldb ) {
+inline std::ptrdiff_t posv( Order, const UpLo, const int n, const int nrhs,
+ float* a, const int lda, float* b, const int ldb ) {
return clapack_sposv( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -72,8 +72,8 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const int n,
- const int nrhs, double* a, const int lda, double* b, const int ldb ) {
+inline std::ptrdiff_t posv( Order, const UpLo, const int n, const int nrhs,
+ double* a, const int lda, double* b, const int ldb ) {
return clapack_dposv( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -84,9 +84,9 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const int n,
- const int nrhs, std::complex<float>* a, const int lda,
- std::complex<float>* b, const int ldb ) {
+inline std::ptrdiff_t posv( Order, const UpLo, const int n, const int nrhs,
+ std::complex<float>* a, const int lda, std::complex<float>* b,
+ const int ldb ) {
return clapack_cposv( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -97,9 +97,9 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const int n,
- const int nrhs, std::complex<double>* a, const int lda,
- std::complex<double>* b, const int ldb ) {
+inline std::ptrdiff_t posv( Order, const UpLo, const int n, const int nrhs,
+ std::complex<double>* a, const int lda, std::complex<double>* b,
+ const int ldb ) {
return clapack_zposv( clapack_option< Order >::value, clapack_option<
UpLo >::value, n, nrhs, a, lda, b, ldb );
}
@@ -111,7 +111,7 @@
// * float value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t posv( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, float* a, const fortran_int_t lda, float* b,
const fortran_int_t ldb ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -127,7 +127,7 @@
// * double value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t posv( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* a, const fortran_int_t lda,
double* b, const fortran_int_t ldb ) {
BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
@@ -143,7 +143,7 @@
// * complex<float> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t posv( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<float>* a,
const fortran_int_t lda, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -160,7 +160,7 @@
// * complex<double> value-type.
//
template< typename Order, typename UpLo >
-inline std::ptrdiff_t posv( Order, const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t posv( Order, const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* a,
const fortran_int_t lda, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/posvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t posvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t posvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, float* a,
const fortran_int_t lda, float* af, const fortran_int_t ldaf,
char& equed, float* s, float* b, const fortran_int_t ldb, float* x,
@@ -74,7 +74,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t posvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t posvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, double* a,
const fortran_int_t lda, double* af, const fortran_int_t ldaf,
char& equed, double* s, double* b, const fortran_int_t ldb, double* x,
@@ -93,7 +93,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t posvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t posvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* af, const fortran_int_t ldaf, char& equed,
@@ -113,7 +113,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t posvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t posvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* af, const fortran_int_t ldaf, char& equed,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, float* ap, float* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* ap, double* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<float>* ap,
std::complex<float>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -95,7 +95,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t ppsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* ap,
std::complex<double>* b, const fortran_int_t ldb ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/ppsvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t ppsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, float* ap,
float* afp, char& equed, float* s, float* b, const fortran_int_t ldb,
float* x, const fortran_int_t ldx, float& rcond, float* ferr,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t ppsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, double* ap,
double* afp, char& equed, double* s, double* b,
const fortran_int_t ldb, double* x, const fortran_int_t ldx,
@@ -92,7 +92,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t ppsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<float>* ap, std::complex<float>* afp, char& equed,
float* s, std::complex<float>* b, const fortran_int_t ldb,
@@ -111,7 +111,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t ppsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t ppsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
std::complex<double>* ap, std::complex<double>* afp, char& equed,
double* s, std::complex<double>* b, const fortran_int_t ldb,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbev.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbev.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbev.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,10 +53,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbev( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t kd, float* ab,
- const fortran_int_t ldab, float* w, float* z, const fortran_int_t ldz,
- float* work ) {
+inline std::ptrdiff_t sbev( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t kd, float* ab, const fortran_int_t ldab, float* w,
+ float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSBEV( &jobz, &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, w,
z, &ldz, work, &info );
@@ -69,10 +68,9 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbev( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t kd, double* ab,
- const fortran_int_t ldab, double* w, double* z,
- const fortran_int_t ldz, double* work ) {
+inline std::ptrdiff_t sbev( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t kd, double* ab, const fortran_int_t ldab,
+ double* w, double* z, const fortran_int_t ldz, double* work ) {
fortran_int_t info(0);
LAPACK_DSBEV( &jobz, &lapack_option< UpLo >::value, &n, &kd, ab, &ldab, w,
z, &ldz, work, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t sbevd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t kd, float* ab,
const fortran_int_t ldab, float* w, float* z, const fortran_int_t ldz,
float* work, const fortran_int_t lwork, fortran_int_t* iwork,
@@ -71,7 +71,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t sbevd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t kd, double* ab,
const fortran_int_t ldab, double* w, double* z,
const fortran_int_t ldz, double* work, const fortran_int_t lwork,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbevx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,13 +53,13 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t kd,
- float* ab, const fortran_int_t ldab, float* q,
- const fortran_int_t ldq, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- float* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t sbevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t kd, float* ab,
+ const fortran_int_t ldab, float* q, const fortran_int_t ldq,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, float* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSBEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &kd, ab,
&ldab, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, work,
@@ -73,13 +73,13 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t kd,
- double* ab, const fortran_int_t ldab, double* q,
- const fortran_int_t ldq, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- double* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t sbevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t kd, double* ab,
+ const fortran_int_t ldab, double* q, const fortran_int_t ldq,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, double* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSBEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &kd, ab,
&ldab, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, work,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,11 +53,10 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgv( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
- float* ab, const fortran_int_t ldab, float* bb,
- const fortran_int_t ldbb, float* w, float* z, const fortran_int_t ldz,
- float* work ) {
+inline std::ptrdiff_t sbgv( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t ka, const fortran_int_t kb, float* ab,
+ const fortran_int_t ldab, float* bb, const fortran_int_t ldbb,
+ float* w, float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSBGV( &jobz, &lapack_option< UpLo >::value, &n, &ka, &kb, ab,
&ldab, bb, &ldbb, w, z, &ldz, work, &info );
@@ -70,11 +69,10 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgv( const char jobz, const UpLo uplo,
- const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
- double* ab, const fortran_int_t ldab, double* bb,
- const fortran_int_t ldbb, double* w, double* z,
- const fortran_int_t ldz, double* work ) {
+inline std::ptrdiff_t sbgv( const char jobz, const UpLo, const fortran_int_t n,
+ const fortran_int_t ka, const fortran_int_t kb, double* ab,
+ const fortran_int_t ldab, double* bb, const fortran_int_t ldbb,
+ double* w, double* z, const fortran_int_t ldz, double* work ) {
fortran_int_t info(0);
LAPACK_DSBGV( &jobz, &lapack_option< UpLo >::value, &n, &ka, &kb, ab,
&ldab, bb, &ldbb, w, z, &ldz, work, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgvd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t sbgvd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
float* ab, const fortran_int_t ldab, float* bb,
const fortran_int_t ldbb, float* w, float* z, const fortran_int_t ldz,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgvd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t sbgvd( const char jobz, const UpLo,
const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
double* ab, const fortran_int_t ldab, double* bb,
const fortran_int_t ldbb, double* w, double* z,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sbgvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,14 +53,14 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgvx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t ka,
- const fortran_int_t kb, float* ab, const fortran_int_t ldab,
- float* bb, const fortran_int_t ldbb, float* q,
- const fortran_int_t ldq, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- float* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t sbgvx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+ float* ab, const fortran_int_t ldab, float* bb,
+ const fortran_int_t ldbb, float* q, const fortran_int_t ldq,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, float* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSBGVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &ka, &kb,
ab, &ldab, bb, &ldbb, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w,
@@ -74,14 +74,14 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sbgvx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, const fortran_int_t ka,
- const fortran_int_t kb, double* ab, const fortran_int_t ldab,
- double* bb, const fortran_int_t ldbb, double* q,
- const fortran_int_t ldq, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- double* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
+inline std::ptrdiff_t sbgvx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, const fortran_int_t ka, const fortran_int_t kb,
+ double* ab, const fortran_int_t ldab, double* bb,
+ const fortran_int_t ldbb, double* q, const fortran_int_t ldq,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, double* work,
+ fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSBGVX( &jobz, &range, &lapack_option< UpLo >::value, &n, &ka, &kb,
ab, &ldab, bb, &ldbb, q, &ldq, &vl, &vu, &il, &iu, &abstol, &m, w,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spev.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spev.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spev.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,9 +52,8 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spev( const char jobz, const UpLo uplo,
- const fortran_int_t n, float* ap, float* w, float* z,
- const fortran_int_t ldz, float* work ) {
+inline std::ptrdiff_t spev( const char jobz, const UpLo, const fortran_int_t n,
+ float* ap, float* w, float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSPEV( &jobz, &lapack_option< UpLo >::value, &n, ap, w, z, &ldz,
work, &info );
@@ -67,9 +66,9 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spev( const char jobz, const UpLo uplo,
- const fortran_int_t n, double* ap, double* w, double* z,
- const fortran_int_t ldz, double* work ) {
+inline std::ptrdiff_t spev( const char jobz, const UpLo, const fortran_int_t n,
+ double* ap, double* w, double* z, const fortran_int_t ldz,
+ double* work ) {
fortran_int_t info(0);
LAPACK_DSPEV( &jobz, &lapack_option< UpLo >::value, &n, ap, w, z, &ldz,
work, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t spevd( const char jobz, const UpLo,
const fortran_int_t n, float* ap, float* w, float* z,
const fortran_int_t ldz, float* work, const fortran_int_t lwork,
fortran_int_t* iwork, const fortran_int_t liwork ) {
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t spevd( const char jobz, const UpLo,
const fortran_int_t n, double* ap, double* w, double* z,
const fortran_int_t ldz, double* work, const fortran_int_t lwork,
fortran_int_t* iwork, const fortran_int_t liwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spevx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -52,12 +52,11 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, float* ap, const float vl,
- const float vu, const fortran_int_t il, const fortran_int_t iu,
- const float abstol, fortran_int_t& m, float* w, float* z,
- const fortran_int_t ldz, float* work, fortran_int_t* iwork,
- fortran_int_t* ifail ) {
+inline std::ptrdiff_t spevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, float* ap, const float vl, const float vu,
+ const fortran_int_t il, const fortran_int_t iu, const float abstol,
+ fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
+ float* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSPEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, ap, &vl,
&vu, &il, &iu, &abstol, &m, w, z, &ldz, work, iwork, ifail,
@@ -71,12 +70,11 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, double* ap, const double vl,
- const double vu, const fortran_int_t il, const fortran_int_t iu,
- const double abstol, fortran_int_t& m, double* w, double* z,
- const fortran_int_t ldz, double* work, fortran_int_t* iwork,
- fortran_int_t* ifail ) {
+inline std::ptrdiff_t spevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, double* ap, const double vl, const double vu,
+ const fortran_int_t il, const fortran_int_t iu, const double abstol,
+ fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
+ double* work, fortran_int_t* iwork, fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSPEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, ap, &vl,
&vu, &il, &iu, &abstol, &m, w, z, &ldz, work, iwork, ifail,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,8 +53,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t spgv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* ap, float* bp,
- float* w, float* z, const fortran_int_t ldz, float* work ) {
+ const UpLo, const fortran_int_t n, float* ap, float* bp, float* w,
+ float* z, const fortran_int_t ldz, float* work ) {
fortran_int_t info(0);
LAPACK_SSPGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, ap, bp, w,
z, &ldz, work, &info );
@@ -68,8 +68,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t spgv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* ap, double* bp,
- double* w, double* z, const fortran_int_t ldz, double* work ) {
+ const UpLo, const fortran_int_t n, double* ap, double* bp, double* w,
+ double* z, const fortran_int_t ldz, double* work ) {
fortran_int_t info(0);
LAPACK_DSPGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, ap, bp, w,
z, &ldz, work, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,8 +54,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t spgvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* ap, float* bp,
- float* w, float* z, const fortran_int_t ldz, float* work,
+ const UpLo, const fortran_int_t n, float* ap, float* bp, float* w,
+ float* z, const fortran_int_t ldz, float* work,
const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
fortran_int_t info(0);
@@ -71,8 +71,8 @@
//
template< typename UpLo >
inline std::ptrdiff_t spgvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* ap, double* bp,
- double* w, double* z, const fortran_int_t ldz, double* work,
+ const UpLo, const fortran_int_t n, double* ap, double* bp, double* w,
+ double* z, const fortran_int_t ldz, double* work,
const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
fortran_int_t info(0);
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spgvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t spgvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, float* ap,
+ const char range, const UpLo, const fortran_int_t n, float* ap,
float* bp, const float vl, const float vu, const fortran_int_t il,
const fortran_int_t iu, const float abstol, fortran_int_t& m,
float* w, float* z, const fortran_int_t ldz, float* work,
@@ -72,7 +72,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t spgvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, double* ap,
+ const char range, const UpLo, const fortran_int_t n, double* ap,
double* bp, const double vl, const double vu, const fortran_int_t il,
const fortran_int_t iu, const double abstol, fortran_int_t& m,
double* w, double* z, const fortran_int_t ldz, double* work,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -50,7 +50,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, float* ap, fortran_int_t* ipiv, float* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -65,7 +65,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* ap, fortran_int_t* ipiv, double* b,
const fortran_int_t ldb ) {
fortran_int_t info(0);
@@ -80,7 +80,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<float>* ap,
fortran_int_t* ipiv, std::complex<float>* b,
const fortran_int_t ldb ) {
@@ -96,7 +96,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t spsv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* ap,
fortran_int_t* ipiv, std::complex<double>* b,
const fortran_int_t ldb ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -55,7 +55,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t spsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const float* ap,
float* afp, fortran_int_t* ipiv, const float* b,
const fortran_int_t ldb, float* x, const fortran_int_t ldx,
@@ -73,7 +73,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t spsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const double* ap,
double* afp, fortran_int_t* ipiv, const double* b,
const fortran_int_t ldb, double* x, const fortran_int_t ldx,
@@ -91,7 +91,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t spsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* ap, std::complex<float>* afp,
fortran_int_t* ipiv, const std::complex<float>* b,
@@ -110,7 +110,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t spsvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t spsvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* ap, std::complex<double>* afp,
fortran_int_t* ipiv, const std::complex<double>* b,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syev.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syev.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syev.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,9 +53,9 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syev( const char jobz, const UpLo uplo,
- const fortran_int_t n, float* a, const fortran_int_t lda, float* w,
- float* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t syev( const char jobz, const UpLo, const fortran_int_t n,
+ float* a, const fortran_int_t lda, float* w, float* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SSYEV( &jobz, &lapack_option< UpLo >::value, &n, a, &lda, w, work,
&lwork, &info );
@@ -68,9 +68,9 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syev( const char jobz, const UpLo uplo,
- const fortran_int_t n, double* a, const fortran_int_t lda, double* w,
- double* work, const fortran_int_t lwork ) {
+inline std::ptrdiff_t syev( const char jobz, const UpLo, const fortran_int_t n,
+ double* a, const fortran_int_t lda, double* w, double* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DSYEV( &jobz, &lapack_option< UpLo >::value, &n, a, &lda, w, work,
&lwork, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,7 +53,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t syevd( const char jobz, const UpLo,
const fortran_int_t n, float* a, const fortran_int_t lda, float* w,
float* work, const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
@@ -69,7 +69,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syevd( const char jobz, const UpLo uplo,
+inline std::ptrdiff_t syevd( const char jobz, const UpLo,
const fortran_int_t n, double* a, const fortran_int_t lda, double* w,
double* work, const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevr.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevr.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevr.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,13 +53,13 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syevr( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- fortran_int_t* isuppz, float* work, const fortran_int_t lwork,
- fortran_int_t* iwork, const fortran_int_t liwork ) {
+inline std::ptrdiff_t syevr( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, float* a, const fortran_int_t lda,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, fortran_int_t* isuppz,
+ float* work, const fortran_int_t lwork, fortran_int_t* iwork,
+ const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_SSYEVR( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
&vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, isuppz, work, &lwork,
@@ -73,13 +73,13 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syevr( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- fortran_int_t* isuppz, double* work, const fortran_int_t lwork,
- fortran_int_t* iwork, const fortran_int_t liwork ) {
+inline std::ptrdiff_t syevr( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, double* a, const fortran_int_t lda,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, fortran_int_t* isuppz,
+ double* work, const fortran_int_t lwork, fortran_int_t* iwork,
+ const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_DSYEVR( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
&vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, isuppz, work, &lwork,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/syevx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -53,12 +53,12 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, const float vl, const float vu,
- const fortran_int_t il, const fortran_int_t iu, const float abstol,
- fortran_int_t& m, float* w, float* z, const fortran_int_t ldz,
- float* work, const fortran_int_t lwork, fortran_int_t* iwork,
+inline std::ptrdiff_t syevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, float* a, const fortran_int_t lda,
+ const float vl, const float vu, const fortran_int_t il,
+ const fortran_int_t iu, const float abstol, fortran_int_t& m,
+ float* w, float* z, const fortran_int_t ldz, float* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_SSYEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
@@ -73,12 +73,12 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t syevx( const char jobz, const char range,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, const double vl, const double vu,
- const fortran_int_t il, const fortran_int_t iu, const double abstol,
- fortran_int_t& m, double* w, double* z, const fortran_int_t ldz,
- double* work, const fortran_int_t lwork, fortran_int_t* iwork,
+inline std::ptrdiff_t syevx( const char jobz, const char range, const UpLo,
+ const fortran_int_t n, double* a, const fortran_int_t lda,
+ const double vl, const double vu, const fortran_int_t il,
+ const fortran_int_t iu, const double abstol, fortran_int_t& m,
+ double* w, double* z, const fortran_int_t ldz, double* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
fortran_int_t* ifail ) {
fortran_int_t info(0);
LAPACK_DSYEVX( &jobz, &range, &lapack_option< UpLo >::value, &n, a, &lda,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,9 +54,9 @@
//
template< typename UpLo >
inline std::ptrdiff_t sygv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, float* b, const fortran_int_t ldb, float* w,
- float* work, const fortran_int_t lwork ) {
+ const UpLo, const fortran_int_t n, float* a, const fortran_int_t lda,
+ float* b, const fortran_int_t ldb, float* w, float* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_SSYGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
b, &ldb, w, work, &lwork, &info );
@@ -70,9 +70,9 @@
//
template< typename UpLo >
inline std::ptrdiff_t sygv( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, double* b, const fortran_int_t ldb,
- double* w, double* work, const fortran_int_t lwork ) {
+ const UpLo, const fortran_int_t n, double* a, const fortran_int_t lda,
+ double* b, const fortran_int_t ldb, double* w, double* work,
+ const fortran_int_t lwork ) {
fortran_int_t info(0);
LAPACK_DSYGV( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
b, &ldb, w, work, &lwork, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvd.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvd.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvd.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,9 +54,9 @@
//
template< typename UpLo >
inline std::ptrdiff_t sygvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, float* a,
- const fortran_int_t lda, float* b, const fortran_int_t ldb, float* w,
- float* work, const fortran_int_t lwork, fortran_int_t* iwork,
+ const UpLo, const fortran_int_t n, float* a, const fortran_int_t lda,
+ float* b, const fortran_int_t ldb, float* w, float* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_SSYGVD( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
@@ -71,10 +71,10 @@
//
template< typename UpLo >
inline std::ptrdiff_t sygvd( const fortran_int_t itype, const char jobz,
- const UpLo uplo, const fortran_int_t n, double* a,
- const fortran_int_t lda, double* b, const fortran_int_t ldb,
- double* w, double* work, const fortran_int_t lwork,
- fortran_int_t* iwork, const fortran_int_t liwork ) {
+ const UpLo, const fortran_int_t n, double* a, const fortran_int_t lda,
+ double* b, const fortran_int_t ldb, double* w, double* work,
+ const fortran_int_t lwork, fortran_int_t* iwork,
+ const fortran_int_t liwork ) {
fortran_int_t info(0);
LAPACK_DSYGVD( &itype, &jobz, &lapack_option< UpLo >::value, &n, a, &lda,
b, &ldb, w, work, &lwork, iwork, &liwork, &info );
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sygvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -54,7 +54,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t sygvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, float* a,
+ const char range, const UpLo, const fortran_int_t n, float* a,
const fortran_int_t lda, float* b, const fortran_int_t ldb,
const float vl, const float vu, const fortran_int_t il,
const fortran_int_t iu, const float abstol, fortran_int_t& m,
@@ -75,7 +75,7 @@
//
template< typename UpLo >
inline std::ptrdiff_t sygvx( const fortran_int_t itype, const char jobz,
- const char range, const UpLo uplo, const fortran_int_t n, double* a,
+ const char range, const UpLo, const fortran_int_t n, double* a,
const fortran_int_t lda, double* b, const fortran_int_t ldb,
const double vl, const double vu, const fortran_int_t il,
const fortran_int_t iu, const double abstol, fortran_int_t& m,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysv.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysv.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sysv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, float* a, const fortran_int_t lda,
fortran_int_t* ipiv, float* b, const fortran_int_t ldb, float* work,
const fortran_int_t lwork ) {
@@ -72,7 +72,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sysv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, double* a, const fortran_int_t lda,
fortran_int_t* ipiv, double* b, const fortran_int_t ldb, double* work,
const fortran_int_t lwork ) {
@@ -88,7 +88,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sysv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<float>* a,
const fortran_int_t lda, fortran_int_t* ipiv, std::complex<float>* b,
const fortran_int_t ldb, std::complex<float>* work,
@@ -105,7 +105,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysv( const UpLo uplo, const fortran_int_t n,
+inline std::ptrdiff_t sysv( const UpLo, const fortran_int_t n,
const fortran_int_t nrhs, std::complex<double>* a,
const fortran_int_t lda, fortran_int_t* ipiv, std::complex<double>* b,
const fortran_int_t ldb, std::complex<double>* work,
Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysvx.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysvx.hpp (original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/sysvx.hpp 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -56,7 +56,7 @@
// * float value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t sysvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const float* a,
const fortran_int_t lda, float* af, const fortran_int_t ldaf,
fortran_int_t* ipiv, const float* b, const fortran_int_t ldb,
@@ -76,7 +76,7 @@
// * double value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t sysvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs, const double* a,
const fortran_int_t lda, double* af, const fortran_int_t ldaf,
fortran_int_t* ipiv, const double* b, const fortran_int_t ldb,
@@ -96,7 +96,7 @@
// * complex<float> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t sysvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<float>* a, const fortran_int_t lda,
std::complex<float>* af, const fortran_int_t ldaf,
@@ -117,7 +117,7 @@
// * complex<double> value-type.
//
template< typename UpLo >
-inline std::ptrdiff_t sysvx( const char fact, const UpLo uplo,
+inline std::ptrdiff_t sysvx( const char fact, const UpLo,
const fortran_int_t n, const fortran_int_t nrhs,
const std::complex<double>* a, const fortran_int_t lda,
std::complex<double>* af, const fortran_int_t ldaf,
Modified: sandbox/numeric_bindings/libs/numeric/bindings/tools/netlib.py
==============================================================================
--- sandbox/numeric_bindings/libs/numeric/bindings/tools/netlib.py (original)
+++ sandbox/numeric_bindings/libs/numeric/bindings/tools/netlib.py 2010-08-24 03:02:40 EDT (Tue, 24 Aug 2010)
@@ -124,7 +124,12 @@
def level0_type( name, properties ):
result = cpp_type( name, properties )
if template_tag_type( name, properties ) != None:
- result = 'const ' + template_parameter[ name ] + ' ' + name.lower()
+ #
+ # To prevent warnings about unused paramers, just write
+ # ..., const Side, ..., i.e., without the lowercased name. Used to be
+ # result = 'const ' + template_parameter[ name ] + ' ' + name.lower()
+ #
+ result = 'const ' + template_parameter[ name ]
if name == 'INFO':
result = None
return result