Lines Matching refs:subts_fast

95       rk->subts_current = rk->subts_fast;  in TSStepRefine_RK_MultirateNonsplit()
183 PetscCall(TSRHSSplitGetSubTS(ts, "fast", &rk->subts_fast)); in TSSetUp_RK_MultirateNonsplit()
184 …PetscCheck(rk->subts_slow && rk->subts_fast, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER, "Mu… in TSSetUp_RK_MultirateNonsplit()
187 rk->subts_current = rk->subts_fast; in TSSetUp_RK_MultirateNonsplit()
221 if (rk->subts_fast) { in TSReset_RK_MultirateSplit()
225 PetscCall(TSReset_RK_MultirateSplit(rk->subts_fast)); in TSReset_RK_MultirateSplit()
226 PetscCall(PetscFree(rk->subts_fast->data)); in TSReset_RK_MultirateSplit()
227 rk->subts_fast = NULL; in TSReset_RK_MultirateSplit()
308 TS subts_fast = rk->subts_fast, currentlevelts; in TSStepRefine_RK_MultirateSplit() local
309 TS_RK *subrk_fast = (TS_RK *)subts_fast->data; in TSStepRefine_RK_MultirateSplit()
330 currentlevelts = ((TS_RK *)currentlevelts->data)->subts_fast; in TSStepRefine_RK_MultirateSplit()
335 PetscCall(TSPreStage(subts_fast, subrk_fast->stage_time)); in TSStepRefine_RK_MultirateSplit()
341 PetscCall(TSPostStage(subts_fast, subrk_fast->stage_time, i, Y)); in TSStepRefine_RK_MultirateSplit()
343 …PetscCall(TSComputeRHSFunction(subts_fast, t + k * h * rk->dtratio + h / rk->dtratio * c[i], Y[i],… in TSStepRefine_RK_MultirateSplit()
351 if (subrk_fast->subts_fast) { in TSStepRefine_RK_MultirateSplit()
352 subts_fast->ptime = t + k * h / rk->dtratio; in TSStepRefine_RK_MultirateSplit()
353 subts_fast->time_step = h / rk->dtratio; in TSStepRefine_RK_MultirateSplit()
354 PetscCall(TSStepRefine_RK_MultirateSplit(subts_fast)); in TSStepRefine_RK_MultirateSplit()
398 PetscCall(TSComputeRHSFunction(rk->subts_fast, t + h * c[i], Y[i], YdotRHS_fast[i])); in TSStep_RK_MultirateSplit()
428 PetscCall(TSRHSSplitGetSubTS(ts, "fast", &rk->subts_fast)); in TSSetUp_RK_MultirateSplit()
429 …PetscCheck(rk->subts_slow && rk->subts_fast, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER, "Mu… in TSSetUp_RK_MultirateSplit()
434 while (currentlevelrk->subts_fast) { in TSSetUp_RK_MultirateSplit()
453 nextlevelts = currentlevelrk->subts_fast; in TSSetUp_RK_MultirateSplit()
463 PetscCall(TSRHSSplitGetSubTS(nextlevelts, "fast", &nextlevelrk->subts_fast)); in TSSetUp_RK_MultirateSplit()