Lines Matching refs:time_step
87 PetscReal next_time_step = ts->time_step, fnorm; in TSStep_Pseudo()
91 if (ts->steps == 0) pseudo->dt_initial = ts->time_step; in TSStep_Pseudo()
95 PetscCall(TSPreStage(ts, ts->ptime + ts->time_step)); in TSStep_Pseudo()
102 PetscCall(TSPostStage(ts, ts->ptime + ts->time_step, 0, &ts->vec_sol)); in TSStep_Pseudo()
104 PetscCall(TSAdaptCheckStage(adapt, ts, ts->ptime + ts->time_step, ts->vec_sol, &accept)); in TSStep_Pseudo()
108 PetscCall(TSAdaptChoose(adapt, ts, ts->time_step, NULL, &next_time_step, &accept)); in TSStep_Pseudo()
111 ts->time_step = next_time_step; in TSStep_Pseudo()
114 ts->ptime += ts->time_step; in TSStep_Pseudo()
115 ts->time_step = next_time_step; in TSStep_Pseudo()
205 const PetscScalar mdt = 1.0 / ts->time_step; in SNESTSFormFunction_Pseudo()
229 PetscCall(TSComputeIFunction(ts, ts->ptime + ts->time_step, X, pseudo->xdot, Y, PETSC_FALSE)); in SNESTSFormFunction_Pseudo()
250 …PetscCall(TSComputeIJacobian(ts, ts->ptime + ts->time_step, X, Xdot, 1. / ts->time_step, AA, BB, P… in SNESTSFormJacobian_Pseudo()
272 …wer, "TS %" PetscInt_FMT " dt %g time %g fnorm %g\n", step, (double)ts->time_step, (double)ptime, … in TSPseudoMonitorDefault()
346 if (fnorm == 0.0) *newdt = 1.e12 * inc * ts->time_step; in TSPseudoTimeStepDefault()
348 else *newdt = inc * ts->time_step * pseudo->fnorm_previous / fnorm; in TSPseudoTimeStepDefault()