Lines Matching refs:numcost
295 PetscErrorCode TSSetCostIntegrand(TS ts, PetscInt numcost, Vec costintegral, PetscErrorCode (*rf)(T… in TSSetCostIntegrand() argument
300 …PetscCheck(!ts->numcost || ts->numcost == numcost, PetscObjectComm((PetscObject)ts), PETSC_ERR_USE… in TSSetCostIntegrand()
301 if (!ts->numcost) ts->numcost = numcost; in TSSetCostIntegrand()
309 PetscCall(VecCreateSeq(PETSC_COMM_SELF, numcost, &ts->vec_costintegral)); in TSSetCostIntegrand()
523 for (nadj = 0; nadj < ts->numcost; nadj++) PetscCall(VecScale(VHV[nadj], -1)); in TSComputeIHessianProductFunctionUU()
564 for (nadj = 0; nadj < ts->numcost; nadj++) PetscCall(VecScale(VHV[nadj], -1)); in TSComputeIHessianProductFunctionUP()
605 for (nadj = 0; nadj < ts->numcost; nadj++) PetscCall(VecScale(VHV[nadj], -1)); in TSComputeIHessianProductFunctionPU()
646 for (nadj = 0; nadj < ts->numcost; nadj++) PetscCall(VecScale(VHV[nadj], -1)); in TSComputeIHessianProductFunctionPP()
877 PetscErrorCode TSSetCostGradients(TS ts, PetscInt numcost, Vec lambda[], Vec mu[]) in TSSetCostGradients() argument
884 …PetscCheck(!ts->numcost || ts->numcost == numcost, PetscObjectComm((PetscObject)ts), PETSC_ERR_USE… in TSSetCostGradients()
885 ts->numcost = numcost; in TSSetCostGradients()
906 PetscErrorCode TSGetCostGradients(TS ts, PetscInt *numcost, Vec *lambda[], Vec *mu[]) in TSGetCostGradients() argument
910 if (numcost) *numcost = ts->numcost; in TSGetCostGradients()
942 PetscErrorCode TSSetCostHessianProducts(TS ts, PetscInt numcost, Vec lambda2[], Vec mu2[], Vec dir) in TSSetCostHessianProducts() argument
946 …PetscCheck(!ts->numcost || ts->numcost == numcost, PetscObjectComm((PetscObject)ts), PETSC_ERR_USE… in TSSetCostHessianProducts()
947 ts->numcost = numcost; in TSSetCostHessianProducts()
972 PetscErrorCode TSGetCostHessianProducts(TS ts, PetscInt *numcost, Vec *lambda2[], Vec *mu2[], Vec *… in TSGetCostHessianProducts() argument
976 if (numcost) *numcost = ts->numcost; in TSGetCostHessianProducts()
1237 …jointMonitorSensi(TS ts, PetscInt step, PetscReal ptime, Vec v, PetscInt numcost, Vec *lambda, Vec… in TSAdjointMonitorSensi() argument
1325 …(*adjointmonitor)(TS ts, PetscInt steps, PetscReal time, Vec u, PetscInt numcost, Vec *lambda, Vec… in TSAdjointMonitorSet() argument
1388 …ointMonitorDefault(TS ts, PetscInt step, PetscReal time, Vec v, PetscInt numcost, Vec lambda[], Ve… in TSAdjointMonitorDefault() argument
1394 (void)numcost; in TSAdjointMonitorDefault()
1426 …tMonitorDrawSensi(TS ts, PetscInt step, PetscReal ptime, Vec u, PetscInt numcost, Vec lambda[], Ve… in TSAdjointMonitorDrawSensi() argument
1591 …PetscCall(TSAdjointMonitor(ts, ts->steps, ts->ptime, ts->vec_sol, ts->numcost, ts->vecs_sensi, ts-… in TSAdjointSolve()
1598 …PetscCall(TSAdjointMonitor(ts, ts->steps, ts->ptime, ts->vec_sol, ts->numcost, ts->vecs_sensi, ts-… in TSAdjointSolve()
1632 PetscErrorCode TSAdjointMonitor(TS ts, PetscInt step, PetscReal ptime, Vec u, PetscInt numcost, Vec… in TSAdjointMonitor() argument
1640 …for (i = 0; i < n; i++) PetscCall((*ts->adjointmonitor[i])(ts, step, ptime, u, numcost, lambda, mu… in TSAdjointMonitor()
1737 …PetscCheck(!ts->numcost || ts->numcost == numfwdint, PetscObjectComm((PetscObject)ts), PETSC_ERR_U… in TSForwardSetIntegralGradients()
1738 if (!ts->numcost) ts->numcost = numfwdint; in TSForwardSetIntegralGradients()
1763 if (numfwdint) *numfwdint = ts->numcost; in TSForwardGetIntegralGradients()
1954 if (ts->numcost) { in TSCreateQuadratureTS()
1955 PetscCall(VecCreateSeq(PETSC_COMM_SELF, ts->numcost, &(*quadts)->vec_sol)); in TSCreateQuadratureTS()