Actual source code: petscsneslinesearch.h

  1: !
  2: ! Used by petscsnesmod.F90 to create Fortran module file
  3: !

  5:       type, extends(tPetscObject) :: tSNESLineSearch
  6:       end type tSNESLineSearch
  7:       SNESLineSearch, parameter :: PETSC_NULL_SNES_LINESEARCH = tSNESLineSearch(0)
  8: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
  9: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_NULL_SNES_LINESEARCH
 10: #endif
 11: !
 12: !     SNESLineSearchReason
 13: !
 14:       PetscEnum, parameter :: SNES_LINESEARCH_SUCCEEDED       = 0
 15:       PetscEnum, parameter :: SNES_LINESEARCH_FAILED_NANORINF = 1
 16:       PetscEnum, parameter :: SNES_LINESEARCH_FAILED_DOMAIN   = 2
 17:       PetscEnum, parameter :: SNES_LINESEARCH_FAILED_REDUCT   = 3
 18:       PetscEnum, parameter :: SNES_LINESEARCH_FAILED_USER     = 4
 19:       PetscEnum, parameter :: SNES_LINESEARCH_FAILED_FUNCTION = 5