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