6 const auto &box = mfi.tilebox();
7 const Array4<Real>& src_arr = src->array(mfi);
8 if (box.length(0) != 1)
12 ParallelFor(box, [=] AMREX_GPU_DEVICE (
int i,
int j,
int k) {
14 if ((z_cc < 15000) && (z_cc > 380)) {
15 Real f_a[6] = {-1.22998448e-24, 5.86487977e-20, -1.11949167e-15,
16 1.03417521e-11, -3.80858898e-08, -1.39371490e-05};
18 for (
int ind = 1; ind < 6; ++ind) {
19 result = result * z_cc + f_a[ind];
21 src_arr(i, j, k) = result;
22 }
else if (z_cc <= 380) {
23 Real f_a[2] = {1.73461284e-08, -3.00569096e-05};
25 for (
int ind = 1; ind < 2; ++ind) {
26 result = result * z_cc + f_a[ind];
28 src_arr(i, j, k) = result;
30 src_arr(i, j, k) = 0.0;
ParallelFor(fab_box, [=] AMREX_GPU_DEVICE(int i, int j, int k) { qrcuten_arr(i, j, k)=Real(0);qscuten_arr(i, j, k)=Real(0);qicuten_arr(i, j, k)=Real(0);})
amrex::Real Real
Definition: ERF_ShocInterface.H:19
bool use_zlevels
Definition: ERF_UpdateRhoThetaSources_GATE.H:2
const auto dx
Definition: ERF_UpdateRhoThetaSources_GATE.H:1