41 CEED_QFUNCTION_HELPER void InterpolateProfile(const CeedScalar wall_dist, CeedScalar ubar[3], CeedS…  in InterpolateProfile()  argument
44   const CeedScalar *prof_wd   = &stg_ctx->data[stg_ctx->offsets.wall_dist];  in InterpolateProfile()
52     if (wall_dist < prof_wd[i]) {  in InterpolateProfile()
59     CeedScalar coeff = (wall_dist - prof_wd[idx - 1]) / (prof_wd[idx] - prof_wd[idx - 1]);  in InterpolateProfile()
107 CEED_QFUNCTION_HELPER void SpectrumConstants(const CeedScalar wall_dist, const CeedScalar eps, cons…  in SpectrumConstants()  argument
110   *ke   = wall_dist == 0 ? 1e16 : 2 * M_PI / Min(2 * wall_dist, 3 * lt);  in SpectrumConstants()
112   *kcut = M_PI / Min(Max(Max(hNodSep[1], hNodSep[2]), 0.3 * (*hmax)) + 0.1 * wall_dist, *hmax);  in SpectrumConstants()
128 CEED_QFUNCTION_HELPER void CalcSpectrum(const CeedScalar wall_dist, const CeedScalar eps, const Cee…  in CalcSpectrum()  argument
134   SpectrumConstants(wall_dist, eps, lt, h_node_sep, nu, &hmax, &ke, &keta, &kcut);  in CalcSpectrum()
199 …                const CeedScalar Ektot, const CeedScalar h_node_sep[3], const CeedScalar wall_dist,  in StgShur14Calc_PrecompEktot()  argument
208   SpectrumConstants(wall_dist, eps, lt, h_node_sep, nu, &hmax, &ke, &keta, &kcut);  in StgShur14Calc_PrecompEktot()
254     const CeedScalar wall_dist  = x[1][i];  in StgShur14Preprocess()  local
265     InterpolateProfile(wall_dist, ubar, cij, &eps, &lt, stg_ctx);  in StgShur14Preprocess()
266     SpectrumConstants(wall_dist, eps, lt, h_node_sep, nu, &hmax, &ke, &keta, &kcut);  in StgShur14Preprocess()