Home
last modified time | relevance | path

Searched refs:YdotRHS_fast (Results 1 – 5 of 5) sorted by relevance

/petsc/src/ts/impls/explicit/rk/
H A Dmrk.c222 PetscCall(PetscFree(rk->YdotRHS_fast)); in TSReset_RK_MultirateSplit()
299 PetscCall(VecMAXPY(Xfast, s, w, rk->YdotRHS_fast)); in TSEvaluateStep_RK_MultirateSplit()
312 Vec *YdotRHS = rk->YdotRHS, *YdotRHS_fast = rk->YdotRHS_fast; in TSStepRefine_RK_MultirateSplit() local
323 for (i = 0; i < s; i++) PetscCall(VecGetSubVector(YdotRHS[i], rk->is_fast, &YdotRHS_fast[i])); in TSStepRefine_RK_MultirateSplit()
339 PetscCall(VecMAXPY(Yfast, i, w, YdotRHS_fast)); in TSStepRefine_RK_MultirateSplit()
343 …eRHSFunction(subts_fast, t + k * h * rk->dtratio + h / rk->dtratio * c[i], Y[i], YdotRHS_fast[i])); in TSStepRefine_RK_MultirateSplit()
349 … for (i = 0; i < s; i++) PetscCall(VecRestoreSubVector(YdotRHS[i], rk->is_fast, &YdotRHS_fast[i])); in TSStepRefine_RK_MultirateSplit()
369 Vec *YdotRHS_fast = rk->YdotRHS_fast, *YdotRHS_slow = rk->YdotRHS_slow; in TSStep_RK_MultirateSplit() local
381 PetscCall(VecGetSubVector(YdotRHS[i], rk->is_fast, &YdotRHS_fast[i])); in TSStep_RK_MultirateSplit()
392 PetscCall(VecMAXPY(Yfast, i, w, YdotRHS_fast)); in TSStep_RK_MultirateSplit()
[all …]
H A Drk.h26 …Vec *YdotRHS_fast; /* Function evaluations for the non-stiff part and contains fast compon… member
/petsc/src/ts/impls/arkimex/
H A Dfsarkimex.c154 if (fasthasE) PetscCall(VecMAXPY(Xfast, s, w, ark->YdotRHS_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
174 if (fasthasE) PetscCall(VecMAXPY(Xfast, s, w, ark->YdotRHS_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
189 if (fasthasE) PetscCall(VecMAXPY(Xfast, tab->s, w, ark->YdotRHS_fast)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
221 …dot_fast = ark->Ydot, Ydot0_fast = ark->Ydot0, Z = ark->Z, *YdotRHS_fast = ark->YdotRHS_fast, *Ydo… in TSStep_ARKIMEX_FastSlowSplit() local
250 if (fasthasE) PetscCall(VecCopy(YdotRHS_fast[i], ark->YdotRHS_prev[i])); in TSStep_ARKIMEX_FastSlowSplit()
305 PetscCall(VecMAXPY(Yfast, i, w, YdotRHS_fast)); in TSStep_ARKIMEX_FastSlowSplit()
316 PetscCall(VecMAXPY(Z, i, w, YdotRHS_fast)); in TSStep_ARKIMEX_FastSlowSplit()
365 …fasthasE) PetscCall(TSComputeRHSFunction(ark->subts_fast, ark->stage_time, Y[i], YdotRHS_fast[i])); in TSStep_ARKIMEX_FastSlowSplit()
433 PetscCall(VecDuplicateVecs(Xfast, tab->s, &ark->YdotRHS_fast)); in TSSetUp_ARKIMEX_FastSlowSplit()
478 PetscCall(VecDestroyVecs(tab->s, &ark->YdotRHS_fast)); in TSReset_ARKIMEX_FastSlowSplit()
H A Darkimex.h45 Vec *YdotRHS_fast; /* Function evaluations for the fast components in YdotRHS */ member
/petsc/src/ts/impls/multirate/
H A Dmprk.c55 Vec *YdotRHS_fast; /* Function evaluations by fast tableau for fast components */ member
644 …Vec *Y = mprk->Y, *YdotRHS = mprk->YdotRHS, *YdotRHS_fast = mprk->YdotRHS_fast, *YdotR… in TSStep_MPRK() local
677 for (j = 0; j < i; j++) PetscCall(VecGetSubVector(YdotRHS[j], mprk->is_fast, &YdotRHS_fast[j])); in TSStep_MPRK()
679 PetscCall(VecMAXPY(Yfast, i, wf, mprk->YdotRHS_fast)); in TSStep_MPRK()
681 …for (j = 0; j < i; j++) PetscCall(VecRestoreSubVector(YdotRHS[j], mprk->is_fast, &YdotRHS_fast[j])… in TSStep_MPRK()
781 PetscCall(VecMAXPY(Xfast, s, wf, mprk->YdotRHS_fast)); in TSEvaluateStep_MPRKSPLIT()
790 …Vec *Y = mprk->Y, *YdotRHS_fast = mprk->YdotRHS_fast, *YdotRHS_slow = mprk->YdotRHS_sl… in TSStep_MPRKSPLIT() local
852 PetscCall(VecMAXPY(Yfast, i, wf, YdotRHS_fast)); in TSStep_MPRKSPLIT()
891 PetscCall(TSComputeRHSFunction(mprk->subts_fast, t + h * cf[i], Y[i], YdotRHS_fast[i])); in TSStep_MPRKSPLIT()
914 PetscCall(VecDestroyVecs(tab->s, &mprk->YdotRHS_fast)); in TSMPRKTableauReset()
[all …]