Lines Matching refs:tao
19 PetscErrorCode TaoALMMGetType(Tao tao, TaoALMMType *type) in TaoALMMGetType() argument
22 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMGetType()
24 PetscUseMethod(tao, "TaoALMMGetType_C", (Tao, TaoALMMType *), (tao, type)); in TaoALMMGetType()
28 PetscErrorCode TaoALMMGetType_Private(Tao tao, TaoALMMType *type) in TaoALMMGetType_Private() argument
30 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMGetType_Private()
48 PetscErrorCode TaoALMMSetType(Tao tao, TaoALMMType type) in TaoALMMSetType() argument
51 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMSetType()
52 PetscTryMethod(tao, "TaoALMMSetType_C", (Tao, TaoALMMType), (tao, type)); in TaoALMMSetType()
56 PetscErrorCode TaoALMMSetType_Private(Tao tao, TaoALMMType type) in TaoALMMSetType_Private() argument
58 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMSetType_Private()
61 …PetscCheck(!tao->setupcalled, PetscObjectComm((PetscObject)tao), PETSC_ERR_ORDER, "TaoALMMSetType(… in TaoALMMSetType_Private()
79 PetscErrorCode TaoALMMGetSubsolver(Tao tao, Tao *subsolver) in TaoALMMGetSubsolver() argument
82 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMGetSubsolver()
84 PetscUseMethod(tao, "TaoALMMGetSubsolver_C", (Tao, Tao *), (tao, subsolver)); in TaoALMMGetSubsolver()
88 PetscErrorCode TaoALMMGetSubsolver_Private(Tao tao, Tao *subsolver) in TaoALMMGetSubsolver_Private() argument
90 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMGetSubsolver_Private()
111 PetscErrorCode TaoALMMSetSubsolver(Tao tao, Tao subsolver) in TaoALMMSetSubsolver() argument
114 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMSetSubsolver()
116 PetscTryMethod(tao, "TaoALMMSetSubsolver_C", (Tao, Tao), (tao, subsolver)); in TaoALMMSetSubsolver()
120 PetscErrorCode TaoALMMSetSubsolver_Private(Tao tao, Tao subsolver) in TaoALMMSetSubsolver_Private() argument
122 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMSetSubsolver_Private()
127 if (tao->bounded) { in TaoALMMSetSubsolver_Private()
129 …PetscCheck(compatible, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Subsolver must be… in TaoALMMSetSubsolver_Private()
132 …PetscCheck(compatible, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Subsolver must be… in TaoALMMSetSubsolver_Private()
134 …PetscCheck(compatible, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Subsolver must be… in TaoALMMSetSubsolver_Private()
138 if (tao->setupcalled) { in TaoALMMSetSubsolver_Private()
166 PetscErrorCode TaoALMMGetMultipliers(Tao tao, Vec *Y) in TaoALMMGetMultipliers() argument
169 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMGetMultipliers()
171 PetscUseMethod(tao, "TaoALMMGetMultipliers_C", (Tao, Vec *), (tao, Y)); in TaoALMMGetMultipliers()
175 PetscErrorCode TaoALMMGetMultipliers_Private(Tao tao, Vec *Y) in TaoALMMGetMultipliers_Private() argument
177 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMGetMultipliers_Private()
180 …PetscCheck(tao->setupcalled, PetscObjectComm((PetscObject)tao), PETSC_ERR_ORDER, "TaoSetUp() must … in TaoALMMGetMultipliers_Private()
208 PetscErrorCode TaoALMMSetMultipliers(Tao tao, Vec Y) in TaoALMMSetMultipliers() argument
211 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMSetMultipliers()
213 PetscTryMethod(tao, "TaoALMMSetMultipliers_C", (Tao, Vec), (tao, Y)); in TaoALMMSetMultipliers()
217 PetscErrorCode TaoALMMSetMultipliers_Private(Tao tao, Vec Y) in TaoALMMSetMultipliers_Private() argument
219 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMSetMultipliers_Private()
228 if (tao->eq_constrained) { in TaoALMMSetMultipliers_Private()
229 PetscCall(VecGetType(tao->constraints_equality, &Ytype)); in TaoALMMSetMultipliers_Private()
231 PetscCall(VecGetType(tao->constraints_inequality, &Ytype)); in TaoALMMSetMultipliers_Private()
234 …PetscCheck(same, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Given vector for multip… in TaoALMMSetMultipliers_Private()
236 if (tao->eq_constrained) { in TaoALMMSetMultipliers_Private()
237 PetscCall(VecGetSize(tao->constraints_equality, &Neq)); in TaoALMMSetMultipliers_Private()
241 if (tao->ineq_constrained) { in TaoALMMSetMultipliers_Private()
242 PetscCall(VecGetSize(tao->constraints_inequality, &Nineq)); in TaoALMMSetMultipliers_Private()
248 …PetscCheck(Nuser == N, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Given vector has … in TaoALMMSetMultipliers_Private()
251 PetscCall(VecGetLocalSize(tao->constraints_inequality, &Nineq)); in TaoALMMSetMultipliers_Private()
253 …PetscCheck(Nuser == Nineq, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Given vector … in TaoALMMSetMultipliers_Private()
256 PetscCall(VecGetLocalSize(tao->constraints_equality, &Neq)); in TaoALMMSetMultipliers_Private()
258 …PetscCheck(Nuser == Neq, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_INCOMP, "Given vector ha… in TaoALMMSetMultipliers_Private()
266 if (tao->setupcalled && tao->eq_constrained && tao->ineq_constrained) { in TaoALMMSetMultipliers_Private()
292 PetscErrorCode TaoALMMGetPrimalIS(Tao tao, IS *opt_is, IS *slack_is) in TaoALMMGetPrimalIS() argument
295 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMGetPrimalIS()
296 PetscUseMethod(tao, "TaoALMMGetPrimalIS_C", (Tao, IS *, IS *), (tao, opt_is, slack_is)); in TaoALMMGetPrimalIS()
300 PetscErrorCode TaoALMMGetPrimalIS_Private(Tao tao, IS *opt_is, IS *slack_is) in TaoALMMGetPrimalIS_Private() argument
302 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMGetPrimalIS_Private()
305 …PetscCheck(tao->ineq_constrained, PetscObjectComm((PetscObject)tao), PETSC_ERR_ARG_WRONGSTATE, "Pr… in TaoALMMGetPrimalIS_Private()
306 …PetscCheck(tao->setupcalled, PetscObjectComm((PetscObject)tao), PETSC_ERR_ORDER, "TaoSetUp() must … in TaoALMMGetPrimalIS_Private()
328 PetscErrorCode TaoALMMGetDualIS(Tao tao, IS *eq_is, IS *ineq_is) in TaoALMMGetDualIS() argument
331 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMGetDualIS()
332 PetscUseMethod(tao, "TaoALMMGetDualIS_C", (Tao, IS *, IS *), (tao, eq_is, ineq_is)); in TaoALMMGetDualIS()
336 PetscErrorCode TaoALMMGetDualIS_Private(Tao tao, IS *eq_is, IS *ineq_is) in TaoALMMGetDualIS_Private() argument
338 TAO_ALMM *auglag = (TAO_ALMM *)tao->data; in TaoALMMGetDualIS_Private()
341 PetscValidHeaderSpecific(tao, TAO_CLASSID, 1); in TaoALMMGetDualIS_Private()
342 …PetscCheck(tao->ineq_constrained && tao->ineq_constrained, PetscObjectComm((PetscObject)tao), PETS… in TaoALMMGetDualIS_Private()
343 …PetscCheck(tao->setupcalled, PetscObjectComm((PetscObject)tao), PETSC_ERR_ORDER, "TaoSetUp() must … in TaoALMMGetDualIS_Private()