Home
last modified time | relevance | path

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

/petsc/src/ts/impls/explicit/rk/
H A Dmrk.c26 PetscCall(VecDestroyVecs(tab->s, &rk->YdotRHS_slow)); in TSReset_RK_MultirateNonsplit()
48 PetscCall(VecMAXPY(X, s, b, rk->YdotRHS_slow)); in TSInterpolate_RK_MultirateNonsplit()
100 PetscCall(VecCopy(rk->YdotRHS_slow[i], YdotRHS_copy[i])); in TSStepRefine_RK_MultirateNonsplit()
101 PetscCall(VecCopy(YdotRHS[i], rk->YdotRHS_slow[i])); in TSStepRefine_RK_MultirateNonsplit()
110 for (i = 0; i < s; i++) PetscCall(VecCopy(YdotRHS_copy[i], rk->YdotRHS_slow[i])); in TSStepRefine_RK_MultirateNonsplit()
122 Vec *Y = rk->Y, *YdotRHS = rk->YdotRHS, *YdotRHS_slow = rk->YdotRHS_slow; in TSStep_RK_MultirateNonsplit() local
142 PetscCall(VecMAXPY(Y[i], i, w, YdotRHS_slow)); in TSStep_RK_MultirateNonsplit()
145 PetscCall(TSComputeRHSFunction(ts, t + h * c[i], Y[i], YdotRHS_slow[i])); in TSStep_RK_MultirateNonsplit()
148 rk->YdotRHS = YdotRHS_slow; in TSStep_RK_MultirateNonsplit()
186 PetscCall(VecDuplicateVecs(ts->vec_sol, tab->s, &rk->YdotRHS_slow)); in TSSetUp_RK_MultirateNonsplit()
[all …]
H A Drk.h27 …Vec *YdotRHS_slow; /* Function evaluations for the non-stiff part and contains slow compon… member
/petsc/src/ts/impls/multirate/
H A Dmprk.c51 Vec *YdotRHS_slow; /* Function evaluations by slow tableau for slow components */ member
644 …otRHS = mprk->YdotRHS, *YdotRHS_fast = mprk->YdotRHS_fast, *YdotRHS_slow = mprk->YdotRHS_slow, *Yd… in TSStep_MPRK() local
668 … for (j = 0; j < i; j++) PetscCall(VecGetSubVector(YdotRHS[j], mprk->is_slow, &YdotRHS_slow[j])); in TSStep_MPRK()
670 PetscCall(VecMAXPY(Yslow, i, wsb, mprk->YdotRHS_slow)); in TSStep_MPRK()
672 …or (j = 0; j < i; j++) PetscCall(VecRestoreSubVector(YdotRHS[j], mprk->is_slow, &YdotRHS_slow[j])); in TSStep_MPRK()
738 PetscCall(VecMAXPY(Xslow, computedstages, ws, mprk->YdotRHS_slow)); in TSEvaluateStep_MPRKSPLIT()
790 … *Y = mprk->Y, *YdotRHS_fast = mprk->YdotRHS_fast, *YdotRHS_slow = mprk->YdotRHS_slow, *Yd… in TSStep_MPRKSPLIT() local
842 PetscCall(VecMAXPY(Yslow, computedstages, ws, YdotRHS_slow)); in TSStep_MPRKSPLIT()
845 …PetscCall(TSComputeRHSFunction(mprk->subts_slow, t + h * csb[i], Y[i], YdotRHS_slow[computedstages… in TSStep_MPRKSPLIT()
915 PetscCall(VecDestroyVecs(tab->s, &mprk->YdotRHS_slow)); in TSMPRKTableauReset()
[all …]
/petsc/src/ts/impls/arkimex/
H A Dfsarkimex.c149 PetscCall(VecMAXPY(Xslow, s, w, ark->YdotRHS_slow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
169 PetscCall(VecMAXPY(Xslow, s, w, ark->YdotRHS_slow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
184 PetscCall(VecMAXPY(Xslow, s, w, ark->YdotRHS_slow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
221 …ark->Ydot0, Z = ark->Z, *YdotRHS_fast = ark->YdotRHS_fast, *YdotRHS_slow = ark->YdotRHS_slow, *Ydo… in TSStep_ARKIMEX_FastSlowSplit() local
372 PetscCall(VecMAXPY(Yslow, i, w, YdotRHS_slow)); in TSStep_ARKIMEX_FastSlowSplit()
374 PetscCall(TSComputeRHSFunction(ark->subts_slow, ark->stage_time, Y[i], YdotRHS_slow[i])); in TSStep_ARKIMEX_FastSlowSplit()
447 PetscCall(VecDuplicateVecs(Xslow, tab->s, &ark->YdotRHS_slow)); in TSSetUp_ARKIMEX_FastSlowSplit()
477 PetscCall(VecDestroyVecs(tab->s, &ark->YdotRHS_slow)); in TSReset_ARKIMEX_FastSlowSplit()
H A Darkimex.h46 Vec *YdotRHS_slow; /* Function evaluations for the slow components in YdotRHS */ member