Home
last modified time | relevance | path

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

/petsc/src/ts/impls/multirate/
H A Dmprk.c725 PetscInt s = tab->s, j, computedstages; in TSEvaluateStep_MPRKSPLIT() local
732 computedstages = 0; in TSEvaluateStep_MPRKSPLIT()
735 else ws[computedstages++] = h * tab->bsb[j]; in TSEvaluateStep_MPRKSPLIT()
738 PetscCall(VecMAXPY(Xslow, computedstages, ws, mprk->YdotRHS_slow)); in TSEvaluateStep_MPRKSPLIT()
743 computedstages = 0; in TSEvaluateStep_MPRKSPLIT()
745 …if (tab->rmb[j]) wsb[computedstages - tab->sbase + (tab->rmb[j] - 1) % tab->sbase] += h * tab->bsb… in TSEvaluateStep_MPRKSPLIT()
746 else wsb[computedstages++] = h * tab->bsb[j]; in TSEvaluateStep_MPRKSPLIT()
749 PetscCall(VecMAXPY(Xslowbuffer, computedstages, wsb, mprk->YdotRHS_slowbuffer)); in TSEvaluateStep_MPRKSPLIT()
763 computedstages = 0; in TSEvaluateStep_MPRKSPLIT()
765 …if (tab->rmb[j]) wm[computedstages - tab->sbase + (tab->rmb[j] - 1) % tab->sbase] += h * tab->bmb[… in TSEvaluateStep_MPRKSPLIT()
[all …]