100 CEED_QFUNCTION_HELPER CeedScalar Calc_qn(const CeedScalar kappa, const CeedScalar dkappa, const Cee…  in Calc_qn()  argument
102 …const CeedScalar feta_x_fcut = exp(-Square(12 * kappa / keta) - Cube(4 * Max(kappa - 0.9 * kcut, 0…  in Calc_qn()
103 …return pow(kappa / ke, 4.) * pow(1 + 2.4 * Square(kappa / ke), -17. / 6) * feta_x_fcut * dkappa * …  in Calc_qn()
131   const CeedScalar *kappa  = &stg_ctx->data[stg_ctx->offsets.kappa];  in CalcSpectrum()  local
137     const CeedScalar dkappa = n == 0 ? kappa[0] : kappa[n] - kappa[n - 1];  in CalcSpectrum()
138     qn[n]                   = Calc_qn(kappa[n], dkappa, keta, kcut, ke, 1.0);  in CalcSpectrum()
160   const CeedScalar *kappa  = &stg_ctx->data[stg_ctx->offsets.kappa];  in StgShur14Calc()  local
168     xhat[0] = (X[0] - stg_ctx->u0 * t) * Max(2 * kappa[0] / kappa[n], 0.1);  in StgShur14Calc()
171     const CeedScalar cos_kxdp = cos(kappa[n] * xdotd + phi[n]);  in StgShur14Calc()
203   const CeedScalar *kappa  = &stg_ctx->data[stg_ctx->offsets.kappa];  in StgShur14Calc_PrecompEktot()  local
213     xhat[0] = (X[0] - stg_ctx->u0 * t) * Max(2 * kappa[0] / kappa[n], 0.1);  in StgShur14Calc_PrecompEktot()
216     const CeedScalar cos_kxdp = cos(kappa[n] * xdotd + phi[n]);  in StgShur14Calc_PrecompEktot()
217     const CeedScalar dkappa   = n == 0 ? kappa[0] : kappa[n] - kappa[n - 1];  in StgShur14Calc_PrecompEktot()
218     const CeedScalar qn       = Calc_qn(kappa[n], dkappa, keta, kcut, ke, Ektot);  in StgShur14Calc_PrecompEktot()
250   const CeedScalar *kappa  = &stg_ctx->data[stg_ctx->offsets.kappa];  in StgShur14Preprocess()  local
271       const CeedScalar dkappa = n == 0 ? kappa[0] : kappa[n] - kappa[n - 1];  in StgShur14Preprocess()
272       Ek_tot += Calc_qn(kappa[n], dkappa, keta, kcut, ke, 1.0);  in StgShur14Preprocess()