v0.9.0
Classes | Macros | Typedefs | Functions
lapack_wrap.h File Reference

Go to the source code of this file.

Classes

struct  __CLPK_complex
 
struct  __CLPK_doublecomplex
 

Macros

#define __lapack__
 
#define __CLPK_TYPES__
 

Typedefs

typedef long int __CLPK_integer
 
typedef long int __CLPK_logical
 
typedef float __CLPK_real
 
typedef double __CLPK_doublereal
 
typedef __CLPK_logical(* __CLPK_L_fp) ()
 
typedef long int __CLPK_ftnlen
 

Functions

__CLPK_integer sgetrf_ (__CLPK_integer *m, __CLPK_integer *n, float *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_integer *info)
 
__CLPK_integer dgetrf_ (__CLPK_integer *m, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_integer *info)
 
__CLPK_integer dgetrs_ (char *trans, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
 
__CLPK_integer dgesv_ (__CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
 
__CLPK_integer dgetri_ (__CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer dpotrf_ (char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *info)
 
__CLPK_integer dpotrs_ (char *uplo, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
 
__CLPK_integer dposv_ (char *uplo, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
 
__CLPK_integer dsysv_ (char *uplo, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer dpotri_ (char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *info)
 
__CLPK_integer dgesvd_ (char *jobu, char *jobvt, __CLPK_integer *m, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *s, __CLPK_doublereal *u, __CLPK_integer *ldu, __CLPK_doublereal *vt, __CLPK_integer *ldvt, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer sgesvd_ (char *jobu, char *jobvt, __CLPK_integer *m, __CLPK_integer *n, float *a, __CLPK_integer *lda, float *s, float *u, __CLPK_integer *ldu, float *vt, __CLPK_integer *ldvt, float *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer dsyev_ (char *jobz, char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *w, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer zheev_ (char *jobz, char *uplo, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_doublereal *w, __CLPK_doublecomplex *work, __CLPK_integer *lwork, __CLPK_doublereal *rwork, __CLPK_integer *info)
 
__CLPK_integer zgeev_ (char *jobvl, char *jobvr, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_doublecomplex *w, __CLPK_doublecomplex *vl, __CLPK_integer *ldvl, __CLPK_doublecomplex *vr, __CLPK_integer *ldvr, __CLPK_doublecomplex *work, __CLPK_integer *lwork, __CLPK_doublereal *rwork, __CLPK_integer *info)
 
__CLPK_integer dgelsy_ (char *trans, __CLPK_integer *m, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer dgels_ (char *trans, __CLPK_integer *m, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer dgesdd_ (char *jobz, __CLPK_integer *m, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *s, __CLPK_doublereal *u, __CLPK_integer *ldu, __CLPK_doublereal *vt, __CLPK_integer *ldvt, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *iwork, __CLPK_integer *info)
 
__CLPK_integer dsyevd_ (char *jobz, char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *w, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *iwork, __CLPK_integer *liwork, __CLPK_integer *info)
 
__CLPK_integer zgetri_ (__CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublecomplex *work, __CLPK_integer *lwork, __CLPK_integer *info)
 
__CLPK_integer zgetrf_ (__CLPK_integer *m, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_integer *info)
 
__CLPK_integer zpotri_ (char *uplo, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *info)
 
__CLPK_integer zpotrf_ (char *uplo, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *info)
 
__CLPK_integer dpbtrs_ (char *uplo, __CLPK_integer *n, __CLPK_integer *kd, __CLPK_integer *nrhs, __CLPK_doublereal *ab, __CLPK_integer *ldab, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
 SUBROUTINE DPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) More...
 
static __CLPK_integer lapack_sgetrf (__CLPK_integer m, __CLPK_integer n, float *a, __CLPK_integer lda, __CLPK_integer *ipiv)
 
static __CLPK_integer lapack_dgetrf (__CLPK_integer m, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_integer *ipiv)
 
static __CLPK_integer lapack_dgetrs (char trans, __CLPK_integer n, __CLPK_integer nrhs, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer ldb)
 
static __CLPK_integer lapack_dgesv (__CLPK_integer n, __CLPK_integer nrhs, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer ldb)
 
static __CLPK_integer lapack_dgetri (__CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_integer *ipiv, __CLPK_doublereal *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_dpotrf (char uplo, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda)
 
static __CLPK_integer lapack_dpotrs (char uplo, __CLPK_integer n, __CLPK_integer nrhs, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *b, __CLPK_integer ldb)
 
static __CLPK_integer lapack_dposv (char uplo, __CLPK_integer n, __CLPK_integer nrhs, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *b, __CLPK_integer ldb)
 
static __CLPK_integer lapack_dsysv (char uplo, __CLPK_integer n, __CLPK_integer nrhs, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer ldb, __CLPK_doublereal *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_dpotri (char uplo, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda)
 
static __CLPK_integer lapack_dgesvd (char jobu, char jobvt, __CLPK_integer m, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *s, __CLPK_doublereal *u, __CLPK_integer ldu, __CLPK_doublereal *vt, __CLPK_integer ldvt, __CLPK_doublereal *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_sgesvd (char jobu, char jobvt, __CLPK_integer m, __CLPK_integer n, float *a, __CLPK_integer lda, float *s, float *u, __CLPK_integer ldu, float *vt, __CLPK_integer ldvt, float *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_dsyev (char jobz, char uplo, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *w, __CLPK_doublereal *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_zheev (char jobz, char uplo, __CLPK_integer n, __CLPK_doublecomplex *a, __CLPK_integer lda, __CLPK_doublereal *w, __CLPK_doublecomplex *work, __CLPK_integer lwork, __CLPK_doublereal *rwork)
 
static __CLPK_integer lapack_zgeev (char jobvl, char jobvr, __CLPK_integer n, __CLPK_doublecomplex *a, __CLPK_integer lda, __CLPK_doublecomplex *w, __CLPK_doublecomplex *vl, __CLPK_integer ldvl, __CLPK_doublecomplex *vr, __CLPK_integer ldvr, __CLPK_doublecomplex *work, __CLPK_integer lwork, __CLPK_doublereal *rwork)
 
static __CLPK_integer lapack_dgels (char trans, __CLPK_integer m, __CLPK_integer n, __CLPK_integer nrhs, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *b, __CLPK_integer ldb, __CLPK_doublereal *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_dgesdd (char jobz, __CLPK_integer m, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *s, __CLPK_doublereal *u, __CLPK_integer ldu, __CLPK_doublereal *vt, __CLPK_integer ldvt, __CLPK_doublereal *work, __CLPK_integer lwork, __CLPK_integer *iwork)
 
static __CLPK_integer lapack_dsyevd (char jobz, char uplo, __CLPK_integer n, __CLPK_doublereal *a, __CLPK_integer lda, __CLPK_doublereal *w, __CLPK_doublereal *work, __CLPK_integer lwork, __CLPK_integer *iwork, __CLPK_integer liwork)
 
static __CLPK_integer lapack_zgetrf (__CLPK_integer m, __CLPK_integer n, __CLPK_doublecomplex *a, __CLPK_integer lda, __CLPK_integer *ipiv)
 
static __CLPK_integer lapack_zgetri (__CLPK_integer n, __CLPK_doublecomplex *a, __CLPK_integer lda, __CLPK_integer *ipiv, __CLPK_doublecomplex *work, __CLPK_integer lwork)
 
static __CLPK_integer lapack_zpotri (char uplo, __CLPK_integer n, __CLPK_doublecomplex *a, __CLPK_integer lda)
 
static __CLPK_integer lapack_zpotrf (char uplo, __CLPK_integer n, __CLPK_doublecomplex *a, __CLPK_integer lda)
 
static __CLPK_integer lapack_dpbtrs (char uplo, __CLPK_integer n, __CLPK_integer kd, __CLPK_integer nrhs, __CLPK_doublereal *ab, __CLPK_integer ldab, __CLPK_doublereal *b, __CLPK_integer ldb)
 

Macro Definition Documentation

◆ __CLPK_TYPES__

#define __CLPK_TYPES__

Definition at line 24 of file lapack_wrap.h.

◆ __lapack__

#define __lapack__

Definition at line 22 of file lapack_wrap.h.

Typedef Documentation

◆ __CLPK_doublereal

Definition at line 38 of file lapack_wrap.h.

◆ __CLPK_ftnlen

typedef long int __CLPK_ftnlen

Definition at line 40 of file lapack_wrap.h.

◆ __CLPK_integer

typedef long int __CLPK_integer

Definition at line 35 of file lapack_wrap.h.

◆ __CLPK_L_fp

typedef __CLPK_logical(* __CLPK_L_fp) ()

Definition at line 39 of file lapack_wrap.h.

◆ __CLPK_logical

typedef long int __CLPK_logical

Definition at line 36 of file lapack_wrap.h.

◆ __CLPK_real

typedef float __CLPK_real

Definition at line 37 of file lapack_wrap.h.

Function Documentation

◆ dgels_()

__CLPK_integer dgels_ ( char *  trans,
__CLPK_integer m,
__CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ dgelsy_()

__CLPK_integer dgelsy_ ( char *  trans,
__CLPK_integer m,
__CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ dgesdd_()

__CLPK_integer dgesdd_ ( char *  jobz,
__CLPK_integer m,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal s,
__CLPK_doublereal u,
__CLPK_integer ldu,
__CLPK_doublereal vt,
__CLPK_integer ldvt,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer iwork,
__CLPK_integer info 
)

◆ dgesv_()

__CLPK_integer dgesv_ ( __CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_integer info 
)

◆ dgesvd_()

__CLPK_integer dgesvd_ ( char *  jobu,
char *  jobvt,
__CLPK_integer m,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal s,
__CLPK_doublereal u,
__CLPK_integer ldu,
__CLPK_doublereal vt,
__CLPK_integer ldvt,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ dgetrf_()

__CLPK_integer dgetrf_ ( __CLPK_integer m,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_integer info 
)

◆ dgetri_()

__CLPK_integer dgetri_ ( __CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ dgetrs_()

__CLPK_integer dgetrs_ ( char *  trans,
__CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_integer info 
)

◆ dpbtrs_()

__CLPK_integer dpbtrs_ ( char *  uplo,
__CLPK_integer n,
__CLPK_integer kd,
__CLPK_integer nrhs,
__CLPK_doublereal ab,
__CLPK_integer ldab,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_integer info 
)

SUBROUTINE DPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO )

◆ dposv_()

__CLPK_integer dposv_ ( char *  uplo,
__CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_integer info 
)

◆ dpotrf_()

__CLPK_integer dpotrf_ ( char *  uplo,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer info 
)

◆ dpotri_()

__CLPK_integer dpotri_ ( char *  uplo,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer info 
)

◆ dpotrs_()

__CLPK_integer dpotrs_ ( char *  uplo,
__CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_integer info 
)

◆ dsyev_()

__CLPK_integer dsyev_ ( char *  jobz,
char *  uplo,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal w,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ dsyevd_()

__CLPK_integer dsyevd_ ( char *  jobz,
char *  uplo,
__CLPK_integer n,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_doublereal w,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer iwork,
__CLPK_integer liwork,
__CLPK_integer info 
)

◆ dsysv_()

__CLPK_integer dsysv_ ( char *  uplo,
__CLPK_integer n,
__CLPK_integer nrhs,
__CLPK_doublereal a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_doublereal b,
__CLPK_integer ldb,
__CLPK_doublereal work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ lapack_dgels()

static __CLPK_integer lapack_dgels ( char  trans,
__CLPK_integer  m,
__CLPK_integer  n,
__CLPK_integer  nrhs,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal b,
__CLPK_integer  ldb,
__CLPK_doublereal work,
__CLPK_integer  lwork 
)
static

Definition at line 304 of file lapack_wrap.h.

307  {
308  __CLPK_integer info;
309  dgels_(&trans, &m, &n, &nrhs, a, &lda, b, &ldb, work, &lwork, &info);
310  return info;
311 }
__CLPK_integer dgels_(char *trans, __CLPK_integer *m, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dgesdd()

static __CLPK_integer lapack_dgesdd ( char  jobz,
__CLPK_integer  m,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal s,
__CLPK_doublereal u,
__CLPK_integer  ldu,
__CLPK_doublereal vt,
__CLPK_integer  ldvt,
__CLPK_doublereal work,
__CLPK_integer  lwork,
__CLPK_integer iwork 
)
static

Definition at line 314 of file lapack_wrap.h.

318  {
319  __CLPK_integer info;
320  dgesdd_(&jobz, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, work, &lwork, iwork,
321  &info);
322  return info;
323 }
__CLPK_integer dgesdd_(char *jobz, __CLPK_integer *m, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *s, __CLPK_doublereal *u, __CLPK_integer *ldu, __CLPK_doublereal *vt, __CLPK_integer *ldvt, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *iwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dgesv()

static __CLPK_integer lapack_dgesv ( __CLPK_integer  n,
__CLPK_integer  nrhs,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_integer ipiv,
__CLPK_doublereal b,
__CLPK_integer  ldb 
)
static
Examples
EshelbianOperators.cpp.

Definition at line 188 of file lapack_wrap.h.

190  {
191  __CLPK_integer info;
192  dgesv_(&n, &nrhs, a, &lda, ipiv, b, &ldb, &info);
193  return info;
194 }
__CLPK_integer dgesv_(__CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dgesvd()

static __CLPK_integer lapack_dgesvd ( char  jobu,
char  jobvt,
__CLPK_integer  m,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal s,
__CLPK_doublereal u,
__CLPK_integer  ldu,
__CLPK_doublereal vt,
__CLPK_integer  ldvt,
__CLPK_doublereal work,
__CLPK_integer  lwork 
)
static

Definition at line 250 of file lapack_wrap.h.

254  {
255  __CLPK_integer info;
256  dgesvd_(&jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, work, &lwork,
257  &info);
258  return info;
259 }
__CLPK_integer dgesvd_(char *jobu, char *jobvt, __CLPK_integer *m, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *s, __CLPK_doublereal *u, __CLPK_integer *ldu, __CLPK_doublereal *vt, __CLPK_integer *ldvt, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dgetrf()

static __CLPK_integer lapack_dgetrf ( __CLPK_integer  m,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_integer ipiv 
)
static

Definition at line 169 of file lapack_wrap.h.

172  {
173  __CLPK_integer info;
174  dgetrf_(&m, &n, a, &lda, ipiv, &info);
175  return info;
176 }
__CLPK_integer dgetrf_(__CLPK_integer *m, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dgetri()

static __CLPK_integer lapack_dgetri ( __CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_integer ipiv,
__CLPK_doublereal work,
__CLPK_integer  lwork 
)
static

Definition at line 197 of file lapack_wrap.h.

199  {
200  __CLPK_integer info;
201  dgetri_(&n, a, &lda, ipiv, work, &lwork, &info);
202  return info;
203 }
__CLPK_integer dgetri_(__CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dgetrs()

static __CLPK_integer lapack_dgetrs ( char  trans,
__CLPK_integer  n,
__CLPK_integer  nrhs,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_integer ipiv,
__CLPK_doublereal b,
__CLPK_integer  ldb 
)
static

Definition at line 179 of file lapack_wrap.h.

181  {
182  __CLPK_integer info;
183  dgetrs_(&trans, &n, &nrhs, a, &lda, ipiv, b, &ldb, &info);
184  return info;
185 }
__CLPK_integer dgetrs_(char *trans, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dpbtrs()

static __CLPK_integer lapack_dpbtrs ( char  uplo,
__CLPK_integer  n,
__CLPK_integer  kd,
__CLPK_integer  nrhs,
__CLPK_doublereal ab,
__CLPK_integer  ldab,
__CLPK_doublereal b,
__CLPK_integer  ldb 
)
static

Definition at line 369 of file lapack_wrap.h.

371  {
372  __CLPK_integer info;
373  dpbtrs_(&uplo, &n, &kd, &nrhs, ab, &ldab, b, &ldb, &info);
374  return info;
375 }
__CLPK_integer dpbtrs_(char *uplo, __CLPK_integer *n, __CLPK_integer *kd, __CLPK_integer *nrhs, __CLPK_doublereal *ab, __CLPK_integer *ldab, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
SUBROUTINE DPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO )
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dposv()

static __CLPK_integer lapack_dposv ( char  uplo,
__CLPK_integer  n,
__CLPK_integer  nrhs,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal b,
__CLPK_integer  ldb 
)
static
Examples
EshelbianOperators.cpp.

Definition at line 223 of file lapack_wrap.h.

225  {
226  __CLPK_integer info;
227  dposv_(&uplo, &n, &nrhs, a, &lda, b, &ldb, &info);
228  return info;
229 }
__CLPK_integer dposv_(char *uplo, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dpotrf()

static __CLPK_integer lapack_dpotrf ( char  uplo,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda 
)
static

Definition at line 205 of file lapack_wrap.h.

207  {
208  __CLPK_integer info;
209  dpotrf_(&uplo, &n, a, &lda, &info);
210  return info;
211 }
__CLPK_integer dpotrf_(char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dpotri()

static __CLPK_integer lapack_dpotri ( char  uplo,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda 
)
static

Definition at line 241 of file lapack_wrap.h.

243  {
244  __CLPK_integer info;
245  dpotri_(&uplo, &n, a, &lda, &info);
246  return info;
247 }
__CLPK_integer dpotri_(char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dpotrs()

static __CLPK_integer lapack_dpotrs ( char  uplo,
__CLPK_integer  n,
__CLPK_integer  nrhs,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal b,
__CLPK_integer  ldb 
)
static

Definition at line 214 of file lapack_wrap.h.

216  {
217  __CLPK_integer info;
218  dpotrs_(&uplo, &n, &nrhs, a, &lda, b, &ldb, &info);
219  return info;
220 }
__CLPK_integer dpotrs_(char *uplo, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dsyev()

static __CLPK_integer lapack_dsyev ( char  jobz,
char  uplo,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal w,
__CLPK_doublereal work,
__CLPK_integer  lwork 
)
static
Examples
Remodeling.cpp.

Definition at line 273 of file lapack_wrap.h.

275  {
276  __CLPK_integer info;
277  dsyev_(&jobz, &uplo, &n, a, &lda, w, work, &lwork, &info);
278  return info;
279 }
__CLPK_integer dsyev_(char *jobz, char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *w, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dsyevd()

static __CLPK_integer lapack_dsyevd ( char  jobz,
char  uplo,
__CLPK_integer  n,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_doublereal w,
__CLPK_doublereal work,
__CLPK_integer  lwork,
__CLPK_integer iwork,
__CLPK_integer  liwork 
)
static

Definition at line 326 of file lapack_wrap.h.

329  {
330  __CLPK_integer info;
331  dsyevd_(&jobz, &uplo, &n, a, &lda, w, work, &lwork, iwork, &liwork, &info);
332  return info;
333 }
__CLPK_integer dsyevd_(char *jobz, char *uplo, __CLPK_integer *n, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_doublereal *w, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *iwork, __CLPK_integer *liwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_dsysv()

static __CLPK_integer lapack_dsysv ( char  uplo,
__CLPK_integer  n,
__CLPK_integer  nrhs,
__CLPK_doublereal a,
__CLPK_integer  lda,
__CLPK_integer ipiv,
__CLPK_doublereal b,
__CLPK_integer  ldb,
__CLPK_doublereal work,
__CLPK_integer  lwork 
)
static
Examples
EshelbianOperators.cpp.

Definition at line 232 of file lapack_wrap.h.

235  {
236  __CLPK_integer info = 0;
237  dsysv_(&uplo, &n, &nrhs, a, &lda, ipiv, b, &ldb, work, &lwork, &info);
238  return info;
239 }
__CLPK_integer dsysv_(char *uplo, __CLPK_integer *n, __CLPK_integer *nrhs, __CLPK_doublereal *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublereal *b, __CLPK_integer *ldb, __CLPK_doublereal *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_sgesvd()

static __CLPK_integer lapack_sgesvd ( char  jobu,
char  jobvt,
__CLPK_integer  m,
__CLPK_integer  n,
float *  a,
__CLPK_integer  lda,
float *  s,
float *  u,
__CLPK_integer  ldu,
float *  vt,
__CLPK_integer  ldvt,
float *  work,
__CLPK_integer  lwork 
)
static

Definition at line 262 of file lapack_wrap.h.

265  {
266  __CLPK_integer info;
267  sgesvd_(&jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, work, &lwork,
268  &info);
269  return info;
270 }
__CLPK_integer sgesvd_(char *jobu, char *jobvt, __CLPK_integer *m, __CLPK_integer *n, float *a, __CLPK_integer *lda, float *s, float *u, __CLPK_integer *ldu, float *vt, __CLPK_integer *ldvt, float *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_sgetrf()

static __CLPK_integer lapack_sgetrf ( __CLPK_integer  m,
__CLPK_integer  n,
float *  a,
__CLPK_integer  lda,
__CLPK_integer ipiv 
)
static

Definition at line 161 of file lapack_wrap.h.

163  {
164  __CLPK_integer info;
165  sgetrf_(&m, &n, a, &lda, ipiv, &info);
166  return info;
167 }
__CLPK_integer sgetrf_(__CLPK_integer *m, __CLPK_integer *n, float *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_zgeev()

static __CLPK_integer lapack_zgeev ( char  jobvl,
char  jobvr,
__CLPK_integer  n,
__CLPK_doublecomplex a,
__CLPK_integer  lda,
__CLPK_doublecomplex w,
__CLPK_doublecomplex vl,
__CLPK_integer  ldvl,
__CLPK_doublecomplex vr,
__CLPK_integer  ldvr,
__CLPK_doublecomplex work,
__CLPK_integer  lwork,
__CLPK_doublereal rwork 
)
static

Definition at line 291 of file lapack_wrap.h.

296  {
297  __CLPK_integer info;
298  zgeev_(&jobvl, &jobvr, &n, a, &lda, w, vl, &ldvl, vr, &ldvr, work, &lwork,
299  rwork, &info);
300  return info;
301 }
__CLPK_integer zgeev_(char *jobvl, char *jobvr, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_doublecomplex *w, __CLPK_doublecomplex *vl, __CLPK_integer *ldvl, __CLPK_doublecomplex *vr, __CLPK_integer *ldvr, __CLPK_doublecomplex *work, __CLPK_integer *lwork, __CLPK_doublereal *rwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_zgetrf()

static __CLPK_integer lapack_zgetrf ( __CLPK_integer  m,
__CLPK_integer  n,
__CLPK_doublecomplex a,
__CLPK_integer  lda,
__CLPK_integer ipiv 
)
static

Definition at line 335 of file lapack_wrap.h.

338  {
339  __CLPK_integer info;
340  zgetrf_(&m, &n, a, &lda, ipiv, &info);
341  return info;
342 }
__CLPK_integer zgetrf_(__CLPK_integer *m, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_zgetri()

static __CLPK_integer lapack_zgetri ( __CLPK_integer  n,
__CLPK_doublecomplex a,
__CLPK_integer  lda,
__CLPK_integer ipiv,
__CLPK_doublecomplex work,
__CLPK_integer  lwork 
)
static

Definition at line 345 of file lapack_wrap.h.

347  {
348  __CLPK_integer info;
349  zgetri_(&n, a, &lda, ipiv, work, &lwork, &info);
350  return info;
351 }
__CLPK_integer zgetri_(__CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *ipiv, __CLPK_doublecomplex *work, __CLPK_integer *lwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_zheev()

static __CLPK_integer lapack_zheev ( char  jobz,
char  uplo,
__CLPK_integer  n,
__CLPK_doublecomplex a,
__CLPK_integer  lda,
__CLPK_doublereal w,
__CLPK_doublecomplex work,
__CLPK_integer  lwork,
__CLPK_doublereal rwork 
)
static

Definition at line 281 of file lapack_wrap.h.

284  {
285  __CLPK_integer info;
286  zheev_(&jobz, &uplo, &n, a, &lda, w, work, &lwork, rwork, &info);
287  return info;
288 }
__CLPK_integer zheev_(char *jobz, char *uplo, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_doublereal *w, __CLPK_doublecomplex *work, __CLPK_integer *lwork, __CLPK_doublereal *rwork, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_zpotrf()

static __CLPK_integer lapack_zpotrf ( char  uplo,
__CLPK_integer  n,
__CLPK_doublecomplex a,
__CLPK_integer  lda 
)
static

Definition at line 360 of file lapack_wrap.h.

362  {
363  __CLPK_integer info;
364  zpotrf_(&uplo, &n, a, &lda, &info);
365  return info;
366 }
__CLPK_integer zpotrf_(char *uplo, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ lapack_zpotri()

static __CLPK_integer lapack_zpotri ( char  uplo,
__CLPK_integer  n,
__CLPK_doublecomplex a,
__CLPK_integer  lda 
)
static

Definition at line 353 of file lapack_wrap.h.

355  {
356  __CLPK_integer info;
357  zpotri_(&uplo, &n, a, &lda, &info);
358  return info;
359 }
__CLPK_integer zpotri_(char *uplo, __CLPK_integer *n, __CLPK_doublecomplex *a, __CLPK_integer *lda, __CLPK_integer *info)
long int __CLPK_integer
Definition: lapack_wrap.h:35

◆ sgesvd_()

__CLPK_integer sgesvd_ ( char *  jobu,
char *  jobvt,
__CLPK_integer m,
__CLPK_integer n,
float *  a,
__CLPK_integer lda,
float *  s,
float *  u,
__CLPK_integer ldu,
float *  vt,
__CLPK_integer ldvt,
float *  work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ sgetrf_()

__CLPK_integer sgetrf_ ( __CLPK_integer m,
__CLPK_integer n,
float *  a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_integer info 
)

◆ zgeev_()

__CLPK_integer zgeev_ ( char *  jobvl,
char *  jobvr,
__CLPK_integer n,
__CLPK_doublecomplex a,
__CLPK_integer lda,
__CLPK_doublecomplex w,
__CLPK_doublecomplex vl,
__CLPK_integer ldvl,
__CLPK_doublecomplex vr,
__CLPK_integer ldvr,
__CLPK_doublecomplex work,
__CLPK_integer lwork,
__CLPK_doublereal rwork,
__CLPK_integer info 
)

◆ zgetrf_()

__CLPK_integer zgetrf_ ( __CLPK_integer m,
__CLPK_integer n,
__CLPK_doublecomplex a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_integer info 
)

◆ zgetri_()

__CLPK_integer zgetri_ ( __CLPK_integer n,
__CLPK_doublecomplex a,
__CLPK_integer lda,
__CLPK_integer ipiv,
__CLPK_doublecomplex work,
__CLPK_integer lwork,
__CLPK_integer info 
)

◆ zheev_()

__CLPK_integer zheev_ ( char *  jobz,
char *  uplo,
__CLPK_integer n,
__CLPK_doublecomplex a,
__CLPK_integer lda,
__CLPK_doublereal w,
__CLPK_doublecomplex work,
__CLPK_integer lwork,
__CLPK_doublereal rwork,
__CLPK_integer info 
)

◆ zpotrf_()

__CLPK_integer zpotrf_ ( char *  uplo,
__CLPK_integer n,
__CLPK_doublecomplex a,
__CLPK_integer lda,
__CLPK_integer info 
)

◆ zpotri_()

__CLPK_integer zpotri_ ( char *  uplo,
__CLPK_integer n,
__CLPK_doublecomplex a,
__CLPK_integer lda,
__CLPK_integer info 
)