Teuchos - Trilinos Tools Package
Version of the Day
Main Page
Related Pages
Modules
Namespaces
Classes
Files
Examples
File List
File Members
•
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Macros
Groups
Pages
numerics
src
Teuchos_Details_Lapack128.hpp
Go to the documentation of this file.
1
// @HEADER
2
// ***********************************************************************
3
//
4
// Teuchos: Common Tools Package
5
// Copyright (2004) Sandia Corporation
6
//
7
// Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
8
// license for use of this work by or on behalf of the U.S. Government.
9
//
10
// Redistribution and use in source and binary forms, with or without
11
// modification, are permitted provided that the following conditions are
12
// met:
13
//
14
// 1. Redistributions of source code must retain the above copyright
15
// notice, this list of conditions and the following disclaimer.
16
//
17
// 2. Redistributions in binary form must reproduce the above copyright
18
// notice, this list of conditions and the following disclaimer in the
19
// documentation and/or other materials provided with the distribution.
20
//
21
// 3. Neither the name of the Corporation nor the names of the
22
// contributors may be used to endorse or promote products derived from
23
// this software without specific prior written permission.
24
//
25
// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
26
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28
// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
29
// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
30
// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
31
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
32
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
33
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
34
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
35
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36
//
37
// Questions? Contact Michael A. Heroux (maherou@sandia.gov)
38
//
39
// ***********************************************************************
40
// @HEADER
41
42
#ifndef TEUCHOS_DETAILS_LAPACK128_HPP
43
#define TEUCHOS_DETAILS_LAPACK128_HPP
44
48
49
#include "
Teuchos_ConfigDefs.hpp
"
50
51
52
#ifdef HAVE_TEUCHOSCORE_QUADMATH
53
namespace
Teuchos {
54
namespace
Details {
55
57
class
Lapack128 {
58
public
:
61
void
62
GETRF (
const
int
M,
const
int
N, __float128 A[],
63
const
int
LDA,
int
IPIV[],
int
* INFO)
const
;
64
79
void
80
LASWP (
const
int
N, __float128 A[],
const
int
LDA,
const
int
K1,
81
const
int
K2,
const
int
IPIV[],
const
int
INCX)
const
;
82
85
void
86
GETRS (
const
char
TRANS
,
const
int
N,
const
int
NRHS,
87
const
__float128 A[],
const
int
LDA,
const
int
IPIV[],
88
__float128 B[],
const
int
LDB,
int
* INFO)
const
;
89
92
void
93
GETRI (
const
int
N, __float128 A[],
const
int
LDA,
int
IPIV[],
94
__float128 WORK[],
const
int
LWORK,
int
* INFO)
const
;
95
98
__float128
99
LAPY2 (
const
__float128& x,
const
__float128& y)
const
;
100
102
void
103
LARFG (
const
int
N, __float128*
const
ALPHA,
104
__float128 X[],
const
int
INCX, __float128*
const
TAU)
const
;
105
107
void
108
LARF (
const
char
side,
109
const
int
m,
110
const
int
n,
111
const
__float128 v[],
112
const
int
incv,
113
const
__float128 tau,
114
__float128 C[],
115
const
int
ldc,
116
__float128 work[])
const
;
117
119
void
120
ORM2R (
const
char
side,
const
char
trans,
121
const
int
m,
const
int
n,
const
int
k,
122
const
__float128 A[],
const
int
lda,
123
const
__float128*
const
tau,
124
__float128 C[],
const
int
ldc,
125
__float128 work[],
int
*
const
info)
const
;
126
128
void
129
GEQR2 (
const
int
M,
130
const
int
N,
131
__float128 A[],
132
const
int
LDA,
133
__float128 TAU[],
134
__float128 WORK[],
135
int
*
const
INFO)
const
;
136
138
void
139
GEQRF (
const
int
M,
140
const
int
N,
141
__float128 A[],
142
const
int
LDA,
143
__float128 TAU[],
144
__float128 WORK[],
145
const
int
LWORK,
146
int
*
const
INFO)
const
;
147
149
void
150
ORGQR (
const
int
M,
151
const
int
N,
152
const
int
K,
153
__float128 A[],
154
const
int
LDA,
155
const
__float128 TAU[],
156
__float128 WORK[],
157
const
int
LWORK,
158
int
*
const
INFO)
const
;
159
161
void
162
UNGQR (
const
int
M,
163
const
int
N,
164
const
int
K,
165
__float128 A[],
166
const
int
LDA,
167
const
__float128 TAU[],
168
__float128 WORK[],
169
const
int
LWORK,
170
int
*
const
INFO)
const
;
171
173
void
174
LASCL (
const
char
TYPE,
175
const
int
kl,
176
const
int
ku,
177
const
__float128 cfrom,
178
const
__float128 cto,
179
const
int
m,
180
const
int
n,
181
__float128* A,
182
const
int
lda,
183
int
* info)
const
;
184
186
void
187
GBTRF (
const
int
m,
188
const
int
n,
189
const
int
kl,
190
const
int
ku,
191
__float128* A,
192
const
int
lda,
193
int
* IPIV,
194
int
* info)
const
;
195
197
void
198
GBTRS (
const
char
TRANS
,
199
const
int
n,
200
const
int
kl,
201
const
int
ku,
202
const
int
nrhs,
203
const
__float128* A,
204
const
int
lda,
205
const
int
* IPIV,
206
__float128* B,
207
const
int
ldb,
208
int
* info)
const
;
209
};
210
211
}
// namespace Details
212
}
// namespace Teuchos
213
#endif // HAVE_TEUCHOSCORE_QUADMATH
214
215
#endif // TEUCHOS_DETAILS_LAPACK128_HPP
Teuchos_ConfigDefs.hpp
Teuchos header file which uses auto-configuration information to include necessary C++ headers...
Teuchos::TRANS
Definition:
Teuchos_BLAS_types.hpp:95
Generated by
1.8.5