45 #ifdef HAVE_TEUCHOS_LONG_DOUBLE
51 GETRF (
const int M,
const int N,
long double A[],
52 const int LDA,
int IPIV[],
int* INFO)
const
55 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GETRF: Not implemented yet.");
60 LASWP (
const int N,
long double A[],
const int LDA,
const int K1,
61 const int K2,
const int IPIV[],
const int INCX)
const
64 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::LASWP: Not implemented yet.");
69 GETRI (
const int ,
long double [],
const int ,
70 int [],
long double [],
const int ,
74 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GETRI: Not implemented yet.");
80 GETRS (
const char TRANS,
const int N,
const int NRHS,
81 const long double A[],
const int LDA,
const int IPIV[],
82 long double B[],
const int LDB,
int* INFO)
const
85 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GETRS: Not implemented yet.");
90 LAPY2 (
const long double& x,
const long double& y)
const
93 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::LAPY2: Not implemented yet.");
98 ORM2R (
const char side,
const char trans,
99 const int m,
const int n,
const int k,
100 const long double A[],
const int lda,
101 const long double*
const tau,
102 long double C[],
const int ldc,
103 long double work[],
int*
const info)
const
106 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::ORM2R: Not implemented yet.");
112 ILADLC (
const int m,
const int n,
const long double A[],
const int lda)
115 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::ILADLC: Not implemented yet.");
120 ILADLR (
const int m,
const int n,
const long double A[],
const int lda)
123 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::ILADLR: Not implemented yet.");
130 LARF (
const char side,
133 const long double v[],
135 const long double tau,
138 long double work[])
const
141 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::LARF: Not implemented yet.");
147 LARFG (
const int N,
long double*
const ALPHA,
148 long double X[],
const int INCX,
long double*
const TAU)
const
151 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::LARFG: Not implemented yet.");
165 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GEQR2: Not implemented yet.");
177 int*
const INFO)
const
180 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GEQRF: Not implemented yet.");
190 const long double [],
196 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GEQR2: Not implemented yet.");
206 const long double [],
212 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GEQR2: Not implemented yet.");
217 LASCL (
const char TYPE,
220 const long double cfrom,
221 const long double cto,
229 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::LASCL: Not implemented yet.");
244 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GBTRF: Not implemented yet.");
249 GBTRS (
const char TRANS,
254 const long double* A,
262 (
true, std::logic_error,
"Teuchos::LAPACK<int, long double>::GBTRS: Not implemented yet.");
267 #endif // HAVE_TEUCHOS_LONG_DOUBLE
#define TEUCHOS_TEST_FOR_EXCEPTION(throw_exception_test, Exception, msg)
Macro for throwing an exception with breakpointing to ease debugging.
Declaration and definition of Teuchos::Details::LapackLongDouble, a partial implementation of Teuchos...
Standard test and throw macros.