35 #ifndef _BLAZE_MATH_LAPACK_CLAPACK_HETRS_H_ 36 #define _BLAZE_MATH_LAPACK_CLAPACK_HETRS_H_ 56 #if !defined(INTEL_MKL_VERSION) 59 void chetrs_(
char* uplo,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
61 void zhetrs_(
char* uplo,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
83 void hetrs(
char uplo,
int n,
int nrhs,
const complex<float>* A,
int lda,
const int* ipiv,
84 complex<float>* B,
int ldb,
int* info );
86 void hetrs(
char uplo,
int n,
int nrhs,
const complex<double>* A,
int lda,
const int* ipiv,
87 complex<double>* B,
int ldb,
int* info );
126 inline void hetrs(
char uplo,
int n,
int nrhs,
const complex<float>* A,
int lda,
127 const int* ipiv, complex<float>* B,
int ldb,
int* info )
131 #if defined(INTEL_MKL_VERSION) 133 using ET = MKL_Complex8;
138 chetrs_( &uplo, &n, &nrhs, const_cast<ET*>( reinterpret_cast<const ET*>( A ) ),
139 &lda, const_cast<int*>( ipiv ), reinterpret_cast<ET*>( B ), &ldb, info,
179 inline void hetrs(
char uplo,
int n,
int nrhs,
const complex<double>* A,
int lda,
180 const int* ipiv, complex<double>* B,
int ldb,
int* info )
184 #if defined(INTEL_MKL_VERSION) 186 using ET = MKL_Complex16;
191 zhetrs_( &uplo, &n, &nrhs, const_cast<ET*>( reinterpret_cast<const ET*>( A ) ),
192 &lda, const_cast<int*>( ipiv ), reinterpret_cast<ET*>( B ), &ldb, info,
Header file for basic type definitions.
void hetrs(char uplo, int n, int nrhs, const complex< float > *A, int lda, const int *ipiv, complex< float > *B, int ldb, int *info)
LAPACK kernel for the substitution step of solving a symmetric indefinite single precision complex li...
Definition: hetrs.h:126
Namespace of the Blaze C++ math library.
Definition: Blaze.h:58
Header file for the complex data type.
#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:112
Size type of the Blaze library.