Home
last modified time | relevance | path

Searched refs:vec_lte_work (Results 1 – 3 of 3) sorted by relevance

/petsc/src/ts/impls/implicit/alpha/
H A Dalpha2.c38 Vec vec_lte_work[2]; member
208 if (th->vec_lte_work[0]) { in TSAlpha_Restart()
209 PetscCall(VecZeroEntries(th->vec_lte_work[0])); in TSAlpha_Restart()
210 PetscCall(VecAXPY(th->vec_lte_work[0], +2, X2)); in TSAlpha_Restart()
211 PetscCall(VecAXPY(th->vec_lte_work[0], -4, X1)); in TSAlpha_Restart()
212 PetscCall(VecAXPY(th->vec_lte_work[0], +2, X0)); in TSAlpha_Restart()
214 if (th->vec_lte_work[1]) { in TSAlpha_Restart()
215 PetscCall(VecZeroEntries(th->vec_lte_work[1])); in TSAlpha_Restart()
216 PetscCall(VecAXPY(th->vec_lte_work[1], +2, V2)); in TSAlpha_Restart()
217 PetscCall(VecAXPY(th->vec_lte_work[1], -4, V1)); in TSAlpha_Restart()
[all …]
H A Dalpha1.c32 Vec vec_lte_work; member
160 if (th->vec_lte_work) { in TSAlpha_Restart()
161 PetscCall(VecZeroEntries(th->vec_lte_work)); in TSAlpha_Restart()
162 PetscCall(VecAXPY(th->vec_lte_work, +2, X2)); in TSAlpha_Restart()
163 PetscCall(VecAXPY(th->vec_lte_work, -4, X1)); in TSAlpha_Restart()
164 PetscCall(VecAXPY(th->vec_lte_work, +2, X0)); in TSAlpha_Restart()
239 Vec Y = th->vec_lte_work; /* Y = X + LTE */ in TSEvaluateWLTE_Alpha()
247 if (!th->vec_lte_work) { in TSEvaluateWLTE_Alpha()
330 PetscCall(VecDestroy(&th->vec_lte_work)); in TSReset_Alpha()
364 if (!th->vec_lte_work) PetscCall(VecDuplicate(ts->vec_sol, &th->vec_lte_work)); in TSSetUp_Alpha()
/petsc/src/ts/impls/implicit/theta/
H A Dtheta.c42 Vec vec_lte_work; member
691 Vec Y = th->vec_lte_work; /* Y = X + LTE */ in TSEvaluateWLTE_Theta()
899 PetscCall(VecDestroy(&th->vec_lte_work)); in TSReset_Theta()
1051 if (!th->vec_lte_work) PetscCall(VecDuplicate(ts->vec_sol, &th->vec_lte_work)); in TSSetUp_Theta()