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
 
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
 
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
 

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
30 {
31  const amrex::Real lx = (x - plo[0]) * dxi[0];
32  const amrex::Real ly = (y - plo[1]) * dxi[1];
33  const int ix = static_cast<int>(amrex::Math::floor(lx));
34  const int iy = static_cast<int>(amrex::Math::floor(ly));
35  const amrex::Real fx = lx - static_cast<amrex::Real>(ix);
36  const amrex::Real fy = ly - static_cast<amrex::Real>(iy);
37  return height_arr(ix , iy , k_face) * (amrex::Real(1) - fx) * (amrex::Real(1) - fy)
38  + height_arr(ix+1, iy , k_face) * fx * (amrex::Real(1) - fy)
39  + height_arr(ix , iy+1, k_face) * (amrex::Real(1) - fx) * fy
40  + height_arr(ix+1, iy+1, k_face) * fx * fy;
41 }
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
55 {
56  if (!height_arr) {
57  return zeta; // no terrain: identity
58  }
59  const amrex::Real lz = (zeta - plo[AMREX_SPACEDIM-1]) * dxi[AMREX_SPACEDIM-1];
60  const int k = static_cast<int>(amrex::Math::floor(lz));
61  const amrex::Real fz = lz - static_cast<amrex::Real>(k);
62  const amrex::Real z_lo = z_face_at_xy(x, y, k , plo, dxi, height_arr);
63  const amrex::Real z_hi = z_face_at_xy(x, y, k + 1, plo, dxi, height_arr);
64  return (amrex::Real(1) - fz) * z_lo + fz * z_hi;
65 }
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
Definition: ERF_TerrainConversion.H:26
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
80 {
81  if (!height_arr) {
82  return z; // no terrain: identity
83  }
84  const int k_lo = amrex::max(0, height_arr.begin[2]);
85  const int k_hi = amrex::min(k_max, height_arr.end[2] - 2);
86  int k = k_lo;
87  while (k < k_hi) {
88  const amrex::Real z_hi = z_face_at_xy(x, y, k + 1, plo, dxi, height_arr);
89  if (z < z_hi) { break; }
90  ++k;
91  }
92  const amrex::Real z_lo = z_face_at_xy(x, y, k , plo, dxi, height_arr);
93  const amrex::Real z_hi = z_face_at_xy(x, y, k + 1, plo, dxi, height_arr);
94  const amrex::Real fz = (z_hi > z_lo)
95  ? (z - z_lo) / (z_hi - z_lo)
96  : amrex::Real(0);
97  return plo[AMREX_SPACEDIM-1]
98  + (static_cast<amrex::Real>(k) + fz) / dxi[AMREX_SPACEDIM-1];
99 }
Here is the call graph for this function: