| /petsc/src/tao/constrained/impls/admm/ftn-custom/ |
| H A D | zadmmf.c | 34 static PetscErrorCode ourtaoadmmmisfithessroutine(Tao tao, Vec x, Mat H, Mat Hpre, PetscCtx ctx) in ourtaoadmmmisfithessroutine() argument
36 …thess, (Tao *, Vec *, Mat *, Mat *, void *, PetscErrorCode *), (&tao, &x, &H, &Hpre, _ctx, &ierr)); in ourtaoadmmmisfithessroutine()
49 static PetscErrorCode ourtaoadmmregularizerhessroutine(Tao tao, Vec x, Mat H, Mat Hpre, PetscCtx ct… in ourtaoadmmregularizerhessroutine() argument
51 …ghess, (Tao *, Vec *, Mat *, Mat *, void *, PetscErrorCode *), (&tao, &x, &H, &Hpre, _ctx, &ierr)); in ourtaoadmmregularizerhessroutine()
66 PETSC_EXTERN void taoadmmsetmisfithessianroutine_(Tao *tao, Mat *H, Mat *Hpre, void (*func)(Tao *, … in taoadmmsetmisfithessianroutine_() argument
70 …if (!*ierr) *ierr = TaoADMMSetMisfitHessianRoutine(*tao, *H, *Hpre, ourtaoadmmmisfithessroutine, c… in taoadmmsetmisfithessianroutine_()
87 PETSC_EXTERN void taoadmmsetregularizerhessianroutine_(Tao *tao, Mat *H, Mat *Hpre, void (*func)(Ta… in taoadmmsetregularizerhessianroutine_() argument
91 …if (!*ierr) *ierr = TaoADMMSetRegularizerHessianRoutine(*tao, *H, *Hpre, ourtaoadmmregularizerhess… in taoadmmsetregularizerhessianroutine_()
|
| /petsc/src/tao/tutorials/ |
| H A D | ex4.c | 207 static PetscErrorCode HessianMisfit(Tao tao, Vec x, Mat H, Mat Hpre, void *_ctx) in HessianMisfit() argument
213 if (Hpre != ctx->W) PetscCall(MatCopy(ctx->W, Hpre, DIFFERENT_NONZERO_PATTERN)); in HessianMisfit()
264 static PetscErrorCode HessianMisfitADMM(Tao tao, Vec x, Mat H, Mat Hpre, void *_ctx) in HessianMisfitADMM() argument
271 if (Hpre != H) PetscCall(MatCopy(H, Hpre, DIFFERENT_NONZERO_PATTERN)); in HessianMisfitADMM()
311 static PetscErrorCode HessianRegularization(Tao tao, Vec x, Mat H, Mat Hpre, void *_ctx) in HessianRegularization() argument
322 if (Hpre != H) { in HessianRegularization()
323 PetscCall(MatZeroEntries(Hpre)); in HessianRegularization()
324 PetscCall(MatShift(Hpre, ctx->mu)); in HessianRegularization()
353 if (Hpre != H) { in HessianRegularization()
354 PetscCall(MatZeroEntries(Hpre)); in HessianRegularization()
[all …]
|
| /petsc/src/tao/interface/ |
| H A D | taosolver_hj.c | 27 …scErrorCode TaoSetHessian(Tao tao, Mat H, Mat Hpre, PetscErrorCode (*func)(Tao tao, Vec x, Mat H, … in TaoSetHessian() argument
35 if (Hpre) { in TaoSetHessian()
36 PetscValidHeaderSpecific(Hpre, MAT_CLASSID, 3); in TaoSetHessian()
37 PetscCheckSameComm(tao, 1, Hpre, 3); in TaoSetHessian()
46 if (Hpre) { in TaoSetHessian()
47 PetscCall(PetscObjectReference((PetscObject)Hpre)); in TaoSetHessian()
49 tao->hessian_pre = Hpre; in TaoSetHessian()
79 …ErrorCode TaoGetHessian(Tao tao, Mat *H, Mat *Hpre, PetscErrorCode (**func)(Tao tao, Vec x, Mat H,… in TaoGetHessian() argument
84 if (Hpre) *Hpre = tao->hessian_pre; in TaoGetHessian()
250 PetscErrorCode TaoComputeHessian(Tao tao, Vec X, Mat H, Mat Hpre) in TaoComputeHessian() argument
[all …]
|
| /petsc/src/tao/constrained/impls/admm/ |
| H A D | admm.c | 273 static PetscErrorCode SubHessianUpdate(Tao tao, Vec x, Mat H, Mat Hpre, void *ptr) in SubHessianUpdate() argument
281 PetscCall((*am->ops->misfithess)(am->subsolverX, x, H, Hpre, am->misfithessP)); in SubHessianUpdate()
293 static PetscErrorCode RegHessianUpdate(Tao tao, Vec z, Mat H, Mat Hpre, void *ptr) in RegHessianUpdate() argument
301 PetscCall((*am->ops->reghess)(am->subsolverZ, z, H, Hpre, am->reghessP)); in RegHessianUpdate()
1124 PetscErrorCode TaoADMMSetMisfitHessianRoutine(Tao tao, Mat H, Mat Hpre, PetscErrorCode (*func)(Tao,… in TaoADMMSetMisfitHessianRoutine() argument
1134 if (Hpre) { in TaoADMMSetMisfitHessianRoutine()
1135 PetscValidHeaderSpecific(Hpre, MAT_CLASSID, 3); in TaoADMMSetMisfitHessianRoutine()
1136 PetscCheckSameComm(tao, 1, Hpre, 3); in TaoADMMSetMisfitHessianRoutine()
1145 if (Hpre) { in TaoADMMSetMisfitHessianRoutine()
1146 PetscCall(PetscObjectReference((PetscObject)Hpre)); in TaoADMMSetMisfitHessianRoutine()
[all …]
|
| /petsc/src/tao/interface/ftn-custom/ |
| H A D | ztaosolverf.c | 87 static PetscErrorCode ourtaohessianroutine(Tao tao, Vec x, Mat H, Mat Hpre, PetscCtx ctx) in ourtaohessianroutine() argument
89 ….hess, (Tao *, Vec *, Mat *, Mat *, void *, PetscErrorCode *), (&tao, &x, &H, &Hpre, _ctx, &ierr)); in ourtaohessianroutine()
92 static PetscErrorCode ourtaojacobianroutine(Tao tao, Vec x, Mat H, Mat Hpre, PetscCtx ctx) in ourtaojacobianroutine() argument
94 …b.jac, (Tao *, Vec *, Mat *, Mat *, void *, PetscErrorCode *), (&tao, &x, &H, &Hpre, _ctx, &ierr)); in ourtaojacobianroutine()
97 static PetscErrorCode ourtaojacobianstateroutine(Tao tao, Vec x, Mat H, Mat Hpre, Mat Hinv, PetscCt… in ourtaojacobianstateroutine() argument
99 …*, Vec *, Mat *, Mat *, Mat *, void *, PetscErrorCode *), (&tao, &x, &H, &Hpre, &Hinv, _ctx, &ierr… in ourtaojacobianstateroutine()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex20opt_ic.c | 235 static PetscErrorCode FormHessian(Tao tao, Vec U, Mat H, Mat Hpre, PetscCtx ctx) in FormHessian() argument
264 if (H != Hpre) { in FormHessian()
265 PetscCall(MatAssemblyBegin(Hpre, MAT_FINAL_ASSEMBLY)); in FormHessian()
266 PetscCall(MatAssemblyEnd(Hpre, MAT_FINAL_ASSEMBLY)); in FormHessian()
271 static PetscErrorCode MatrixFreeHessian(Tao tao, Vec U, Mat H, Mat Hpre, PetscCtx ctx) in MatrixFreeHessian() argument
|
| H A D | ex20opt_p.c | 575 PetscErrorCode FormHessian(Tao tao, Vec P, Mat H, Mat Hpre, PetscCtx ctx) in FormHessian() argument
588 if (H != Hpre) { in FormHessian()
589 PetscCall(MatAssemblyBegin(Hpre, MAT_FINAL_ASSEMBLY)); in FormHessian()
590 PetscCall(MatAssemblyEnd(Hpre, MAT_FINAL_ASSEMBLY)); in FormHessian()
|
| /petsc/src/ts/tutorials/optimal_control/ |
| H A D | ex1.c | 487 PetscErrorCode FormObjHessian(Tao tao, Vec P, Mat H, Mat Hpre, PetscCtx ctx) in FormObjHessian() argument
523 if (H != Hpre) { in FormObjHessian()
524 PetscCall(MatAssemblyBegin(Hpre, MAT_FINAL_ASSEMBLY)); in FormObjHessian()
525 PetscCall(MatAssemblyEnd(Hpre, MAT_FINAL_ASSEMBLY)); in FormObjHessian()
534 PetscErrorCode MatrixFreeObjHessian(Tao tao, Vec P, Mat H, Mat Hpre, PetscCtx ctx) in MatrixFreeObjHessian() argument
|
| /petsc/src/tao/constrained/tutorials/ |
| H A D | tomographyADMM.c | 131 static PetscErrorCode HessianMisfit(Tao tao, Vec x, Mat H, Mat Hpre, void *ptr) in HessianMisfit() argument
139 static PetscErrorCode HessianReg(Tao tao, Vec x, Mat H, Mat Hpre, void *ptr) in HessianReg() argument
190 static PetscErrorCode HessianFull(Tao tao, Vec x, Mat H, Mat Hpre, void *ptr) in HessianFull() argument
|
| H A D | maros.c | 225 PetscErrorCode FormHessian(Tao tao, Vec x, Mat H, Mat Hpre, PetscCtx ctx) in FormHessian() argument
|
| H A D | ex1.c | 293 PetscErrorCode FormPDIPMHessian(Tao tao, Vec x, Mat H, Mat Hpre, PetscCtx ctx) in FormPDIPMHessian() argument
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | eptorsion2f.F90 | 258 subroutine ComputeHessian(ta, X, H, Hpre, dummy, ierr) argument
261 type(tMat) H, Hpre local
|
| H A D | rosenbrock1.c | 193 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | rosenbrock2.c | 184 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | rosenbrock3.c | 189 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | rosenbrock4.h | 621 static PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
655 if (Hpre != H) PetscCall(MatCopy(H, Hpre, SAME_NONZERO_PATTERN)); in FormHessian()
|
| H A D | eptorsion2.c | 326 PetscErrorCode FormHessian(Tao tao, Vec X, Mat A, Mat Hpre, PetscCtx ctx) in FormHessian() argument
|
| H A D | eptorsion3.c | 435 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | eptorsion1.c | 419 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | minsurf1.c | 282 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | minsurf2.c | 481 PetscErrorCode FormHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in FormHessian() argument
|
| /petsc/src/tao/bound/tutorials/ |
| H A D | jbearing2.c | 323 PetscErrorCode FormHessian(Tao tao, Vec X, Mat hes, Mat Hpre, void *ptr) in FormHessian() argument
|
| H A D | plate2.c | 844 PetscErrorCode MatrixFreeHessian(Tao tao, Vec x, Mat H, Mat Hpre, void *ptr) in MatrixFreeHessian() argument
|
| /petsc/src/tao/leastsquares/impls/brgn/ |
| H A D | brgn.c | 165 static PetscErrorCode GNComputeHessian(Tao tao, Vec X, Mat H, Mat Hpre, void *ptr) in GNComputeHessian() argument
|
| /petsc/src/tao/leastsquares/impls/pounders/ |
| H A D | pounders.c | 3 static PetscErrorCode pounders_h(Tao subtao, Vec v, Mat H, Mat Hpre, PetscCtx ctx) in pounders_h() argument
|