35 #ifndef _BLAZE_MATH_LAPACK_CLAPACK_UNMQL_H_ 36 #define _BLAZE_MATH_LAPACK_CLAPACK_UNMQL_H_ 55 #if !defined(INTEL_MKL_VERSION) 58 void cunmql_(
char* side,
char*
trans,
int* m,
int* n,
int* k,
float* A,
int* lda,
float* tau,
float* C,
int* ldc,
float* work,
int* lwork,
int* info );
59 void zunmql_(
char* side,
char*
trans,
int* m,
int* n,
int* k,
double* A,
int* lda,
double* tau,
double* C,
int* ldc,
double* work,
int* lwork,
int* info );
80 inline void unmql(
char side,
char trans,
int m,
int n,
int k,
const complex<float>* A,
int lda,
81 const complex<float>* tau, complex<float>* C,
int ldc, complex<float>* work,
82 int lwork,
int* info );
84 inline void unmql(
char side,
char trans,
int m,
int n,
int k,
const complex<double>* A,
int lda,
85 const complex<double>* tau, complex<double>* C,
int ldc, complex<double>* work,
86 int lwork,
int* info );
138 inline void unmql(
char side,
char trans,
int m,
int n,
int k,
const complex<float>* A,
int lda,
139 const complex<float>* tau, complex<float>* C,
int ldc, complex<float>* work,
140 int lwork,
int* info )
144 #if defined(INTEL_MKL_VERSION) 146 using ET = MKL_Complex8;
151 cunmql_( &side, &trans, &m, &n, &k,
152 const_cast<ET*>( reinterpret_cast<const ET*>( A ) ), &lda,
153 const_cast<ET*>( reinterpret_cast<const ET*>( tau ) ),
154 reinterpret_cast<ET*>( C ), &ldc, reinterpret_cast<ET*>( work ),
207 inline void unmql(
char side,
char trans,
int m,
int n,
int k,
const complex<double>* A,
int lda,
208 const complex<double>* tau, complex<double>* C,
int ldc, complex<double>* work,
209 int lwork,
int* info )
213 #if defined(INTEL_MKL_VERSION) 215 using ET = MKL_Complex16;
220 zunmql_( &side, &trans, &m, &n, &k,
221 const_cast<ET*>( reinterpret_cast<const ET*>( A ) ), &lda,
222 const_cast<ET*>( reinterpret_cast<const ET*>( tau ) ),
223 reinterpret_cast<ET*>( C ), &ldc, reinterpret_cast<ET*>( work ),
Namespace of the Blaze C++ math library.
Definition: Blaze.h:58
void unmql(char side, char trans, int m, int n, int k, const complex< float > *A, int lda, const complex< float > *tau, complex< float > *C, int ldc, complex< float > *work, int lwork, int *info)
LAPACK kernel for the multiplication of the single precision Q from a QL decomposition with another m...
Definition: unmql.h:138
decltype(auto) trans(const DenseMatrix< MT, SO > &dm)
Calculation of the transpose of the given dense matrix.
Definition: DMatTransExpr.h:789
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