| /petsc/src/snes/linesearch/interface/ |
| H A D | linesearch.c | 173 SNESLineSearch linesearch; in SNESLineSearchCreate() local
179 …PetscCall(PetscHeaderCreate(linesearch, SNESLINESEARCH_CLASSID, "SNESLineSearch", "Linesearch", "S… in SNESLineSearchCreate()
180 linesearch->vec_sol_new = NULL; in SNESLineSearchCreate()
181 linesearch->vec_func_new = NULL; in SNESLineSearchCreate()
182 linesearch->vec_sol = NULL; in SNESLineSearchCreate()
183 linesearch->vec_func = NULL; in SNESLineSearchCreate()
184 linesearch->vec_update = NULL; in SNESLineSearchCreate()
186 linesearch->lambda = 1.0; in SNESLineSearchCreate()
187 linesearch->fnorm = 1.0; in SNESLineSearchCreate()
188 linesearch->ynorm = 1.0; in SNESLineSearchCreate()
[all …]
|
| /petsc/src/snes/linesearch/impls/basic/ |
| H A D | linesearchbasic.c | 4 static PetscErrorCode SNESLineSearchApply_Basic(SNESLineSearch linesearch) in SNESLineSearchApply_Basic() argument
12 PetscCall(SNESLineSearchGetVecs(linesearch, &X, &F, &Y, &W, NULL)); in SNESLineSearchApply_Basic()
13 PetscCall(SNESLineSearchGetNorms(linesearch, &xnorm, &gnorm, &ynorm)); in SNESLineSearchApply_Basic()
14 PetscCall(SNESLineSearchGetLambda(linesearch, &lambda)); in SNESLineSearchApply_Basic()
15 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in SNESLineSearchApply_Basic()
16 PetscCall(SNESLineSearchSetReason(linesearch, SNES_LINESEARCH_SUCCEEDED)); in SNESLineSearchApply_Basic()
19 PetscCall(SNESLineSearchPreCheck(linesearch, X, Y, &changed_y)); in SNESLineSearchApply_Basic()
23 if (linesearch->ops->viproject) PetscCall((*linesearch->ops->viproject)(snes, W)); in SNESLineSearchApply_Basic()
26 PetscCall(SNESLineSearchPostCheck(linesearch, X, Y, W, &changed_y, &changed_w)); in SNESLineSearchApply_Basic()
29 if (linesearch->ops->viproject) PetscCall((*linesearch->ops->viproject)(snes, W)); in SNESLineSearchApply_Basic()
[all …]
|
| /petsc/src/snes/linesearch/impls/cp/ |
| H A D | linesearchcp.c | 4 static PetscErrorCode SNESLineSearchApply_CP(SNESLineSearch linesearch) in SNESLineSearchApply_CP() argument
16 PetscCall(SNESLineSearchGetVecs(linesearch, &X, &F, &Y, &W, NULL)); in SNESLineSearchApply_CP()
17 PetscCall(SNESLineSearchGetNorms(linesearch, &xnorm, &gnorm, &ynorm)); in SNESLineSearchApply_CP()
18 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in SNESLineSearchApply_CP()
19 PetscCall(SNESLineSearchGetLambda(linesearch, &lambda)); in SNESLineSearchApply_CP()
20 …PetscCall(SNESLineSearchGetTolerances(linesearch, &minlambda, &maxlambda, &rtol, &atol, <ol, &ma… in SNESLineSearchApply_CP()
21 PetscCall(SNESLineSearchSetReason(linesearch, SNES_LINESEARCH_SUCCEEDED)); in SNESLineSearchApply_CP()
22 PetscCall(SNESLineSearchGetDefaultMonitor(linesearch, &monitor)); in SNESLineSearchApply_CP()
25 PetscCall(SNESLineSearchPreCheck(linesearch, X, Y, &changed_y)); in SNESLineSearchApply_CP()
29 if (linesearch->ops->vidirderiv) { in SNESLineSearchApply_CP()
[all …]
|
| /petsc/src/snes/linesearch/impls/bt/ |
| H A D | linesearchbt.c | 19 PetscErrorCode SNESLineSearchBTSetAlpha(SNESLineSearch linesearch, PetscReal alpha) in SNESLineSearchBTSetAlpha() argument
21 SNESLineSearch_BT *bt = (SNESLineSearch_BT *)linesearch->data; in SNESLineSearchBTSetAlpha()
25 PetscValidHeaderSpecific(linesearch, SNESLINESEARCH_CLASSID, 1); in SNESLineSearchBTSetAlpha()
26 PetscCall(PetscObjectTypeCompare((PetscObject)linesearch, SNESLINESEARCHBT, &isbt)); in SNESLineSearchBTSetAlpha()
44 PetscErrorCode SNESLineSearchBTGetAlpha(SNESLineSearch linesearch, PetscReal *alpha) in SNESLineSearchBTGetAlpha() argument
46 SNESLineSearch_BT *bt = (SNESLineSearch_BT *)linesearch->data; in SNESLineSearchBTGetAlpha()
50 PetscValidHeaderSpecific(linesearch, SNESLINESEARCH_CLASSID, 1); in SNESLineSearchBTGetAlpha()
51 PetscCall(PetscObjectTypeCompare((PetscObject)linesearch, SNESLINESEARCHBT, &isbt)); in SNESLineSearchBTGetAlpha()
52 …heck(isbt, PetscObjectComm((PetscObject)linesearch), PETSC_ERR_USER, "Not for type %s", ((PetscObj… in SNESLineSearchBTGetAlpha()
57 static PetscErrorCode SNESLineSearchApply_BT(SNESLineSearch linesearch) in SNESLineSearchApply_BT() argument
[all …]
|
| /petsc/src/snes/linesearch/impls/bisection/ |
| H A D | linesearchbisection.c | 4 static PetscErrorCode SNESLineSearchApply_Bisection(SNESLineSearch linesearch) in SNESLineSearchApply_Bisection() argument
17 PetscCall(SNESLineSearchGetVecs(linesearch, &X, &F, &Y, &W, &G)); in SNESLineSearchApply_Bisection()
18 PetscCall(SNESLineSearchGetLambda(linesearch, &lambda)); in SNESLineSearchApply_Bisection()
19 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in SNESLineSearchApply_Bisection()
20 PetscCall(SNESLineSearchGetTolerances(linesearch, NULL, NULL, &rtol, &atol, <ol, &max_it)); in SNESLineSearchApply_Bisection()
21 PetscCall(SNESLineSearchGetDefaultMonitor(linesearch, &monitor)); in SNESLineSearchApply_Bisection()
22 PetscCall(SNESLineSearchSetReason(linesearch, SNES_LINESEARCH_SUCCEEDED)); in SNESLineSearchApply_Bisection()
25 PetscCall(SNESLineSearchPreCheck(linesearch, X, Y, &changed_y)); in SNESLineSearchApply_Bisection()
35 if (linesearch->ops->vidirderiv) { in SNESLineSearchApply_Bisection()
36 PetscCall((*linesearch->ops->vidirderiv)(snes, F, X, Y, &fty_left)); in SNESLineSearchApply_Bisection()
[all …]
|
| /petsc/src/snes/linesearch/impls/secant/ |
| H A D | linesearchsecant.c | 5 static PetscErrorCode SNESLineSearchApply_Secant(SNESLineSearch linesearch) in SNESLineSearchApply_Secant() argument
25 PetscCall(SNESLineSearchGetVecs(linesearch, &X, &F, &Y, &W, NULL)); in SNESLineSearchApply_Secant()
26 PetscCall(SNESLineSearchGetNorms(linesearch, &xnorm, &gnorm, &ynorm)); in SNESLineSearchApply_Secant()
27 PetscCall(SNESLineSearchGetLambda(linesearch, &lambda)); in SNESLineSearchApply_Secant()
28 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in SNESLineSearchApply_Secant()
29 PetscCall(SNESLineSearchSetReason(linesearch, SNES_LINESEARCH_SUCCEEDED)); in SNESLineSearchApply_Secant()
30 …PetscCall(SNESLineSearchGetTolerances(linesearch, &minlambda, &maxlambda, NULL, &atol, <ol, &max… in SNESLineSearchApply_Secant()
31 PetscCall(SNESLineSearchGetDefaultMonitor(linesearch, &monitor)); in SNESLineSearchApply_Secant()
36 PetscCall(SNESLineSearchPreCheck(linesearch, X, Y, &changed_y)); in SNESLineSearchApply_Secant()
50 if (linesearch->ops->viproject) PetscCall((*linesearch->ops->viproject)(snes, W)); in SNESLineSearchApply_Secant()
[all …]
|
| /petsc/src/snes/linesearch/impls/nleqerr/ |
| H A D | linesearchnleqerr.c | 22 static PetscErrorCode SNESLineSearchReset_NLEQERR(SNESLineSearch linesearch) in SNESLineSearchReset_NLEQERR() argument
24 SNESLineSearch_NLEQERR *nleqerr = (SNESLineSearch_NLEQERR *)linesearch->data; in SNESLineSearchReset_NLEQERR()
33 static PetscErrorCode SNESLineSearchApply_NLEQERR(SNESLineSearch linesearch) in SNESLineSearchApply_NLEQERR() argument
43 SNESLineSearch_NLEQERR *nleqerr = (SNESLineSearch_NLEQERR *)linesearch->data; in SNESLineSearchApply_NLEQERR()
49 PetscCall(SNESLineSearchGetVecs(linesearch, &X, &F, &Y, &W, &G)); in SNESLineSearchApply_NLEQERR()
50 PetscCall(SNESLineSearchGetNorms(linesearch, &xnorm, &fnorm, &ynorm)); in SNESLineSearchApply_NLEQERR()
51 PetscCall(SNESLineSearchGetLambda(linesearch, &lambda)); in SNESLineSearchApply_NLEQERR()
52 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in SNESLineSearchApply_NLEQERR()
53 PetscCall(SNESLineSearchGetDefaultMonitor(linesearch, &monitor)); in SNESLineSearchApply_NLEQERR()
54 PetscCall(SNESLineSearchGetTolerances(linesearch, &minlambda, NULL, NULL, NULL, NULL, &max_it)); in SNESLineSearchApply_NLEQERR()
[all …]
|
| /petsc/src/snes/linesearch/impls/shell/ |
| H A D | linesearchshell.c | 48 PetscErrorCode SNESLineSearchShellSetApply(SNESLineSearch linesearch, SNESLineSearchShellApplyFn *f… in SNESLineSearchShellSetApply() argument
51 SNESLineSearch_Shell *shell = (SNESLineSearch_Shell *)linesearch->data; in SNESLineSearchShellSetApply()
54 PetscValidHeaderSpecific(linesearch, SNESLINESEARCH_CLASSID, 1); in SNESLineSearchShellSetApply()
55 PetscCall(PetscObjectTypeCompare((PetscObject)linesearch, SNESLINESEARCHSHELL, &flg)); in SNESLineSearchShellSetApply()
80 PetscErrorCode SNESLineSearchShellGetApply(SNESLineSearch linesearch, SNESLineSearchShellApplyFn **… in SNESLineSearchShellGetApply() argument
83 SNESLineSearch_Shell *shell = (SNESLineSearch_Shell *)linesearch->data; in SNESLineSearchShellGetApply()
86 PetscValidHeaderSpecific(linesearch, SNESLINESEARCH_CLASSID, 1); in SNESLineSearchShellGetApply()
89 PetscCall(PetscObjectTypeCompare((PetscObject)linesearch, SNESLINESEARCHSHELL, &flg)); in SNESLineSearchShellGetApply()
97 static PetscErrorCode SNESLineSearchApply_Shell(SNESLineSearch linesearch) in SNESLineSearchApply_Shell() argument
99 SNESLineSearch_Shell *shell = (SNESLineSearch_Shell *)linesearch->data; in SNESLineSearchApply_Shell()
[all …]
|
| /petsc/src/snes/linesearch/interface/ftn-custom/ |
| H A D | zlinesearchf.c | 18 static PetscErrorCode oursneslinesearchprecheck(SNESLineSearch linesearch, Vec X, Vec Y, PetscBool … in oursneslinesearchprecheck() argument
21 …scBool *, void *, PetscErrorCode *))(((PetscObject)linesearch)->fortran_func_pointers[1]))(&linese… in oursneslinesearchprecheck()
25 static PetscErrorCode oursneslinesearchpostcheck(SNESLineSearch linesearch, Vec X, Vec Y, Vec W, Pe… in oursneslinesearchpostcheck() argument
28 …scBool *, void *, PetscErrorCode *))(((PetscObject)linesearch)->fortran_func_pointers[2]))(&linese… in oursneslinesearchpostcheck()
32 PETSC_EXTERN void sneslinesearchsetprecheck_(SNESLineSearch *linesearch, void (*func)(SNESLineSearc… in sneslinesearchsetprecheck_() argument
34 PetscObjectAllocateFortranPointers(*linesearch, 3); in sneslinesearchsetprecheck_()
35 ((PetscObject)*linesearch)->fortran_func_pointers[1] = (PetscFortranCallbackFn *)func; in sneslinesearchsetprecheck_()
37 *ierr = SNESLineSearchSetPreCheck(*linesearch, oursneslinesearchprecheck, ctx); in sneslinesearchsetprecheck_()
40 PETSC_EXTERN void sneslinesearchsetpostcheck_(SNESLineSearch *linesearch, void (*func)(SNESLineSear… in sneslinesearchsetpostcheck_() argument
42 PetscObjectAllocateFortranPointers(*linesearch, 3); in sneslinesearchsetpostcheck_()
[all …]
|
| /petsc/src/snes/linesearch/impls/shell/ftn-custom/ |
| H A D | zlinesearchshellf.c | 12 static PetscErrorCode oursneslinesearchshellfunction(SNESLineSearch linesearch, PetscCtx ctx) in oursneslinesearchshellfunction() argument
15 …Search *, void *, PetscErrorCode *))(((PetscObject)linesearch)->fortran_func_pointers[0]))(&linese… in oursneslinesearchshellfunction()
19 PETSC_EXTERN void sneslinesearchshellsetapply_(SNESLineSearch *linesearch, void (*func)(SNESLineSea… in sneslinesearchshellsetapply_() argument
21 PetscObjectAllocateFortranPointers(*linesearch, 3); in sneslinesearchshellsetapply_()
22 ((PetscObject)*linesearch)->fortran_func_pointers[0] = (PetscFortranCallbackFn *)func; in sneslinesearchshellsetapply_()
24 *ierr = SNESLineSearchShellSetApply(*linesearch, oursneslinesearchshellfunction, ctx); in sneslinesearchshellsetapply_()
27 PETSC_EXTERN void sneslinesearchshellgetapply_(SNESLineSearch *linesearch, void *func, void **ctx, … in sneslinesearchshellgetapply_() argument
30 *ierr = SNESLineSearchShellGetApply(*linesearch, NULL, ctx); in sneslinesearchshellgetapply_()
|
| /petsc/src/snes/impls/ncg/ |
| H A D | snesncg.c | 21 static PetscErrorCode SNESLineSearchApply_NCGLinear(SNESLineSearch linesearch) in SNESLineSearchApply_NCGLinear() argument
29 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in SNESLineSearchApply_NCGLinear()
30 X = linesearch->vec_sol; in SNESLineSearchApply_NCGLinear()
31 W = linesearch->vec_sol_new; in SNESLineSearchApply_NCGLinear()
32 F = linesearch->vec_func; in SNESLineSearchApply_NCGLinear()
33 Y = linesearch->vec_update; in SNESLineSearchApply_NCGLinear()
34 fnorm = &linesearch->fnorm; in SNESLineSearchApply_NCGLinear()
35 xnorm = &linesearch->xnorm; in SNESLineSearchApply_NCGLinear()
36 ynorm = &linesearch->ynorm; in SNESLineSearchApply_NCGLinear()
45 SNESLineSearchCheckJacobianDomainError(snes, linesearch); in SNESLineSearchApply_NCGLinear()
[all …]
|
| /petsc/src/tao/complementarity/impls/ssls/ |
| H A D | ssfls.c | 17 PetscCall(TaoLineSearchSetVariableBounds(tao->linesearch, tao->XL, tao->XU)); in TaoSetUp_SSFLS()
37 …PetscCall(TaoLineSearchSetObjectiveAndGradientRoutine(tao->linesearch, Tao_SSLS_FunctionGradient, … in TaoSolve_SSFLS()
38 PetscCall(TaoLineSearchSetObjectiveRoutine(tao->linesearch, Tao_SSLS_Function, tao)); in TaoSolve_SSFLS()
42 …PetscCall(TaoLineSearchComputeObjectiveAndGradient(tao->linesearch, tao->solution, &psi, ssls->dps… in TaoSolve_SSFLS()
82 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_SSFLS()
83 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &psi, ssls->dpsi, tao->stepdirection,… in TaoSolve_SSFLS()
134 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_SSFLS()
135 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_SSFLS()
136 PetscCall(TaoLineSearchSetType(tao->linesearch, armijo_type)); in TaoCreate_SSFLS()
137 PetscCall(TaoLineSearchSetOptionsPrefix(tao->linesearch, tao->hdr.prefix)); in TaoCreate_SSFLS()
[all …]
|
| H A D | ssils.c | 50 …PetscCall(TaoLineSearchSetObjectiveAndGradientRoutine(tao->linesearch, Tao_SSLS_FunctionGradient, … in TaoSolve_SSILS()
51 PetscCall(TaoLineSearchSetObjectiveRoutine(tao->linesearch, Tao_SSLS_Function, tao)); in TaoSolve_SSILS()
55 …PetscCall(TaoLineSearchComputeObjectiveAndGradient(tao->linesearch, tao->solution, &psi, ssls->dps… in TaoSolve_SSILS()
90 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_SSILS()
91 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &psi, ssls->dpsi, tao->stepdirection,… in TaoSolve_SSILS()
124 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_SSILS()
125 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_SSILS()
126 PetscCall(TaoLineSearchSetType(tao->linesearch, armijo_type)); in TaoCreate_SSILS()
127 PetscCall(TaoLineSearchSetOptionsPrefix(tao->linesearch, tao->hdr.prefix)); in TaoCreate_SSILS()
128 PetscCall(TaoLineSearchSetFromOptions(tao->linesearch)); in TaoCreate_SSILS()
|
| /petsc/src/snes/tutorials/ |
| H A D | ex1f.F90 | 116 subroutine MyLineSearch(linesearch, lctx, ierr) argument
118 SNESLineSearch linesearch
128 PetscCall(SNESLineSearchGetSNES(linesearch, snes, ierr))
129 PetscCall(SNESLineSearchGetVecs(linesearch, x, f, y, w, g, ierr))
136 PetscCall(SNESLineSearchSetNorms(linesearch, xnorm, gnorm, ynorm, ierr))
163 SNESLineSearch linesearch
249 PetscCallA(SNESGetLineSearch(snes, linesearch, ierr))
250 PetscCallA(SNESLineSearchSetType(linesearch, 'shell', ierr))
251 PetscCallA(SNESLineSearchShellSetApply(linesearch, MyLineSearch, 0, ierr))
|
| H A D | ex3.c | 77 SNESLineSearch linesearch; /* SNESLineSearch context */ in main() local
196 PetscCall(SNESGetLineSearch(snes, &linesearch)); in main()
201 PetscCall(SNESLineSearchSetPostCheck(linesearch, PostCheck, &checkP)); in main()
213 PetscCall(SNESLineSearchSetPostCheck(linesearch, PostSetSubKSP, &checkP1)); in main()
219 PetscCall(SNESLineSearchSetPreCheck(linesearch, PreCheck, &checkP)); in main()
544 PetscErrorCode PreCheck(SNESLineSearch linesearch, Vec xcurrent, Vec y, PetscBool *changed_y, Petsc… in PreCheck() argument
569 PetscErrorCode PostCheck(SNESLineSearch linesearch, Vec xcurrent, Vec y, Vec x, PetscBool *changed_… in PostCheck() argument
583 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in PostCheck()
639 PetscErrorCode PostSetSubKSP(SNESLineSearch linesearch, Vec xcurrent, Vec y, Vec x, PetscBool *chan… in PostSetSubKSP() argument
649 PetscCall(SNESLineSearchGetSNES(linesearch, &snes)); in PostSetSubKSP()
|
| /petsc/src/tao/unconstrained/impls/cg/ |
| H A D | taocg.c | 82 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, delta)); in TaoSolve_CG()
83 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, tao->gradient, tao->stepdirection… in TaoSolve_CG()
107 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, delta)); in TaoSolve_CG()
108 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, tao->gradient, tao->stepdirection… in TaoSolve_CG()
121 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, delta)); in TaoSolve_CG()
122 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, tao->gradient, tao->stepdirection… in TaoSolve_CG()
217 PetscCall(TaoLineSearchDestroy(&tao->linesearch)); in TaoDestroy_CG()
227 PetscCall(TaoLineSearchSetFromOptions(tao->linesearch)); in TaoSetFromOptions_CG()
295 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_CG()
296 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_CG()
[all …]
|
| /petsc/src/snes/impls/ls/ |
| H A D | ls.c | 131 SNESLineSearch linesearch; in SNESSolve_NEWTONLS() local
154 PetscCall(SNESGetLineSearch(snes, &linesearch)); in SNESSolve_NEWTONLS()
234 PetscCall(SNESLineSearchApply(linesearch, X, F, &fnorm, Y)); in SNESSolve_NEWTONLS()
236 PetscCall(SNESLineSearchGetNorms(linesearch, &xnorm, &fnorm, &ynorm)); in SNESSolve_NEWTONLS()
239 PetscCall(SNESLineSearchGetReason(linesearch, &lsreason)); in SNESSolve_NEWTONLS()
340 SNESLineSearch linesearch; in SNESCreate_NEWTONLS() local
351 PetscCall(SNESGetLineSearch(snes, &linesearch)); in SNESCreate_NEWTONLS()
352 …if (!((PetscObject)linesearch)->type_name) PetscCall(SNESLineSearchSetType(linesearch, SNESLINESEA… in SNESCreate_NEWTONLS()
|
| /petsc/src/snes/impls/richardson/ |
| H A D | snesrichardson.c | 88 PetscCall(SNESLineSearchApply(snes->linesearch, X, F, &fnorm, Y)); in SNESSolve_NRichardson()
91 PetscCall(SNESLineSearchGetNorms(snes->linesearch, &xnorm, &fnorm, &ynorm)); in SNESSolve_NRichardson()
166 SNESLineSearch linesearch; in SNESCreate_NRichardson() local
179 PetscCall(SNESGetLineSearch(snes, &linesearch)); in SNESCreate_NRichardson()
180 …if (!((PetscObject)linesearch)->type_name) PetscCall(SNESLineSearchSetType(linesearch, SNESLINESEA… in SNESCreate_NRichardson()
|
| /petsc/src/tao/complementarity/impls/asls/ |
| H A D | asfls.c | 123 …PetscCall(TaoLineSearchSetObjectiveAndGradientRoutine(tao->linesearch, Tao_ASLS_FunctionGradient, … in TaoSolve_ASFLS()
124 PetscCall(TaoLineSearchSetObjectiveRoutine(tao->linesearch, Tao_SSLS_Function, tao)); in TaoSolve_ASFLS()
125 PetscCall(TaoLineSearchSetVariableBounds(tao->linesearch, tao->XL, tao->XU)); in TaoSolve_ASFLS()
131 …PetscCall(TaoLineSearchComputeObjectiveAndGradient(tao->linesearch, tao->solution, &psi, asls->dps… in TaoSolve_ASFLS()
258 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_ASFLS()
259 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &psi, asls->dpsi, tao->stepdirection,… in TaoSolve_ASFLS()
311 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_ASFLS()
312 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_ASFLS()
313 PetscCall(TaoLineSearchSetType(tao->linesearch, armijo_type)); in TaoCreate_ASFLS()
314 PetscCall(TaoLineSearchSetOptionsPrefix(tao->linesearch, tao->hdr.prefix)); in TaoCreate_ASFLS()
[all …]
|
| H A D | asils.c | 123 …PetscCall(TaoLineSearchSetObjectiveAndGradientRoutine(tao->linesearch, Tao_ASLS_FunctionGradient, … in TaoSolve_ASILS()
124 PetscCall(TaoLineSearchSetObjectiveRoutine(tao->linesearch, Tao_SSLS_Function, tao)); in TaoSolve_ASILS()
128 …PetscCall(TaoLineSearchComputeObjectiveAndGradient(tao->linesearch, tao->solution, &psi, asls->dps… in TaoSolve_ASILS()
253 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_ASILS()
254 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &psi, asls->dpsi, tao->stepdirection,… in TaoSolve_ASILS()
307 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_ASILS()
308 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_ASILS()
309 PetscCall(TaoLineSearchSetType(tao->linesearch, armijo_type)); in TaoCreate_ASILS()
310 PetscCall(TaoLineSearchSetOptionsPrefix(tao->linesearch, tao->hdr.prefix)); in TaoCreate_ASILS()
311 PetscCall(TaoLineSearchSetFromOptions(tao->linesearch)); in TaoCreate_ASILS()
|
| /petsc/src/tao/quadratic/impls/gpcg/ |
| H A D | gpcg.c | 38 PetscCall(TaoLineSearchSetFromOptions(tao->linesearch)); in TaoSetFromOptions_GPCG()
53 PetscCall(TaoLineSearchView(tao->linesearch, viewer)); in TaoView_GPCG()
118 PetscCall(TaoLineSearchSetVariableBounds(tao->linesearch, tao->XL, tao->XU)); in TaoSolve_GPCG()
188 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_GPCG()
190 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f_new, tao->gradient, tao->stepdirec… in TaoSolve_GPCG()
250 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, alpha)); in GPCGGradProjections()
252 PetscCall(TaoLineSearchApply(tao->linesearch, X, &f_new, G, DX, &stepsize, &lsflag)); in GPCGGradProjections()
338 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_GPCG()
339 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_GPCG()
340 PetscCall(TaoLineSearchSetType(tao->linesearch, TAOLINESEARCHGPCG)); in TaoCreate_GPCG()
[all …]
|
| /petsc/src/tao/unconstrained/impls/lmvm/ |
| H A D | lmvm.c | 82 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, tao->gradient, lmP->D, &step, &ls… in TaoSolve_LMVM()
105 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, tao->gradient, lmP->D, &step, &ls… in TaoSolve_LMVM()
191 PetscCall(TaoLineSearchSetFromOptions(tao->linesearch)); in TaoSetFromOptions_LMVM()
265 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_LMVM()
266 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_LMVM()
267 PetscCall(TaoLineSearchSetType(tao->linesearch, morethuente_type)); in TaoCreate_LMVM()
268 PetscCall(TaoLineSearchUseTaoRoutines(tao->linesearch, tao)); in TaoCreate_LMVM()
269 PetscCall(TaoLineSearchSetOptionsPrefix(tao->linesearch, tao->hdr.prefix)); in TaoCreate_LMVM()
|
| /petsc/src/snes/impls/nasm/ |
| H A D | aspin.c | 105 SNESLineSearch linesearch; in SNESCreate_ASPIN() local
119 PetscCall(SNESGetLineSearch(snes, &linesearch)); in SNESCreate_ASPIN()
120 …if (!((PetscObject)linesearch)->type_name) PetscCall(SNESLineSearchSetType(linesearch, SNESLINESEA… in SNESCreate_ASPIN()
|
| /petsc/src/ts/utils/dmplexlandau/tutorials/ |
| H A D | ex1f90.F90 | 23 SNESLineSearch linesearch
52 PetscCallA(SNESGetLineSearch(snes, linesearch, ierr))
53 PetscCallA(SNESLineSearchSetType(linesearch, SNESLINESEARCHBASIC, ierr))
|
| /petsc/src/tao/bound/impls/blmvm/ |
| H A D | blmvm.c | 16 PetscCall(TaoLineSearchSetVariableBounds(tao->linesearch, tao->XL, tao->XU)); in TaoSolve_BLMVM()
75 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_BLMVM()
76 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, blmP->unprojected_gradient, tao->… in TaoSolve_BLMVM()
95 PetscCall(TaoLineSearchSetInitialStepLength(tao->linesearch, 1.0)); in TaoSolve_BLMVM()
96 …PetscCall(TaoLineSearchApply(tao->linesearch, tao->solution, &f, blmP->unprojected_gradient, tao->… in TaoSolve_BLMVM()
241 PetscCall(TaoLineSearchCreate(((PetscObject)tao)->comm, &tao->linesearch)); in TaoCreate_BLMVM()
242 PetscCall(PetscObjectIncrementTabLevel((PetscObject)tao->linesearch, (PetscObject)tao, 1)); in TaoCreate_BLMVM()
243 PetscCall(TaoLineSearchSetType(tao->linesearch, morethuente_type)); in TaoCreate_BLMVM()
244 PetscCall(TaoLineSearchUseTaoRoutines(tao->linesearch, tao)); in TaoCreate_BLMVM()
|