Date: 2025-03-28T21:11:07+00:00

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