Lines Matching refs:Xfast
124 Vec Xfast, Xslow; in TSEvaluateStep_ARKIMEX_FastSlowSplit() local
153 PetscCall(VecGetSubVector(X, ark->is_fast, &Xfast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
154 if (fasthasE) PetscCall(VecMAXPY(Xfast, s, w, ark->YdotRHS_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
156 PetscCall(VecMAXPY(Xfast, s, w, ark->YdotI_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
157 PetscCall(VecRestoreSubVector(X, ark->is_fast, &Xfast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
173 PetscCall(VecGetSubVector(X, ark->is_fast, &Xfast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
174 if (fasthasE) PetscCall(VecMAXPY(Xfast, s, w, ark->YdotRHS_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
176 PetscCall(VecMAXPY(Xfast, s, w, ark->YdotI_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
177 PetscCall(VecRestoreSubVector(X, ark->is_fast, &Xfast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
188 PetscCall(VecGetSubVector(X, ark->is_fast, &Xfast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
189 if (fasthasE) PetscCall(VecMAXPY(Xfast, tab->s, w, ark->YdotRHS_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
191 PetscCall(VecMAXPY(Xfast, tab->s, w, ark->YdotI_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
192 PetscCall(VecRestoreSubVector(X, ark->is_fast, &Xfast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
221 …fast, *YdotRHS_slow = ark->YdotRHS_slow, *YdotI_fast = ark->YdotI_fast, Yfast, Yslow, Xfast, Xslow; in TSStep_ARKIMEX_FastSlowSplit() local
233 PetscCall(VecGetSubVector(ts->vec_sol, ark->is_fast, &Xfast)); in TSStep_ARKIMEX_FastSlowSplit()
234 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->Y_prev)); in TSStep_ARKIMEX_FastSlowSplit()
235 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotI_prev)); in TSStep_ARKIMEX_FastSlowSplit()
236 if (fasthasE) PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotRHS_prev)); in TSStep_ARKIMEX_FastSlowSplit()
237 PetscCall(VecRestoreSubVector(ts->vec_sol, ark->is_fast, &Xfast)); in TSStep_ARKIMEX_FastSlowSplit()
411 Vec Xfast, Xslow; in TSSetUp_ARKIMEX_FastSlowSplit() local
432 PetscCall(VecGetSubVector(ts->vec_sol, ark->is_fast, &Xfast)); in TSSetUp_ARKIMEX_FastSlowSplit()
433 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotRHS_fast)); in TSSetUp_ARKIMEX_FastSlowSplit()
434 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotI_fast)); in TSSetUp_ARKIMEX_FastSlowSplit()
435 PetscCall(VecDuplicate(Xfast, &ark->Ydot)); in TSSetUp_ARKIMEX_FastSlowSplit()
436 PetscCall(VecDuplicate(Xfast, &ark->Ydot0)); in TSSetUp_ARKIMEX_FastSlowSplit()
437 PetscCall(VecDuplicate(Xfast, &ark->Z)); in TSSetUp_ARKIMEX_FastSlowSplit()
439 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->Y_prev)); in TSSetUp_ARKIMEX_FastSlowSplit()
440 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotI_prev)); in TSSetUp_ARKIMEX_FastSlowSplit()
441 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotRHS_prev)); in TSSetUp_ARKIMEX_FastSlowSplit()
443 PetscCall(VecRestoreSubVector(ts->vec_sol, ark->is_fast, &Xfast)); in TSSetUp_ARKIMEX_FastSlowSplit()