35 #ifndef _BLAZE_MATH_LAPACK_CLAPACK_GETRS_H_ 36 #define _BLAZE_MATH_LAPACK_CLAPACK_GETRS_H_ 55 #if !defined(INTEL_MKL_VERSION) 58 void sgetrs_(
char*
trans,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
float* B,
int* ldb,
int* info );
59 void dgetrs_(
char*
trans,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
double* B,
int* ldb,
int* info );
60 void cgetrs_(
char*
trans,
int* n,
int* nrhs,
float* A,
int* lda,
int* ipiv,
float* B,
int* ldb,
int* info );
61 void zgetrs_(
char*
trans,
int* n,
int* nrhs,
double* A,
int* lda,
int* ipiv,
double* B,
int* ldb,
int* info );
82 inline void getrs(
char trans,
int n,
int nrhs,
const float* A,
int lda,
const int* ipiv,
83 float* B,
int ldb,
int* info );
85 inline void getrs(
char trans,
int n,
int nrhs,
const double* A,
int lda,
const int* ipiv,
86 double* B,
int ldb,
int* info );
88 inline void getrs(
char trans,
int n,
int nrhs,
const complex<float>* A,
int lda,
89 const int* ipiv, complex<float>* B,
int ldb,
int* info );
91 inline void getrs(
char trans,
int n,
int nrhs,
const complex<double>* A,
int lda,
92 const int* ipiv, complex<double>* B,
int ldb,
int* info );
136 inline void getrs(
char trans,
int n,
int nrhs,
const float* A,
int lda,
137 const int* ipiv,
float* B,
int ldb,
int* info )
139 #if defined(INTEL_MKL_VERSION) 143 sgetrs_( &trans, &n, &nrhs, const_cast<float*>( A ), &lda,
144 const_cast<int*>( ipiv ), B, &ldb, info );
188 inline void getrs(
char trans,
int n,
int nrhs,
const double* A,
int lda,
189 const int* ipiv,
double* B,
int ldb,
int* info )
191 #if defined(INTEL_MKL_VERSION) 195 dgetrs_( &trans, &n, &nrhs, const_cast<double*>( A ), &lda,
196 const_cast<int*>( ipiv ), B, &ldb, info );
240 inline void getrs(
char trans,
int n,
int nrhs,
const complex<float>* A,
int lda,
241 const int* ipiv, complex<float>* B,
int ldb,
int* info )
245 #if defined(INTEL_MKL_VERSION) 247 using ET = MKL_Complex8;
252 cgetrs_( &trans, &n, &nrhs, const_cast<ET*>( reinterpret_cast<const ET*>( A ) ),
253 &lda, const_cast<int*>( ipiv ), reinterpret_cast<ET*>( B ), &ldb, info );
297 inline void getrs(
char trans,
int n,
int nrhs,
const complex<double>* A,
int lda,
298 const int* ipiv, complex<double>* B,
int ldb,
int* info )
302 #if defined(INTEL_MKL_VERSION) 304 using ET = MKL_Complex16;
309 zgetrs_( &trans, &n, &nrhs, const_cast<ET*>( reinterpret_cast<const ET*>( A ) ),
310 &lda, const_cast<int*>( ipiv ), reinterpret_cast<ET*>( B ), &ldb, info );
Namespace of the Blaze C++ math library.
Definition: Blaze.h:57
void getrs(char trans, 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 general single precision linear system of equati...
Definition: getrs.h:136
decltype(auto) trans(const DenseMatrix< MT, SO > &dm)
Calculation of the transpose of the given dense matrix.
Definition: DMatTransExpr.h:790
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