1: !
  2: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  3: !  SLEPc - Scalable Library for Eigenvalue Problem Computations
  4: !  Copyright (c) 2002-, 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: !  Used by slepcmfnmod.F90 to create Fortran module file
 11: !
 12: #include "slepc/finclude/slepcsys.h"
 13: #include "slepc/finclude/slepcmfn.h"

 15:       type tMFN
 16:         PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
 17:       end type tMFN

 19:       MFN, parameter :: SLEPC_NULL_MFN = tMFN(0)

 21:       PetscEnum, parameter :: MFN_CONVERGED_TOL          =  1
 22:       PetscEnum, parameter :: MFN_CONVERGED_ITS          =  2
 23:       PetscEnum, parameter :: MFN_DIVERGED_ITS           = -1
 24:       PetscEnum, parameter :: MFN_DIVERGED_BREAKDOWN     = -2
 25:       PetscEnum, parameter :: MFN_CONVERGED_ITERATING    =  0

 27: !
 28: !   Possible arguments to MFNMonitorSet()
 29: !
 30:       external MFNMONITORDEFAULT

 32: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
 33: !DEC$ ATTRIBUTES DLLEXPORT::SLEPC_NULL_MFN
 34: #endif