Lines Matching refs:alpha_m

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
408 alpha_m = (PetscReal)0.5 * (3 - radius) / (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()
422 th->Alpha_m = alpha_m; in TSAlphaSetParams_Alpha()
429 static PetscErrorCode TSAlphaGetParams_Alpha(TS ts, PetscReal *alpha_m, PetscReal *alpha_f, PetscRe… in TSAlphaGetParams_Alpha() argument
434 if (alpha_m) *alpha_m = th->Alpha_m; in TSAlphaGetParams_Alpha()
552 PetscErrorCode TSAlphaSetParams(TS ts, PetscReal alpha_m, PetscReal alpha_f, PetscReal gamma) in TSAlphaSetParams() argument
556 PetscValidLogicalCollectiveReal(ts, alpha_m, 2); in TSAlphaSetParams()
559 …PetscTryMethod(ts, "TSAlphaSetParams_C", (TS, PetscReal, PetscReal, PetscReal), (ts, alpha_m, alph… in TSAlphaSetParams()
585 PetscErrorCode TSAlphaGetParams(TS ts, PetscReal *alpha_m, PetscReal *alpha_f, PetscReal *gamma) in TSAlphaGetParams() argument
589 if (alpha_m) PetscAssertPointer(alpha_m, 2); in TSAlphaGetParams()
592 … "TSAlphaGetParams_C", (TS, PetscReal *, PetscReal *, PetscReal *), (ts, alpha_m, alpha_f, gamma)); in TSAlphaGetParams()