Actual source code: slepcnep.h

  1: !
  2: !  Include file for Fortran use of the NEP object in SLEPc
  3: !
  4: !
  5: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  6: !  SLEPc - Scalable Library for Eigenvalue Problem Computations
  7: !  Copyright (c) 2002-2013, Universitat Politecnica de Valencia, Spain
  8: !
  9: !  This file is part of SLEPc.
 10: !
 11: !  SLEPc is free software: you can redistribute it and/or modify it under  the
 12: !  terms of version 3 of the GNU Lesser General Public License as published by
 13: !  the Free Software Foundation.
 14: !
 15: !  SLEPc  is  distributed in the hope that it will be useful, but WITHOUT  ANY
 16: !  WARRANTY;  without even the implied warranty of MERCHANTABILITY or  FITNESS
 17: !  FOR  A  PARTICULAR PURPOSE. See the GNU Lesser General Public  License  for
 18: !  more details.
 19: !
 20: !  You  should have received a copy of the GNU Lesser General  Public  License
 21: !  along with SLEPc. If not, see <http://www.gnu.org/licenses/>.
 22: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 23: !
 24:  #include finclude/slepcnepdef.h

 26: !  Convergence flags.
 27: !  They should match the flags in $SLEPC_DIR/include/slepcnep.h

 29:       PetscEnum NEP_CONVERGED_FNORM_ABS
 30:       PetscEnum NEP_CONVERGED_FNORM_RELATIVE
 31:       PetscEnum NEP_CONVERGED_SNORM_RELATIVE
 32:       PetscEnum NEP_DIVERGED_LINEAR_SOLVE
 33:       PetscEnum NEP_DIVERGED_FUNCTION_COUNT
 34:       PetscEnum NEP_DIVERGED_MAX_IT
 35:       PetscEnum NEP_DIVERGED_BREAKDOWN
 36:       PetscEnum NEP_DIVERGED_FNORM_NAN
 37:       PetscEnum NEP_CONVERGED_ITERATING

 39:       parameter (NEP_CONVERGED_FNORM_ABS      =  2)
 40:       parameter (NEP_CONVERGED_FNORM_RELATIVE =  3)
 41:       parameter (NEP_CONVERGED_SNORM_RELATIVE =  4)
 42:       parameter (NEP_DIVERGED_LINEAR_SOLVE    = -1)
 43:       parameter (NEP_DIVERGED_FUNCTION_COUNT  = -2)
 44:       parameter (NEP_DIVERGED_MAX_IT          = -3)
 45:       parameter (NEP_DIVERGED_BREAKDOWN       = -4)
 46:       parameter (NEP_DIVERGED_FNORM_NAN       = -5)
 47:       parameter (NEP_CONVERGED_ITERATING      =  0)

 49:       PetscEnum NEP_LARGEST_MAGNITUDE
 50:       PetscEnum NEP_SMALLEST_MAGNITUDE
 51:       PetscEnum NEP_LARGEST_REAL
 52:       PetscEnum NEP_SMALLEST_REAL
 53:       PetscEnum NEP_LARGEST_IMAGINARY
 54:       PetscEnum NEP_SMALLEST_IMAGINARY
 55:       PetscEnum NEP_TARGET_MAGNITUDE
 56:       PetscEnum NEP_TARGET_REAL
 57:       PetscEnum NEP_TARGET_IMAGINARY

 59:       parameter (NEP_LARGEST_MAGNITUDE      =  1)
 60:       parameter (NEP_SMALLEST_MAGNITUDE     =  2)
 61:       parameter (NEP_LARGEST_REAL           =  3)
 62:       parameter (NEP_SMALLEST_REAL          =  4)
 63:       parameter (NEP_LARGEST_IMAGINARY      =  5)
 64:       parameter (NEP_SMALLEST_IMAGINARY     =  6)
 65:       parameter (NEP_TARGET_MAGNITUDE       =  7)
 66:       parameter (NEP_TARGET_REAL            =  8)
 67:       parameter (NEP_TARGET_IMAGINARY       =  9)

 69: !
 70: !   Possible arguments to NEPMonitorSet()
 71: !
 72:       external NEPMONITORALL
 73:       external NEPMONITORLG
 74:       external NEPMONITORLGALL
 75:       external NEPMONITORCONVERGED
 76:       external NEPMONITORFIRST

 78: !
 79: !  End of Fortran include file for the NEP package in SLEPc
 80: !