Actual source code: slepcfn.h
slepc-3.21.1 2024-04-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: !  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