35#ifndef _BLAZE_MATH_LAPACK_CLAPACK_TRTRS_H_
36#define _BLAZE_MATH_LAPACK_CLAPACK_TRTRS_H_
57#if !defined(INTEL_MKL_VERSION)
159#if defined(INTEL_MKL_VERSION)
163 strtrs_( &uplo, &
trans, &diag, &n, &nrhs,
const_cast<float*
>( A ), &lda, B, &ldb, info
164#
if !defined(INTEL_MKL_VERSION)
216#if defined(INTEL_MKL_VERSION)
220 dtrtrs_( &uplo, &
trans, &diag, &n, &nrhs,
const_cast<double*
>( A ), &lda, B, &ldb, info
221#
if !defined(INTEL_MKL_VERSION)
270 const complex<float>* A,
blas_int_t lda, complex<float>* B,
275#if defined(INTEL_MKL_VERSION)
278 using ET = MKL_Complex8;
283 ctrtrs_( &uplo, &
trans, &diag, &n, &nrhs,
const_cast<ET*
>(
reinterpret_cast<const ET*
>( A ) ),
284 &lda,
reinterpret_cast<ET*
>( B ), &ldb, info
285#
if !defined(INTEL_MKL_VERSION)
334 const complex<double>* A,
blas_int_t lda, complex<double>* B,
339#if defined(INTEL_MKL_VERSION)
342 using ET = MKL_Complex16;
347 ztrtrs_( &uplo, &
trans, &diag, &n, &nrhs,
const_cast<ET*
>(
reinterpret_cast<const ET*
>( A ) ),
348 &lda,
reinterpret_cast<ET*
>( B ), &ldb, info
349#
if !defined(INTEL_MKL_VERSION)
Header file for the complex data type.
Complex data type of the Blaze library.
decltype(auto) trans(const DenseMatrix< MT, SO > &dm)
Calculation of the transpose of the given dense matrix.
Definition: DMatTransExpr.h:766
void trtrs(const DenseMatrix< MT1, SO1 > &A, DenseMatrix< MT2, SO2 > &B, char uplo, char trans, char diag)
LAPACK kernel for the substitution step of solving a triangular linear system of equations ( ).
Definition: trtrs.h:316
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.