1: ! 2: ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 3: ! SLEPc - Scalable Library for Eigenvalue Problem Computations 4: ! Copyright (c) 2002-2018, 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 MFN object in SLEPc 11: ! 12: #include "slepc/finclude/slepcsys.h" 13: #include "slepc/finclude/slepcmfn.h" 15: type tMFN 16: PetscFortranAddr:: v 17: end type tMFN 19: PetscEnum MFN_CONVERGED_TOL 20: PetscEnum MFN_CONVERGED_ITS 21: PetscEnum MFN_DIVERGED_ITS 22: PetscEnum MFN_DIVERGED_BREAKDOWN 23: PetscEnum MFN_CONVERGED_ITERATING 25: parameter (MFN_CONVERGED_TOL = 1) 26: parameter (MFN_CONVERGED_ITS = 2) 27: parameter (MFN_DIVERGED_ITS = -1) 28: parameter (MFN_DIVERGED_BREAKDOWN = -2) 29: parameter (MFN_CONVERGED_ITERATING = 0) 31: ! 32: ! Possible arguments to MFNMonitorSet() 33: ! 34: external MFNMONITORDEFAULT 35: external MFNMONITORLG 37: ! 38: ! End of Fortran include file for the MFN package in SLEPc 39: !