35#ifndef _BLAZE_MATH_LAPACK_CLAPACK_UNGR2_H_
36#define _BLAZE_MATH_LAPACK_CLAPACK_UNGR2_H_
56#if !defined(INTEL_MKL_VERSION)
123 const complex<float>* tau, complex<float>* work,
blas_int_t* info )
127#if defined(INTEL_MKL_VERSION)
130 using ET = MKL_Complex8;
135 cungr2_( &m, &n, &k,
reinterpret_cast<ET*
>( A ), &lda,
136 const_cast<ET*
>(
reinterpret_cast<const ET*
>( tau ) ),
137 reinterpret_cast<ET*
>( work ), info );
173 const complex<double>* tau, complex<double>* work,
blas_int_t* info )
177#if defined(INTEL_MKL_VERSION)
180 using ET = MKL_Complex16;
185 zungr2_( &m, &n, &k,
reinterpret_cast<ET*
>( A ), &lda,
186 const_cast<ET*
>(
reinterpret_cast<const ET*
>( tau ) ),
187 reinterpret_cast<ET*
>( work ), info );
Header file for the complex data type.
Complex data type of the Blaze library.
void ungr2(DenseMatrix< MT, SO > &A, const ElementType_t< MT > *tau)
LAPACK kernel for the reconstruction of the orthogonal matrix Q from a RQ decomposition.
Definition: ungr2.h:121
int32_t blas_int_t
Signed integer type used in the BLAS/LAPACK wrapper functions.
Definition: Types.h:64
#define BLAZE_STATIC_ASSERT(expr)
Compile time assertion macro.
Definition: StaticAssert.h:112
Header file for basic BLAS type definitions.