35 #ifndef _BLAZE_MATH_LAPACK_CLAPACK_SYTRS_H_ 36 #define _BLAZE_MATH_LAPACK_CLAPACK_SYTRS_H_ 55 #if !defined(INTEL_MKL_VERSION) 58 void ssytrs_(
char* uplo,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
float* B,
int* ldb,
int* info );
59 void dsytrs_(
char* uplo,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
double* B,
int* ldb,
int* info );
60 void csytrs_(
char* uplo,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
float* B,
int* ldb,
int* info );
61 void zsytrs_(
char* uplo,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
double* B,
int* ldb,
int* info );
82 inline void sytrs(
char uplo,
int n,
int nrhs,
const float* A,
int lda,
const int* ipiv,
83 float* B,
int ldb,
int* info );
85 inline void sytrs(
char uplo,
int n,
int nrhs,
const double* A,
int lda,
const int* ipiv,
86 double* B,
int ldb,
int* info );
88 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<float>* A,
int lda,
const int* ipiv,
89 complex<float>* B,
int ldb,
int* info );
91 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<double>* A,
int lda,
const int* ipiv,
92 complex<double>* B,
int ldb,
int* info );
131 inline void sytrs(
char uplo,
int n,
int nrhs,
const float* A,
int lda,
const int* ipiv,
132 float* B,
int ldb,
int* info )
134 #if defined(INTEL_MKL_VERSION) 138 ssytrs_( &uplo, &n, &nrhs, const_cast<float*>( A ), &lda,
139 const_cast<int*>( ipiv ), B, &ldb, info );
178 inline void sytrs(
char uplo,
int n,
int nrhs,
const double* A,
int lda,
const int* ipiv,
179 double* B,
int ldb,
int* info )
181 #if defined(INTEL_MKL_VERSION) 185 dsytrs_( &uplo, &n, &nrhs, const_cast<double*>( A ), &lda,
186 const_cast<int*>( ipiv ), B, &ldb, info );
225 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<float>* A,
int lda,
226 const int* ipiv, complex<float>* B,
int ldb,
int* info )
230 #if defined(INTEL_MKL_VERSION) 232 using ET = MKL_Complex8;
237 csytrs_( &uplo, &n, &nrhs, const_cast<ET*>( reinterpret_cast<const ET*>( A ) ),
238 &lda, const_cast<int*>( ipiv ), reinterpret_cast<ET*>( B ), &ldb, info );
277 inline void sytrs(
char uplo,
int n,
int nrhs,
const complex<double>* A,
int lda,
278 const int* ipiv, complex<double>* B,
int ldb,
int* info )
282 #if defined(INTEL_MKL_VERSION) 284 using ET = MKL_Complex16;
289 zsytrs_( &uplo, &n, &nrhs, const_cast<ET*>( reinterpret_cast<const ET*>( A ) ),
290 &lda, const_cast<int*>( ipiv ), reinterpret_cast<ET*>( B ), &ldb, info );
Namespace of the Blaze C++ math library.
Definition: Blaze.h:58
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:131
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