41 CEED_QFUNCTION_HELPER void InterpolateProfile(const CeedScalar wall_dist, CeedScalar ubar[3], CeedS…  in InterpolateProfile()
47   const CeedScalar *prof_ubar = &stg_ctx->data[stg_ctx->offsets.ubar];  in InterpolateProfile()
61 …ubar[0] = prof_ubar[0 * nprofs + idx - 1] + coeff * (prof_ubar[0 * nprofs + idx] - prof_ubar[0 * n…  in InterpolateProfile()
62 …ubar[1] = prof_ubar[1 * nprofs + idx - 1] + coeff * (prof_ubar[1 * nprofs + idx] - prof_ubar[1 * n…  in InterpolateProfile()
63 …ubar[2] = prof_ubar[2 * nprofs + idx - 1] + coeff * (prof_ubar[2 * nprofs + idx] - prof_ubar[2 * n…  in InterpolateProfile()
73     ubar[0] = prof_ubar[1 * nprofs - 1];  in InterpolateProfile()
74     ubar[1] = prof_ubar[2 * nprofs - 1];  in InterpolateProfile()
75     ubar[2] = prof_ubar[3 * nprofs - 1];  in InterpolateProfile()
157 …StgShur14Calc(const CeedScalar X[3], const CeedScalar t, const CeedScalar ubar[3], const CeedScala…  in StgShur14Calc()
178   u[0] = ubar[0] + cij[0] * vp[0];  in StgShur14Calc()
179   u[1] = ubar[1] + cij[3] * vp[0] + cij[1] * vp[1];  in StgShur14Calc()
180   u[2] = ubar[2] + cij[4] * vp[0] + cij[5] * vp[1] + cij[2] * vp[2];  in StgShur14Calc()
198 …_PrecompEktot(const CeedScalar X[3], const CeedScalar t, const CeedScalar ubar[3], const CeedScala…  in StgShur14Calc_PrecompEktot()
225   u[0] = ubar[0] + cij[0] * vp[0];  in StgShur14Calc_PrecompEktot()
226   u[1] = ubar[1] + cij[3] * vp[0] + cij[1] * vp[1];  in StgShur14Calc_PrecompEktot()
227   u[2] = ubar[2] + cij[4] * vp[0] + cij[5] * vp[1] + cij[2] * vp[2];  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()
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()
308       StgShur14Calc(x_i, time, ubar, cij, qn, u, stg_ctx);  in ICsStg()
310       for (CeedInt j = 0; j < 3; j++) u[j] = ubar[j];  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()
366       StgShur14Calc(x, time, ubar, cij, qn, u, stg_ctx);  in StgShur14Inflow()
368       for (CeedInt j = 0; j < 3; j++) u[j] = ubar[j];  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()
505         StgShur14Calc(x, time, ubar, cij, qn, u, stg_ctx);  in StgShur14InflowStrongQF()
508       for (CeedInt j = 0; j < 3; j++) u[j] = ubar[j];  in StgShur14InflowStrongQF()