117   PetscReal alpha_m, alpha_f, gamma;  in TSAlpha_Restart()  local
125   PetscCall(TSAlphaGetParams(ts, &alpha_m, &alpha_f, &gamma));  in TSAlpha_Restart()
172   PetscCall(TSAlphaSetParams(ts, alpha_m, alpha_f, gamma));  in TSAlpha_Restart()
404   PetscReal alpha_m, alpha_f, gamma;  in TSAlphaSetRadius_Alpha()  local
409   alpha_f = 1 / (1 + radius);  in TSAlphaSetRadius_Alpha()
410   gamma   = (PetscReal)0.5 + alpha_m - alpha_f;  in TSAlphaSetRadius_Alpha()
411   PetscCall(TSAlphaSetParams(ts, alpha_m, alpha_f, gamma));  in TSAlphaSetRadius_Alpha()
415 static PetscErrorCode TSAlphaSetParams_Alpha(TS ts, PetscReal alpha_m, PetscReal alpha_f, PetscReal…  in TSAlphaSetParams_Alpha()  argument
419   PetscReal res = ((PetscReal)0.5 + alpha_m - alpha_f) - gamma;  in TSAlphaSetParams_Alpha()
423   th->Alpha_f = alpha_f;  in TSAlphaSetParams_Alpha()
429 static PetscErrorCode TSAlphaGetParams_Alpha(TS ts, PetscReal *alpha_m, PetscReal *alpha_f, PetscRe…  in TSAlphaGetParams_Alpha()  argument
435   if (alpha_f) *alpha_f = th->Alpha_f;  in TSAlphaGetParams_Alpha()
552 PetscErrorCode TSAlphaSetParams(TS ts, PetscReal alpha_m, PetscReal alpha_f, PetscReal gamma)  in TSAlphaSetParams()  argument
557   PetscValidLogicalCollectiveReal(ts, alpha_f, 3);  in TSAlphaSetParams()
559 …od(ts, "TSAlphaSetParams_C", (TS, PetscReal, PetscReal, PetscReal), (ts, alpha_m, alpha_f, gamma));  in TSAlphaSetParams()
585 PetscErrorCode TSAlphaGetParams(TS ts, PetscReal *alpha_m, PetscReal *alpha_f, PetscReal *gamma)  in TSAlphaGetParams()  argument
590   if (alpha_f) PetscAssertPointer(alpha_f, 3);  in TSAlphaGetParams()
592 … "TSAlphaGetParams_C", (TS, PetscReal *, PetscReal *, PetscReal *), (ts, alpha_m, alpha_f, gamma));  in TSAlphaGetParams()