Actual source code: petscsnesdef.h

  1: !
  2: !  Include file for Fortran use of the SNES package in PETSc
  3: !
  4: #if !defined (__PETSCSNESDEF_H)

 7:  #include finclude/petsckspdef.h

  9: #if !defined(PETSC_USE_FORTRAN_TYPES)
 10: #define SNES PetscFortranAddr
 11: #endif
 12: #define SNESType character*(80)
 13: #define SNESConvergedReason PetscEnum
 14: #define MatMFFD PetscFortranAddr
 15: #define MatMFFDType PetscFortranAddr
 16: !
 17: !  SNESType
 18: !
 19: #define SNESLS 'ls'
 20: #define SNESTR 'tr'
 21: #define SNESTEST 'test'
 22: #define SNESPYTHON 'python'
 23: !
 24: ! MatSNESMF
 25: !
 26: #define MATMFFD_DEFAULT 'ds'
 27: #define MATMFFD_WP 'wp'

 29: #endif