36 CEED_QFUNCTION_HELPER void InterpolateProfile(const CeedScalar wall_dist, CeedScalar ubar[3], CeedS…  in InterpolateProfile()
42   const CeedScalar *prof_ubar = &stg_ctx->data[stg_ctx->offsets.ubar];  in InterpolateProfile()
56 …ubar[0] = prof_ubar[0 * nprofs + idx - 1] + coeff * (prof_ubar[0 * nprofs + idx] - prof_ubar[0 * n…  in InterpolateProfile()
57 …ubar[1] = prof_ubar[1 * nprofs + idx - 1] + coeff * (prof_ubar[1 * nprofs + idx] - prof_ubar[1 * n…  in InterpolateProfile()
58 …ubar[2] = prof_ubar[2 * nprofs + idx - 1] + coeff * (prof_ubar[2 * nprofs + idx] - prof_ubar[2 * n…  in InterpolateProfile()
68     ubar[0] = prof_ubar[1 * nprofs - 1];  in InterpolateProfile()
69     ubar[1] = prof_ubar[2 * nprofs - 1];  in InterpolateProfile()
70     ubar[2] = prof_ubar[3 * nprofs - 1];  in InterpolateProfile()
152 …StgShur14Calc(const CeedScalar X[3], const CeedScalar t, const CeedScalar ubar[3], const CeedScala…  in StgShur14Calc()
173   u[0] = ubar[0] + cij[0] * vp[0];  in StgShur14Calc()
174   u[1] = ubar[1] + cij[3] * vp[0] + cij[1] * vp[1];  in StgShur14Calc()
175   u[2] = ubar[2] + cij[4] * vp[0] + cij[5] * vp[1] + cij[2] * vp[2];  in StgShur14Calc()
193 …_PrecompEktot(const CeedScalar X[3], const CeedScalar t, const CeedScalar ubar[3], const CeedScala…  in StgShur14Calc_PrecompEktot()
220   u[0] = ubar[0] + cij[0] * vp[0];  in StgShur14Calc_PrecompEktot()
221   u[1] = ubar[1] + cij[3] * vp[0] + cij[1] * vp[1];  in StgShur14Calc_PrecompEktot()
222   u[2] = ubar[2] + cij[4] * vp[0] + cij[5] * vp[1] + cij[2] * vp[2];  in StgShur14Calc_PrecompEktot()
248   CeedScalar             ubar[3], cij[6], eps, lt;  in StgShur14Preprocess()  local
267     InterpolateProfile(wall_dist, ubar, cij, &eps, &lt, stg_ctx);  in StgShur14Preprocess()
291   CeedScalar                     qn[STG_NMODES_MAX], u[3], ubar[3], cij[6], eps, lt;  in ICsStg()  local
308     InterpolateProfile(x_i[1], ubar, cij, &eps, &lt, stg_ctx);  in ICsStg()
311       StgShur14Calc(x_i, time, ubar, cij, qn, u, stg_ctx);  in ICsStg()
313       for (CeedInt j = 0; j < 3; j++) u[j] = ubar[j];  in ICsStg()
342   CeedScalar                  qn[STG_NMODES_MAX], u[3], ubar[3], cij[6], eps, lt;  in StgShur14Inflow()  local
367     InterpolateProfile(X[1][i], ubar, cij, &eps, &lt, stg_ctx);  in StgShur14Inflow()
370       StgShur14Calc(x, time, ubar, cij, qn, u, stg_ctx);  in StgShur14Inflow()
372       for (CeedInt j = 0; j < 3; j++) u[j] = ubar[j];  in StgShur14Inflow()
482   CeedScalar                  u[3], ubar[3], cij[6], eps, lt;  in StgShur14InflowStrongQF()  local
496     InterpolateProfile(coords[1][i], ubar, cij, &eps, &lt, stg_ctx);  in StgShur14InflowStrongQF()
499 …StgShur14Calc_PrecompEktot(x, time, ubar, cij, inv_Ektotal[i], h_node_sep, x[1], eps, lt, nu, u, s…  in StgShur14InflowStrongQF()
503         StgShur14Calc(x, time, ubar, cij, qn, u, stg_ctx);  in StgShur14InflowStrongQF()
506       for (CeedInt j = 0; j < 3; j++) u[j] = ubar[j];  in StgShur14InflowStrongQF()