35 #ifndef _BLAZE_MATH_LAPACK_SYTRS_H_
36 #define _BLAZE_MATH_LAPACK_SYTRS_H_
43 #include <boost/cast.hpp>
70 void ssytrs_(
char* uplo,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
float* B,
int* ldb,
int*
info );
71 void dsytrs_(
char* uplo,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
double* B,
int* ldb,
int*
info );
72 void csytrs_(
char* uplo,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
float* B,
int* ldb,
int*
info );
73 void zsytrs_(
char* uplo,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
double* B,
int* ldb,
int*
info );
91 inline void sytrs(
char uplo,
int n,
int nrhs,
const float* A,
int lda,
const int* ipiv,
92 float* B,
int ldb,
int*
info );
94 inline void sytrs(
char uplo,
int n,
int nrhs,
const double* A,
int lda,
const int* ipiv,
95 double* B,
int ldb,
int*
info );
97 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<float>* A,
int lda,
const int* ipiv,
98 complex<float>* B,
int ldb,
int*
info );
100 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<double>* A,
int lda,
const int* ipiv,
101 complex<double>* B,
int ldb,
int*
info );
103 template<
typename MT,
bool SO,
typename VT,
bool TF >
104 inline void sytrs(
const DenseMatrix<MT,SO>& A, DenseVector<VT,TF>& b,
char uplo,
const int* ipiv );
106 template<
typename MT1,
bool SO1,
typename MT2,
bool SO2 >
107 inline void sytrs(
const DenseMatrix<MT1,SO1>& A, DenseMatrix<MT2,SO2>& B,
108 char uplo,
const int* ipiv );
146 inline void sytrs(
char uplo,
int n,
int nrhs,
const float* A,
int lda,
const int* ipiv,
147 float* B,
int ldb,
int*
info )
149 ssytrs_( &uplo, &n, &nrhs, const_cast<float*>( A ), &lda,
150 const_cast<int*>( ipiv ), B, &ldb, info );
188 inline void sytrs(
char uplo,
int n,
int nrhs,
const double* A,
int lda,
const int* ipiv,
189 double* B,
int ldb,
int*
info )
191 dsytrs_( &uplo, &n, &nrhs, const_cast<double*>( A ), &lda,
192 const_cast<int*>( ipiv ), B, &ldb, info );
230 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<float>* A,
int lda,
231 const int* ipiv, complex<float>* B,
int ldb,
int*
info )
235 csytrs_( &uplo, &n, &nrhs, const_cast<float*>( reinterpret_cast<const float*>( A ) ),
236 &lda, const_cast<int*>( ipiv ), reinterpret_cast<float*>( B ), &ldb, info );
274 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<double>* A,
int lda,
275 const int* ipiv, complex<double>* B,
int ldb,
int*
info )
279 zsytrs_( &uplo, &n, &nrhs, const_cast<double*>( reinterpret_cast<const double*>( A ) ),
280 &lda, const_cast<int*>( ipiv ), reinterpret_cast<double*>( B ), &ldb, info );
368 template<
typename MT
374 using boost::numeric_cast;
391 if( uplo !=
'L' && uplo !=
'U' ) {
395 int n ( numeric_cast<int>( (~A).
rows() ) );
397 int lda ( numeric_cast<int>( (~A).
spacing() ) );
398 int ldb ( numeric_cast<int>( (~b).
size() ) );
406 ( uplo ==
'L' )?( uplo =
'U' ):( uplo =
'L' );
409 sytrs( uplo, n, nrhs, (~A).data(), lda, ipiv, (~b).data(), ldb, &info );
500 template<
typename MT1
506 using boost::numeric_cast;
525 if( uplo !=
'L' && uplo !=
'U' ) {
529 int n ( numeric_cast<int>( (~A).
rows() ) );
530 int mrhs( numeric_cast<int>( SO2 ? (~B).
rows() : (~B).
columns() ) );
531 int nrhs( numeric_cast<int>( SO2 ? (~B).
columns() : (~B).
rows() ) );
532 int lda ( numeric_cast<int>( (~A).
spacing() ) );
533 int ldb ( numeric_cast<int>( (~B).
spacing() ) );
545 ( uplo ==
'L' )?( uplo =
'U' ):( uplo =
'L' );
548 sytrs( uplo, n, nrhs, (~A).data(), lda, ipiv, (~B).data(), ldb, &info );
#define BLAZE_THROW_INVALID_ARGUMENT(MESSAGE)
Macro for the emission of a std::invalid_argument exceptionThis macro encapsulates the default way of...
Definition: Exception.h:187
Constraint on the data type.
Log level for high-level information.
Definition: LogLevel.h:80
#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:79
BLAZE_ALWAYS_INLINE bool isSquare(const Matrix< MT, SO > &matrix)
Checks if the given matrix is a square matrix.
Definition: Matrix.h:603
BLAZE_ALWAYS_INLINE size_t size(const Vector< VT, TF > &vector)
Returns the current size/dimension of the vector.
Definition: Vector.h:252
#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:118
BLAZE_ALWAYS_INLINE size_t rows(const Matrix< MT, SO > &matrix)
Returns the current number of rows of the matrix.
Definition: Matrix.h:308
Header file for the DenseVector base class.
Constraint on the data type.
CompressedMatrix< Type, false > OppositeType
Result type with opposite storage order for expression template evaluations.
Definition: CompressedMatrix.h:2584
#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:118
Base class for dense matrices.The DenseMatrix class is a base class for all dense matrix classes...
Definition: DenseMatrix.h:70
Namespace of the Blaze C++ math library.
Definition: Blaze.h:57
Compile time check for row-major matrix types.This type trait tests whether or not the given template...
Definition: IsRowMajorMatrix.h:110
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:70
#define BLAZE_CONSTRAINT_MUST_BE_SAME_TYPE(A, B)
Data type constraint.In case the two types A and B are not the same (ignoring all cv-qualifiers of bo...
Definition: SameType.h:89
void sytrs(char uplo, int n, int nrhs, const float *A, int lda, const int *ipiv, float *B, int ldb, int *info)
LAPACK kernel for the substitution step of solving a symmetric indefinite single precision linear sys...
Definition: sytrs.h:146
Type ElementType
Type of the sparse matrix elements.
Definition: CompressedMatrix.h:2586
Constraint on the data type.
Constraint on the data type.
const bool spacing
Adding an additional spacing line between two log messages.This setting gives the opportunity to add ...
Definition: Logging.h:70
Header file for run time assertion macros.
#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:79
Header file for the IsRowMajorMatrix type trait.
BLAZE_ALWAYS_INLINE size_t columns(const Matrix< MT, SO > &matrix)
Returns the current number of columns of the matrix.
Definition: Matrix.h:324
Header file for the complex data type.
Header file for exception macros.
#define BLAZE_STATIC_ASSERT(expr)
Compile time assertion macro.In case of an invalid compile time expression, a compilation error is cr...
Definition: StaticAssert.h:143
#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