Teuchos_LAPACK_wrappers.hpp File Reference

The Templated LAPACK wrappers. More...

#include "Teuchos_ConfigDefs.hpp"

Include dependency graph for Teuchos_LAPACK_wrappers.hpp:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Defines
#define	PREFIX
#define	Teuchos_fcd   const char *
#define	DGEQRF_F77   F77_BLAS_MANGLE(dgeqrf,DGEQRF)
#define	DGETRF_F77   F77_BLAS_MANGLE(dgetrf,DGETRF)
#define	DGETRS_F77   F77_BLAS_MANGLE(dgetrs,DGETRS)
#define	DGTTRF_F77   F77_BLAS_MANGLE(dgttrf,DGTTRF)
#define	DGTTRS_F77   F77_BLAS_MANGLE(dgttrs,DGTTRS)
#define	DPTTRF_F77   F77_BLAS_MANGLE(dpttrf,DPTTRF)
#define	DPTTRS_F77   F77_BLAS_MANGLE(dpttrs,DPTTRS)
#define	DGETRI_F77   F77_BLAS_MANGLE(dgetri,DGETRI)
#define	DGERFS_F77   F77_BLAS_MANGLE(dgerfs,DGERFS)
#define	DGECON_F77   F77_BLAS_MANGLE(dgecon,DGECON)
#define	DGESVX_F77   F77_BLAS_MANGLE(dgesvx,DGESVX)
#define	DGESV_F77   F77_BLAS_MANGLE(dgesv,DGESV)
#define	DGEEQU_F77   F77_BLAS_MANGLE(dgeequ,DGEEQU)
#define	DSYTRD_F77   F77_BLAS_MANGLE(dsytrd,DSYTRD)
#define	DPOTRF_F77   F77_BLAS_MANGLE(dpotrf,DPOTRF)
#define	DPOTRS_F77   F77_BLAS_MANGLE(dpotrs,DPOTRS)
#define	DPOTRI_F77   F77_BLAS_MANGLE(dpotri,DPOTRI)
#define	DPOCON_F77   F77_BLAS_MANGLE(dpocon,DPOCON)
#define	DPOSV_F77   F77_BLAS_MANGLE(dposv,DPOSV)
#define	DPOEQU_F77   F77_BLAS_MANGLE(dpoequ,DPOEQU)
#define	DPORFS_F77   F77_BLAS_MANGLE(dporfs,DPORFS)
#define	DPOSVX_F77   F77_BLAS_MANGLE(dposvx,DPOSVX)
#define	DTRTRS_F77   F77_BLAS_MANGLE(dtrtrs,DTRTRS)
#define	DTRTRI_F77   F77_BLAS_MANGLE(dtrtri,DTRTRI)
#define	DLAMCH_F77   F77_BLAS_MANGLE(dlamch,DLAMCH)
#define	DGELS_F77   F77_BLAS_MANGLE(dgels,DGELS)
#define	DGELSS_F77   F77_BLAS_MANGLE(dgelss,DGELSS)
#define	DGGLSE_F77   F77_BLAS_MANGLE(dgglse,DGGLSE)
#define	DGEEV_F77   F77_BLAS_MANGLE(dgeev,DGEEV)
#define	DGESVD_F77   F77_BLAS_MANGLE(dgesvd,DGESVD)
#define	DGGEVX_F77   F77_BLAS_MANGLE(dggevx,DGGEVX)
#define	DGEHRD_F77   F77_BLAS_MANGLE(dgehrd,DGEHRD)
#define	DHSEQR_F77   F77_BLAS_MANGLE(dhseqr,DHSEQR)
#define	DORGHR_F77   F77_BLAS_MANGLE(dorghr,DORGHR)
#define	DORGQR_F77   F77_BLAS_MANGLE(dorgqr,DORGQR)
#define	DORMHR_F77   F77_BLAS_MANGLE(dormhr,DORMHR)
#define	DORMQR_F77   F77_BLAS_MANGLE(dormqr,DORMQR)
#define	DTREVC_F77   F77_BLAS_MANGLE(dtrevc,DTREVC)
#define	DTREXC_F77   F77_BLAS_MANGLE(dtrexc,DTREXC)
#define	DGEES_F77   F77_BLAS_MANGLE(dgees,DGEES)
#define	DSPEV_F77   F77_BLAS_MANGLE(dspev,DSPEV)
#define	DSYEV_F77   F77_BLAS_MANGLE(dsyev,DSYEV)
#define	DSYGV_F77   F77_BLAS_MANGLE(dsygv,DSYGV)
#define	DSTEQR_F77   F77_BLAS_MANGLE(dsteqr,DSTEQR)
#define	DLAPY2_F77   F77_BLAS_MANGLE(dlapy2,DLAPY2)
#define	DLARND_F77   F77_BLAS_MANGLE(dlarnd,DLARND)
#define	DLARNV_F77   F77_BLAS_MANGLE(dlarnv,DLARNV)
#define	DLARTG_F77   F77_BLAS_MANGLE(dlartg,DLARTG)
#define	DLARFG_F77   F77_BLAS_MANGLE(dlarfg,DLARFG)
#define	ILAENV_F77   F77_BLAS_MANGLE(ilaenv,ILAENV)
#define	SGEQRF_F77   F77_BLAS_MANGLE(sgeqrf,SGEQRF)
#define	SGETRF_F77   F77_BLAS_MANGLE(sgetrf,SGETRF)
#define	SGETRS_F77   F77_BLAS_MANGLE(sgetrs,SGETRS)
#define	SGTTRF_F77   F77_BLAS_MANGLE(sgttrf,SGTTRF)
#define	SGTTRS_F77   F77_BLAS_MANGLE(sgttrs,SGTTRS)
#define	SPTTRF_F77   F77_BLAS_MANGLE(spttrf,SPTTRF)
#define	SPTTRS_F77   F77_BLAS_MANGLE(spttrs,SPTTRS)
#define	SGETRI_F77   F77_BLAS_MANGLE(sgetri,SGETRI)
#define	SGERFS_F77   F77_BLAS_MANGLE(sgerfs,SGERFS)
#define	SGECON_F77   F77_BLAS_MANGLE(sgecon,SGECON)
#define	SGESVX_F77   F77_BLAS_MANGLE(sgesvx,SGESVX)
#define	SGESV_F77   F77_BLAS_MANGLE(sgesv,SGESV)
#define	SGEEQU_F77   F77_BLAS_MANGLE(sgeequ,SGEEQU)
#define	SSYTRD_F77   F77_BLAS_MANGLE(ssytrd,SSYTRD)
#define	SPOTRF_F77   F77_BLAS_MANGLE(spotrf,SPOTRF)
#define	SPOTRS_F77   F77_BLAS_MANGLE(spotrs,SPOTRS)
#define	SPOTRI_F77   F77_BLAS_MANGLE(spotri,SPOTRI)
#define	SPOCON_F77   F77_BLAS_MANGLE(spocon,SPOCON)
#define	SPOSV_F77   F77_BLAS_MANGLE(sposv,SPOSV)
#define	SPOEQU_F77   F77_BLAS_MANGLE(spoequ,SPOEQU)
#define	SPORFS_F77   F77_BLAS_MANGLE(sporfs,SPORFS)
#define	SPOSVX_F77   F77_BLAS_MANGLE(sposvx,SPOSVX)
#define	STRTRS_F77   F77_BLAS_MANGLE(strtrs,STRTRS)
#define	STRTRI_F77   F77_BLAS_MANGLE(strtri,STRTRI)
#define	SGELS_F77   F77_BLAS_MANGLE(sgels,SGELS)
#define	SGELSS_F77   F77_BLAS_MANGLE(sgelss,SGELSS)
#define	SGGLSE_F77   F77_BLAS_MANGLE(sgglse,SGGLSE)
#define	SGEEV_F77   F77_BLAS_MANGLE(sgeev,SGEEV)
#define	SGESVD_F77   F77_BLAS_MANGLE(sgesvd,SGESVD)
#define	SGGEVX_F77   F77_BLAS_MANGLE(sggevx,SGGEVX)
#define	SGEHRD_F77   F77_BLAS_MANGLE(sgehrd,SGEHRD)
#define	SHSEQR_F77   F77_BLAS_MANGLE(shseqr,SHSEQR)
#define	SORGHR_F77   F77_BLAS_MANGLE(sorghr,SORGHR)
#define	SORGQR_F77   F77_BLAS_MANGLE(sorgqr,SORGQR)
#define	SORMHR_F77   F77_BLAS_MANGLE(sormhr,SORMHR)
#define	SORMQR_F77   F77_BLAS_MANGLE(sormqr,SORMQR)
#define	STREVC_F77   F77_BLAS_MANGLE(strevc,STREVC)
#define	STREXC_F77   F77_BLAS_MANGLE(strexc,STREXC)
#define	SLAMCH_F77   F77_BLAS_MANGLE(slamch,SLAMCH)
#define	SGEES_F77   F77_BLAS_MANGLE(sgees,SGEES)
#define	SSPEV_F77   F77_BLAS_MANGLE(sspev,SSPEV)
#define	SSYEV_F77   F77_BLAS_MANGLE(ssyev,SSYEV)
#define	SSYGV_F77   F77_BLAS_MANGLE(ssygv,SSYGV)
#define	SSTEQR_F77   F77_BLAS_MANGLE(ssteqr,SSTEQR)
#define	SLAPY2_F77   F77_BLAS_MANGLE(slapy2,SLAPY2)
#define	SLARTG_F77   F77_BLAS_MANGLE(slartg,SLARTG)
#define	SLARFG_F77   F77_BLAS_MANGLE(slarfg,SLARFG)
#define	SLARND_F77   F77_BLAS_MANGLE(slarnd,SLARND)
#define	SLARNV_F77   F77_BLAS_MANGLE(slarnv,SLARNV)
Functions
void PREFIX	DGELS_F77 (Teuchos_fcd ch, const int *m, const int *n, const int *nrhs, double *a, const int *lda, double *b, const int *ldb, double *work, const int *lwork, int *info)
void PREFIX	DGELSS_F77 (const int *m, const int *n, const int *nrhs, double *a, const int *lda, double *b, const int *ldb, double *s, const double *rcond, int *rank, double *work, const int *lwork, int *info)
void PREFIX	DGGLSE_F77 (const int *m, const int *n, const int *p, double *a, const int *lda, double *b, const int *ldb, double *c, double *d, double *x, double *work, const int *lwork, int *info)
void PREFIX	DGEQRF_F77 (const int *m, const int *n, double *a, const int *lda, double *tau, double *work, const int *lwork, int *info)
void PREFIX	DGETRF_F77 (const int *m, const int *n, double *a, const int *lda, int *ipiv, int *info)
void PREFIX	DGETRS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const double *a, const int *lda, const int *ipiv, double *x, const int *ldx, int *info)
void PREFIX	DGTTRF_F77 (const int *n, double *dl, double *d, double *du, double *du2, int *ipiv, int *info)
void PREFIX	DGTTRS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const double *dl, const double *d, const double *du, const double *du2, const int *ipiv, double *x, const int *ldx, int *info)
void PREFIX	DPTTRF_F77 (const int *n, double *d, double *e, int *info)
void PREFIX	DPTTRS_F77 (const int *n, const int *nrhs, const double *d, const double *e, double *x, const int *ldx, int *info)
void PREFIX	DGETRI_F77 (const int *n, double *a, const int *lda, const int *ipiv, double *work, const int *lwork, int *info)
void PREFIX	DGECON_F77 (Teuchos_fcd norm, const int *n, const double *a, const int *lda, const double *anorm, double *rcond, double *work, int *iwork, int *info)
void PREFIX	DGESV_F77 (const int *n, const int *nrhs, double *a, const int *lda, int *ipiv, double *x, const int *ldx, int *info)
void PREFIX	DGEEQU_F77 (const int *m, const int *n, const double *a, const int *lda, double *r, double *c, double *rowcnd, double *colcnd, double *amax, int *info)
void PREFIX	DGERFS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const double *a, const int *lda, const double *af, const int *ldaf, const int *ipiv, const double *b, const int *ldb, double *x, const int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info)
void PREFIX	DGESVX_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, const int *nrhs, double *a, const int *lda, double *af, const int *ldaf, int *ipiv, Teuchos_fcd, double *r, double *c, double *b, const int *ldb, double *x, const int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info)
void PREFIX	DSYTRD_F77 (Teuchos_fcd, const int *n, double *a, const int *lda, double *D, double *E, double *tau, double *work, const int *lwork, int *info)
void PREFIX	DPOTRF_F77 (Teuchos_fcd, const int *n, double *a, const int *lda, int *info)
void PREFIX	DPOTRS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const double *a, const int *lda, double *x, const int *ldx, int *info)
void PREFIX	DPOTRI_F77 (Teuchos_fcd, const int *n, double *a, const int *lda, int *info)
void PREFIX	DPOCON_F77 (Teuchos_fcd, const int *n, const double *a, const int *lda, const double *anorm, double *rcond, double *work, int *iwork, int *info)
void PREFIX	DPOSV_F77 (Teuchos_fcd, const int *n, const int *nrhs, double *a, const int *lda, double *x, const int *ldx, int *info)
void PREFIX	DPOEQU_F77 (const int *n, const double *a, const int *lda, double *s, double *scond, double *amax, int *info)
void PREFIX	DPORFS_F77 (Teuchos_fcd, const int *n, const int *nrhs, double *a, const int *lda, const double *af, const int *ldaf, const double *b, const int *ldb, double *x, const int *ldx, double *ferr, double *berr, double *work, int *iwork, int *info)
void PREFIX	DPOSVX_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, const int *nrhs, double *a, const int *lda, double *af, const int *ldaf, Teuchos_fcd, double *s, double *b, const int *ldb, double *x, const int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, int *info)
void PREFIX	DTRTRS_F77 (Teuchos_fcd, Teuchos_fcd, Teuchos_fcd, const int *n, const int *nrhs, const double *a, const int *lda, double *b, const int *ldb, int *info)
void PREFIX	DTRTRI_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, const double *a, const int *lda, int *info)
void PREFIX	SGELS_F77 (Teuchos_fcd ch, const int *m, const int *n, const int *nrhs, float *a, const int *lda, float *b, const int *ldb, float *work, const int *lwork, int *info)
void PREFIX	SGELSS_F77 (const int *m, const int *n, const int *nrhs, float *a, const int *lda, float *b, const int *ldb, float *s, const float *rcond, int *rank, float *work, const int *lwork, int *info)
void PREFIX	SGGLSE_F77 (const int *m, const int *n, const int *p, double *a, const int *lda, double *b, const int *ldb, double *c, double *d, double *x, double *work, const int *lwork, int *info)
void PREFIX	SGEQRF_F77 (const int *m, const int *n, float *a, const int *lda, float *tau, float *work, const int *lwork, int *info)
void PREFIX	SGETRF_F77 (const int *m, const int *n, float *a, const int *lda, int *ipiv, int *info)
void PREFIX	SGETRS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const float *a, const int *lda, const int *ipiv, float *x, const int *ldx, int *info)
void PREFIX	SGTTRF_F77 (const int *n, float *dl, float *d, float *du, float *du2, int *ipiv, int *info)
void PREFIX	SGTTRS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const float *dl, const float *d, const float *du, const float *du2, const int *ipiv, float *x, const int *ldx, int *info)
void PREFIX	SPTTRF_F77 (const int *n, float *d, float *e, int *info)
void PREFIX	SPTTRS_F77 (const int *n, const int *nrhs, const float *d, const float *e, float *x, const int *ldx, int *info)
void PREFIX	SGETRI_F77 (const int *n, float *a, const int *lda, const int *ipiv, float *work, const int *lwork, int *info)
void PREFIX	SGECON_F77 (Teuchos_fcd norm, const int *n, const float *a, const int *lda, const float *anorm, float *rcond, float *work, int *iwork, int *info)
void PREFIX	SGESV_F77 (const int *n, const int *nrhs, float *a, const int *lda, int *ipiv, float *x, const int *ldx, int *info)
void PREFIX	SGEEQU_F77 (const int *m, const int *n, const float *a, const int *lda, float *r, float *c, float *rowcnd, float *colcnd, float *amax, int *info)
void PREFIX	SGERFS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const float *a, const int *lda, const float *af, const int *ldaf, const int *ipiv, const float *b, const int *ldb, float *x, const int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info)
void PREFIX	SGESVX_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, const int *nrhs, float *a, const int *lda, float *af, const int *ldaf, int *ipiv, Teuchos_fcd, float *r, float *c, float *b, const int *ldb, float *x, const int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info)
void PREFIX	SSYTRD_F77 (Teuchos_fcd, const int *n, float *a, const int *lda, float *D, float *E, float *tau, float *work, const int *lwork, int *info)
void PREFIX	SPOTRF_F77 (Teuchos_fcd, const int *n, float *a, const int *lda, int *info)
void PREFIX	SPOTRS_F77 (Teuchos_fcd, const int *n, const int *nrhs, const float *a, const int *lda, float *x, const int *ldx, int *info)
void PREFIX	SPOTRI_F77 (Teuchos_fcd, const int *n, float *a, const int *lda, int *info)
void PREFIX	SPOCON_F77 (Teuchos_fcd, const int *n, const float *a, const int *lda, const float *anorm, float *rcond, float *work, int *iwork, int *info)
void PREFIX	SPOSV_F77 (Teuchos_fcd, const int *n, const int *nrhs, float *a, const int *lda, float *x, const int *ldx, int *info)
void PREFIX	SPOEQU_F77 (const int *n, const float *a, const int *lda, float *s, float *scond, float *amax, int *info)
void PREFIX	SPORFS_F77 (Teuchos_fcd, const int *n, const int *nrhs, float *a, const int *lda, const float *af, const int *ldaf, const float *b, const int *ldb, float *x, const int *ldx, float *ferr, float *berr, float *work, int *iwork, int *info)
void PREFIX	SPOSVX_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, const int *nrhs, float *a, const int *lda, float *af, const int *ldaf, Teuchos_fcd, float *s, float *b, const int *ldb, float *x, const int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, int *info)
void PREFIX	STRTRS_F77 (Teuchos_fcd, Teuchos_fcd, Teuchos_fcd, const int *n, const int *nrhs, const float *a, const int *lda, float *b, const int *ldb, int *info)
void PREFIX	STRTRI_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, const float *a, const int *lda, int *info)
void PREFIX	DSPEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, double *ap, double *w, double *z, const int *ldz, double *work, int *info)
void PREFIX	DSYEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, double *a, const int *lda, double *w, double *work, const int *lwork, int *info)
void PREFIX	DSYGV_F77 (const int *itype, Teuchos_fcd, Teuchos_fcd, const int *n, double *a, const int *lda, double *B, const int *ldb, double *w, double *work, const int *lwork, int *info)
void PREFIX	DSTEQR_F77 (Teuchos_fcd, const int *n, double *D, double *E, double *Z, const int *ldz, double *work, int *info)
void PREFIX	DGEEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, double *a, const int *lda, double *wr, double *wi, double *vl, const int *ldvl, double *vr, const int *ldvr, double *work, const int *lwork, int *info)
void PREFIX	DGESVD_F77 (Teuchos_fcd, Teuchos_fcd, const int *m, const int *n, double *a, const int *lda, double *s, double *u, const int *ldu, double *v, const int *ldv, double *work, const int *lwork, int *info)
void PREFIX	DGGEVX_F77 (Teuchos_fcd, Teuchos_fcd, Teuchos_fcd, Teuchos_fcd, const int *n, double *a, const int *lda, double *b, const int *ldb, double *alphar, double *alphai, double *beta, double *vl, const int *ldvl, double *vr, const int *ldvr, int *ilo, int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm, double *rconde, double *rcondv, double *work, const int *lwork, int *iwork, int *bwork, int *info)
void PREFIX	DGEHRD_F77 (const int *n, const int *ilo, const int *ihi, double *A, const int *lda, double *tau, double *work, const int *lwork, int *info)
void PREFIX	DHSEQR_F77 (Teuchos_fcd job, Teuchos_fcd, const int *n, const int *ilo, const int *ihi, double *h, const int *ldh, double *wr, double *wi, double *z, const int *ldz, double *work, const int *lwork, int *info)
void PREFIX	DGEES_F77 (Teuchos_fcd, Teuchos_fcd, int(*ptr2func)(double *, double *), const int *n, double *a, const int *lda, int *sdim, double *wr, double *wi, double *vs, const int *ldvs, double *work, const int *lwork, int *bwork, int *info)
void PREFIX	DORGHR_F77 (const int *n, const int *ilo, const int *ihi, double *a, const int *lda, double *tau, double *work, int *lwork, int *info)
void PREFIX	DORMHR_F77 (Teuchos_fcd, Teuchos_fcd, const int *m, const int *n, const int *ilo, const int *ihi, const double *a, const int *lda, const double *tau, double *c, const int *ldc, double *work, int *lwork, int *info)
void PREFIX	DORGQR_F77 (const int *m, const int *n, const int *k, double *a, const int *lda, const double *tau, double *work, const int *lwork, int *info)
void PREFIX	DORMQR_F77 (Teuchos_fcd, Teuchos_fcd, const int *m, const int *n, const int *k, double *a, const int *lda, const double *tau, double *C, const int *ldc, double *work, const int *lwork, int *info)
void PREFIX	DTREVC_F77 (Teuchos_fcd, Teuchos_fcd, int *select, const int *n, const double *t, const int *ldt, double *vl, const int *ldvl, double *vr, const int *ldvr, const int *mm, int *m, double *work, int *info)
void PREFIX	DTREXC_F77 (Teuchos_fcd, const int *n, double *t, const int *ldt, double *q, const int *ldq, int *ifst, int *ilst, double *work, int *info)
void PREFIX	DGGEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, double *A, const int *lda, double *B, const int *ldb, double *alphar, double *alphai, double *beta, double *vl, const int *ldvl, double *vr, const int *ldvr, double *work, const int *lwork, int *info)
void PREFIX	SSPEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, float *ap, float *w, float *z, const int *ldz, float *work, int *info)
void PREFIX	SSYEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, float *a, const int *lda, float *w, float *work, const int *lwork, int *info)
void PREFIX	SSYGV_F77 (const int *itype, Teuchos_fcd, Teuchos_fcd, const int *n, float *a, const int *lda, float *B, const int *ldb, float *w, float *work, const int *lwork, int *info)
void PREFIX	SSTEQR_F77 (Teuchos_fcd, const int *n, float *D, float *E, float *Z, const int *ldz, float *work, int *info)
void PREFIX	SGEEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, float *a, const int *lda, float *wr, float *wi, float *vl, const int *ldvl, float *vr, const int *ldvr, float *work, const int *lwork, int *info)
void PREFIX	SGESVD_F77 (Teuchos_fcd, Teuchos_fcd, const int *m, const int *n, float *a, const int *lda, float *s, float *u, const int *ldu, float *v, const int *ldv, float *work, const int *lwork, int *info)
void PREFIX	SGGEVX_F77 (Teuchos_fcd, Teuchos_fcd, Teuchos_fcd, Teuchos_fcd, const int *n, float *a, const int *lda, float *b, const int *ldb, float *alphar, float *alphai, float *beta, float *vl, const int *ldvl, float *vr, const int *ldvr, int *ilo, int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde, float *rcondv, float *work, const int *lwork, int *iwork, int *bwork, int *info)
void PREFIX	SGEHRD_F77 (const int *n, const int *ilo, const int *ihi, float *A, const int *lda, float *tau, float *work, const int *lwork, int *info)
void PREFIX	SHSEQR_F77 (Teuchos_fcd job, Teuchos_fcd, const int *n, const int *ilo, const int *ihi, float *h, const int *ldh, float *wr, float *wi, float *z, const int *ldz, float *work, const int *lwork, int *info)
void PREFIX	SGEES_F77 (Teuchos_fcd, Teuchos_fcd, int(*ptr2func)(float *, float *), const int *n, float *a, const int *lda, int *sdim, float *wr, float *wi, float *vs, const int *ldvs, float *work, const int *lwork, int *bwork, int *info)
void PREFIX	SORGHR_F77 (const int *n, const int *ilo, const int *ihi, float *a, const int *lda, float *tau, float *work, int *lwork, int *info)
void PREFIX	SORMHR_F77 (Teuchos_fcd, Teuchos_fcd, const int *m, const int *n, const int *ilo, const int *ihi, const float *a, const int *lda, const float *tau, float *c, const int *ldc, float *work, int *lwork, int *info)
void PREFIX	SORGQR_F77 (const int *m, const int *n, const int *k, float *a, const int *lda, const float *tau, float *work, const int *lwork, int *info)
void PREFIX	SORMQR_F77 (Teuchos_fcd, Teuchos_fcd, const int *m, const int *n, const int *k, float *a, const int *lda, const float *tau, float *C, const int *ldc, float *work, const int *lwork, int *info)
void PREFIX	STREVC_F77 (Teuchos_fcd, Teuchos_fcd, int *select, const int *n, const float *t, const int *ldt, float *vl, const int *ldvl, float *vr, const int *ldvr, const int *mm, int *m, float *work, int *info)
void PREFIX	STREXC_F77 (Teuchos_fcd, const int *n, float *t, const int *ldt, float *q, const int *ldq, int *ifst, int *ilst, float *work, int *info)
void PREFIX	SGGEV_F77 (Teuchos_fcd, Teuchos_fcd, const int *n, float *A, const int *lda, float *B, const int *ldb, float *alphar, float *alphai, float *beta, float *vl, const int *ldvl, float *vr, const int *ldvr, float *work, const int *lwork, int *info)
void PREFIX	SLARTG_F77 (const float *f, const float *g, float *c, float *s, float *r)
void PREFIX	DLARTG_F77 (const double *f, const double *g, double *c, double *s, double *r)
void PREFIX	SLARFG_F77 (const int *n, float *alpha, float *x, const int *incx, float *tau)
void PREFIX	DLARFG_F77 (const int *n, double *alpha, double *x, const int *incx, double *tau)
float PREFIX	SLARND_F77 (const int *idist, int *seed)
double PREFIX	DLARND_F77 (const int *idist, int *seed)
void PREFIX	SLARNV_F77 (const int *idist, int *seed, const int *n, float *v)
void PREFIX	DLARNV_F77 (const int *idist, int *seed, const int *n, double *v)
float PREFIX	SLAMCH_F77 (Teuchos_fcd)
double PREFIX	DLAMCH_F77 (Teuchos_fcd)
int PREFIX	ILAENV_F77 (const int *ispec, const char *name, const char *opts, const int *N1, const int *N2, const int *N3, const int *N4, unsigned int name_length, unsigned int opts_length)
float PREFIX	SLAPY2_F77 (const float *x, const float *y)
double PREFIX	DLAPY2_F77 (const double *x, const double *y)

---

Detailed Description

The Templated LAPACK wrappers.

Definition in file Teuchos_LAPACK_wrappers.hpp.

---

Define Documentation

#define PREFIX

Definition at line 401 of file Teuchos_LAPACK_wrappers.hpp.

#define Teuchos_fcd   const char *

Definition at line 402 of file Teuchos_LAPACK_wrappers.hpp.

#define DGEQRF_F77   F77_BLAS_MANGLE(dgeqrf,DGEQRF)

Definition at line 425 of file Teuchos_LAPACK_wrappers.hpp.

#define DGETRF_F77   F77_BLAS_MANGLE(dgetrf,DGETRF)

Definition at line 426 of file Teuchos_LAPACK_wrappers.hpp.

#define DGETRS_F77   F77_BLAS_MANGLE(dgetrs,DGETRS)

Definition at line 427 of file Teuchos_LAPACK_wrappers.hpp.

#define DGTTRF_F77   F77_BLAS_MANGLE(dgttrf,DGTTRF)

Definition at line 428 of file Teuchos_LAPACK_wrappers.hpp.

#define DGTTRS_F77   F77_BLAS_MANGLE(dgttrs,DGTTRS)

Definition at line 429 of file Teuchos_LAPACK_wrappers.hpp.

#define DPTTRF_F77   F77_BLAS_MANGLE(dpttrf,DPTTRF)

Definition at line 430 of file Teuchos_LAPACK_wrappers.hpp.

#define DPTTRS_F77   F77_BLAS_MANGLE(dpttrs,DPTTRS)

Definition at line 431 of file Teuchos_LAPACK_wrappers.hpp.

#define DGETRI_F77   F77_BLAS_MANGLE(dgetri,DGETRI)

Definition at line 432 of file Teuchos_LAPACK_wrappers.hpp.

#define DGERFS_F77   F77_BLAS_MANGLE(dgerfs,DGERFS)

Definition at line 433 of file Teuchos_LAPACK_wrappers.hpp.

#define DGECON_F77   F77_BLAS_MANGLE(dgecon,DGECON)

Definition at line 434 of file Teuchos_LAPACK_wrappers.hpp.

#define DGESVX_F77   F77_BLAS_MANGLE(dgesvx,DGESVX)

Definition at line 435 of file Teuchos_LAPACK_wrappers.hpp.

#define DGESV_F77   F77_BLAS_MANGLE(dgesv,DGESV)

Definition at line 436 of file Teuchos_LAPACK_wrappers.hpp.

#define DGEEQU_F77   F77_BLAS_MANGLE(dgeequ,DGEEQU)

Definition at line 437 of file Teuchos_LAPACK_wrappers.hpp.

#define DSYTRD_F77   F77_BLAS_MANGLE(dsytrd,DSYTRD)

Definition at line 438 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOTRF_F77   F77_BLAS_MANGLE(dpotrf,DPOTRF)

Definition at line 439 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOTRS_F77   F77_BLAS_MANGLE(dpotrs,DPOTRS)

Definition at line 440 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOTRI_F77   F77_BLAS_MANGLE(dpotri,DPOTRI)

Definition at line 441 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOCON_F77   F77_BLAS_MANGLE(dpocon,DPOCON)

Definition at line 442 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOSV_F77   F77_BLAS_MANGLE(dposv,DPOSV)

Definition at line 443 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOEQU_F77   F77_BLAS_MANGLE(dpoequ,DPOEQU)

Definition at line 444 of file Teuchos_LAPACK_wrappers.hpp.

#define DPORFS_F77   F77_BLAS_MANGLE(dporfs,DPORFS)

Definition at line 445 of file Teuchos_LAPACK_wrappers.hpp.

#define DPOSVX_F77   F77_BLAS_MANGLE(dposvx,DPOSVX)

Definition at line 446 of file Teuchos_LAPACK_wrappers.hpp.

#define DTRTRS_F77   F77_BLAS_MANGLE(dtrtrs,DTRTRS)

Definition at line 447 of file Teuchos_LAPACK_wrappers.hpp.

#define DTRTRI_F77   F77_BLAS_MANGLE(dtrtri,DTRTRI)

Definition at line 448 of file Teuchos_LAPACK_wrappers.hpp.

#define DLAMCH_F77   F77_BLAS_MANGLE(dlamch,DLAMCH)

Definition at line 449 of file Teuchos_LAPACK_wrappers.hpp.

#define DGELS_F77   F77_BLAS_MANGLE(dgels,DGELS)

Definition at line 450 of file Teuchos_LAPACK_wrappers.hpp.

#define DGELSS_F77   F77_BLAS_MANGLE(dgelss,DGELSS)

Definition at line 451 of file Teuchos_LAPACK_wrappers.hpp.

#define DGGLSE_F77   F77_BLAS_MANGLE(dgglse,DGGLSE)

Definition at line 452 of file Teuchos_LAPACK_wrappers.hpp.

#define DGEEV_F77   F77_BLAS_MANGLE(dgeev,DGEEV)

Definition at line 453 of file Teuchos_LAPACK_wrappers.hpp.

#define DGESVD_F77   F77_BLAS_MANGLE(dgesvd,DGESVD)

Definition at line 454 of file Teuchos_LAPACK_wrappers.hpp.

#define DGGEVX_F77   F77_BLAS_MANGLE(dggevx,DGGEVX)

Definition at line 455 of file Teuchos_LAPACK_wrappers.hpp.

#define DGEHRD_F77   F77_BLAS_MANGLE(dgehrd,DGEHRD)

Definition at line 456 of file Teuchos_LAPACK_wrappers.hpp.

#define DHSEQR_F77   F77_BLAS_MANGLE(dhseqr,DHSEQR)

Definition at line 457 of file Teuchos_LAPACK_wrappers.hpp.

#define DORGHR_F77   F77_BLAS_MANGLE(dorghr,DORGHR)

Definition at line 458 of file Teuchos_LAPACK_wrappers.hpp.

#define DORGQR_F77   F77_BLAS_MANGLE(dorgqr,DORGQR)

Definition at line 459 of file Teuchos_LAPACK_wrappers.hpp.

#define DORMHR_F77   F77_BLAS_MANGLE(dormhr,DORMHR)

Definition at line 460 of file Teuchos_LAPACK_wrappers.hpp.

#define DORMQR_F77   F77_BLAS_MANGLE(dormqr,DORMQR)

Definition at line 461 of file Teuchos_LAPACK_wrappers.hpp.

#define DTREVC_F77   F77_BLAS_MANGLE(dtrevc,DTREVC)

Definition at line 462 of file Teuchos_LAPACK_wrappers.hpp.

#define DTREXC_F77   F77_BLAS_MANGLE(dtrexc,DTREXC)

Definition at line 463 of file Teuchos_LAPACK_wrappers.hpp.

#define DGEES_F77   F77_BLAS_MANGLE(dgees,DGEES)

Definition at line 464 of file Teuchos_LAPACK_wrappers.hpp.

#define DSPEV_F77   F77_BLAS_MANGLE(dspev,DSPEV)

Definition at line 465 of file Teuchos_LAPACK_wrappers.hpp.

#define DSYEV_F77   F77_BLAS_MANGLE(dsyev,DSYEV)

Definition at line 466 of file Teuchos_LAPACK_wrappers.hpp.

#define DSYGV_F77   F77_BLAS_MANGLE(dsygv,DSYGV)

Definition at line 467 of file Teuchos_LAPACK_wrappers.hpp.

#define DSTEQR_F77   F77_BLAS_MANGLE(dsteqr,DSTEQR)

Definition at line 468 of file Teuchos_LAPACK_wrappers.hpp.

#define DLAPY2_F77   F77_BLAS_MANGLE(dlapy2,DLAPY2)

Definition at line 469 of file Teuchos_LAPACK_wrappers.hpp.

#define DLARND_F77   F77_BLAS_MANGLE(dlarnd,DLARND)

Definition at line 470 of file Teuchos_LAPACK_wrappers.hpp.

#define DLARNV_F77   F77_BLAS_MANGLE(dlarnv,DLARNV)

Definition at line 471 of file Teuchos_LAPACK_wrappers.hpp.

#define DLARTG_F77   F77_BLAS_MANGLE(dlartg,DLARTG)

Definition at line 472 of file Teuchos_LAPACK_wrappers.hpp.

#define DLARFG_F77   F77_BLAS_MANGLE(dlarfg,DLARFG)

Definition at line 473 of file Teuchos_LAPACK_wrappers.hpp.

#define ILAENV_F77   F77_BLAS_MANGLE(ilaenv,ILAENV)

Definition at line 474 of file Teuchos_LAPACK_wrappers.hpp.

#define SGEQRF_F77   F77_BLAS_MANGLE(sgeqrf,SGEQRF)

Definition at line 539 of file Teuchos_LAPACK_wrappers.hpp.

#define SGETRF_F77   F77_BLAS_MANGLE(sgetrf,SGETRF)

Definition at line 540 of file Teuchos_LAPACK_wrappers.hpp.

#define SGETRS_F77   F77_BLAS_MANGLE(sgetrs,SGETRS)

Definition at line 541 of file Teuchos_LAPACK_wrappers.hpp.

#define SGTTRF_F77   F77_BLAS_MANGLE(sgttrf,SGTTRF)

Definition at line 542 of file Teuchos_LAPACK_wrappers.hpp.

#define SGTTRS_F77   F77_BLAS_MANGLE(sgttrs,SGTTRS)

Definition at line 543 of file Teuchos_LAPACK_wrappers.hpp.

#define SPTTRF_F77   F77_BLAS_MANGLE(spttrf,SPTTRF)

Definition at line 544 of file Teuchos_LAPACK_wrappers.hpp.

#define SPTTRS_F77   F77_BLAS_MANGLE(spttrs,SPTTRS)

Definition at line 545 of file Teuchos_LAPACK_wrappers.hpp.

#define SGETRI_F77   F77_BLAS_MANGLE(sgetri,SGETRI)

Definition at line 546 of file Teuchos_LAPACK_wrappers.hpp.

#define SGERFS_F77   F77_BLAS_MANGLE(sgerfs,SGERFS)

Definition at line 547 of file Teuchos_LAPACK_wrappers.hpp.

#define SGECON_F77   F77_BLAS_MANGLE(sgecon,SGECON)

Definition at line 548 of file Teuchos_LAPACK_wrappers.hpp.

#define SGESVX_F77   F77_BLAS_MANGLE(sgesvx,SGESVX)

Definition at line 549 of file Teuchos_LAPACK_wrappers.hpp.

#define SGESV_F77   F77_BLAS_MANGLE(sgesv,SGESV)

Definition at line 550 of file Teuchos_LAPACK_wrappers.hpp.

#define SGEEQU_F77   F77_BLAS_MANGLE(sgeequ,SGEEQU)

Definition at line 551 of file Teuchos_LAPACK_wrappers.hpp.

#define SSYTRD_F77   F77_BLAS_MANGLE(ssytrd,SSYTRD)

Definition at line 552 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOTRF_F77   F77_BLAS_MANGLE(spotrf,SPOTRF)

Definition at line 553 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOTRS_F77   F77_BLAS_MANGLE(spotrs,SPOTRS)

Definition at line 554 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOTRI_F77   F77_BLAS_MANGLE(spotri,SPOTRI)

Definition at line 555 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOCON_F77   F77_BLAS_MANGLE(spocon,SPOCON)

Definition at line 556 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOSV_F77   F77_BLAS_MANGLE(sposv,SPOSV)

Definition at line 557 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOEQU_F77   F77_BLAS_MANGLE(spoequ,SPOEQU)

Definition at line 558 of file Teuchos_LAPACK_wrappers.hpp.

#define SPORFS_F77   F77_BLAS_MANGLE(sporfs,SPORFS)

Definition at line 559 of file Teuchos_LAPACK_wrappers.hpp.

#define SPOSVX_F77   F77_BLAS_MANGLE(sposvx,SPOSVX)

Definition at line 560 of file Teuchos_LAPACK_wrappers.hpp.

#define STRTRS_F77   F77_BLAS_MANGLE(strtrs,STRTRS)

Definition at line 561 of file Teuchos_LAPACK_wrappers.hpp.

#define STRTRI_F77   F77_BLAS_MANGLE(strtri,STRTRI)

Definition at line 562 of file Teuchos_LAPACK_wrappers.hpp.

#define SGELS_F77   F77_BLAS_MANGLE(sgels,SGELS)

Definition at line 563 of file Teuchos_LAPACK_wrappers.hpp.

#define SGELSS_F77   F77_BLAS_MANGLE(sgelss,SGELSS)

Definition at line 564 of file Teuchos_LAPACK_wrappers.hpp.

#define SGGLSE_F77   F77_BLAS_MANGLE(sgglse,SGGLSE)

Definition at line 565 of file Teuchos_LAPACK_wrappers.hpp.

#define SGEEV_F77   F77_BLAS_MANGLE(sgeev,SGEEV)

Definition at line 566 of file Teuchos_LAPACK_wrappers.hpp.

#define SGESVD_F77   F77_BLAS_MANGLE(sgesvd,SGESVD)

Definition at line 567 of file Teuchos_LAPACK_wrappers.hpp.

#define SGGEVX_F77   F77_BLAS_MANGLE(sggevx,SGGEVX)

Definition at line 568 of file Teuchos_LAPACK_wrappers.hpp.

#define SGEHRD_F77   F77_BLAS_MANGLE(sgehrd,SGEHRD)

Definition at line 569 of file Teuchos_LAPACK_wrappers.hpp.

#define SHSEQR_F77   F77_BLAS_MANGLE(shseqr,SHSEQR)

Definition at line 570 of file Teuchos_LAPACK_wrappers.hpp.

#define SORGHR_F77   F77_BLAS_MANGLE(sorghr,SORGHR)

Definition at line 571 of file Teuchos_LAPACK_wrappers.hpp.

#define SORGQR_F77   F77_BLAS_MANGLE(sorgqr,SORGQR)

Definition at line 572 of file Teuchos_LAPACK_wrappers.hpp.

#define SORMHR_F77   F77_BLAS_MANGLE(sormhr,SORMHR)

Definition at line 573 of file Teuchos_LAPACK_wrappers.hpp.

#define SORMQR_F77   F77_BLAS_MANGLE(sormqr,SORMQR)

Definition at line 574 of file Teuchos_LAPACK_wrappers.hpp.

#define STREVC_F77   F77_BLAS_MANGLE(strevc,STREVC)

Definition at line 575 of file Teuchos_LAPACK_wrappers.hpp.

#define STREXC_F77   F77_BLAS_MANGLE(strexc,STREXC)

Definition at line 576 of file Teuchos_LAPACK_wrappers.hpp.

#define SLAMCH_F77   F77_BLAS_MANGLE(slamch,SLAMCH)

Definition at line 577 of file Teuchos_LAPACK_wrappers.hpp.

#define SGEES_F77   F77_BLAS_MANGLE(sgees,SGEES)

Definition at line 578 of file Teuchos_LAPACK_wrappers.hpp.

#define SSPEV_F77   F77_BLAS_MANGLE(sspev,SSPEV)

Definition at line 579 of file Teuchos_LAPACK_wrappers.hpp.

#define SSYEV_F77   F77_BLAS_MANGLE(ssyev,SSYEV)

Definition at line 580 of file Teuchos_LAPACK_wrappers.hpp.

#define SSYGV_F77   F77_BLAS_MANGLE(ssygv,SSYGV)

Definition at line 581 of file Teuchos_LAPACK_wrappers.hpp.

#define SSTEQR_F77   F77_BLAS_MANGLE(ssteqr,SSTEQR)

Definition at line 582 of file Teuchos_LAPACK_wrappers.hpp.

#define SLAPY2_F77   F77_BLAS_MANGLE(slapy2,SLAPY2)

Definition at line 583 of file Teuchos_LAPACK_wrappers.hpp.

#define SLARTG_F77   F77_BLAS_MANGLE(slartg,SLARTG)

Definition at line 584 of file Teuchos_LAPACK_wrappers.hpp.

#define SLARFG_F77   F77_BLAS_MANGLE(slarfg,SLARFG)

Definition at line 585 of file Teuchos_LAPACK_wrappers.hpp.

#define SLARND_F77   F77_BLAS_MANGLE(slarnd,SLARND)

Definition at line 586 of file Teuchos_LAPACK_wrappers.hpp.

#define SLARNV_F77   F77_BLAS_MANGLE(slarnv,SLARNV)

Definition at line 587 of file Teuchos_LAPACK_wrappers.hpp.

---

Function Documentation

void PREFIX DGELS_F77	(	Teuchos_fcd	ch,
		const int *	m,
		const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		double *	b,
		const int *	ldb,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGELSS_F77	(	const int *	m,
		const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		double *	b,
		const int *	ldb,
		double *	s,
		const double *	rcond,
		int *	rank,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGGLSE_F77	(	const int *	m,
		const int *	n,
		const int *	p,
		double *	a,
		const int *	lda,
		double *	b,
		const int *	ldb,
		double *	c,
		double *	d,
		double *	x,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGEQRF_F77	(	const int *	m,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	tau,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGETRF_F77	(	const int *	m,
		const int *	n,
		double *	a,
		const int *	lda,
		int *	ipiv,
		int *	info
	)

void PREFIX DGETRS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const double *	a,
		const int *	lda,
		const int *	ipiv,
		double *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX DGTTRF_F77	(	const int *	n,
		double *	dl,
		double *	d,
		double *	du,
		double *	du2,
		int *	ipiv,
		int *	info
	)

void PREFIX DGTTRS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const double *	dl,
		const double *	d,
		const double *	du,
		const double *	du2,
		const int *	ipiv,
		double *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX DPTTRF_F77	(	const int *	n,
		double *	d,
		double *	e,
		int *	info
	)

void PREFIX DPTTRS_F77	(	const int *	n,
		const int *	nrhs,
		const double *	d,
		const double *	e,
		double *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX DGETRI_F77	(	const int *	n,
		double *	a,
		const int *	lda,
		const int *	ipiv,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGECON_F77	(	Teuchos_fcd	norm,
		const int *	n,
		const double *	a,
		const int *	lda,
		const double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		int *	info
	)

void PREFIX DGESV_F77	(	const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		int *	ipiv,
		double *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX DGEEQU_F77	(	const int *	m,
		const int *	n,
		const double *	a,
		const int *	lda,
		double *	r,
		double *	c,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		int *	info
	)

void PREFIX DGERFS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const double *	a,
		const int *	lda,
		const double *	af,
		const int *	ldaf,
		const int *	ipiv,
		const double *	b,
		const int *	ldb,
		double *	x,
		const int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		int *	info
	)

void PREFIX DGESVX_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		double *	af,
		const int *	ldaf,
		int *	ipiv,
		Teuchos_fcd	,
		double *	r,
		double *	c,
		double *	b,
		const int *	ldb,
		double *	x,
		const int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		int *	info
	)

void PREFIX DSYTRD_F77	(	Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	D,
		double *	E,
		double *	tau,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DPOTRF_F77	(	Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		int *	info
	)

void PREFIX DPOTRS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const double *	a,
		const int *	lda,
		double *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX DPOTRI_F77	(	Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		int *	info
	)

void PREFIX DPOCON_F77	(	Teuchos_fcd	,
		const int *	n,
		const double *	a,
		const int *	lda,
		const double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		int *	info
	)

void PREFIX DPOSV_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		double *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX DPOEQU_F77	(	const int *	n,
		const double *	a,
		const int *	lda,
		double *	s,
		double *	scond,
		double *	amax,
		int *	info
	)

void PREFIX DPORFS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		const double *	af,
		const int *	ldaf,
		const double *	b,
		const int *	ldb,
		double *	x,
		const int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		int *	info
	)

void PREFIX DPOSVX_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		double *	a,
		const int *	lda,
		double *	af,
		const int *	ldaf,
		Teuchos_fcd	,
		double *	s,
		double *	b,
		const int *	ldb,
		double *	x,
		const int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		int *	info
	)

void PREFIX DTRTRS_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const double *	a,
		const int *	lda,
		double *	b,
		const int *	ldb,
		int *	info
	)

void PREFIX DTRTRI_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const double *	a,
		const int *	lda,
		int *	info
	)

void PREFIX SGELS_F77	(	Teuchos_fcd	ch,
		const int *	m,
		const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		float *	b,
		const int *	ldb,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGELSS_F77	(	const int *	m,
		const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		float *	b,
		const int *	ldb,
		float *	s,
		const float *	rcond,
		int *	rank,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGGLSE_F77	(	const int *	m,
		const int *	n,
		const int *	p,
		double *	a,
		const int *	lda,
		double *	b,
		const int *	ldb,
		double *	c,
		double *	d,
		double *	x,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGEQRF_F77	(	const int *	m,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	tau,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGETRF_F77	(	const int *	m,
		const int *	n,
		float *	a,
		const int *	lda,
		int *	ipiv,
		int *	info
	)

void PREFIX SGETRS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const float *	a,
		const int *	lda,
		const int *	ipiv,
		float *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX SGTTRF_F77	(	const int *	n,
		float *	dl,
		float *	d,
		float *	du,
		float *	du2,
		int *	ipiv,
		int *	info
	)

void PREFIX SGTTRS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const float *	dl,
		const float *	d,
		const float *	du,
		const float *	du2,
		const int *	ipiv,
		float *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX SPTTRF_F77	(	const int *	n,
		float *	d,
		float *	e,
		int *	info
	)

void PREFIX SPTTRS_F77	(	const int *	n,
		const int *	nrhs,
		const float *	d,
		const float *	e,
		float *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX SGETRI_F77	(	const int *	n,
		float *	a,
		const int *	lda,
		const int *	ipiv,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGECON_F77	(	Teuchos_fcd	norm,
		const int *	n,
		const float *	a,
		const int *	lda,
		const float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		int *	info
	)

void PREFIX SGESV_F77	(	const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		int *	ipiv,
		float *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX SGEEQU_F77	(	const int *	m,
		const int *	n,
		const float *	a,
		const int *	lda,
		float *	r,
		float *	c,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		int *	info
	)

void PREFIX SGERFS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const float *	a,
		const int *	lda,
		const float *	af,
		const int *	ldaf,
		const int *	ipiv,
		const float *	b,
		const int *	ldb,
		float *	x,
		const int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		int *	info
	)

void PREFIX SGESVX_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		float *	af,
		const int *	ldaf,
		int *	ipiv,
		Teuchos_fcd	,
		float *	r,
		float *	c,
		float *	b,
		const int *	ldb,
		float *	x,
		const int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		int *	info
	)

void PREFIX SSYTRD_F77	(	Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	D,
		float *	E,
		float *	tau,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SPOTRF_F77	(	Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		int *	info
	)

void PREFIX SPOTRS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const float *	a,
		const int *	lda,
		float *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX SPOTRI_F77	(	Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		int *	info
	)

void PREFIX SPOCON_F77	(	Teuchos_fcd	,
		const int *	n,
		const float *	a,
		const int *	lda,
		const float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		int *	info
	)

void PREFIX SPOSV_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		float *	x,
		const int *	ldx,
		int *	info
	)

void PREFIX SPOEQU_F77	(	const int *	n,
		const float *	a,
		const int *	lda,
		float *	s,
		float *	scond,
		float *	amax,
		int *	info
	)

void PREFIX SPORFS_F77	(	Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		const float *	af,
		const int *	ldaf,
		const float *	b,
		const int *	ldb,
		float *	x,
		const int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		int *	info
	)

void PREFIX SPOSVX_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		float *	a,
		const int *	lda,
		float *	af,
		const int *	ldaf,
		Teuchos_fcd	,
		float *	s,
		float *	b,
		const int *	ldb,
		float *	x,
		const int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		int *	info
	)

void PREFIX STRTRS_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const int *	nrhs,
		const float *	a,
		const int *	lda,
		float *	b,
		const int *	ldb,
		int *	info
	)

void PREFIX STRTRI_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		const float *	a,
		const int *	lda,
		int *	info
	)

void PREFIX DSPEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		double *	ap,
		double *	w,
		double *	z,
		const int *	ldz,
		double *	work,
		int *	info
	)

void PREFIX DSYEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	w,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DSYGV_F77	(	const int *	itype,
		Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	B,
		const int *	ldb,
		double *	w,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DSTEQR_F77	(	Teuchos_fcd	,
		const int *	n,
		double *	D,
		double *	E,
		double *	Z,
		const int *	ldz,
		double *	work,
		int *	info
	)

void PREFIX DGEEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	wr,
		double *	wi,
		double *	vl,
		const int *	ldvl,
		double *	vr,
		const int *	ldvr,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGESVD_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	m,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	s,
		double *	u,
		const int *	ldu,
		double *	v,
		const int *	ldv,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGGEVX_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		double *	a,
		const int *	lda,
		double *	b,
		const int *	ldb,
		double *	alphar,
		double *	alphai,
		double *	beta,
		double *	vl,
		const int *	ldvl,
		double *	vr,
		const int *	ldvr,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		double *	abnrm,
		double *	bbnrm,
		double *	rconde,
		double *	rcondv,
		double *	work,
		const int *	lwork,
		int *	iwork,
		int *	bwork,
		int *	info
	)

void PREFIX DGEHRD_F77	(	const int *	n,
		const int *	ilo,
		const int *	ihi,
		double *	A,
		const int *	lda,
		double *	tau,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DHSEQR_F77	(	Teuchos_fcd	job,
		Teuchos_fcd	,
		const int *	n,
		const int *	ilo,
		const int *	ihi,
		double *	h,
		const int *	ldh,
		double *	wr,
		double *	wi,
		double *	z,
		const int *	ldz,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DGEES_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		int(*)(double *, double *)	ptr2func,
		const int *	n,
		double *	a,
		const int *	lda,
		int *	sdim,
		double *	wr,
		double *	wi,
		double *	vs,
		const int *	ldvs,
		double *	work,
		const int *	lwork,
		int *	bwork,
		int *	info
	)

void PREFIX DORGHR_F77	(	const int *	n,
		const int *	ilo,
		const int *	ihi,
		double *	a,
		const int *	lda,
		double *	tau,
		double *	work,
		int *	lwork,
		int *	info
	)

void PREFIX DORMHR_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	m,
		const int *	n,
		const int *	ilo,
		const int *	ihi,
		const double *	a,
		const int *	lda,
		const double *	tau,
		double *	c,
		const int *	ldc,
		double *	work,
		int *	lwork,
		int *	info
	)

void PREFIX DORGQR_F77	(	const int *	m,
		const int *	n,
		const int *	k,
		double *	a,
		const int *	lda,
		const double *	tau,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DORMQR_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	m,
		const int *	n,
		const int *	k,
		double *	a,
		const int *	lda,
		const double *	tau,
		double *	C,
		const int *	ldc,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX DTREVC_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		int *	select,
		const int *	n,
		const double *	t,
		const int *	ldt,
		double *	vl,
		const int *	ldvl,
		double *	vr,
		const int *	ldvr,
		const int *	mm,
		int *	m,
		double *	work,
		int *	info
	)

void PREFIX DTREXC_F77	(	Teuchos_fcd	,
		const int *	n,
		double *	t,
		const int *	ldt,
		double *	q,
		const int *	ldq,
		int *	ifst,
		int *	ilst,
		double *	work,
		int *	info
	)

void PREFIX DGGEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		double *	A,
		const int *	lda,
		double *	B,
		const int *	ldb,
		double *	alphar,
		double *	alphai,
		double *	beta,
		double *	vl,
		const int *	ldvl,
		double *	vr,
		const int *	ldvr,
		double *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SSPEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		float *	ap,
		float *	w,
		float *	z,
		const int *	ldz,
		float *	work,
		int *	info
	)

void PREFIX SSYEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	w,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SSYGV_F77	(	const int *	itype,
		Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	B,
		const int *	ldb,
		float *	w,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SSTEQR_F77	(	Teuchos_fcd	,
		const int *	n,
		float *	D,
		float *	E,
		float *	Z,
		const int *	ldz,
		float *	work,
		int *	info
	)

void PREFIX SGEEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	wr,
		float *	wi,
		float *	vl,
		const int *	ldvl,
		float *	vr,
		const int *	ldvr,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGESVD_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	m,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	s,
		float *	u,
		const int *	ldu,
		float *	v,
		const int *	ldv,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGGEVX_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		float *	a,
		const int *	lda,
		float *	b,
		const int *	ldb,
		float *	alphar,
		float *	alphai,
		float *	beta,
		float *	vl,
		const int *	ldvl,
		float *	vr,
		const int *	ldvr,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		float *	abnrm,
		float *	bbnrm,
		float *	rconde,
		float *	rcondv,
		float *	work,
		const int *	lwork,
		int *	iwork,
		int *	bwork,
		int *	info
	)

void PREFIX SGEHRD_F77	(	const int *	n,
		const int *	ilo,
		const int *	ihi,
		float *	A,
		const int *	lda,
		float *	tau,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SHSEQR_F77	(	Teuchos_fcd	job,
		Teuchos_fcd	,
		const int *	n,
		const int *	ilo,
		const int *	ihi,
		float *	h,
		const int *	ldh,
		float *	wr,
		float *	wi,
		float *	z,
		const int *	ldz,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SGEES_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		int(*)(float *, float *)	ptr2func,
		const int *	n,
		float *	a,
		const int *	lda,
		int *	sdim,
		float *	wr,
		float *	wi,
		float *	vs,
		const int *	ldvs,
		float *	work,
		const int *	lwork,
		int *	bwork,
		int *	info
	)

void PREFIX SORGHR_F77	(	const int *	n,
		const int *	ilo,
		const int *	ihi,
		float *	a,
		const int *	lda,
		float *	tau,
		float *	work,
		int *	lwork,
		int *	info
	)

void PREFIX SORMHR_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	m,
		const int *	n,
		const int *	ilo,
		const int *	ihi,
		const float *	a,
		const int *	lda,
		const float *	tau,
		float *	c,
		const int *	ldc,
		float *	work,
		int *	lwork,
		int *	info
	)

void PREFIX SORGQR_F77	(	const int *	m,
		const int *	n,
		const int *	k,
		float *	a,
		const int *	lda,
		const float *	tau,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SORMQR_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	m,
		const int *	n,
		const int *	k,
		float *	a,
		const int *	lda,
		const float *	tau,
		float *	C,
		const int *	ldc,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX STREVC_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		int *	select,
		const int *	n,
		const float *	t,
		const int *	ldt,
		float *	vl,
		const int *	ldvl,
		float *	vr,
		const int *	ldvr,
		const int *	mm,
		int *	m,
		float *	work,
		int *	info
	)

void PREFIX STREXC_F77	(	Teuchos_fcd	,
		const int *	n,
		float *	t,
		const int *	ldt,
		float *	q,
		const int *	ldq,
		int *	ifst,
		int *	ilst,
		float *	work,
		int *	info
	)

void PREFIX SGGEV_F77	(	Teuchos_fcd	,
		Teuchos_fcd	,
		const int *	n,
		float *	A,
		const int *	lda,
		float *	B,
		const int *	ldb,
		float *	alphar,
		float *	alphai,
		float *	beta,
		float *	vl,
		const int *	ldvl,
		float *	vr,
		const int *	ldvr,
		float *	work,
		const int *	lwork,
		int *	info
	)

void PREFIX SLARTG_F77	(	const float *	f,
		const float *	g,
		float *	c,
		float *	s,
		float *	r
	)

void PREFIX DLARTG_F77	(	const double *	f,
		const double *	g,
		double *	c,
		double *	s,
		double *	r
	)

void PREFIX SLARFG_F77	(	const int *	n,
		float *	alpha,
		float *	x,
		const int *	incx,
		float *	tau
	)

void PREFIX DLARFG_F77	(	const int *	n,
		double *	alpha,
		double *	x,
		const int *	incx,
		double *	tau
	)

float PREFIX SLARND_F77	(	const int *	idist,
		int *	seed
	)

double PREFIX DLARND_F77	(	const int *	idist,
		int *	seed
	)

void PREFIX SLARNV_F77	(	const int *	idist,
		int *	seed,
		const int *	n,
		float *	v
	)

void PREFIX DLARNV_F77	(	const int *	idist,
		int *	seed,
		const int *	n,
		double *	v
	)

float PREFIX SLAMCH_F77

(

Teuchos_fcd

)

double PREFIX DLAMCH_F77

(

Teuchos_fcd

)

int PREFIX ILAENV_F77	(	const int *	ispec,
		const char *	name,
		const char *	opts,
		const int *	N1,
		const int *	N2,
		const int *	N3,
		const int *	N4,
		unsigned int	name_length,
		unsigned int	opts_length
	)

float PREFIX SLAPY2_F77	(	const float *	x,
		const float *	y
	)

double PREFIX DLAPY2_F77	(	const double *	x,
		const double *	y
	)