41 …const CeedScalar wall_dist, CeedScalar ubar[3], CeedScalar cij[6], CeedScalar *eps, CeedScalar *lt,  in InterpolateProfile()  argument
45   const CeedScalar *prof_eps  = &stg_ctx->data[stg_ctx->offsets.eps];  in InterpolateProfile()
70     *eps    = prof_eps[idx - 1] + coeff * (prof_eps[idx] - prof_eps[idx - 1]);  in InterpolateProfile()
82     *eps    = prof_eps[nprofs - 1];  in InterpolateProfile()
107 CEED_QFUNCTION_HELPER void SpectrumConstants(const CeedScalar wall_dist, const CeedScalar eps, cons…  in SpectrumConstants()  argument
111   *keta = 2 * M_PI * pow(Cube(nu) / eps, -0.25);  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()
200 …                   const CeedScalar eps, const CeedScalar lt, const CeedScalar nu, CeedScalar u[3],  in StgShur14Calc_PrecompEktot()  argument
208   SpectrumConstants(wall_dist, eps, lt, h_node_sep, nu, &hmax, &ke, &keta, &kcut);  in StgShur14Calc_PrecompEktot()
239   CeedScalar             ubar[3], cij[6], eps, lt;  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()
288   CeedScalar                     qn[STG_NMODES_MAX], u[3], ubar[3], cij[6], eps, lt;  in ICsStg()  local
305     InterpolateProfile(x_i[1], ubar, cij, &eps, &lt, stg_ctx);  in ICsStg()
307       CalcSpectrum(x_i[1], eps, lt, h_node_sep, nu, qn, stg_ctx);  in ICsStg()
338   CeedScalar             qn[STG_NMODES_MAX], u[3], ubar[3], cij[6], eps, lt;  in StgShur14Inflow()  local
363     InterpolateProfile(X[1][i], ubar, cij, &eps, &lt, stg_ctx);  in StgShur14Inflow()
365       CalcSpectrum(X[1][i], eps, lt, h_node_sep, mu / rho, qn, stg_ctx);  in StgShur14Inflow()
477   CeedScalar                     u[3], ubar[3], cij[6], eps, lt;  in StgShur14InflowStrongQF()  local
498     InterpolateProfile(coords[1][i], ubar, cij, &eps, &lt, stg_ctx);  in StgShur14InflowStrongQF()
501 …StgShur14Calc_PrecompEktot(x, time, ubar, cij, inv_Ektotal[i], h_node_sep, x[1], eps, lt, nu, u, s…  in StgShur14InflowStrongQF()
504         CalcSpectrum(coords[1][i], eps, lt, h_node_sep, nu, qn, stg_ctx);  in StgShur14InflowStrongQF()