35#ifndef _BLAZE_MATH_LAPACK_CLAPACK_HETRS_H_
36#define _BLAZE_MATH_LAPACK_CLAPACK_HETRS_H_
57#if !defined(INTEL_MKL_VERSION)
137#if defined(INTEL_MKL_VERSION)
140 using ET = MKL_Complex8;
145 chetrs_( &uplo, &n, &nrhs,
const_cast<ET*
>(
reinterpret_cast<const ET*
>( A ) ),
146 &lda,
const_cast<blas_int_t*
>( ipiv ),
reinterpret_cast<ET*
>( B ), &ldb, info
147#
if !defined(INTEL_MKL_VERSION)
195#if defined(INTEL_MKL_VERSION)
198 using ET = MKL_Complex16;
203 zhetrs_( &uplo, &n, &nrhs,
const_cast<ET*
>(
reinterpret_cast<const ET*
>( A ) ),
204 &lda,
const_cast<blas_int_t*
>( ipiv ),
reinterpret_cast<ET*
>( B ), &ldb, info
205#
if !defined(INTEL_MKL_VERSION)
Header file for the complex data type.
Complex data type of the Blaze library.
void hetrs(const DenseMatrix< MT1, SO1 > &A, DenseMatrix< MT2, SO2 > &B, char uplo, const blas_int_t *ipiv)
LAPACK kernel for the substitution step of solving a symmetric indefinite linear system of equations ...
Definition: hetrs.h:311
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
size_t fortran_charlen_t
Type of the hidden arguments of character type within a Fortran forward declaration.
Definition: Types.h:186
Header file for basic BLAS type definitions.
Header file for basic type definitions.