19   PetscReal fnorm_initial, fnorm; /* original and current norm of F(u) */  member
59 PetscErrorCode TSPseudoComputeFunction(TS ts, Vec solution, Vec *residual, PetscReal *fnorm)  in TSPseudoComputeFunction()  argument
68   if (fnorm) PetscAssertPointer(fnorm, 4);  in TSPseudoComputeFunction()
71   if (Xstate != pseudo->Xstate || pseudo->fnorm < 0) {  in TSPseudoComputeFunction()
75     PetscCall(VecNorm(pseudo->func, NORM_2, &pseudo->fnorm));  in TSPseudoComputeFunction()
78   if (fnorm) *fnorm = pseudo->fnorm;  in TSPseudoComputeFunction()
87   PetscReal  next_time_step = ts->time_step, fnorm;  in TSStep_Pseudo()  local
101     pseudo->fnorm = -1; /* The current norm is no longer valid */  in TSStep_Pseudo()
130   PetscCall(TSPseudoComputeFunction(ts, ts->vec_sol, NULL, &fnorm));  in TSStep_Pseudo()
132   if (fnorm < pseudo->fatol) {  in TSStep_Pseudo()
134 …FMT ", converged since fnorm %g < fatol %g\n", ts->steps, (double)pseudo->fnorm, (double)pseudo->f…  in TSStep_Pseudo()
137   if (fnorm / pseudo->fnorm_initial < pseudo->frtol) {  in TSStep_Pseudo()
139 …nce fnorm %g / fnorm_initial %g < frtol %g\n", ts->steps, (double)pseudo->fnorm, (double)pseudo->f…  in TSStep_Pseudo()
272 …T " dt %g time %g fnorm %g\n", step, (double)ts->time_step, (double)ptime, (double)pseudo->fnorm));  in TSPseudoMonitorDefault()
337   PetscReal  inc    = pseudo->dt_increment, fnorm;  in TSPseudoTimeStepDefault()  local
340   PetscCall(TSPseudoComputeFunction(ts, ts->vec_sol, NULL, &fnorm));  in TSPseudoTimeStepDefault()
343     pseudo->fnorm_initial  = fnorm;  in TSPseudoTimeStepDefault()
344     pseudo->fnorm_previous = fnorm;  in TSPseudoTimeStepDefault()
346   if (fnorm == 0.0) *newdt = 1.e12 * inc * ts->time_step;  in TSPseudoTimeStepDefault()
347 …o->increment_dt_from_initial_dt) *newdt = inc * pseudo->dt_initial * pseudo->fnorm_initial / fnorm;  in TSPseudoTimeStepDefault()
348   else *newdt = inc * ts->time_step * pseudo->fnorm_previous / fnorm;  in TSPseudoTimeStepDefault()
350   pseudo->fnorm_previous = fnorm;  in TSPseudoTimeStepDefault()
699   pseudo->fnorm                        = -1;  in TSCreate_Pseudo()