Lines Matching refs:is_slow

125   IS               is_slow = rk->is_slow;  in TSStep_RK_MultirateNonsplit()  local
154 PetscCall(VecGetSubVector(sol_slow, is_slow, &subvec_slow)); in TSStep_RK_MultirateNonsplit()
155 PetscCall(VecISCopy(ts->vec_sol, is_slow, SCATTER_FORWARD, subvec_slow)); in TSStep_RK_MultirateNonsplit()
156 PetscCall(VecRestoreSubVector(sol_slow, is_slow, &subvec_slow)); in TSStep_RK_MultirateNonsplit()
179 PetscCall(TSRHSSplitGetIS(ts, "slow", &rk->is_slow)); in TSSetUp_RK_MultirateNonsplit()
181 …PetscCheck(rk->is_slow && rk->is_fast, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER, "Must set… in TSSetUp_RK_MultirateNonsplit()
263 …for (i = 0; i < s; i++) PetscCall(VecGetSubVector(rk->YdotRHS[i], rk->is_slow, &rk->YdotRHS_slow[i… in TSInterpolate_RK_MultirateSplit()
264 PetscCall(VecGetSubVector(X, rk->is_slow, &Xslow)); in TSInterpolate_RK_MultirateSplit()
265 PetscCall(VecISCopy(rk->X0, rk->is_slow, SCATTER_REVERSE, Xslow)); in TSInterpolate_RK_MultirateSplit()
267 PetscCall(VecRestoreSubVector(X, rk->is_slow, &Xslow)); in TSInterpolate_RK_MultirateSplit()
268 …for (i = 0; i < s; i++) PetscCall(VecRestoreSubVector(rk->YdotRHS[i], rk->is_slow, &rk->YdotRHS_sl… in TSInterpolate_RK_MultirateSplit()
293 PetscCall(VecGetSubVector(ts->vec_sol, rk->is_slow, &Xslow)); in TSEvaluateStep_RK_MultirateSplit()
295 PetscCall(VecRestoreSubVector(ts->vec_sol, rk->is_slow, &Xslow)); in TSEvaluateStep_RK_MultirateSplit()
380 PetscCall(VecGetSubVector(YdotRHS[i], rk->is_slow, &YdotRHS_slow[i])); in TSStep_RK_MultirateSplit()
390 PetscCall(VecGetSubVector(Y[i], rk->is_slow, &Yslow)); in TSStep_RK_MultirateSplit()
395 PetscCall(VecRestoreSubVector(Y[i], rk->is_slow, &Yslow)); in TSStep_RK_MultirateSplit()
405 PetscCall(VecRestoreSubVector(YdotRHS[i], rk->is_slow, &YdotRHS_slow[i])); in TSStep_RK_MultirateSplit()
424 PetscCall(TSRHSSplitGetIS(ts, "slow", &rk->is_slow)); in TSSetUp_RK_MultirateSplit()
426 …PetscCheck(rk->is_slow && rk->is_fast, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER, "Must set… in TSSetUp_RK_MultirateSplit()
460 PetscCall(TSRHSSplitGetIS(nextlevelts, "slow", &nextlevelrk->is_slow)); in TSSetUp_RK_MultirateSplit()