22 static PetscErrorCode ourtaolinesearchobjectiveroutine(TaoLineSearch ls, Vec x, PetscReal *f, Petsc…  in ourtaolinesearchobjectiveroutine()  argument
24 … *, PetscReal *, void *, PetscErrorCode *))(((PetscObject)ls)->fortran_func_pointers[OBJ]))(&ls, &…  in ourtaolinesearchobjectiveroutine()
28 static PetscErrorCode ourtaolinesearchgradientroutine(TaoLineSearch ls, Vec x, Vec g, PetscCtx ctx)  in ourtaolinesearchgradientroutine()  argument
30 …, Vec *, Vec *, void *, PetscErrorCode *))(((PetscObject)ls)->fortran_func_pointers[GRAD]))(&ls, &…  in ourtaolinesearchgradientroutine()
34 static PetscErrorCode ourtaolinesearchobjectiveandgradientroutine(TaoLineSearch ls, Vec x, PetscRea…  in ourtaolinesearchobjectiveandgradientroutine()  argument
36 …Real *, Vec *, void *, PetscErrorCode *))(((PetscObject)ls)->fortran_func_pointers[OBJGRAD]))(&ls,…  in ourtaolinesearchobjectiveandgradientroutine()
40 static PetscErrorCode ourtaolinesearchobjectiveandgtsroutine(TaoLineSearch ls, Vec x, Vec s, PetscR…  in ourtaolinesearchobjectiveandgtsroutine()  argument
42 …, PetscReal *, void *, PetscErrorCode *))(((PetscObject)ls)->fortran_func_pointers[OBJGTS]))(&ls, …  in ourtaolinesearchobjectiveandgtsroutine()
46 PETSC_EXTERN void taolinesearchsetobjectiveroutine_(TaoLineSearch *ls, void (*func)(TaoLineSearch *…  in taolinesearchsetobjectiveroutine_()  argument
48   PetscObjectAllocateFortranPointers(*ls, NFUNCS);  in taolinesearchsetobjectiveroutine_()
50     *ierr = TaoLineSearchSetObjectiveRoutine(*ls, NULL, ctx);  in taolinesearchsetobjectiveroutine_()
52     ((PetscObject)*ls)->fortran_func_pointers[OBJ] = (PetscFortranCallbackFn *)func;  in taolinesearchsetobjectiveroutine_()
53 …*ierr                                          = TaoLineSearchSetObjectiveRoutine(*ls, ourtaolines…  in taolinesearchsetobjectiveroutine_()
57 PETSC_EXTERN void taolinesearchsetgradientroutine_(TaoLineSearch *ls, void (*func)(TaoLineSearch *,…  in taolinesearchsetgradientroutine_()  argument
59   PetscObjectAllocateFortranPointers(*ls, NFUNCS);  in taolinesearchsetgradientroutine_()
61     *ierr = TaoLineSearchSetGradientRoutine(*ls, NULL, ctx);  in taolinesearchsetgradientroutine_()
63     ((PetscObject)*ls)->fortran_func_pointers[GRAD] = (PetscFortranCallbackFn *)func;  in taolinesearchsetgradientroutine_()
64 …*ierr                                           = TaoLineSearchSetGradientRoutine(*ls, ourtaolines…  in taolinesearchsetgradientroutine_()
68 PETSC_EXTERN void taolinesearchsetobjectiveandgradientroutine_(TaoLineSearch *ls, void (*func)(TaoL…  in taolinesearchsetobjectiveandgradientroutine_()  argument
70   PetscObjectAllocateFortranPointers(*ls, NFUNCS);  in taolinesearchsetobjectiveandgradientroutine_()
72     *ierr = TaoLineSearchSetObjectiveAndGradientRoutine(*ls, NULL, ctx);  in taolinesearchsetobjectiveandgradientroutine_()
74     ((PetscObject)*ls)->fortran_func_pointers[OBJGRAD] = (PetscFortranCallbackFn *)func;  in taolinesearchsetobjectiveandgradientroutine_()
75 …                            = TaoLineSearchSetObjectiveAndGradientRoutine(*ls, ourtaolinesearchobj…  in taolinesearchsetobjectiveandgradientroutine_()
79 PETSC_EXTERN void taolinesearchsetobjectiveandgtsroutine_(TaoLineSearch *ls, void (*func)(TaoLineSe…  in taolinesearchsetobjectiveandgtsroutine_()  argument
81   PetscObjectAllocateFortranPointers(*ls, NFUNCS);  in taolinesearchsetobjectiveandgtsroutine_()
83     *ierr = TaoLineSearchSetObjectiveAndGTSRoutine(*ls, NULL, ctx);  in taolinesearchsetobjectiveandgtsroutine_()
85     ((PetscObject)*ls)->fortran_func_pointers[OBJGTS] = (PetscFortranCallbackFn *)func;  in taolinesearchsetobjectiveandgtsroutine_()
86 …*ierr                                             = TaoLineSearchSetObjectiveAndGTSRoutine(*ls, ou…  in taolinesearchsetobjectiveandgtsroutine_()