| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661 |
- /*******************************************************************************
- * Copyright 2019-2022 Intel Corporation.
- *
- * This software and the related documents are Intel copyrighted materials, and
- * your use of them is governed by the express license under which they were
- * provided to you (License). Unless the License provides otherwise, you may not
- * use, modify, copy, publish, distribute, disclose or transmit this software or
- * the related documents without Intel's prior written permission.
- *
- * This software and the related documents are provided as is, with no express
- * or implied warranties, other than those that are expressly stated in the
- * License.
- *******************************************************************************/
- /*
- ! Content:
- ! Intel(R) oneAPI Math Kernel Library (oneMKL) C interface for
- ! OpenMP offload for LAPACK
- !******************************************************************************/
- #ifndef _MKL_LAPACK_OMP_OFFLOAD_H_
- #define _MKL_LAPACK_OMP_OFFLOAD_H_
- #include "mkl_types.h"
- #include "mkl_lapack_omp_variant.h"
- #ifdef __cplusplus
- extern "C" {
- #endif /* __cplusplus */
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgebrd,a,d,e,tauq,taup,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgebrd,a,d,e,tauq,taup,work,info)
- void cgebrd(const MKL_INT* m, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, float* d, float* e,
- MKL_Complex8* tauq, MKL_Complex8* taup, MKL_Complex8* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgebrd,a,d,e,tauq,taup,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgebrd,a,d,e,tauq,taup,work,info)
- void dgebrd(const MKL_INT* m, const MKL_INT* n, double* a, const MKL_INT* lda, double* d, double* e, double* tauq,
- double* taup, double* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgebrd,a,d,e,tauq,taup,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgebrd,a,d,e,tauq,taup,work,info)
- void sgebrd(const MKL_INT* m, const MKL_INT* n, float* a, const MKL_INT* lda, float* d, float* e, float* tauq,
- float* taup, float* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgebrd,a,d,e,tauq,taup,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgebrd,a,d,e,tauq,taup,work,info)
- void zgebrd(const MKL_INT* m, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, double* d, double* e,
- MKL_Complex16* tauq, MKL_Complex16* taup, MKL_Complex16* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgesvd,a,s,u,vt,work,rwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgesvd,a,s,u,vt,work,rwork,info)
- void cgesvd(const char* jobu, const char* jobvt, const MKL_INT* m, const MKL_INT* n, MKL_Complex8* a,
- const MKL_INT* lda, float* s, MKL_Complex8* u, const MKL_INT* ldu, MKL_Complex8* vt, const MKL_INT* ldvt,
- MKL_Complex8* work, const MKL_INT* lwork, float* rwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgesvd,a,s,u,vt,work,rwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgesvd,a,s,u,vt,work,rwork,info)
- void zgesvd(const char* jobu, const char* jobvt, const MKL_INT* m, const MKL_INT* n, MKL_Complex16* a,
- const MKL_INT* lda, double* s, MKL_Complex16* u, const MKL_INT* ldu, MKL_Complex16* vt, const MKL_INT* ldvt,
- MKL_Complex16* work, const MKL_INT* lwork, double* rwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgesvd,a,s,u,vt,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgesvd,a,s,u,vt,work,info)
- void dgesvd(const char* jobu, const char* jobvt, const MKL_INT* m, const MKL_INT* n, double* a, const MKL_INT* lda,
- double* s, double* u, const MKL_INT* ldu, double* vt, const MKL_INT* ldvt, double* work,
- const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgesvd,a,s,u,vt,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgesvd,a,s,u,vt,work,info)
- void sgesvd(const char* jobu, const char* jobvt, const MKL_INT* m, const MKL_INT* n, float* a, const MKL_INT* lda,
- float* s, float* u, const MKL_INT* ldu, float* vt, const MKL_INT* ldvt, float* work, const MKL_INT* lwork,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetrf_batch_strided,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetrf_batch_strided,a,ipiv,info)
- void cgetrf_batch_strided(const MKL_INT* m, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda,
- const MKL_INT* stride_a, MKL_INT* ipiv, const MKL_INT* stride_ipiv, const MKL_INT* batch_size,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetrf_batch_strided,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetrf_batch_strided,a,ipiv,info)
- void dgetrf_batch_strided(const MKL_INT* m, const MKL_INT* n, double* a, const MKL_INT* lda, const MKL_INT* stride_a,
- MKL_INT* ipiv, const MKL_INT* stride_ipiv, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetrf_batch_strided,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetrf_batch_strided,a,ipiv,info)
- void sgetrf_batch_strided(const MKL_INT* m, const MKL_INT* n, float* a, const MKL_INT* lda, const MKL_INT* stride_a,
- MKL_INT* ipiv, const MKL_INT* stride_ipiv, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetrf_batch_strided,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetrf_batch_strided,a,ipiv,info)
- void zgetrf_batch_strided(const MKL_INT* m, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda,
- const MKL_INT* stride_a, MKL_INT* ipiv, const MKL_INT* stride_ipiv, const MKL_INT* batch_size,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetrf_batch,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetrf_batch,a,ipiv,info)
- void cgetrf_batch(const MKL_INT* m, const MKL_INT* n, MKL_Complex8** a, const MKL_INT* lda, MKL_INT** ipiv,
- const MKL_INT* group_count, const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetrf_batch,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetrf_batch,a,ipiv,info)
- void dgetrf_batch(const MKL_INT* m, const MKL_INT* n, double** a, const MKL_INT* lda, MKL_INT** ipiv,
- const MKL_INT* group_count, const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetrf_batch,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetrf_batch,a,ipiv,info)
- void sgetrf_batch(const MKL_INT* m, const MKL_INT* n, float** a, const MKL_INT* lda, MKL_INT** ipiv,
- const MKL_INT* group_count, const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetrf_batch,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetrf_batch,a,ipiv,info)
- void zgetrf_batch(const MKL_INT* m, const MKL_INT* n, MKL_Complex16** a, const MKL_INT* lda, MKL_INT** ipiv,
- const MKL_INT* group_count, const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetrf,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetrf,a,ipiv,info)
- void cgetrf(const MKL_INT* m, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, MKL_INT* ipiv,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetrf,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetrf,a,ipiv,info)
- void dgetrf(const MKL_INT* m, const MKL_INT* n, double* a, const MKL_INT* lda, MKL_INT* ipiv, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetrf,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetrf,a,ipiv,info)
- void sgetrf(const MKL_INT* m, const MKL_INT* n, float* a, const MKL_INT* lda, MKL_INT* ipiv, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetrf,a,ipiv,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetrf,a,ipiv,info)
- void zgetrf(const MKL_INT* m, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, MKL_INT* ipiv,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetrfnp_batch_strided,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetrfnp_batch_strided,a,info)
- void cgetrfnp_batch_strided(const MKL_INT* m, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda,
- const MKL_INT* stride_a, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetrfnp_batch_strided,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetrfnp_batch_strided,a,info)
- void dgetrfnp_batch_strided(const MKL_INT* m, const MKL_INT* n, double* a, const MKL_INT* lda, const MKL_INT* stride_a,
- const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetrfnp_batch_strided,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetrfnp_batch_strided,a,info)
- void sgetrfnp_batch_strided(const MKL_INT* m, const MKL_INT* n, float* a, const MKL_INT* lda, const MKL_INT* stride_a,
- const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetrfnp_batch_strided,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetrfnp_batch_strided,a,info)
- void zgetrfnp_batch_strided(const MKL_INT* m, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda,
- const MKL_INT* stride_a, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetrfnp_batch,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetrfnp_batch,a,info)
- void cgetrfnp_batch(const MKL_INT* m, const MKL_INT* n, MKL_Complex8** a, const MKL_INT* lda,
- const MKL_INT* group_count, const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetrfnp_batch,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetrfnp_batch,a,info)
- void dgetrfnp_batch(const MKL_INT* m, const MKL_INT* n, double** a, const MKL_INT* lda, const MKL_INT* group_count,
- const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetrfnp_batch,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetrfnp_batch,a,info)
- void sgetrfnp_batch(const MKL_INT* m, const MKL_INT* n, float** a, const MKL_INT* lda, const MKL_INT* group_count,
- const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetrfnp_batch,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetrfnp_batch,a,info)
- void zgetrfnp_batch(const MKL_INT* m, const MKL_INT* n, MKL_Complex16** a, const MKL_INT* lda,
- const MKL_INT* group_count, const MKL_INT* group_sizes, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetri,a,ipiv,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetri,a,ipiv,work,info)
- void cgetri(const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, const MKL_INT* ipiv, MKL_Complex8* work,
- const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetri,a,ipiv,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetri,a,ipiv,work,info)
- void dgetri(const MKL_INT* n, double* a, const MKL_INT* lda, const MKL_INT* ipiv, double* work, const MKL_INT* lwork,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetri,a,ipiv,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetri,a,ipiv,work,info)
- void sgetri(const MKL_INT* n, float* a, const MKL_INT* lda, const MKL_INT* ipiv, float* work, const MKL_INT* lwork,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetri,a,ipiv,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetri,a,ipiv,work,info)
- void zgetri(const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, const MKL_INT* ipiv, MKL_Complex16* work,
- const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cgetrs,a,ipiv,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cgetrs,a,ipiv,b,info)
- void cgetrs(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const MKL_Complex8* a, const MKL_INT* lda,
- const MKL_INT* ipiv, MKL_Complex8* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dgetrs,a,ipiv,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dgetrs,a,ipiv,b,info)
- void dgetrs(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const double* a, const MKL_INT* lda,
- const MKL_INT* ipiv, double* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sgetrs,a,ipiv,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sgetrs,a,ipiv,b,info)
- void sgetrs(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const float* a, const MKL_INT* lda,
- const MKL_INT* ipiv, float* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zgetrs,a,ipiv,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zgetrs,a,ipiv,b,info)
- void zgetrs(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const MKL_Complex16* a, const MKL_INT* lda,
- const MKL_INT* ipiv, MKL_Complex16* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cgetrsnp_batch_strided,a,b,info)
- void cgetrsnp_batch_strided(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const MKL_Complex8* a,
- const MKL_INT* lda, const MKL_INT* stride_a, MKL_Complex8* b, const MKL_INT* ldb,
- const MKL_INT* stride_b, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dgetrsnp_batch_strided,a,b,info)
- void dgetrsnp_batch_strided(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const double* a,
- const MKL_INT* lda, const MKL_INT* stride_a, double* b, const MKL_INT* ldb,
- const MKL_INT* stride_b, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(sgetrsnp_batch_strided,a,b,info)
- void sgetrsnp_batch_strided(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const float* a,
- const MKL_INT* lda, const MKL_INT* stride_a, float* b, const MKL_INT* ldb,
- const MKL_INT* stride_b, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zgetrsnp_batch_strided,a,b,info)
- void zgetrsnp_batch_strided(const char* trans, const MKL_INT* n, const MKL_INT* nrhs, const MKL_Complex16* a,
- const MKL_INT* lda, const MKL_INT* stride_a, MKL_Complex16* b, const MKL_INT* ldb,
- const MKL_INT* stride_b, const MKL_INT* batch_size, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cheev,a,w,work,rwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cheev,a,w,work,rwork,info)
- void cheev(const char* jobz, const char* uplo, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, float* w,
- MKL_Complex8* work, const MKL_INT* lwork, float* rwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zheev,a,w,work,rwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zheev,a,w,work,rwork,info)
- void zheev(const char* jobz, const char* uplo, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, double* w,
- MKL_Complex16* work, const MKL_INT* lwork, double* rwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cheevd,a,w,work,rwork,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cheevd,a,w,work,rwork,iwork,info)
- void cheevd(const char* jobz, const char* uplo, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, float* w,
- MKL_Complex8* work, const MKL_INT* lwork, float* rwork, const MKL_INT* lrwork, MKL_INT* iwork,
- const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zheevd,a,w,work,rwork,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zheevd,a,w,work,rwork,iwork,info)
- void zheevd(const char* jobz, const char* uplo, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, double* w,
- MKL_Complex16* work, const MKL_INT* lwork, double* rwork, const MKL_INT* lrwork, MKL_INT* iwork,
- const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cheevx,a,m,w,z,work,rwork,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cheevx,a,m,w,z,work,rwork,iwork,ifail,info)
- void cheevx(const char* jobz, const char* range, const char* uplo, const MKL_INT* n, MKL_Complex8* a,
- const MKL_INT* lda, const float* vl, const float* vu, const MKL_INT* il, const MKL_INT* iu,
- const float* abstol, MKL_INT* m, float* w, MKL_Complex8* z, const MKL_INT* ldz, MKL_Complex8* work,
- const MKL_INT* lwork, float* rwork, MKL_INT* iwork, MKL_INT* ifail, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zheevx,a,m,w,z,work,rwork,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zheevx,a,m,w,z,work,rwork,iwork,ifail,info)
- void zheevx(const char* jobz, const char* range, const char* uplo, const MKL_INT* n, MKL_Complex16* a,
- const MKL_INT* lda, const double* vl, const double* vu, const MKL_INT* il, const MKL_INT* iu,
- const double* abstol, MKL_INT* m, double* w, MKL_Complex16* z, const MKL_INT* ldz, MKL_Complex16* work,
- const MKL_INT* lwork, double* rwork, MKL_INT* iwork, MKL_INT* ifail, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(chegvd,a,b,w,work,rwork,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(chegvd,a,b,w,work,rwork,iwork,info)
- void chegvd(const MKL_INT* itype, const char* jobz, const char* uplo, const MKL_INT* n, MKL_Complex8* a,
- const MKL_INT* lda, MKL_Complex8* b, const MKL_INT* ldb, float* w, MKL_Complex8* work, const MKL_INT* lwork,
- float* rwork, const MKL_INT* lrwork, MKL_INT* iwork, const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zhegvd,a,b,w,work,rwork,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zhegvd,a,b,w,work,rwork,iwork,info)
- void zhegvd(const MKL_INT* itype, const char* jobz, const char* uplo, const MKL_INT* n, MKL_Complex16* a,
- const MKL_INT* lda, MKL_Complex16* b, const MKL_INT* ldb, double* w, MKL_Complex16* work,
- const MKL_INT* lwork, double* rwork, const MKL_INT* lrwork, MKL_INT* iwork, const MKL_INT* liwork,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(chegvx,a,b,m,w,z,work,rwork,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(chegvx,a,b,m,w,z,work,rwork,iwork,ifail,info)
- void chegvx(const MKL_INT* itype, const char* jobz, const char* range, const char* uplo, const MKL_INT* n,
- MKL_Complex8* a, const MKL_INT* lda, MKL_Complex8* b, const MKL_INT* ldb, const float* vl, const float* vu,
- const MKL_INT* il, const MKL_INT* iu, const float* abstol, MKL_INT* m, float* w, MKL_Complex8* z,
- const MKL_INT* ldz, MKL_Complex8* work, const MKL_INT* lwork, float* rwork, MKL_INT* iwork, MKL_INT* ifail,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zhegvx,a,b,m,w,z,work,rwork,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zhegvx,a,b,m,w,z,work,rwork,iwork,ifail,info)
- void zhegvx(const MKL_INT* itype, const char* jobz, const char* range, const char* uplo, const MKL_INT* n,
- MKL_Complex16* a, const MKL_INT* lda, MKL_Complex16* b, const MKL_INT* ldb, const double* vl,
- const double* vu, const MKL_INT* il, const MKL_INT* iu, const double* abstol, MKL_INT* m, double* w,
- MKL_Complex16* z, const MKL_INT* ldz, MKL_Complex16* work, const MKL_INT* lwork, double* rwork,
- MKL_INT* iwork, MKL_INT* ifail, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(chetrd,a,d,e,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(chetrd,a,d,e,tau,work,info)
- void chetrd(const char* uplo, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, float* d, float* e,
- MKL_Complex8* tau, MKL_Complex8* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zhetrd,a,d,e,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zhetrd,a,d,e,tau,work,info)
- void zhetrd(const char* uplo, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, double* d, double* e,
- MKL_Complex16* tau, MKL_Complex16* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dorgqr,a,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dorgqr,a,tau,work,info)
- void dorgqr(const MKL_INT* m, const MKL_INT* n, const MKL_INT* k, double* a, const MKL_INT* lda, const double* tau,
- double* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sorgqr,a,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sorgqr,a,tau,work,info)
- void sorgqr(const MKL_INT* m, const MKL_INT* n, const MKL_INT* k, float* a, const MKL_INT* lda, const float* tau,
- float* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dormqr,a,tau,c,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dormqr,a,tau,c,work,info)
- void dormqr(const char* side, const char* trans, const MKL_INT* m, const MKL_INT* n, const MKL_INT* k, const double* a,
- const MKL_INT* lda, const double* tau, double* c, const MKL_INT* ldc, double* work, const MKL_INT* lwork,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(sormqr,a,tau,c,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(sormqr,a,tau,c,work,info)
- void sormqr(const char* side, const char* trans, const MKL_INT* m, const MKL_INT* n, const MKL_INT* k, const float* a,
- const MKL_INT* lda, const float* tau, float* c, const MKL_INT* ldc, float* work, const MKL_INT* lwork,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(csteqr,d,e,z,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(csteqr,d,e,z,work,info)
- void csteqr(const char* compz, const MKL_INT* n, float* d, float* e, MKL_Complex8* z, const MKL_INT* ldz, float* work,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsteqr,d,e,z,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsteqr,d,e,z,work,info)
- void dsteqr(const char* compz, const MKL_INT* n, double* d, double* e, double* z, const MKL_INT* ldz, double* work,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssteqr,d,e,z,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssteqr,d,e,z,work,info)
- void ssteqr(const char* compz, const MKL_INT* n, float* d, float* e, float* z, const MKL_INT* ldz, float* work,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zsteqr,d,e,z,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zsteqr,d,e,z,work,info)
- void zsteqr(const char* compz, const MKL_INT* n, double* d, double* e, MKL_Complex16* z, const MKL_INT* ldz,
- double* work, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsyev,a,w,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsyev,a,w,work,info)
- void dsyev(const char* jobz, const char* uplo, const MKL_INT* n, double* a, const MKL_INT* lda, double* w, double* work,
- const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssyev,a,w,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssyev,a,w,work,info)
- void ssyev(const char* jobz, const char* uplo, const MKL_INT* n, float* a, const MKL_INT* lda, float* w, float* work,
- const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsyevd,a,w,work,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsyevd,a,w,work,iwork,info)
- void dsyevd(const char* jobz, const char* uplo, const MKL_INT* n, double* a, const MKL_INT* lda, double* w,
- double* work, const MKL_INT* lwork, MKL_INT* iwork, const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssyevd,a,w,work,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssyevd,a,w,work,iwork,info)
- void ssyevd(const char* jobz, const char* uplo, const MKL_INT* n, float* a, const MKL_INT* lda, float* w, float* work,
- const MKL_INT* lwork, MKL_INT* iwork, const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsyevx,a,m,w,z,work,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsyevx,a,m,w,z,work,iwork,ifail,info)
- void dsyevx(const char* jobz, const char* range, const char* uplo, const MKL_INT* n, double* a, const MKL_INT* lda,
- const double* vl, const double* vu, const MKL_INT* il, const MKL_INT* iu, const double* abstol, MKL_INT* m,
- double* w, double* z, const MKL_INT* ldz, double* work, const MKL_INT* lwork, MKL_INT* iwork,
- MKL_INT* ifail, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssyevx,a,m,w,z,work,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssyevx,a,m,w,z,work,iwork,ifail,info)
- void ssyevx(const char* jobz, const char* range, const char* uplo, const MKL_INT* n, float* a, const MKL_INT* lda,
- const float* vl, const float* vu, const MKL_INT* il, const MKL_INT* iu, const float* abstol, MKL_INT* m,
- float* w, float* z, const MKL_INT* ldz, float* work, const MKL_INT* lwork, MKL_INT* iwork, MKL_INT* ifail,
- MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsygvd,a,b,w,work,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsygvd,a,b,w,work,iwork,info)
- void dsygvd(const MKL_INT* itype, const char* jobz, const char* uplo, const MKL_INT* n, double* a, const MKL_INT* lda,
- double* b, const MKL_INT* ldb, double* w, double* work, const MKL_INT* lwork, MKL_INT* iwork,
- const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssygvd,a,b,w,work,iwork,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssygvd,a,b,w,work,iwork,info)
- void ssygvd(const MKL_INT* itype, const char* jobz, const char* uplo, const MKL_INT* n, float* a, const MKL_INT* lda,
- float* b, const MKL_INT* ldb, float* w, float* work, const MKL_INT* lwork, MKL_INT* iwork,
- const MKL_INT* liwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsygvx,a,b,m,w,z,work,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsygvx,a,b,m,w,z,work,iwork,ifail,info)
- void dsygvx(const MKL_INT* itype, const char* jobz, const char* range, const char* uplo, const MKL_INT* n, double* a,
- const MKL_INT* lda, double* b, const MKL_INT* ldb, const double* vl, const double* vu, const MKL_INT* il,
- const MKL_INT* iu, const double* abstol, MKL_INT* m, double* w, double* z, const MKL_INT* ldz, double* work,
- const MKL_INT* lwork, MKL_INT* iwork, MKL_INT* ifail, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssygvx,a,b,m,w,z,work,iwork,ifail,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssygvx,a,b,m,w,z,work,iwork,ifail,info)
- void ssygvx(const MKL_INT* itype, const char* jobz, const char* range, const char* uplo, const MKL_INT* n, float* a,
- const MKL_INT* lda, float* b, const MKL_INT* ldb, const float* vl, const float* vu, const MKL_INT* il,
- const MKL_INT* iu, const float* abstol, MKL_INT* m, float* w, float* z, const MKL_INT* ldz, float* work,
- const MKL_INT* lwork, MKL_INT* iwork, MKL_INT* ifail, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dsytrd,a,d,e,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dsytrd,a,d,e,tau,work,info)
- void dsytrd(const char* uplo, const MKL_INT* n, double* a, const MKL_INT* lda, double* d, double* e, double* tau,
- double* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ssytrd,a,d,e,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ssytrd,a,d,e,tau,work,info)
- void ssytrd(const char* uplo, const MKL_INT* n, float* a, const MKL_INT* lda, float* d, float* e, float* tau,
- float* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ctrtri,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ctrtri,a,info)
- void ctrtri(const char* uplo, const char* diag, const MKL_INT* n, MKL_Complex8* a, const MKL_INT* lda, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dtrtri,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dtrtri,a,info)
- void dtrtri(const char* uplo, const char* diag, const MKL_INT* n, double* a, const MKL_INT* lda, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(strtri,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(strtri,a,info)
- void strtri(const char* uplo, const char* diag, const MKL_INT* n, float* a, const MKL_INT* lda, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ztrtri,a,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ztrtri,a,info)
- void ztrtri(const char* uplo, const char* diag, const MKL_INT* n, MKL_Complex16* a, const MKL_INT* lda, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ctrtrs,a,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ctrtrs,a,b,info)
- void ctrtrs(const char* uplo, const char* trans, const char* diag, const MKL_INT* n, const MKL_INT* nrhs,
- const MKL_Complex8* a, const MKL_INT* lda, MKL_Complex8* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(dtrtrs,a,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(dtrtrs,a,b,info)
- void dtrtrs(const char* uplo, const char* trans, const char* diag, const MKL_INT* n, const MKL_INT* nrhs,
- const double* a, const MKL_INT* lda, double* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(strtrs,a,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(strtrs,a,b,info)
- void strtrs(const char* uplo, const char* trans, const char* diag, const MKL_INT* n, const MKL_INT* nrhs,
- const float* a, const MKL_INT* lda, float* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(ztrtrs,a,b,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(ztrtrs,a,b,info)
- void ztrtrs(const char* uplo, const char* trans, const char* diag, const MKL_INT* n, const MKL_INT* nrhs,
- const MKL_Complex16* a, const MKL_INT* lda, MKL_Complex16* b, const MKL_INT* ldb, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cungqr,a,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cungqr,a,tau,work,info)
- void cungqr(const MKL_INT* m, const MKL_INT* n, const MKL_INT* k, MKL_Complex8* a, const MKL_INT* lda,
- const MKL_Complex8* tau, MKL_Complex8* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zungqr,a,tau,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zungqr,a,tau,work,info)
- void zungqr(const MKL_INT* m, const MKL_INT* n, const MKL_INT* k, MKL_Complex16* a, const MKL_INT* lda,
- const MKL_Complex16* tau, MKL_Complex16* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(cunmqr,a,tau,c,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(cunmqr,a,tau,c,work,info)
- void cunmqr(const char* side, const char* trans, const MKL_INT* m, const MKL_INT* n, const MKL_INT* k,
- const MKL_Complex8* a, const MKL_INT* lda, const MKL_Complex8* tau, MKL_Complex8* c, const MKL_INT* ldc,
- MKL_Complex8* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #if (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_51(zunmqr,a,tau,c,work,info)
- #endif // (_OPENMP >= 202011)
- #pragma omp MKL_LAPACK_DECLARE_VARIANT_50(zunmqr,a,tau,c,work,info)
- void zunmqr(const char* side, const char* trans, const MKL_INT* m, const MKL_INT* n, const MKL_INT* k,
- const MKL_Complex16* a, const MKL_INT* lda, const MKL_Complex16* tau, MKL_Complex16* c, const MKL_INT* ldc,
- MKL_Complex16* work, const MKL_INT* lwork, MKL_INT* info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cgeqrf,a,tau,work,info)
- void cgeqrf(const MKL_INT *m, const MKL_INT *n, MKL_Complex8 *a, const MKL_INT *lda, MKL_Complex8 *tau, MKL_Complex8 *work, const MKL_INT *lwork, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dgeqrf,a,tau,work,info)
- void dgeqrf(const MKL_INT *m, const MKL_INT *n, double *a, const MKL_INT *lda, double *tau, double *work, const MKL_INT *lwork, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(sgeqrf,a,tau,work,info)
- void sgeqrf(const MKL_INT *m, const MKL_INT *n, float *a, const MKL_INT *lda, float *tau, float *work, const MKL_INT *lwork, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zgeqrf,a,tau,work,info)
- void zgeqrf(const MKL_INT *m, const MKL_INT *n, MKL_Complex16 *a, const MKL_INT *lda, MKL_Complex16 *tau, MKL_Complex16 *work, const MKL_INT *lwork, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cgetri_oop_batch_strided,a,ipiv,ainv,info)
- void cgetri_oop_batch_strided(const MKL_INT *n, const MKL_Complex8 *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, MKL_Complex8 *ainv, const MKL_INT *ldainv, const MKL_INT *stride_ainv, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dgetri_oop_batch_strided,a,ipiv,ainv,info)
- void dgetri_oop_batch_strided(const MKL_INT *n, const double *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, double *ainv, const MKL_INT *ldainv, const MKL_INT *stride_ainv, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(sgetri_oop_batch_strided,a,ipiv,ainv,info)
- void sgetri_oop_batch_strided(const MKL_INT *n, const float *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, float *ainv, const MKL_INT *ldainv, const MKL_INT *stride_ainv, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zgetri_oop_batch_strided,a,ipiv,ainv,info)
- void zgetri_oop_batch_strided(const MKL_INT *n, const MKL_Complex16 *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, MKL_Complex16 *ainv, const MKL_INT *ldainv, const MKL_INT *stride_ainv, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cgetri_oop_batch,a,ipiv,ainv,info)
- void cgetri_oop_batch(const MKL_INT *n, const MKL_Complex8 **a, const MKL_INT *lda, const MKL_INT **ipiv, MKL_Complex8 **ainv, const MKL_INT *ldainv, const MKL_INT *group_count, const MKL_INT *group_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dgetri_oop_batch,a,ipiv,ainv,info)
- void dgetri_oop_batch(const MKL_INT *n, const double **a, const MKL_INT *lda, const MKL_INT **ipiv, double **ainv, const MKL_INT *ldainv, const MKL_INT *group_count, const MKL_INT *group_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(sgetri_oop_batch,a,ipiv,ainv,info)
- void sgetri_oop_batch(const MKL_INT *n, const float **a, const MKL_INT *lda, const MKL_INT **ipiv, float **ainv, const MKL_INT *ldainv, const MKL_INT *group_count, const MKL_INT *group_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zgetri_oop_batch,a,ipiv,ainv,info)
- void zgetri_oop_batch(const MKL_INT *n, const MKL_Complex16 **a, const MKL_INT *lda, const MKL_INT **ipiv, MKL_Complex16 **ainv, const MKL_INT *ldainv, const MKL_INT *group_count, const MKL_INT *group_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cgetrs_batch_strided,a,ipiv,b,info)
- void cgetrs_batch_strided(const char *trans, const MKL_INT *n, const MKL_INT *nrhs, const MKL_Complex8 *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, MKL_Complex8 *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dgetrs_batch_strided,a,ipiv,b,info)
- void dgetrs_batch_strided(const char *trans, const MKL_INT *n, const MKL_INT *nrhs, const double *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, double *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(sgetrs_batch_strided,a,ipiv,b,info)
- void sgetrs_batch_strided(const char *trans, const MKL_INT *n, const MKL_INT *nrhs, const float *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, float *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zgetrs_batch_strided,a,ipiv,b,info)
- void zgetrs_batch_strided(const char *trans, const MKL_INT *n, const MKL_INT *nrhs, const MKL_Complex16 *a, const MKL_INT *lda, const MKL_INT *stride_a, const MKL_INT *ipiv, const MKL_INT *stride_ipiv, MKL_Complex16 *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cpotrf,a,info)
- void cpotrf(const char *uplo, const MKL_INT *n, MKL_Complex8 *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dpotrf,a,info)
- void dpotrf(const char *uplo, const MKL_INT *n, double *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(spotrf,a,info)
- void spotrf(const char *uplo, const MKL_INT *n, float *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zpotrf,a,info)
- void zpotrf(const char *uplo, const MKL_INT *n, MKL_Complex16 *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cpotri,a,info)
- void cpotri(const char *uplo, const MKL_INT *n, MKL_Complex8 *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dpotri,a,info)
- void dpotri(const char *uplo, const MKL_INT *n, double *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(spotri,a,info)
- void spotri(const char *uplo, const MKL_INT *n, float *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zpotri,a,info)
- void zpotri(const char *uplo, const MKL_INT *n, MKL_Complex16 *a, const MKL_INT *lda, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cpotrs,a,b,info)
- void cpotrs(const char *uplo, const MKL_INT *n, const MKL_INT *nrhs, const MKL_Complex8 *a, const MKL_INT *lda, MKL_Complex8 *b, const MKL_INT *ldb, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dpotrs,a,b,info)
- void dpotrs(const char *uplo, const MKL_INT *n, const MKL_INT *nrhs, const double *a, const MKL_INT *lda, double *b, const MKL_INT *ldb, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(spotrs,a,b,info)
- void spotrs(const char *uplo, const MKL_INT *n, const MKL_INT *nrhs, const float *a, const MKL_INT *lda, float *b, const MKL_INT *ldb, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zpotrs,a,b,info)
- void zpotrs(const char *uplo, const MKL_INT *n, const MKL_INT *nrhs, const MKL_Complex16 *a, const MKL_INT *lda, MKL_Complex16 *b, const MKL_INT *ldb, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(dgels_batch_strided,a,b,info)
- void dgels_batch_strided(const char *trans, const MKL_INT *m, const MKL_INT *n, const MKL_INT *nrhs, double *a, const MKL_INT *lda, const MKL_INT *stride_a, double *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(sgels_batch_strided,a,b,info)
- void sgels_batch_strided(const char *trans, const MKL_INT *m, const MKL_INT *n, const MKL_INT *nrhs, float *a, const MKL_INT *lda, const MKL_INT *stride_a, float *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(zgels_batch_strided,a,b,info)
- void zgels_batch_strided(const char *trans, const MKL_INT *m, const MKL_INT *n, const MKL_INT *nrhs, MKL_Complex16 *a, const MKL_INT *lda, const MKL_INT *stride_a, MKL_Complex16 *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #pragma omp MKL_LAPACK_DECLARE_VARIANT(cgels_batch_strided,a,b,info)
- void cgels_batch_strided(const char *trans, const MKL_INT *m, const MKL_INT *n, const MKL_INT *nrhs, MKL_Complex8 *a, const MKL_INT *lda, const MKL_INT *stride_a, MKL_Complex8 *b, const MKL_INT *ldb, const MKL_INT *stride_b, const MKL_INT *batch_size, MKL_INT *info) NOTHROW;
- #ifdef __cplusplus
- }
- #endif /* __cplusplus */
- #endif /* _MKL_LAPACK_OMP_VARIANT_H_ */
|