| /petsc/src/ts/impls/explicit/euler/ |
| H A D | euler.c | 14 PetscBool stageok, accept = PETSC_TRUE; in TSStep_Euler() local
22 PetscCall(TSAdaptCheckStage(ts->adapt, ts, ts->ptime, solution, &stageok)); in TSStep_Euler()
23 if (!stageok) { in TSStep_Euler()
27 PetscCall(TSFunctionDomainError(ts, ts->ptime + ts->time_step, update, &stageok)); in TSStep_Euler()
28 if (!stageok) { in TSStep_Euler()
|
| /petsc/src/ts/impls/implicit/alpha/ |
| H A D | alpha1.c | 119 PetscBool stageok; in TSAlpha_Restart() local
140 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, X1, &stageok)); in TSAlpha_Restart()
141 if (!stageok) goto finally; in TSAlpha_Restart()
150 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, X2, &stageok)); in TSAlpha_Restart()
151 if (!stageok) goto finally; in TSAlpha_Restart()
170 if (initok) *initok = stageok; in TSAlpha_Restart()
183 PetscBool stageok, accept = PETSC_TRUE; in TSStep_Alpha() local
198 PetscCall(TSAlpha_Restart(ts, &stageok)); in TSStep_Alpha()
199 if (!stageok) goto reject_step; in TSStep_Alpha()
207 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, th->Xa, &stageok)); in TSStep_Alpha()
[all …]
|
| H A D | alpha2.c | 162 PetscBool stageok; in TSAlpha_Restart() local
186 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, X1, &stageok)); in TSAlpha_Restart()
187 if (!stageok) goto finally; in TSAlpha_Restart()
198 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, X2, &stageok)); in TSAlpha_Restart()
199 if (!stageok) goto finally; in TSAlpha_Restart()
224 if (initok) *initok = stageok; in TSAlpha_Restart()
239 PetscBool stageok, accept = PETSC_TRUE; in TSStep_Alpha() local
256 PetscCall(TSAlpha_Restart(ts, &stageok)); in TSStep_Alpha()
257 if (!stageok) goto reject_step; in TSStep_Alpha()
265 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, th->Xa, &stageok)); in TSStep_Alpha()
[all …]
|
| /petsc/src/ts/impls/symplectic/basicsymplectic/ |
| H A D | basicsymplectic.c | 210 PetscBool stageok = PETSC_TRUE; in TSStep_BasicSymplectic() local
241 PetscCall(TSAdaptCheckStage(ts->adapt, ts, ptime, solution, &stageok)); in TSStep_BasicSymplectic()
242 if (!stageok) goto finally; in TSStep_BasicSymplectic()
243 PetscCall(TSFunctionDomainError(ts, ptime, solution, &stageok)); in TSStep_BasicSymplectic()
244 if (!stageok) goto finally; in TSStep_BasicSymplectic()
248 if (!stageok) ts->reason = TS_DIVERGED_STEP_REJECTED; in TSStep_BasicSymplectic()
|
| /petsc/src/ts/impls/bdf/ |
| H A D | bdf.c | 252 PetscBool stageok, accept = PETSC_TRUE; in TSStep_BDF() local
266 PetscCall(TSBDF_Restart(ts, &stageok)); in TSStep_BDF()
267 if (!stageok) goto reject_step; in TSStep_BDF()
276 PetscCall(TSAdaptCheckStage(ts->adapt, ts, bdf->time[0], bdf->work[0], &stageok)); in TSStep_BDF()
277 if (!stageok) goto reject_step; in TSStep_BDF()
|
| /petsc/src/ts/impls/explicit/ssp/ |
| H A D | ssp.c | 191 PetscBool stageok, accept = PETSC_TRUE; in TSStep_SSP() local
197 PetscCall(TSAdaptCheckStage(ts->adapt, ts, ts->ptime + ts->time_step, sol, &stageok)); in TSStep_SSP()
198 if (!stageok) { in TSStep_SSP()
|
| /petsc/src/ts/impls/implicit/discgrad/ |
| H A D | tsdiscgrad.c | 225 PetscBool stageok, accept = PETSC_TRUE; in TSStep_DiscGrad() local
241 PetscCall(TSAdaptCheckStage(adapt, ts, dg->stage_time, dg->X, &stageok)); in TSStep_DiscGrad()
242 if (!stageok) goto reject_step; in TSStep_DiscGrad()
|
| /petsc/src/ts/impls/arkimex/ |
| H A D | fsarkimex.c | 227 PetscBool fasthasE = PETSC_FALSE, stageok, accept = PETSC_TRUE; in TSStep_ARKIMEX_FastSlowSplit() local
336 PetscCall(TSAdaptCheckStage(adapt, ts, ark->stage_time, Y[i], &stageok)); in TSStep_ARKIMEX_FastSlowSplit()
337 if (!stageok) { in TSStep_ARKIMEX_FastSlowSplit()
|
| H A D | arkimex.c | 1343 …PetscBool hasE = PETSC_FALSE, dirk = (PetscBool)(!tab->additive), stageok, accept = PETSC_T… in TSStep_ARKIMEX() local
1474 PetscCall(TSAdaptCheckStage(adapt, ts, ark->stage_time, Y[i], &stageok)); in TSStep_ARKIMEX()
1475 if (!stageok) { in TSStep_ARKIMEX()
|
| /petsc/src/ts/impls/implicit/theta/ |
| H A D | theta.c | 201 PetscBool stageok, accept = PETSC_TRUE; in TSStep_Theta() local
225 PetscCall(TSAdaptCheckStage(ts->adapt, ts, th->stage_time, th->X, &stageok)); in TSStep_Theta()
226 if (!stageok) goto reject_step; in TSStep_Theta()
235 … PetscCall(TSAdaptCheckStage(ts->adapt, ts, ts->ptime + ts->time_step, ts->vec_sol, &stageok)); in TSStep_Theta()
236 if (!stageok) { in TSStep_Theta()
|
| /petsc/src/ts/impls/rosw/ |
| H A D | rosw.c | 1139 PetscBool stageok, accept = PETSC_TRUE; in TSStep_RosW() local
1207 PetscCall(TSAdaptCheckStage(adapt, ts, ros->stage_time, Y[i], &stageok)); in TSStep_RosW()
1208 if (!stageok) goto reject_step; in TSStep_RosW()
|
| /petsc/src/ts/impls/explicit/rk/ |
| H A D | rk.c | 787 PetscBool stageok, accept = PETSC_TRUE; in TSStep_RK() local
807 PetscCall(TSAdaptCheckStage(adapt, ts, rk->stage_time, Y[i], &stageok)); in TSStep_RK()
808 if (!stageok) goto reject_step; in TSStep_RK()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | libpetsc4py.pyx | 2731 cdef PetscBool stageok = PETSC_TRUE
2739 CHKERR(TSAdaptCheckStage(ts.adapt, ts, tt+dt, vec_update, &stageok))
2740 if not stageok:
2752 if (not stageok or not accept) and ts.reason == 0:
|