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(
zero
);
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) < Real(1100.0)) {
13
zeta(
i
,
j
,0,n) = Real(-0.00125) * (
x_r
(
i
,
j
,0) - Real(100.0)) + Real(1.25);
14
}
15
});
16
}
zero
constexpr amrex::Real zero
Definition
REMORA_Constants.H:6
setVal
mf_zeta setVal(zero)
Source
Prob
REMORA_InitAnalyticZeta_DogboneAnalytic.H
Generated by
1.9.8