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 slepcfnmod.F90 to create Fortran module file
 11: !
 12: #include "slepc/finclude/slepcfn.h"

 14:       type tFN
 15:         PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
 16:       end type tFN

 18:       FN, parameter :: SLEPC_NULL_FN = tFN(0)

 20:       PetscEnum, parameter :: FN_COMBINE_ADD           =  0
 21:       PetscEnum, parameter :: FN_COMBINE_MULTIPLY      =  1
 22:       PetscEnum, parameter :: FN_COMBINE_DIVIDE        =  2
 23:       PetscEnum, parameter :: FN_COMBINE_COMPOSE       =  3

 25:       PetscEnum, parameter :: FN_PARALLEL_REDUNDANT    =  0
 26:       PetscEnum, parameter :: FN_PARALLEL_SYNCHRONIZED =  1

 28: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
 29: !DEC$ ATTRIBUTES DLLEXPORT::SLEPC_NULL_FN
 30: #endif