Date: 2023-01-26T12:19:48+00:00

Actual source code: slepcfn.h
slepc-3.18.2 2023-01-26
Report Typos and Errors

      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: !  Include file for Fortran use of the FN object in SLEPc
     11: !
     12: #if !defined(SLEPCFNDEF_H)
     13: #define SLEPCFNDEF_H

     15: #include "petsc/finclude/petscmat.h"

     17: #define FN type(tFN)

     19: #define FNType         character*(80)
     20: #define FNCombineType  PetscEnum
     21: #define FNParallelType PetscEnum

     23: #define FNCOMBINE  'combine'
     24: #define FNRATIONAL 'rational'
     25: #define FNEXP      'exp'
     26: #define FNLOG      'log'
     27: #define FNPHI      'phi'
     28: #define FNSQRT     'sqrt'
     29: #define FNINVSQRT  'invsqrt'

     31: #endif