Searched refs:mprk (Results 1 – 2 of 2) sorted by relevance
555 TS_MPRK *mprk = (TS_MPRK *)ts->data; in TSMPRKSetSplits() local556 MPRKTableau tab = mprk->tableau; in TSMPRKSetSplits()560 PetscCall(TSRHSSplitGetSubTS(ts, "slow", &mprk->subts_slow)); in TSMPRKSetSplits()561 PetscCall(TSRHSSplitGetSubTS(ts, "fast", &mprk->subts_fast)); in TSMPRKSetSplits()562 …PetscCheck(mprk->subts_slow && mprk->subts_fast, PetscObjectComm((PetscObject)ts), PETSC_ERR_USER,… in TSMPRKSetSplits()567 PetscCall(TSRHSSplitGetSubTS(ts, "slowbuffer", &mprk->subts_slowbuffer)); in TSMPRKSetSplits()568 if (!mprk->subts_slowbuffer) { in TSMPRKSetSplits()569 mprk->subts_slowbuffer = mprk->subts_slow; in TSMPRKSetSplits()570 mprk->subts_slow = NULL; in TSMPRKSetSplits()572 if (mprk->subts_slow) { in TSMPRKSetSplits()[all …]
85 * - mprk