ERF
Energy Research and Forecasting: An Atmospheric Modeling Code
ERF::ParticlePos Namespace Reference

Functions

AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real z_face_at_xy (amrex::Real x, amrex::Real y, int k_face, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &plo, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &dxi, amrex::Array4< amrex::Real const > const &height_arr) noexcept
 Bilinear interpolation of the height array at (x, y) for a given vertical node index k_face. More...
 
AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real z_from_zeta (amrex::Real x, amrex::Real y, amrex::Real zeta, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &plo, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &dxi, amrex::Array4< amrex::Real const > const &height_arr) noexcept
 Convert computational vertical coordinate zeta to physical z at column (x, y). More...
 
AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real zeta_from_z (amrex::Real x, amrex::Real y, amrex::Real z, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &plo, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &dxi, amrex::Array4< amrex::Real const > const &height_arr, int k_max) noexcept
 Convert physical z to computational vertical coordinate zeta at column (x, y). More...
 

Function Documentation

◆ z_face_at_xy()

AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real ERF::ParticlePos::z_face_at_xy ( amrex::Real  x,
amrex::Real  y,
int  k_face,
amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &  plo,
amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &  dxi,
amrex::Array4< amrex::Real const > const &  height_arr 
)
noexcept

Bilinear interpolation of the height array at (x, y) for a given vertical node index k_face.

Parameters
[in]xPhysical x-coordinate.
[in]yPhysical y-coordinate.
[in]k_faceVertical node index.
[in]ploLower bound of the box.
[in]dxiInverse grid spacing.
[in]height_arrArray of node-centered heights.
Returns
Physical height z at the specified coordinates.
41 {
42  const amrex::Real lx = (x - plo[0]) * dxi[0];
43  const amrex::Real ly = (y - plo[1]) * dxi[1];
44  // Keep the stencil (ix..ix+1, iy..iy+1) inside height_arr: a point on the upper
45  // boundary, or just past it, takes the boundary node's value instead of reading
46  // one node beyond the array
47  const auto hlo = amrex::lbound(height_arr);
48  const auto hhi = amrex::ubound(height_arr);
49  const int ix = amrex::Clamp(static_cast<int>(amrex::Math::floor(lx)), hlo.x, hhi.x - 1);
50  const int iy = amrex::Clamp(static_cast<int>(amrex::Math::floor(ly)), hlo.y, hhi.y - 1);
51  const amrex::Real fx = amrex::Clamp(lx - static_cast<amrex::Real>(ix), amrex::Real(0), amrex::Real(1));
52  const amrex::Real fy = amrex::Clamp(ly - static_cast<amrex::Real>(iy), amrex::Real(0), amrex::Real(1));
53  return height_arr(ix , iy , k_face) * (amrex::Real(1) - fx) * (amrex::Real(1) - fy)
54  + height_arr(ix+1, iy , k_face) * fx * (amrex::Real(1) - fy)
55  + height_arr(ix , iy+1, k_face) * (amrex::Real(1) - fx) * fy
56  + height_arr(ix+1, iy+1, k_face) * fx * fy;
57 }
const Real lx
Definition: ERF_InitCustomPertVels_CloudChamber.H:10
const Real ly
Definition: ERF_InitCustomPertVels_CloudChamber.H:11
amrex::Real Real
Definition: ERF_ShocInterface.H:19

Referenced by z_from_zeta(), and zeta_from_z().

Here is the caller graph for this function:

◆ z_from_zeta()

AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real ERF::ParticlePos::z_from_zeta ( amrex::Real  x,
amrex::Real  y,
amrex::Real  zeta,
amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &  plo,
amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &  dxi,
amrex::Array4< amrex::Real const > const &  height_arr 
)
noexcept

Convert computational vertical coordinate zeta to physical z at column (x, y).

Parameters
[in]xPhysical x-coordinate.
[in]yPhysical y-coordinate.
[in]zetaComputational vertical coordinate.
[in]ploLower bound of the box.
[in]dxiInverse grid spacing.
[in]height_arrArray of node-centered heights.
Returns
Physical height z.
81 {
82  if (!height_arr) {
83  return zeta; // no terrain: identity
84  }
85  const amrex::Real lz = (zeta - plo[AMREX_SPACEDIM-1]) * dxi[AMREX_SPACEDIM-1];
86  const int k = static_cast<int>(amrex::Math::floor(lz));
87  const amrex::Real fz = lz - static_cast<amrex::Real>(k);
88  const amrex::Real z_lo = z_face_at_xy(x, y, k , plo, dxi, height_arr);
89  const amrex::Real z_hi = z_face_at_xy(x, y, k + 1, plo, dxi, height_arr);
90  return (amrex::Real(1) - fz) * z_lo + fz * z_hi;
91 }
const Real lz
Definition: ERF_InitCustomPertVels_CloudChamber.H:12
AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real z_face_at_xy(amrex::Real x, amrex::Real y, int k_face, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &plo, amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &dxi, amrex::Array4< amrex::Real const > const &height_arr) noexcept
Bilinear interpolation of the height array at (x, y) for a given vertical node index k_face.
Definition: ERF_TerrainConversion.H:37
Here is the call graph for this function:

◆ zeta_from_z()

AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real ERF::ParticlePos::zeta_from_z ( amrex::Real  x,
amrex::Real  y,
amrex::Real  z,
amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &  plo,
amrex::GpuArray< amrex::Real, AMREX_SPACEDIM > const &  dxi,
amrex::Array4< amrex::Real const > const &  height_arr,
int  k_max 
)
noexcept

Convert physical z to computational vertical coordinate zeta at column (x, y).

Parameters
[in]xPhysical x-coordinate.
[in]yPhysical y-coordinate.
[in]zPhysical z-coordinate.
[in]ploLower bound of the box.
[in]dxiInverse grid spacing.
[in]height_arrArray of node-centered heights.
[in]k_maxLargest valid cell index in the level.
Returns
Computational vertical coordinate zeta.
117 {
118  if (!height_arr) {
119  return z; // no terrain: identity
120  }
121  const int k_lo = amrex::max(0, height_arr.begin[2]);
122  const int k_hi = amrex::min(k_max, height_arr.end[2] - 2);
123  int k = k_lo;
124  while (k < k_hi) {
125  const amrex::Real z_hi = z_face_at_xy(x, y, k + 1, plo, dxi, height_arr);
126  if (z < z_hi) { break; }
127  ++k;
128  }
129  const amrex::Real z_lo = z_face_at_xy(x, y, k , plo, dxi, height_arr);
130  const amrex::Real z_hi = z_face_at_xy(x, y, k + 1, plo, dxi, height_arr);
131  const amrex::Real fz = (z_hi > z_lo)
132  ? (z - z_lo) / (z_hi - z_lo)
133  : amrex::Real(0);
134  return plo[AMREX_SPACEDIM-1]
135  + (static_cast<amrex::Real>(k) + fz) / dxi[AMREX_SPACEDIM-1];
136 }
Here is the call graph for this function: