35 #ifndef _BLAZE_MATH_LAPACK_CLAPACK_HETRI_H_ 36 #define _BLAZE_MATH_LAPACK_CLAPACK_HETRI_H_ 55 #if !defined(INTEL_MKL_VERSION) 58 void chetri_(
char* uplo,
int* n,
float* A,
int* lda,
int* ipiv,
float* work,
int* info );
59 void zhetri_(
char* uplo,
int* n,
double* A,
int* lda,
int* ipiv,
double* work,
int* info );
80 inline void hetri(
char uplo,
int n, complex<float>* A,
int lda,
81 const int* ipiv, complex<float>* work,
int* info );
83 inline void hetri(
char uplo,
int n, complex<double>* A,
int lda,
84 const int* ipiv, complex<double>* work,
int* info );
121 inline void hetri(
char uplo,
int n, complex<float>* A,
int lda,
122 const int* ipiv, complex<float>* work,
int* info )
126 #if defined(INTEL_MKL_VERSION) 128 using ET = MKL_Complex8;
133 chetri_( &uplo, &n, reinterpret_cast<ET*>( A ), &lda,
134 const_cast<int*>( ipiv ), reinterpret_cast<ET*>( work ), info );
171 inline void hetri(
char uplo,
int n, complex<double>* A,
int lda,
172 const int* ipiv, complex<double>* work,
int* info )
176 #if defined(INTEL_MKL_VERSION) 178 using ET = MKL_Complex16;
183 zhetri_( &uplo, &n, reinterpret_cast<ET*>( A ), &lda,
184 const_cast<int*>( ipiv ), reinterpret_cast<ET*>( work ), info );
void hetri(char uplo, int n, complex< float > *A, int lda, const int *ipiv, complex< float > *work, int *info)
LAPACK kernel for the inversion of the given dense Hermitian indefinite single precision complex colu...
Definition: hetri.h:121
Namespace of the Blaze C++ math library.
Definition: Blaze.h:57
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