Searched refs:vecs_sensi2p (Results 1 – 4 of 4) sorted by relevance
| /petsc/src/ts/impls/implicit/theta/ |
| H A D | theta.c | 382 if (ts->vecs_sensi2p) { in TSAdjointStepBEuler_Private()
399 if (ts->vecs_sensi2p) { in TSAdjointStepBEuler_Private()
401 PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], -adjoint_time_step, VecsDeltaMu2[nadj])); in TSAdjointStepBEuler_Private()
402 …if (ts->vecs_fpu) PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], -adjoint_time_step, ts->vecs_fpu[nadj]… in TSAdjointStepBEuler_Private()
403 …if (ts->vecs_fpp) PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], -adjoint_time_step, ts->vecs_fpp[nadj]… in TSAdjointStepBEuler_Private()
582 if (ts->vecs_sensi2p) { /* second-order */ in TSAdjointStep_Theta()
596 … PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], -adjoint_time_step * th->Theta, VecsDeltaMu2[nadj])); in TSAdjointStep_Theta()
597 …if (ts->vecs_fpu) PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], -adjoint_time_step * th->Theta, ts->ve… in TSAdjointStep_Theta()
598 …if (ts->vecs_fpp) PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], -adjoint_time_step * th->Theta, ts->ve… in TSAdjointStep_Theta()
616 if (ts->vecs_sensi2p) { /* second-order */ in TSAdjointStep_Theta()
[all …]
|
| /petsc/src/ts/impls/explicit/rk/ |
| H A D | rk.c | 706 …if (ts->vecs_sensi2p) { /* TLM used for 2nd-order adj… in TSForwardStep_RK()
863 if (ts->vecs_sensi2p) PetscCall(VecDuplicate(ts->vecs_sensi2p[0], &rk->VecDeltaMu2)); in TSAdjointSetUp_RK()
971 if (ts->vecs_sensi2p) { in TSAdjointStep_RK()
1005 if (ts->vecs_sensi2p) { /* 2nd-order adjoint for parameters */ in TSAdjointStep_RK()
1016 … PetscCall(VecAXPY(ts->vecs_sensi2p[nadj], 1, VecDeltaMu2)); /* update sensi2p for each stage */ in TSAdjointStep_RK()
|
| /petsc/src/ts/interface/sensitivity/ |
| H A D | tssen.c | 949 ts->vecs_sensi2p = mu2; in TSSetCostHessianProducts()
978 if (mu2) *mu2 = ts->vecs_sensi2p; in TSGetCostHessianProducts()
1018 if (ts->vecs_sensi2p) { /* tangent linear variable initialized as 2*dIdP*dir */ in TSAdjointSetForward()
1124 ts->vecs_sensi2p = NULL; in TSAdjointReset()
|
| /petsc/include/petsc/private/ |
| H A D | tsimpl.h | 225 Vec *vecs_sensi2p; member
|