35#ifndef _BLAZE_MATH_LAPACK_HETRS_H_
36#define _BLAZE_MATH_LAPACK_HETRS_H_
71template<
typename MT,
bool SO,
typename VT,
bool TF >
72void hetrs(
const DenseMatrix<MT,SO>& A, DenseVector<VT,TF>& b,
char uplo,
75template<
typename MT1,
bool SO1,
typename MT2,
bool SO2 >
76void hetrs(
const DenseMatrix<MT1,SO1>& A, DenseMatrix<MT2,SO2>& B,
char uplo,
191 if( (*b).size() != (*A).rows() ) {
195 if( uplo !=
'L' && uplo !=
'U' ) {
199 blas_int_t n ( numeric_cast<blas_int_t>( (*A).rows() ) );
201 blas_int_t lda ( numeric_cast<blas_int_t>( (*A).spacing() ) );
202 blas_int_t ldb ( numeric_cast<blas_int_t>( (*b).size() ) );
209 if( IsRowMajorMatrix_v<MT> ) {
210 ( uplo ==
'L' )?( uplo =
'U' ):( uplo =
'L' );
213 hetrs( uplo, n, nrhs, (*A).data(), lda, ipiv, (*b).data(), ldb, &info );
307template<
typename MT1
330 if( uplo !=
'L' && uplo !=
'U' ) {
334 blas_int_t n ( numeric_cast<blas_int_t>( (*A).rows() ) );
335 blas_int_t mrhs( numeric_cast<blas_int_t>( SO2 ? (*B).rows() : (*B).columns() ) );
336 blas_int_t nrhs( numeric_cast<blas_int_t>( SO2 ? (*B).columns() : (*B).rows() ) );
337 blas_int_t lda ( numeric_cast<blas_int_t>( (*A).spacing() ) );
338 blas_int_t ldb ( numeric_cast<blas_int_t>( (*B).spacing() ) );
349 if( IsRowMajorMatrix_v<MT1> ) {
350 ( uplo ==
'L' )?( uplo =
'U' ):( uplo =
'L' );
353 hetrs( uplo, n, nrhs, (*A).data(), lda, ipiv, (*B).data(), ldb, &info );
Constraint on the data type.
Header file for auxiliary alias declarations.
typename T::ElementType ElementType_t
Alias declaration for nested ElementType type definitions.
Definition: Aliases.h:190
Header file for run time assertion macros.
Constraint on the data type.
Constraint on the data type.
Constraint on the data type.
Header file for the IsRowMajorMatrix type trait.
Constraint on the data type.
Cast operators for numeric types.
Header file for the CLAPACK hetrs wrapper functions.
Base class for dense matrices.
Definition: DenseMatrix.h:82
Base class for N-dimensional dense vectors.
Definition: DenseVector.h:77
Constraint on the data type.
Header file for the DenseMatrix base class.
Header file for the DenseVector base class.
#define BLAZE_CONSTRAINT_MUST_BE_SAME_TYPE(A, B)
Data type constraint.
Definition: SameType.h:71
void hetrs(const DenseMatrix< MT1, SO1 > &A, DenseMatrix< MT2, SO2 > &B, char uplo, const blas_int_t *ipiv)
LAPACK kernel for the substitution step of solving a symmetric indefinite linear system of equations ...
Definition: hetrs.h:311
#define BLAZE_CONSTRAINT_MUST_BE_BLAS_COMPATIBLE_TYPE(T)
Constraint on the data type.
Definition: BLASCompatible.h:61
#define BLAZE_CONSTRAINT_MUST_BE_CONTIGUOUS_TYPE(T)
Constraint on the data type.
Definition: Contiguous.h:61
#define BLAZE_CONSTRAINT_MUST_NOT_BE_COMPUTATION_TYPE(T)
Constraint on the data type.
Definition: Computation.h:81
#define BLAZE_CONSTRAINT_MUST_NOT_BE_ADAPTOR_TYPE(T)
Constraint on the data type.
Definition: Adaptor.h:81
#define BLAZE_CONSTRAINT_MUST_HAVE_MUTABLE_DATA_ACCESS(T)
Constraint on the data type.
Definition: MutableDataAccess.h:61
#define BLAZE_CONSTRAINT_MUST_HAVE_CONST_DATA_ACCESS(T)
Constraint on the data type.
Definition: ConstDataAccess.h:61
int32_t blas_int_t
Signed integer type used in the BLAS/LAPACK wrapper functions.
Definition: Types.h:64
bool isSquare(const Matrix< MT, SO > &matrix) noexcept
Checks if the given matrix is a square matrix.
Definition: Matrix.h:1383
#define BLAZE_INTERNAL_ASSERT(expr, msg)
Run time assertion macro for internal checks.
Definition: Assert.h:101
#define BLAZE_THROW_INVALID_ARGUMENT(MESSAGE)
Macro for the emission of a std::invalid_argument exception.
Definition: Exception.h:235
Header file for the exception macros of the math module.