Searched refs:Yfast (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ts/impls/arkimex/ |
| H A D | fsarkimex.c | 221 …S_fast, *YdotRHS_slow = ark->YdotRHS_slow, *YdotI_fast = ark->YdotI_fast, Yfast, Yslow, Xfast, Xsl… in TSStep_ARKIMEX_FastSlowSplit() local
300 PetscCall(VecGetSubVector(Y[i], ark->is_fast, &Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
302 PetscCall(VecMAXPY(Yfast, i, w, YdotI_fast)); in TSStep_ARKIMEX_FastSlowSplit()
305 PetscCall(VecMAXPY(Yfast, i, w, YdotRHS_fast)); in TSStep_ARKIMEX_FastSlowSplit()
307 PetscCall(VecRestoreSubVector(Y[i], ark->is_fast, &Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
321 PetscCall(VecGetSubVector(Y[i], ark->is_fast, &Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
324 PetscCall(TSExtrapolate_ARKIMEX_FastSlowSplit(ts, ct[i], Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
327 … PetscCall(VecISCopy(i > 0 ? Y[i - 1] : ts->vec_sol, ark->is_fast, SCATTER_REVERSE, Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
329 PetscCall(SNESSolve(snes, NULL, Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
330 PetscCall(VecRestoreSubVector(Y[i], ark->is_fast, &Yfast)); in TSStep_ARKIMEX_FastSlowSplit()
[all …]
|
| /petsc/src/ts/impls/explicit/rk/ |
| H A D | mrk.c | 313 Vec Yfast, Xfast; in TSStepRefine_RK_MultirateSplit() local
337 PetscCall(VecGetSubVector(Y[i], rk->is_fast, &Yfast)); in TSStepRefine_RK_MultirateSplit()
338 PetscCall(VecCopy(Xfast, Yfast)); in TSStepRefine_RK_MultirateSplit()
339 PetscCall(VecMAXPY(Yfast, i, w, YdotRHS_fast)); in TSStepRefine_RK_MultirateSplit()
340 PetscCall(VecRestoreSubVector(Y[i], rk->is_fast, &Yfast)); in TSStepRefine_RK_MultirateSplit()
370 …Vec Yslow, Yfast; /* subvectors store the stges of slow components and fast component… in TSStep_RK_MultirateSplit() local
389 PetscCall(VecGetSubVector(Y[i], rk->is_fast, &Yfast)); in TSStep_RK_MultirateSplit()
392 PetscCall(VecMAXPY(Yfast, i, w, YdotRHS_fast)); in TSStep_RK_MultirateSplit()
394 PetscCall(VecRestoreSubVector(Y[i], rk->is_fast, &Yfast)); in TSStep_RK_MultirateSplit()
|
| /petsc/src/ts/impls/multirate/ |
| H A D | mprk.c | 645 Vec Yslow, Yslowbuffer, Yfast; in TSStep_MPRK() local
678 PetscCall(VecGetSubVector(Y[i], mprk->is_fast, &Yfast)); in TSStep_MPRK()
679 PetscCall(VecMAXPY(Yfast, i, wf, mprk->YdotRHS_fast)); in TSStep_MPRK()
680 PetscCall(VecRestoreSubVector(Y[i], mprk->is_fast, &Yfast)); in TSStep_MPRK()
791 …Vec Yslow, Yslowbuffer, Yfast; /* subvectors for slow and fast components in Y[i] res… in TSStep_MPRKSPLIT() local
851 PetscCall(VecGetSubVector(Y[i], mprk->is_fast, &Yfast)); in TSStep_MPRKSPLIT()
852 PetscCall(VecMAXPY(Yfast, i, wf, YdotRHS_fast)); in TSStep_MPRKSPLIT()
853 PetscCall(VecRestoreSubVector(Y[i], mprk->is_fast, &Yfast)); in TSStep_MPRKSPLIT()
|