Lines Matching refs:is_slow
46 if (ark->is_slow) PetscCall(VecISCopy(Y, ark->is_fast, SCATTER_FORWARD, X)); in SNESTSFormFunction_ARKIMEX_FastSlowSplit()
67 if (ark->is_slow) PetscCall(VecISCopy(Y, ark->is_fast, SCATTER_FORWARD, X)); in SNESTSFormJacobian_ARKIMEX_FastSlowSplit()
147 if (ark->is_slow) { in TSEvaluateStep_ARKIMEX_FastSlowSplit()
148 PetscCall(VecGetSubVector(X, ark->is_slow, &Xslow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
150 PetscCall(VecRestoreSubVector(X, ark->is_slow, &Xslow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
167 if (ark->is_slow) { in TSEvaluateStep_ARKIMEX_FastSlowSplit()
168 PetscCall(VecGetSubVector(X, ark->is_slow, &Xslow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
170 PetscCall(VecRestoreSubVector(X, ark->is_slow, &Xslow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
182 if (ark->is_slow) { in TSEvaluateStep_ARKIMEX_FastSlowSplit()
183 PetscCall(VecGetSubVector(X, ark->is_slow, &Xslow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
185 PetscCall(VecRestoreSubVector(X, ark->is_slow, &Xslow)); in TSEvaluateStep_ARKIMEX_FastSlowSplit()
238 PetscCall(VecGetSubVector(ts->vec_sol, ark->is_slow, &Xslow)); in TSStep_ARKIMEX_FastSlowSplit()
319 if (ark->is_slow) PetscCall(VecCopy(i > 0 ? Y[i - 1] : ts->vec_sol, ark->Y_snes)); in TSStep_ARKIMEX_FastSlowSplit()
369 if (ark->is_slow) { in TSStep_ARKIMEX_FastSlowSplit()
371 PetscCall(VecGetSubVector(Y[i], ark->is_slow, &Yslow)); in TSStep_ARKIMEX_FastSlowSplit()
373 PetscCall(VecRestoreSubVector(Y[i], ark->is_slow, &Yslow)); in TSStep_ARKIMEX_FastSlowSplit()
416 PetscCall(TSRHSSplitGetIS(ts, "slow", &ark->is_slow)); in TSSetUp_ARKIMEX_FastSlowSplit()
418 …PetscCheck(ark->is_slow || ark->is_fast, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER, "Must s… in TSSetUp_ARKIMEX_FastSlowSplit()
424 …if (ark->extrapolate && ark->is_slow) { // need to resize these vectors if the fast subvectors is … in TSSetUp_ARKIMEX_FastSlowSplit()
430 …if (ark->is_fast && ark->is_slow) PetscCall(VecDuplicate(ts->vec_sol, &ark->Y_snes)); // need an a… in TSSetUp_ARKIMEX_FastSlowSplit()
445 if (ark->is_slow) { in TSSetUp_ARKIMEX_FastSlowSplit()
446 PetscCall(VecGetSubVector(ts->vec_sol, ark->is_slow, &Xslow)); in TSSetUp_ARKIMEX_FastSlowSplit()
448 PetscCall(VecRestoreSubVector(ts->vec_sol, ark->is_slow, &Xslow)); in TSSetUp_ARKIMEX_FastSlowSplit()
476 if (ark->is_fast && ark->is_slow) PetscCall(VecDestroy(&ark->Y_snes)); in TSReset_ARKIMEX_FastSlowSplit()