12   PetscReal     enorm, enorma, enormr, hfac_lte, hfac_ltea, hfac_lter, h_lte, safety;  in TSAdaptChoose_GLEE()  local
37     PetscCall(TSErrorWeightedENorm(ts, E, X, X, adapt->wnormtype, &enorm, &enorma, &enormr));  in TSAdaptChoose_GLEE()
45     PetscCall(TSErrorWeightedNorm(ts, X, Y, adapt->wnormtype, &enorm, &enorma, &enormr));  in TSAdaptChoose_GLEE()
57   if (enorm > 1. || enorma > 1. || enormr > 1.) {  in TSAdaptChoose_GLEE()
60 … accepting because step size %g is at minimum\n", (double)enorm, (double)enorma, (double)enormr, (…  in TSAdaptChoose_GLEE()
63 … step of size %g because always_accept is set\n", (double)enorm, (double)enorma, (double)enormr, (…  in TSAdaptChoose_GLEE()
66 …ive]] [%g, %g, %g], rejecting step of size %g\n", (double)enorm, (double)enorma, (double)enormr, (…  in TSAdaptChoose_GLEE()
70 …tive] [%g, %g, %g], accepting step of size %g\n", (double)enorm, (double)enorma, (double)enormr, (…  in TSAdaptChoose_GLEE()
84       hfac_ltea = safety * PetscPowReal(1. / enorma, ((PetscReal)1) / (order + 1));  in TSAdaptChoose_GLEE()
98       hfac_ltea = safety * PetscPowReal(enorma, ((PetscReal)-1) / order);  in TSAdaptChoose_GLEE()
110   *wltea = enorma;  in TSAdaptChoose_GLEE()