Actual source code: slepcpep.h
slepc-3.10.1 2018-10-23
Report Typos and Errors

      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 PEP object in SLEPc
     11: !

     15: #include "slepc/finclude/slepcbv.h"
     16: #include "slepc/finclude/slepcst.h"
     17: #include "slepc/finclude/slepcds.h"
     18: #include "slepc/finclude/slepcrg.h"
     19: #include "slepc/finclude/slepceps.h"

     21: #define PEP type(tPEP)

     23: #define PEPType            character*(80)
     24: #define PEPProblemType     PetscEnum
     25: #define PEPWhich           PetscEnum
     26: #define PEPBasis           PetscEnum
     27: #define PEPScale           PetscEnum
     28: #define PEPRefine          PetscEnum
     29: #define PEPRefineScheme    PetscEnum
     30: #define PEPExtract         PetscEnum
     31: #define PEPConv            PetscEnum
     32: #define PEPStop            PetscEnum
     33: #define PEPErrorType       PetscEnum
     34: #define PEPConvergedReason PetscEnum

     36: #define PEPLINEAR    'linear'
     37: #define PEPQARNOLDI  'qarnoldi'
     38: #define PEPTOAR      'toar'
     39: #define PEPSTOAR     'stoar'
     40: #define PEPJD        'jd'

     42: #endif