REMORA
Regional Modeling of Oceans Refined Adaptively
Loading...
Searching...
No Matches
REMORA_InitAnalyticZeta_DogboneAnalytic.H
Go to the documentation of this file.
1 mf_zeta.setVal(0.0_rt);
2
3 for (MFIter mfi(mf_zeta, TilingIfNotGPU()); mfi.isValid(); ++mfi)
4 {
5 const Box &bx = mfi.growntilebox(IntVect(1,1,0));
6
7 Array4< Real> const& zeta = mf_zeta.array(mfi);
8 Array4<const Real> const& x_r = remora.vec_xr[lev]->const_array(mfi);
9
10 ParallelFor(bx, 3, [=] AMREX_GPU_DEVICE(int i, int j, int , int n) noexcept
11 {
12 if (x_r(i,j,0) < 1100.0_rt) {
13 zeta(i,j,0,n) = -0.00125_rt * (x_r(i,j,0) - 100.0_rt) + 1.25_rt;
14 }
15 });
16 }