35 #ifndef _BLAZE_MATH_LAPACK_HEEVX_H_ 36 #define _BLAZE_MATH_LAPACK_HEEVX_H_ 74 template<
typename MT,
bool SO,
typename VT,
bool TF >
75 inline size_t heevx( DenseMatrix<MT,SO>& A, DenseVector<VT,TF>& w,
char uplo );
77 template<
typename MT,
bool SO,
typename VT,
bool TF,
typename ST >
78 inline size_t heevx( DenseMatrix<MT,SO>& A, DenseVector<VT,TF>& w,
char uplo, ST low, ST upp );
80 template<
typename MT1,
bool SO1,
typename VT,
bool TF,
typename MT2,
bool SO2 >
81 inline size_t heevx( DenseMatrix<MT1,SO1>& A, DenseVector<VT,TF>& w,
82 DenseMatrix<MT2,SO2>& Z,
char uplo );
84 template<
typename MT1,
bool SO1,
typename VT,
bool TF,
typename MT2,
bool SO2,
typename ST >
85 inline size_t heevx( DenseMatrix<MT1,SO1>& A, DenseVector<VT,TF>& w,
86 DenseMatrix<MT2,SO2>& Z,
char uplo, ST low, ST upp );
114 template<
typename MT
119 inline size_t heevx_backend( DenseMatrix<MT,SO>& A, DenseVector<VT,TF>& w,
120 char uplo,
char range, ST vl, ST vu,
int il,
int iu )
127 using CT = ElementType_t<MT>;
128 using BT = UnderlyingElement_t<CT>;
133 int n ( numeric_cast<int>( (~A).
rows() ) );
134 int lda ( numeric_cast<int>( (~A).
spacing() ) );
138 int lwork( 12*n + 2 );
139 const std::unique_ptr<CT[]> work (
new CT[lwork] );
140 const std::unique_ptr<BT[]> rwork(
new BT[7*n] );
141 const std::unique_ptr<int[]> iwork(
new int[5*n] );
142 const std::unique_ptr<int[]> ifail(
new int[n] );
144 heevx(
'N', range, uplo, n, (~A).
data(), lda, vl, vu, il, iu, BT(0), &m, (~w).
data(),
145 nullptr, 1, work.get(), lwork, rwork.get(), iwork.get(), ifail.get(), &info );
147 const size_t num( numeric_cast<size_t>( m ) );
218 template<
typename MT
240 const size_t N( (~A).
rows() );
246 if( uplo !=
'L' && uplo !=
'U' ) {
256 return heevx_backend( ~A, ~w, uplo,
'A', BT(), BT(), 0, 0 );
347 template<
typename MT
371 if( IsFloatingPoint_v<ST> && low >= upp ) {
375 if( !IsFloatingPoint_v<ST> && low > upp ) {
379 const size_t N( (~A).
rows() );
380 const size_t num( IsFloatingPoint_v<ST> ? N :
size_t( upp - low ) + 1UL );
382 if( !IsFloatingPoint_v<ST> && num > N ) {
386 if( uplo !=
'L' && uplo !=
'U' ) {
396 const char range( IsFloatingPoint_v<ST> ?
'V' :
'I' );
397 const ST vl ( IsFloatingPoint_v<ST> ? low : ST() );
398 const ST vu ( IsFloatingPoint_v<ST> ? upp : ST() );
399 const int il ( IsFloatingPoint_v<ST> ? 0 : numeric_cast<int>( low ) );
400 const int iu ( IsFloatingPoint_v<ST> ? 0 : numeric_cast<int>( upp ) );
402 return heevx_backend( ~A, ~w, uplo, range, vl, vu, il, iu );
431 template<
typename MT1
438 inline size_t heevx_backend( DenseMatrix<MT1,SO1>& A, DenseVector<VT,TF>& w,
439 DenseMatrix<MT2,SO2>& Z,
char uplo,
char range,
440 ST vl, ST vu,
int il,
int iu )
451 using CT = ElementType_t<MT1>;
452 using BT = UnderlyingElement_t<CT>;
457 int n ( numeric_cast<int>( (~A).
rows() ) );
458 int lda ( numeric_cast<int>( (~A).
spacing() ) );
460 int ldz ( numeric_cast<int>( (~Z).
spacing() ) );
463 int lwork( 12*n + 2 );
464 const std::unique_ptr<CT[]> work (
new CT[lwork] );
465 const std::unique_ptr<BT[]> rwork(
new BT[7*n] );
466 const std::unique_ptr<int[]> iwork(
new int[5*n] );
467 const std::unique_ptr<int[]> ifail(
new int[n] );
469 heevx(
'N', range, uplo, n, (~A).
data(), lda, vl, vu, il, iu, BT(0), &m, (~w).
data(),
470 (~Z).
data(), ldz, work.get(), lwork, rwork.get(), iwork.get(), ifail.get(), &info );
472 const size_t num( numeric_cast<size_t>( m ) );
550 template<
typename MT1
582 const size_t N( (~A).
rows() );
588 if( uplo !=
'L' && uplo !=
'U' ) {
593 resize( ~Z, N, N,
false );
599 return heevx_backend( ~A, ~w, ~Z, uplo,
'A', BT(), BT(), 0, 0 );
700 template<
typename MT1
734 if( IsFloatingPoint_v<ST> && low >= upp ) {
738 if( !IsFloatingPoint_v<ST> && low > upp ) {
742 const size_t N( (~A).
rows() );
743 const size_t num( IsFloatingPoint_v<ST> ? N :
size_t( upp - low ) + 1UL );
745 if( !IsFloatingPoint_v<ST> && num > N ) {
749 if( uplo !=
'L' && uplo !=
'U' ) {
754 resize( ~Z, ( IsRowMajorMatrix_v<MT2> ? num : N ),
755 ( IsRowMajorMatrix_v<MT2> ? N : num ),
false );
761 const char range( IsFloatingPoint_v<ST> ?
'V' :
'I' );
762 const ST vl ( IsFloatingPoint_v<ST> ? low : ST() );
763 const ST vu ( IsFloatingPoint_v<ST> ? upp : ST() );
764 const int il ( IsFloatingPoint_v<ST> ? 0 : numeric_cast<int>( low ) );
765 const int iu ( IsFloatingPoint_v<ST> ? 0 : numeric_cast<int>( upp ) );
767 return heevx_backend( ~A, ~w, ~Z, uplo, range, vl, vu, il, iu );
#define BLAZE_THROW_INVALID_ARGUMENT(MESSAGE)
Macro for the emission of a std::invalid_argument exception.This macro encapsulates the default way o...
Definition: Exception.h:235
Constraint on the data type.
Header file for auxiliary alias declarations.
#define BLAZE_CONSTRAINT_MUST_HAVE_MUTABLE_DATA_ACCESS(T)
Constraint on the data type.In case the given data type T does not provide low-level data access to m...
Definition: MutableDataAccess.h:61
Header file for basic type definitions.
MT::ElementType * data(DenseMatrix< MT, SO > &dm) noexcept
Low-level data access to the dense matrix elements.
Definition: DenseMatrix.h:169
#define BLAZE_CONSTRAINT_MUST_NOT_BE_COMPUTATION_TYPE(T)
Constraint on the data type.In case the given data type T is a computational expression (i...
Definition: Computation.h:81
Constraint on the data type.
Header file for the DenseVector base class.
Constraint on the data type.
Constraint on the data type.
Cast operators for numeric types.
constexpr size_t columns(const Matrix< MT, SO > &matrix) noexcept
Returns the current number of columns of the matrix.
Definition: Matrix.h:514
#define BLAZE_CONSTRAINT_MUST_NOT_BE_ADAPTOR_TYPE(T)
Constraint on the data type.In case the given data type T is an adaptor type (as for instance LowerMa...
Definition: Adaptor.h:81
Base class for dense matrices.The DenseMatrix class is a base class for all dense matrix classes...
Definition: DenseMatrix.h:80
typename T::ElementType ElementType_t
Alias declaration for nested ElementType type definitions.The ElementType_t alias declaration provide...
Definition: Aliases.h:170
size_t spacing(const DenseMatrix< MT, SO > &dm) noexcept
Returns the spacing between the beginning of two rows/columns.
Definition: DenseMatrix.h:252
Constraint on the data type.
void heevx(char jobz, char range, char uplo, int n, complex< float > *A, int lda, float vl, float vu, int il, int iu, float abstol, int *m, float *w, complex< float > *Z, int ldz, complex< float > *work, int lwork, float *rwork, int *iwork, int *ifail, int *info)
LAPACK kernel for computing the eigenvalues of the given dense Hermitian single precision complex col...
Definition: heevx.h:151
Namespace of the Blaze C++ math library.
Definition: Blaze.h:58
Header file for the IsFloatingPoint type trait.
#define BLAZE_CONSTRAINT_MUST_BE_CONTIGUOUS_TYPE(T)
Constraint on the data type.In case the given data type T is not an array-like data type with contigu...
Definition: Contiguous.h:61
Header file for the DenseMatrix base class.
Base class for N-dimensional dense vectors.The DenseVector class is a base class for all arbitrarily ...
Definition: DenseVector.h:76
Header file for the exception macros of the math module.
typename UnderlyingElement< T >::Type UnderlyingElement_t
Auxiliary alias declaration for the UnderlyingElement type trait.The UnderlyingElement_t alias declar...
Definition: UnderlyingElement.h:132
void resize(Matrix< MT, SO > &matrix, size_t rows, size_t columns, bool preserve=true)
Changing the size of the matrix.
Definition: Matrix.h:738
Constraint on the data type.
Header file for run time assertion macros.
constexpr size_t size(const Matrix< MT, SO > &matrix) noexcept
Returns the total number of elements of the matrix.
Definition: Matrix.h:530
#define BLAZE_CONSTRAINT_MUST_BE_BLAS_COMPATIBLE_TYPE(T)
Constraint on the data type.In case the given data type T is not a BLAS compatible data type (i...
Definition: BLASCompatible.h:61
constexpr size_t rows(const Matrix< MT, SO > &matrix) noexcept
Returns the current number of rows of the matrix.
Definition: Matrix.h:498
#define BLAZE_CONSTRAINT_MUST_BE_BUILTIN_TYPE(T)
Constraint on the data type.In case the given data type T is not a built-in data type, a compilation error is created.
Definition: Builtin.h:60
Header file for the CLAPACK heevx wrapper functions.
#define BLAZE_CONSTRAINT_MUST_BE_COMPLEX_TYPE(T)
Constraint on the data type.This compile time constraint checks that the given data type T is a compl...
Definition: Complex.h:62
Header file for the IsRowMajorMatrix type trait.
#define BLAZE_THROW_LAPACK_ERROR(MESSAGE)
Macro for the emission of an exception on detection of a LAPACK error.This macro encapsulates the def...
Definition: Exception.h:146
bool isSquare(const Matrix< MT, SO > &matrix) noexcept
Checks if the given matrix is a square matrix.
Definition: Matrix.h:951
#define BLAZE_INTERNAL_ASSERT(expr, msg)
Run time assertion macro for internal checks.In case of an invalid run time expression, the program execution is terminated. The BLAZE_INTERNAL_ASSERT macro can be disabled by setting the BLAZE_USER_ASSERTION flag to zero or by defining NDEBUG during the compilation.
Definition: Assert.h:101
Constraint on the data type.