Epetra Package Browser (Single Doxygen Collection) Development
Loading...
Searching...
No Matches
Epetra_LAPACK.h
Go to the documentation of this file.
1/*
2//@HEADER
3// ************************************************************************
4//
5// Epetra: Linear Algebra Services Package
6// Copyright 2011 Sandia Corporation
7//
8// Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
9// the U.S. Government retains certain rights in this software.
10//
11// Redistribution and use in source and binary forms, with or without
12// modification, are permitted provided that the following conditions are
13// met:
14//
15// 1. Redistributions of source code must retain the above copyright
16// notice, this list of conditions and the following disclaimer.
17//
18// 2. Redistributions in binary form must reproduce the above copyright
19// notice, this list of conditions and the following disclaimer in the
20// documentation and/or other materials provided with the distribution.
21//
22// 3. Neither the name of the Corporation nor the names of the
23// contributors may be used to endorse or promote products derived from
24// this software without specific prior written permission.
25//
26// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
27// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
30// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
31// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
32// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
33// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
34// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
35// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
36// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37//
38// Questions? Contact Michael A. Heroux (maherou@sandia.gov)
39//
40// ************************************************************************
41//@HEADER
42*/
43
44#ifndef EPETRA_LAPACK_H
45#define EPETRA_LAPACK_H
46
48
63
64#include "Epetra_ConfigDefs.h"
65#include "Epetra_Object.h"
66
67class EPETRA_LIB_DLL_EXPORT Epetra_LAPACK {
68
69 public:
71
72
75 Epetra_LAPACK(void);
76
77
79
81 Epetra_LAPACK(const Epetra_LAPACK& LAPACK);
82
84 virtual ~Epetra_LAPACK(void);
86
87
89
90
92 void POTRF( const char UPLO, const int N, float * A, const int LDA, int * INFO) const;
94 void POTRF( const char UPLO, const int N, double * A, const int LDA, int * INFO) const;
95
97 void POTRS( const char UPLO, const int N, const int NRHS, const float * A, const int LDA, float * X, const int LDX, int * INFO) const;
99 void POTRS( const char UPLO, const int N, const int NRHS, const double * A, const int LDA, double * X, const int LDX, int * INFO) const;
100
102 void POTRI( const char UPLO, const int N, float * A, const int LDA, int * INFO) const;
104 void POTRI( const char UPLO, const int N, double * A, const int LDA, int * INFO) const;
105
107 void POCON( const char UPLO, const int N, const float * A, const int LDA, const float ANORM,
108 float * RCOND, float * WORK, int * IWORK, int * INFO) const;
110 void POCON( const char UPLO, const int N, const double * A, const int LDA, const double ANORM,
111 double * RCOND, double * WORK, int * IWORK, int * INFO) const;
112
114 void POSV( const char UPLO, const int N, const int NRHS, float * A, const int LDA, float * X, const int LDX, int * INFO) const;
116 void POSV( const char UPLO, const int N, const int NRHS, double * A, const int LDA, double * X, const int LDX, int * INFO) const;
117
119 void POEQU(const int N, const float * A, const int LDA, float * S, float * SCOND, float * AMAX, int * INFO) const;
121 void POEQU(const int N, const double * A, const int LDA, double * S, double * SCOND, double * AMAX, int * INFO) const;
122
124 void PORFS(const char UPLO, const int N, const int NRHS, const float * A, const int LDA, const float * AF, const int LDAF,
125 const float * B, const int LDB, float * X, const int LDX,
126 float * FERR, float * BERR, float * WORK, int * IWORK, int * INFO) const;
128 void PORFS(const char UPLO, const int N, const int NRHS, const double * A, const int LDA, const double * AF, const int LDAF,
129 const double * B, const int LDB, double * X, const int LDX,
130 double * FERR, double * BERR, double * WORK, int * IWORK, int * INFO) const;
131
133 void POSVX(const char FACT, const char UPLO, const int N, const int NRHS, float * A, const int LDA, float * AF, const int LDAF,
134 const char EQUED, float * S, float * B, const int LDB, float * X, const int LDX, float * RCOND,
135 float * FERR, float * BERR, float * WORK, int * IWORK, int * INFO) const;
137 void POSVX(const char FACT, const char UPLO, const int N, const int NRHS, double * A, const int LDA, double * AF, const int LDAF,
138 const char EQUED, double * S, double * B, const int LDB, double * X, const int LDX, double * RCOND,
139 double * FERR, double * BERR, double * WORK, int * IWORK, int * INFO) const;
141
143
144
146 void GELS( const char TRANS, const int M, const int N, const int NRHS, double* A, const int LDA,
147 double* B, const int LDB, double* WORK, const int LWORK, int * INFO) const;
149 void GETRF( const int M, const int N, float * A, const int LDA, int * IPIV, int * INFO) const;
151 void GETRF( const int M, const int N, double * A, const int LDA, int * IPIV, int * INFO) const;
152
154 void GEQRF( const int M, const int N, float * A, const int LDA, float * TAU, float * WORK, const int lwork, int * INFO) const;
156 void GEQRF( const int M, const int N, double * A, const int LDA, double * TAU, double * WORK, const int lwork, int * INFO) const;
157
159 void GETRS( const char TRANS, const int N, const int NRHS, const float * A, const int LDA, const int * IPIV, float * X, const int LDX, int * INFO) const;
161 void GETRS( const char TRANS, const int N, const int NRHS, const double * A, const int LDA, const int * IPIV, double * X, const int LDX, int * INFO) const;
162
164 void GETRI( const int N, float * A, const int LDA, int * IPIV, float * WORK, const int * LWORK, int * INFO) const;
166 void GETRI( const int N, double * A, const int LDA, int * IPIV, double * WORK, const int * LWORK, int * INFO) const;
167
169 void GECON( const char NORM, const int N, const float * A, const int LDA, const float ANORM,
170 float * RCOND, float * WORK, int * IWORK, int * INFO) const;
172 void GECON( const char NORM, const int N, const double * A, const int LDA, const double ANORM,
173 double * RCOND, double * WORK, int * IWORK, int * INFO) const;
174
176 void GESV( const int N, const int NRHS, float * A, const int LDA, int * IPIV, float * X, const int LDX, int * INFO) const;
178 void GESV( const int N, const int NRHS, double * A, const int LDA, int * IPIV, double * X, const int LDX, int * INFO) const;
179
181 void GEEQU(const int M, const int N, const float * A, const int LDA, float * R, float * C, float * ROWCND, float * COLCND, float * AMAX, int * INFO) const;
183 void GEEQU(const int M, const int N, const double * A, const int LDA, double * R, double * C, double * ROWCND, double * COLCND, double * AMAX, int * INFO) const;
184
186 void GERFS(const char TRANS, const int N, const int NRHS, const float * A, const int LDA, const float * AF, const int LDAF,
187 const int * IPIV, const float * B, const int LDB, float * X, const int LDX,
188 float * FERR, float * BERR, float * WORK, int * IWORK, int * INFO) const;
190 void GERFS(const char TRANS, const int N, const int NRHS, const double * A, const int LDA, const double * AF, const int LDAF,
191 const int * IPIV, const double * B, const int LDB, double * X, const int LDX,
192 double * FERR, double * BERR, double * WORK, int * IWORK, int * INFO) const;
193
195 void GESVX(const char FACT, const char TRANS, const int N, const int NRHS, float * A, const int LDA, float * AF, const int LDAF, int * IPIV,
196 const char EQUED, float * R, float * C, float * B, const int LDB, float * X, const int LDX, float * RCOND,
197 float * FERR, float * BERR, float * WORK, int * IWORK, int * INFO) const;
199 void GESVX(const char FACT, const char TRANS, const int N, const int NRHS, double * A, const int LDA, double * AF, const int LDAF, int * IPIV,
200 const char EQUED, double * R, double * C, double * B, const int LDB, double * X, const int LDX, double * RCOND,
201 double * FERR, double * BERR, double * WORK, int * IWORK, int * INFO) const;
202
203
205 void GEHRD(const int N, const int ILO, const int IHI, float * A, const int LDA, float * TAU, float * WORK, const int LWORK, int * INFO) const;
207 void GEHRD(const int N, const int ILO, const int IHI, double * A, const int LDA, double * TAU, double * WORK, const int LWORK, int * INFO) const;
209
211
212
213 void HSEQR( const char JOB, const char COMPZ, const int N, const int ILO, const int IHI, float * H, const int LDH, float * WR, float * WI,
214 float * Z, const int LDZ, float * WORK, const int LWORK, int * INFO) const;
216 void HSEQR( const char JOB, const char COMPZ, const int N, const int ILO, const int IHI, double * H, const int LDH, double * WR, double * WI,
217 double * Z, const int LDZ, double * WORK, const int LWORK, int * INFO) const;
219
221
222
223 void ORGQR( const int M, const int N, const int K, float * A, const int LDA, float * TAU, float * WORK, const int LWORK, int * INFO) const;
225 void ORGQR( const int M, const int N, const int K, double * A, const int LDA, double * TAU, double * WORK, const int LWORK, int * INFO) const;
226
228 void ORGHR( const int N, const int ILO, const int IHI, float * A, const int LDA, float * TAU, float * WORK, const int LWORK, int * INFO) const;
230 void ORGHR( const int N, const int ILO, const int IHI, double * A, const int LDA, double * TAU, double * WORK, const int LWORK, int * INFO) const;
231
233 void ORMHR( const char SIDE, const char TRANS, const int M, const int N, const int ILO, const int IHI, const float * A, const int LDA,
234 const float * TAU, float * C,
235 const int LDC, float * WORK, const int LWORK, int * INFO) const;
237 void ORMHR( const char SIDE, const char TRANS, const int M, const int N, const int ILO, const int IHI, const double * A, const int LDA,
238 const double * TAU, double * C,
239 const int LDC, double * WORK, const int LWORK, int * INFO) const;
241 void LARFT( const char DIRECT, const char STOREV, const int N, const int K, double * V, const int LDV, double * TAU, double * T, const int LDT) const;
243 void LARFT( const char DIRECT, const char STOREV, const int N, const int K, float * V, const int LDV, float * TAU, float * T, const int LDT) const;
245
247
248
250
252 void TREVC( const char SIDE, const char HOWMNY, int * SELECT, const int N, const float * T, const int LDT, float *VL, const int LDVL,
253 float * VR, const int LDVR, const int MM, int * M, float * WORK, int * INFO) const;
255
257 void TREVC( const char SIDE, const char HOWMNY, int * SELECT, const int N, const double * T, const int LDT, double *VL, const int LDVL,
258 double * VR, const int LDVR, const int MM, int *M, double * WORK, int * INFO) const;
259
261 void TREXC( const char COMPQ, const int N, float * T, const int LDT, float * Q, const int LDQ, int IFST, int ILST,
262 float * WORK, int * INFO) const;
264 void TREXC( const char COMPQ, const int N, double * T, const int LDT, double * Q, const int LDQ, int IFST, int ILST,
265 double * WORK, int * INFO) const;
267
269
270
272 void GESVD( const char JOBU, const char JOBVT, const int M, const int N, float * A, const int LDA, float * S, float * U,
273 const int LDU, float * VT, const int LDVT, float * WORK, const int * LWORK, int * INFO) const;
275 void GESVD( const char JOBU, const char JOBVT, const int M, const int N, double * A, const int LDA, double * S, double * U,
276 const int LDU, double * VT, const int LDVT, double * WORK, const int * LWORK, int * INFO) const;
277
279 void GGSVD(const char JOBU, const char JOBV, const char JOBQ, const int M, const int N, const int P, int * K, int * L, double* A, const int LDA, double* B, const int LDB,
280 double* ALPHA, double* BETA, double* U, const int LDU, double* V, const int LDV, double* Q, const int LDQ, double* WORK,
281 #ifdef HAVE_EPETRA_LAPACK_GSSVD3
282 const int LWORK,
283 #endif
284 int* IWORK, int* INFO) const;
286 void GGSVD(const char JOBU, const char JOBV, const char JOBQ, const int M, const int N, const int P, int * K, int * L, float* A, const int LDA, float* B, const int LDB,
287 float* ALPHA, float* BETA, float* U, const int LDU, float* V, const int LDV, float* Q, const int LDQ, float* WORK,
288 #ifdef HAVE_EPETRA_LAPACK_GSSVD3
289 const int LWORK,
290 #endif
291 int* IWORK, int* INFO) const;
293
295
296
297 void GEEV(const char JOBVL, const char JOBVR, const int N, double* A, const int LDA, double* WR, double* WI,
298 double* VL, const int LDVL, double* VR, const int LDVR, double* WORK, const int LWORK, int* INFO) const;
300 void GEEV(const char JOBVL, const char JOBVR, const int N, float* A, const int LDA, float* WR, float* WI,
301 float* VL, const int LDVL, float* VR, const int LDVR, float* WORK, const int LWORK, int* INFO) const;
302
304 void SPEV(const char JOBZ, const char UPLO, const int N, double* AP, double* W, double* Z, int LDZ, double* WORK, int* INFO) const;
306 void SPEV(const char JOBZ, const char UPLO, const int N, float* AP, float* W, float* Z, int LDZ, float* WORK, int* INFO) const;
307
309 void SPGV(const int ITYPE, const char JOBZ, const char UPLO, const int N, double* AP, double* BP, double* W, double* Z, const int LDZ, double* WORK, int* INFO) const;
311 void SPGV(const int ITYPE, const char JOBZ, const char UPLO, const int N, float* AP, float* BP, float* W, float* Z, const int LDZ, float* WORK, int* INFO) const;
312
314 void SYEV(const char JOBZ, const char UPLO, const int N, double* A, const int LDA, double* W, double* WORK, const int LWORK, int* INFO) const;
316 void SYEV(const char JOBZ, const char UPLO, const int N, float* A, const int LDA, float* W, float* WORK, const int LWORK, int* INFO) const;
317
319 void SYEVD(const char JOBZ, const char UPLO, const int N, double* A, const int LDA, double* W,
320 double* WORK, const int LWORK, int* IWORK, const int LIWORK, int* INFO) const;
322 void SYEVD(const char JOBZ, const char UPLO, const int N, float* A, const int LDA, float* W,
323 float* WORK, const int LWORK, int* IWORK, const int LIWORK, int* INFO) const;
324
326 void SYEVX(const char JOBZ, const char RANGE, const char UPLO, const int N, double* A, const int LDA,
327 const double* VL, const double* VU, const int* IL, const int* IU,
328 const double ABSTOL, int * M, double* W, double* Z, const int LDZ, double* WORK,
329 const int LWORK, int* IWORK, int* IFAIL,
330 int* INFO) const;
332 void SYEVX(const char JOBZ, const char RANGE, const char UPLO, const int N, float* A, const int LDA,
333 const float* VL, const float* VU, const int* IL, const int* IU,
334 const float ABSTOL, int * M, float* W, float* Z, const int LDZ, float* WORK,
335 const int LWORK, int* IWORK, int* IFAIL,
336 int* INFO) const;
337
339 void SYGV(const int ITYPE, const char JOBZ, const char UPLO, const int N, double* A, const int LDA, double* B,
340 const int LDB, double* W, double* WORK, const int LWORK, int* INFO) const;
342 void SYGV(const int ITYPE, const char JOBZ, const char UPLO, const int N, float* A, const int LDA, float* B,
343 const int LDB, float* W, float* WORK, const int LWORK, int* INFO) const;
344
346 void SYGVX(const int ITYPE, const char JOBZ, const char RANGE, const char UPLO, const int N,
347 double* A, const int LDA, double* B, const int LDB, const double* VL, const double* VU,
348 const int* IL, const int* IU, const double ABSTOL, int* M, double* W, double* Z,
349 const int LDZ, double* WORK, const int LWORK, int* IWORK,
350 int* IFAIL, int* INFO) const;
352 void SYGVX(const int ITYPE, const char JOBZ, const char RANGE, const char UPLO, const int N,
353 float* A, const int LDA, float* B, const int LDB, const float* VL, const float* VU,
354 const int* IL, const int* IU, const float ABSTOL, int* M, float* W, float* Z,
355 const int LDZ, float* WORK, const int LWORK, int* IWORK,
356 int* IFAIL, int* INFO) const;
357
359 void SYEVR(const char JOBZ, const char RANGE, const char UPLO, const int N, double* A, const int LDA, const double* VL, const double* VU, const int *IL, const int *IU,
360 const double ABSTOL, int* M, double* W, double* Z, const int LDZ, int* ISUPPZ, double* WORK, const int LWORK, int* IWORK,
361 const int LIWORK, int* INFO) const;
363 void SYEVR(const char JOBZ, const char RANGE, const char UPLO, const int N, float* A, const int LDA,
364 const float* VL, const float* VU, const int *IL, const int *IU,
365 const float ABSTOL, int* M, float* W, float* Z, const int LDZ, int* ISUPPZ,
366 float* WORK, const int LWORK, int* IWORK,
367 const int LIWORK, int* INFO) const;
368
370 void GEEVX(const char BALANC, const char JOBVL, const char JOBVR, const char SENSE, const int N, double* A, const int LDA, double* WR, double* WI, double* VL,
371 const int LDVL, double* VR, const int LDVR, int* ILO, int* IHI, double* SCALE, double* ABNRM, double* RCONDE,
372 double* RCONDV, double* WORK, const int LWORK, int* IWORK, int* INFO) const;
374 void GEEVX(const char BALANC, const char JOBVL, const char JOBVR, const char SENSE, const int N, float* A, const int LDA, float* WR, float* WI, float* VL,
375 const int LDVL, float* VR, const int LDVR, int* ILO, int* IHI, float* SCALE, float* ABNRM, float* RCONDE,
376 float* RCONDV, float* WORK, const int LWORK, int* IWORK, int* INFO) const;
377
379 void GESDD(const char JOBZ, const int M, const int N, double* A, const int LDA, double* S, double* U, const int LDU, double* VT, const int LDVT, double* WORK,
380 const int LWORK, int* IWORK, int* INFO) const;
382 void GESDD(const char JOBZ, const int M, const int N, float* A, const int LDA, float* S, float* U, const int LDU, float* VT, const int LDVT, float* WORK,
383 const int LWORK, int* IWORK, int* INFO) const;
385
386 void GGEV(const char JOBVL, const char JOBVR, const int N, double* A, const int LDA, double* B, const int LDB, double* ALPHAR, double* ALPHAI,
387 double* BETA, double* VL, const int LDVL, double* VR, const int LDVR, double* WORK, const int LWORK, int* INFO) const;
389 void GGEV(const char JOBVL, const char JOBVR, const int N, float* A, const int LDA, float* B, const int LDB, float* ALPHAR, float* ALPHAI,
390 float* BETA, float* VL, const int LDVL, float* VR, const int LDVR, float* WORK, const int LWORK, int* INFO) const;
391
393
395
396
397 void GGLSE(const int M, const int N, const int P, double* A, const int LDA, double* B, const int LDB,
398 double* C, double* D, double* X, double* WORK, const int LWORK, int* INFO) const;
400 void GGLSE(const int M, const int N, const int P, float* A, const int LDA, float* B, const int LDB,
401 float* C, float* D, float* X, float* WORK, const int LWORK, int* INFO) const;
403
405
406
407 void LAMCH ( const char CMACH, float & T) const;
409 void LAMCH ( const char CMACH, double & T) const;
411
413
415
416
417 void TRTRS(const char UPLO, const char TRANS, const char DIAG, const int N, const int NRHS, const float *A,
418 const int LDA, float *B, const int LDB, int *INFO) const;
420 void TRTRS(const char UPLO, const char TRANS, const char DIAG, const int N, const int NRHS, const double *A,
421 const int LDA, double *B, const int LDB, int *INFO) const;
422};
423
424// Epetra_LAPACK constructor
425inline Epetra_LAPACK::Epetra_LAPACK(void){}
426// Epetra_LAPACK constructor
427inline Epetra_LAPACK::Epetra_LAPACK(const Epetra_LAPACK& LAPACK){(void)LAPACK;}
428// Epetra_LAPACK destructor
429inline Epetra_LAPACK::~Epetra_LAPACK(){}
430
431#endif /* EPETRA_LAPACK_H */
Epetra_ConfigDefs.h
Epetra_Object.h
Epetra_LAPACK::GEEQU
void GEEQU(const int M, const int N, const float *A, const int LDA, float *R, float *C, float *ROWCND, float *COLCND, float *AMAX, int *INFO) const
Epetra_LAPACK equilibration for general matrix (SGEEQU).
Definition Epetra_LAPACK.cpp:228
Epetra_LAPACK::GELS
void GELS(const char TRANS, 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) const
Epetra_LAPACK simple driver to solve least-squares systems.
Definition Epetra_LAPACK.cpp:147
Epetra_LAPACK::SYEV
void SYEV(const char JOBZ, const char UPLO, const int N, double *A, const int LDA, double *W, double *WORK, const int LWORK, int *INFO) const
Epetra_LAPACK wrapper to compute all eigenvalues and, optionally, eigenvectors of a real symmetric ma...
Definition Epetra_LAPACK.cpp:430
Epetra_LAPACK::PORFS
void PORFS(const char UPLO, const int N, const int NRHS, const 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) const
Epetra_LAPACK solve driver for positive definite matrix (SPOSVX).
Definition Epetra_LAPACK.cpp:117
Epetra_LAPACK::POTRS
void POTRS(const char UPLO, const int N, const int NRHS, const float *A, const int LDA, float *X, const int LDX, int *INFO) const
Epetra_LAPACK solve (after factorization) for positive definite matrix (SPOTRS).
Definition Epetra_LAPACK.cpp:67
Epetra_LAPACK::LAMCH
void LAMCH(const char CMACH, float &T) const
Epetra_LAPACK wrapper for DLAMCH routine. On out, T holds machine double precision floating point cha...
Definition Epetra_LAPACK.cpp:356
Epetra_LAPACK::ORMHR
void ORMHR(const char SIDE, const char TRANS, 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, const int LWORK, int *INFO) const
Epetra_LAPACK wrapper for applying an orthogonal matrix in-place (SORMHR).
Definition Epetra_LAPACK.cpp:312
Epetra_LAPACK::SPGV
void SPGV(const int ITYPE, const char JOBZ, const char UPLO, const int N, double *AP, double *BP, double *W, double *Z, const int LDZ, double *WORK, int *INFO) const
Epetra_LAPACK wrapper to compute all the eigenvalues and, optionally, the eigenvectors of a real gene...
Definition Epetra_LAPACK.cpp:420
Epetra_LAPACK::TREXC
void TREXC(const char COMPQ, const int N, float *T, const int LDT, float *Q, const int LDQ, int IFST, int ILST, float *WORK, int *INFO) const
Epetra_LAPACK wrapper for reordering the real-Schur/Schur factorization of a matrix (STREXC).
Definition Epetra_LAPACK.cpp:346
Epetra_LAPACK::POSVX
void POSVX(const char FACT, const char UPLO, const int N, const int NRHS, float *A, const int LDA, float *AF, const int LDAF, const char EQUED, float *S, float *B, const int LDB, float *X, const int LDX, float *RCOND, float *FERR, float *BERR, float *WORK, int *IWORK, int *INFO) const
Epetra_LAPACK solve driver for positive definite matrix (SPOSVX).
Definition Epetra_LAPACK.cpp:131
Epetra_LAPACK::ORGQR
void ORGQR(const int M, const int N, const int K, float *A, const int LDA, float *TAU, float *WORK, const int LWORK, int *INFO) const
Epetra_LAPACK wrapper for generating a m x n real matrix Q with orthonormal columns,...
Definition Epetra_LAPACK.cpp:292
Epetra_LAPACK::GGSVD
void GGSVD(const char JOBU, const char JOBV, const char JOBQ, const int M, const int N, const int P, int *K, int *L, double *A, const int LDA, double *B, const int LDB, double *ALPHA, double *BETA, double *U, const int LDU, double *V, const int LDV, double *Q, const int LDQ, double *WORK, int *IWORK, int *INFO) const
Epetra_LAPACK wrapper to compute the generalized singular value decomposition (GSVD) of an M-by-N rea...
Definition Epetra_LAPACK.cpp:364
Epetra_LAPACK::Epetra_LAPACK
Epetra_LAPACK(void)
Epetra_LAPACK Constructor.
Definition Epetra_LAPACK.h:425
Epetra_LAPACK::POTRI
void POTRI(const char UPLO, const int N, float *A, const int LDA, int *INFO) const
Epetra_LAPACK inversion for positive definite matrix (SPOTRI).
Definition Epetra_LAPACK.cpp:77
Epetra_LAPACK::GECON
void GECON(const char NORM, const int N, const float *A, const int LDA, const float ANORM, float *RCOND, float *WORK, int *IWORK, int *INFO) const
Epetra_LAPACK condition number estimator for general matrix (SGECON).
Definition Epetra_LAPACK.cpp:206
Epetra_LAPACK::GEEVX
void GEEVX(const char BALANC, const char JOBVL, const char JOBVR, const char SENSE, const int N, double *A, const int LDA, double *WR, double *WI, double *VL, const int LDVL, double *VR, const int LDVR, int *ILO, int *IHI, double *SCALE, double *ABNRM, double *RCONDE, double *RCONDV, double *WORK, const int LWORK, int *IWORK, int *INFO) const
Epetra_LAPACK wrapper to compute for an N-by-N real nonsymmetric matrix A, the eigenvalues and,...
Definition Epetra_LAPACK.cpp:550
Epetra_LAPACK::SYEVD
void SYEVD(const char JOBZ, const char UPLO, const int N, double *A, const int LDA, double *W, double *WORK, const int LWORK, int *IWORK, const int LIWORK, int *INFO) const
Epetra_LAPACK wrapper to compute all eigenvalues and, optionally, eigenvectors of a real symmetric ma...
Definition Epetra_LAPACK.cpp:442
Epetra_LAPACK::POCON
void POCON(const char UPLO, const int N, const float *A, const int LDA, const float ANORM, float *RCOND, float *WORK, int *IWORK, int *INFO) const
Epetra_LAPACK condition number estimator for positive definite matrix (SPOCON).
Definition Epetra_LAPACK.cpp:85
Epetra_LAPACK::SYEVR
void SYEVR(const char JOBZ, const char RANGE, const char UPLO, const int N, double *A, const int LDA, const double *VL, const double *VU, const int *IL, const int *IU, const double ABSTOL, int *M, double *W, double *Z, const int LDZ, int *ISUPPZ, double *WORK, const int LWORK, int *IWORK, const int LIWORK, int *INFO) const
Epetra_LAPACK wrapper to compute selected eigenvalues and, optionally, eigenvectors of a real symmetr...
Definition Epetra_LAPACK.cpp:520
Epetra_LAPACK::POTRF
void POTRF(const char UPLO, const int N, float *A, const int LDA, int *INFO) const
Epetra_LAPACK factorization for positive definite matrix (SPOTRF).
Definition Epetra_LAPACK.cpp:59
Epetra_LAPACK::SYGVX
void SYGVX(const int ITYPE, const char JOBZ, const char RANGE, const char UPLO, const int N, double *A, const int LDA, double *B, const int LDB, const double *VL, const double *VU, const int *IL, const int *IU, const double ABSTOL, int *M, double *W, double *Z, const int LDZ, double *WORK, const int LWORK, int *IWORK, int *IFAIL, int *INFO) const
Epetra_LAPACK wrapper to compute selected eigenvalues, and optionally, eigenvectors of a real general...
Definition Epetra_LAPACK.cpp:486
Epetra_LAPACK::GEHRD
void GEHRD(const int N, const int ILO, const int IHI, float *A, const int LDA, float *TAU, float *WORK, const int LWORK, int *INFO) const
Epetra_LAPACK wrapper for reduction to Hessenberg form (SGEHRD).
Definition Epetra_LAPACK.cpp:270
Epetra_LAPACK::GGEV
void GGEV(const char JOBVL, const char JOBVR, 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) const
Epetra_LAPACK wrapper to compute for a pair of N-by-N real nonsymmetric matrices (A,...
Definition Epetra_LAPACK.cpp:594
Epetra_LAPACK::GERFS
void GERFS(const char TRANS, 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) const
Epetra_LAPACK Refine solution (GERFS).
Definition Epetra_LAPACK.cpp:238
Epetra_LAPACK::SYGV
void SYGV(const int ITYPE, const char JOBZ, const char UPLO, const int N, double *A, const int LDA, double *B, const int LDB, double *W, double *WORK, const int LWORK, int *INFO) const
Epetra_LAPACK wrapper to compute all the eigenvalues, and optionally, the eigenvectors of a real gene...
Definition Epetra_LAPACK.cpp:474
Epetra_LAPACK::GETRF
void GETRF(const int M, const int N, float *A, const int LDA, int *IPIV, int *INFO) const
Epetra_LAPACK factorization for general matrix (SGETRF).
Definition Epetra_LAPACK.cpp:154
Epetra_LAPACK::GESDD
void GESDD(const char JOBZ, const int M, const int N, double *A, const int LDA, double *S, double *U, const int LDU, double *VT, const int LDVT, double *WORK, const int LWORK, int *IWORK, int *INFO) const
Epetra_LAPACK wrapper to compute the singular value decomposition (SVD) of a real M-by-N matrix A,...
Definition Epetra_LAPACK.cpp:568
Epetra_LAPACK::TREVC
void TREVC(const char SIDE, const char HOWMNY, 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) const
Epetra_LAPACK wrapper for computing eigenvectors of a quasi-triangular/triagnular matrix (STREVC).
Definition Epetra_LAPACK.cpp:330
Epetra_LAPACK::GGLSE
void GGLSE(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) const
Epetra_LAPACK wrapper to solve the linear equality-constrained least squares (LSE) problem.
Definition Epetra_LAPACK.cpp:622
Epetra_LAPACK::~Epetra_LAPACK
virtual ~Epetra_LAPACK(void)
Epetra_LAPACK Destructor.
Definition Epetra_LAPACK.h:429
Epetra_LAPACK::HSEQR
void HSEQR(const char JOB, const char COMPZ, 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) const
Epetra_LAPACK wrapper for computing the eigenvalues of a real upper Hessenberg matrix (SHSEQR).
Definition Epetra_LAPACK.cpp:280
Epetra_LAPACK::GESVX
void GESVX(const char FACT, const char TRANS, const int N, const int NRHS, float *A, const int LDA, float *AF, const int LDAF, int *IPIV, const char EQUED, 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) const
Epetra_LAPACK solve driver for general matrix (SGESVX).
Definition Epetra_LAPACK.cpp:252
Epetra_LAPACK::GEEV
void GEEV(const char JOBVL, const char JOBVR, 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) const
Epetra_LAPACK wrapper to compute for an N-by-N real nonsymmetric matrix A, the eigenvalues and,...
Definition Epetra_LAPACK.cpp:396
Epetra_LAPACK::POSV
void POSV(const char UPLO, const int N, const int NRHS, float *A, const int LDA, float *X, const int LDX, int *INFO) const
Epetra_LAPACK factor and solve for positive definite matrix (SPOSV).
Definition Epetra_LAPACK.cpp:97
Epetra_LAPACK::SPEV
void SPEV(const char JOBZ, const char UPLO, const int N, double *AP, double *W, double *Z, int LDZ, double *WORK, int *INFO) const
Epetra_LAPACK wrapper to compute all the eigenvalues and, optionally, eigenvectors of a real symmetri...
Definition Epetra_LAPACK.cpp:410
Epetra_LAPACK::GESVD
void GESVD(const char JOBU, const char JOBVT, const int M, const int N, float *A, const int LDA, float *S, float *U, const int LDU, float *VT, const int LDVT, float *WORK, const int *LWORK, int *INFO) const
Epetra_LAPACK wrapper for computing the singular value decomposition (SGESVD).
Definition Epetra_LAPACK.cpp:170
Epetra_LAPACK::LARFT
void LARFT(const char DIRECT, const char STOREV, const int N, const int K, double *V, const int LDV, double *TAU, double *T, const int LDT) const
Epetra_LAPACK for forming the triangular factor of a product of elementary Householder reflectors (SL...
Definition Epetra_LAPACK.cpp:326
Epetra_LAPACK::POEQU
void POEQU(const int N, const float *A, const int LDA, float *S, float *SCOND, float *AMAX, int *INFO) const
Epetra_LAPACK equilibration for positive definite matrix (SPOEQU).
Definition Epetra_LAPACK.cpp:107
Epetra_LAPACK::SYEVX
void SYEVX(const char JOBZ, const char RANGE, const char UPLO, const int N, double *A, const int LDA, const double *VL, const double *VU, const int *IL, const int *IU, const double ABSTOL, int *M, double *W, double *Z, const int LDZ, double *WORK, const int LWORK, int *IWORK, int *IFAIL, int *INFO) const
Epetra_LAPACK wrapper to compute selected eigenvalues and, optionally, eigenvectors of a real symmetr...
Definition Epetra_LAPACK.cpp:454
Epetra_LAPACK::GESV
void GESV(const int N, const int NRHS, float *A, const int LDA, int *IPIV, float *X, const int LDX, int *INFO) const
Epetra_LAPACK factor and solve for general matrix (SGESV).
Definition Epetra_LAPACK.cpp:218
Epetra_LAPACK::ORGHR
void ORGHR(const int N, const int ILO, const int IHI, float *A, const int LDA, float *TAU, float *WORK, const int LWORK, int *INFO) const
Epetra_LAPACK wrapper for generating a real orthogonal matrix Q defined by elementary reflectors....
Definition Epetra_LAPACK.cpp:302
Epetra_LAPACK::TRTRS
void TRTRS(const char UPLO, const char TRANS, const char DIAG, const int N, const int NRHS, const float *A, const int LDA, float *B, const int LDB, int *INFO) const
Epetra_LAPACK wrapper for TRTRS routine.
Definition Epetra_LAPACK.cpp:632
Epetra_LAPACK::GETRI
void GETRI(const int N, float *A, const int LDA, int *IPIV, float *WORK, const int *LWORK, int *INFO) const
Epetra_LAPACK inversion for general matrix (SGETRI).
Definition Epetra_LAPACK.cpp:196
Epetra_LAPACK::GEQRF
void GEQRF(const int M, const int N, float *A, const int LDA, float *TAU, float *WORK, const int lwork, int *INFO) const
Epetra_LAPACK QR factorization for general matrix (SGEQRF).
Definition Epetra_LAPACK.cpp:162
Epetra_LAPACK::GETRS
void GETRS(const char TRANS, const int N, const int NRHS, const float *A, const int LDA, const int *IPIV, float *X, const int LDX, int *INFO) const
Epetra_LAPACK solve (after factorization) for general matrix (SGETRS).
Definition Epetra_LAPACK.cpp:186
ITYPE
#define ITYPE
Definition test/Bugs_LL/Bug_5791_StaticProfile_LL/cxx_main.cpp:18
Generated by doxygen 1.17.0