1: ! 2: ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 3: ! SLEPc - Scalable Library for Eigenvalue Problem Computations 4: ! Copyright (c) 2002-2019, Universitat Politecnica de Valencia, Spain 5: ! 6: ! This file is part of SLEPc. 7: ! SLEPc is distributed under a 2-clause BSD license (see LICENSE). 8: ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 9: ! 10: ! Include file for Fortran use of the SVD object in SLEPc 11: ! 12: #include "slepc/finclude/slepcsvd.h" 14: type tSVD 15: PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE 16: end type tSVD 18: SVD, parameter :: SLEPC_NULL_SVD = tSVD(0) 20: PetscEnum SVD_CONVERGED_TOL 21: PetscEnum SVD_CONVERGED_USER 22: PetscEnum SVD_DIVERGED_ITS 23: PetscEnum SVD_DIVERGED_BREAKDOWN 24: PetscEnum SVD_CONVERGED_ITERATING 26: parameter (SVD_CONVERGED_TOL = 1) 27: parameter (SVD_CONVERGED_USER = 2) 28: parameter (SVD_DIVERGED_ITS = -1) 29: parameter (SVD_DIVERGED_BREAKDOWN = -2) 30: parameter (SVD_CONVERGED_ITERATING = 0) 32: integer SVD_LARGEST 33: integer SVD_SMALLEST 35: parameter (SVD_LARGEST = 0) 36: parameter (SVD_SMALLEST = 1) 38: PetscEnum SVD_ERROR_ABSOLUTE 39: PetscEnum SVD_ERROR_RELATIVE 41: parameter (SVD_ERROR_ABSOLUTE = 0) 42: parameter (SVD_ERROR_RELATIVE = 1) 44: PetscEnum SVD_CONV_ABS 45: PetscEnum SVD_CONV_REL 46: PetscEnum SVD_CONV_USER 48: parameter (SVD_CONV_ABS = 0) 49: parameter (SVD_CONV_REL = 1) 50: parameter (SVD_CONV_USER = 2) 52: PetscEnum SVD_STOP_BASIC 53: PetscEnum SVD_STOP_USER 55: parameter (SVD_STOP_BASIC = 0) 56: parameter (SVD_STOP_USER = 1) 58: PetscEnum SVD_PRIMME_HYBRID 59: PetscEnum SVD_PRIMME_NORMALEQUATIONS 60: PetscEnum SVD_PRIMME_AUGMENTED 62: parameter (SVD_PRIMME_HYBRID = 1) 63: parameter (SVD_PRIMME_NORMALEQUATIONS = 2) 64: parameter (SVD_PRIMME_AUGMENTED = 3) 66: ! 67: ! Possible arguments to SVDMonitorSet() 68: ! 69: external SVDMONITORALL 70: external SVDMONITORLG 71: external SVDMONITORLGALL 72: external SVDMONITORCONVERGED 73: external SVDMONITORFIRST 75: ! 76: ! End of Fortran include file for the SVD package in SLEPc 77: !