Lines Matching refs:wm
760 PetscScalar *wm = mprk->work_medium, *wmb = mprk->work_mediumbuffer; in TSEvaluateStep_MPRKSPLIT() local
765 …if (tab->rmb[j]) wm[computedstages - tab->sbase + (tab->rmb[j] - 1) % tab->sbase] += h * tab->bmb[… in TSEvaluateStep_MPRKSPLIT()
766 else wm[computedstages++] = h * tab->bmb[j]; in TSEvaluateStep_MPRKSPLIT()
769 PetscCall(VecMAXPY(Xmedium, computedstages, wm, mprk->YdotRHS_medium)); in TSEvaluateStep_MPRKSPLIT()
813 PetscScalar *wm = mprk->work_medium; in TSStep_MPRKSPLIT() local
816 … if (tab->rmb[j]) wm[computedstages - tab->sbase + (tab->rmb[j] - 1) % tab->sbase] += wsb[j]; in TSStep_MPRKSPLIT()
817 else wm[computedstages++] = wsb[j]; in TSStep_MPRKSPLIT()
820 PetscCall(VecMAXPY(Yslowbuffer, computedstages, wm, YdotRHS_slowbuffer)); in TSStep_MPRKSPLIT()
859 PetscScalar *wm = mprk->work_medium, *wmb = mprk->work_mediumbuffer; in TSStep_MPRKSPLIT() local
875 … if (tab->rmb[j]) wm[computedstages - tab->sbase + (tab->rmb[j] - 1) % tab->sbase] += wmb[j]; in TSStep_MPRKSPLIT()
876 else wm[computedstages++] = wmb[j]; in TSStep_MPRKSPLIT()
879 PetscCall(VecMAXPY(Ymedium, computedstages, wm, YdotRHS_medium)); in TSStep_MPRKSPLIT()