Actual source code: petsctao.h
1: !
2: ! Used by petsctaomod.F90 to create Fortran module file
3: !
4: #include "petsc/finclude/petsctao.h"
6: type, extends(tPetscObject) :: tTao
7: end type tTao
8: Tao, parameter :: PETSC_NULL_TAO = tTao(0)
9: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
10: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_NULL_TAO
11: #endif
13: type, extends(tPetscObject) :: tTaoLineSearch
14: end type tTaoLineSearch
15: TaoLineSearch, parameter :: PETSC_NULL_TAO_LINESEARCH = tTaoLineSearch(0)
16: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
17: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_NULL_TAO_LINESEARCH
18: #endif
20: PetscEnum, parameter :: TAO_CONVERGED_GATOL = 3
21: PetscEnum, parameter :: TAO_CONVERGED_GRTOL = 4
22: PetscEnum, parameter :: TAO_CONVERGED_GTTOL = 5
23: PetscEnum, parameter :: TAO_CONVERGED_STEPTOL = 6
24: PetscEnum, parameter :: TAO_CONVERGED_MINF = 7
25: PetscEnum, parameter :: TAO_CONVERGED_USER = 8
26: PetscEnum, parameter :: TAO_DIVERGED_MAXITS = -2
27: PetscEnum, parameter :: TAO_DIVERGED_NAN = -4
28: PetscEnum, parameter :: TAO_DIVERGED_MAXFCN = -5
29: PetscEnum, parameter :: TAO_DIVERGED_LS_FAILURE = -6
30: PetscEnum, parameter :: TAO_DIVERGED_TR_REDUCTION = -7
31: PetscEnum, parameter :: TAO_DIVERGED_USER = -8
32: PetscEnum, parameter :: TAO_CONTINUE_ITERATING = 0
34: PetscEnum, parameter :: TAO_SUBSET_SUBVEC = 0
35: PetscEnum, parameter :: TAO_SUBSET_MASK = 1
36: PetscEnum, parameter :: TAO_SUBSET_MATRIXFREE = 2