| 1458 |
slepc |
1 |
!
|
|
|
2 |
! Include file for Fortran use of the SVD object in SLEPc
|
|
|
3 |
!
|
|
|
4 |
!
|
|
|
5 |
! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
|
6 |
! SLEPc - Scalable Library for Eigenvalue Problem Computations
|
|
|
7 |
! Copyright (c) 2002-2007, Universidad Politecnica de Valencia, Spain
|
|
|
8 |
!
|
|
|
9 |
! This file is part of SLEPc. See the README file for conditions of use
|
|
|
10 |
! and additional information.
|
|
|
11 |
! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
|
12 |
!
|
| 1543 |
slepc |
13 |
#include "finclude/slepcsvddef.h"
|
| 1458 |
slepc |
14 |
|
|
|
15 |
! Convergence flags.
|
|
|
16 |
! They sould match the flags in $SLEPC_DIR/include/slepcsvd.h
|
|
|
17 |
|
| 1543 |
slepc |
18 |
PetscEnum SVD_CONVERGED_TOL
|
|
|
19 |
PetscEnum SVD_DIVERGED_ITS
|
|
|
20 |
PetscEnum SVD_DIVERGED_BREAKDOWN
|
|
|
21 |
PetscEnum SVD_CONVERGED_ITERATING
|
| 1458 |
slepc |
22 |
|
| 1459 |
slepc |
23 |
parameter (SVD_CONVERGED_TOL = 2)
|
|
|
24 |
parameter (SVD_DIVERGED_ITS = -3)
|
|
|
25 |
parameter (SVD_DIVERGED_BREAKDOWN = -4)
|
|
|
26 |
parameter (SVD_CONVERGED_ITERATING = 0)
|
| 1458 |
slepc |
27 |
|
| 1543 |
slepc |
28 |
PetscEnum SVD_TRANSPOSE_EXPLICIT
|
|
|
29 |
PetscEnum SVD_TRANSPOSE_IMPLICIT
|
| 1458 |
slepc |
30 |
|
| 1459 |
slepc |
31 |
parameter (SVD_TRANSPOSE_EXPLICIT = 0)
|
|
|
32 |
parameter (SVD_TRANSPOSE_IMPLICIT = 1)
|
| 1458 |
slepc |
33 |
|
|
|
34 |
integer SVD_LARGEST
|
|
|
35 |
integer SVD_SMALLEST
|
|
|
36 |
|
| 1459 |
slepc |
37 |
parameter (SVD_LARGEST = 0)
|
|
|
38 |
parameter (SVD_SMALLEST = 1)
|