ERF
Energy Research and Forecasting: An Atmospheric Modeling Code
adiabatic_charnock Struct Reference

#include <ERF_MOSTStress.H>

Collaboration diagram for adiabatic_charnock:

Public Member Functions

 adiabatic_charnock (amrex::Real Tflux, amrex::Real Qvflux, amrex::Real cnk_a, bool use_visc)
 
AMREX_GPU_DEVICE AMREX_FORCE_INLINE void iterate_flux (const int &i, const int &j, const int &k, const int &max_iters, const amrex::Array4< const amrex::Real > &zref_arr, const amrex::Array4< amrex::Real > &z0_arr, const amrex::Array4< const amrex::Real > &umm_arr, const amrex::Array4< const amrex::Real > &tm_arr, const amrex::Array4< const amrex::Real > &, const amrex::Array4< const amrex::Real > &, const amrex::Array4< amrex::Real > &u_star_arr, const amrex::Array4< amrex::Real > &, const amrex::Array4< amrex::Real > &t_star_arr, const amrex::Array4< amrex::Real > &q_star_arr, const amrex::Array4< amrex::Real > &, const amrex::Array4< amrex::Real > &, const amrex::Array4< amrex::Real > &olen_arr, const amrex::Array4< amrex::Real > &, const amrex::Array4< amrex::Real > &, const amrex::Array4< amrex::Real > &, const amrex::Array4< amrex::Real > &) const
 

Private Attributes

most_data mdata
 
similarity_funs sfuns
 
const amrex::Real tol_z = amrex::Real(1.0e-10)
 
const amrex::Real WSMIN = most_min_wind_speed
 

Detailed Description

Adiabatic with charnock roughness

Constructor & Destructor Documentation

◆ adiabatic_charnock()

adiabatic_charnock::adiabatic_charnock ( amrex::Real  Tflux,
amrex::Real  Qvflux,
amrex::Real  cnk_a,
bool  use_visc 
)
inline

Construct adiabatic Charnock-roughness MOST data.

Parameters
[in]Tfluxprescribed heat flux
[in]Qvfluxprescribed moisture flux
[in]cnk_aCharnock parameter
[in]cnk_viscwhether to include viscous roughness
99  {
100  mdata.surf_temp_flux = Tflux;
101  mdata.surf_moist_flux = Qvflux;
102  mdata.Cnk_a = cnk_a;
103  mdata.visc = use_visc;
104  }
most_data mdata
Definition: ERF_MOSTStress.H:182
amrex::Real surf_moist_flux
Moisture flux.
Definition: ERF_MOSTUtils.H:19
amrex::Real Cnk_a
Standard Charnock constant https://doi.org/amrex::Real(10.1175)/JAMC-D-17-amrex::Real(0137....
Definition: ERF_MOSTUtils.H:21
bool visc
Use viscous Charnock formulation.
Definition: ERF_MOSTUtils.H:26
amrex::Real surf_temp_flux
Heat flux TODO: decide whether this is <θ'w'> or <θv'w'> under moist conditions.
Definition: ERF_MOSTUtils.H:18

Member Function Documentation

◆ iterate_flux()

AMREX_GPU_DEVICE AMREX_FORCE_INLINE void adiabatic_charnock::iterate_flux ( const int &  i,
const int &  j,
const int &  k,
const int &  max_iters,
const amrex::Array4< const amrex::Real > &  zref_arr,
const amrex::Array4< amrex::Real > &  z0_arr,
const amrex::Array4< const amrex::Real > &  umm_arr,
const amrex::Array4< const amrex::Real > &  tm_arr,
const amrex::Array4< const amrex::Real > &  ,
const amrex::Array4< const amrex::Real > &  ,
const amrex::Array4< amrex::Real > &  u_star_arr,
const amrex::Array4< amrex::Real > &  ,
const amrex::Array4< amrex::Real > &  t_star_arr,
const amrex::Array4< amrex::Real > &  q_star_arr,
const amrex::Array4< amrex::Real > &  ,
const amrex::Array4< amrex::Real > &  ,
const amrex::Array4< amrex::Real > &  olen_arr,
const amrex::Array4< amrex::Real > &  ,
const amrex::Array4< amrex::Real > &  ,
const amrex::Array4< amrex::Real > &  ,
const amrex::Array4< amrex::Real > &   
) const
inline

Iterate MOST state for one surface point.

Calling sequence
i, j, k, max_iters, zref_arr, z0_arr, umm_arr, tm_arr, tvm_arr, qvm_arr, u_star_arr, w_star_arr, t_star_arr, q_star_arr, t_surf_arr, q_surf_arr, olen_arr, pblh_arr, Hwave_arr, Lwave_arr, eta_arr.
139  {
141  amrex::Real zref = zref_arr(i,j,k);
142  amrex::Real z0 = z0_arr(i,j,k);
143  amrex::Real z0_old = z0;
144  amrex::Real psi_m = zero;
145  amrex::Real umm = std::max(umm_arr(i,j,k), WSMIN);
146  amrex::Real C = std::log(zref / z0);
147 
148  // Fixed point iteration on roughness
149  int iter_z = 0;
150  do {
151  // Transfer curr to old
152  z0_old = z0;
153 
154  // Update
155  C = std::log(zref / z0_old);
156  ustar = mdata.kappa * umm / most_bracket(C, psi_m);
157  if (mdata.Cnk_a > 0) {
158  // NOTE: air_viscosity should take T and not Th!
160  air_viscosity(tm_arr(i,j,k)), mdata.visc);
161  } else {
162  // NOTE: air_viscosity should take T and not Th!
163  z0 = COARE3_roughness(zref, umm, ustar,
164  air_viscosity(tm_arr(i,j,k)), mdata.visc);
165  }
166 
167  ++iter_z;
168  } while ( (std::abs(z0 - z0_old) > tol_z) && (iter_z <= max_iters) );
169  AMREX_ALWAYS_ASSERT_WITH_MESSAGE(iter_z < max_iters,
170  "Maximum number of MOST roughness iterations reached.");
171  C = std::log(zref / z0);
172 
173  // Populate the stored MOST arrays
174  z0_arr(i,j,k) = z0;
175  olen_arr(i,j,k) = bogus_large_value;
176  u_star_arr(i,j,k) = mdata.kappa * umm / most_bracket(C, psi_m);
177  t_star_arr(i,j,k) = zero;
178  q_star_arr(i,j,k) = zero;
179  }
constexpr amrex::Real bogus_large_value
Definition: ERF_Constants.H:19
Real z0
Definition: ERF_InitCustomPertVels_ScalarAdvDiff.H:12
AMREX_ALWAYS_ASSERT_WITH_MESSAGE(axis >=0 &&axis< AMREX_SPACEDIM, "prob.axis must be 0, 1 or 2")
AMREX_GPU_HOST_DEVICE AMREX_FORCE_INLINE amrex::Real most_bracket(amrex::Real C, amrex::Real psi)
Definition: ERF_MOSTUtils.H:255
AMREX_GPU_DEVICE AMREX_FORCE_INLINE amrex::Real COARE3_roughness(amrex::Real zref, amrex::Real umm, amrex::Real ustar, amrex::Real nu, bool visc)
Definition: ERF_MOSTUtils.H:645
AMREX_GPU_DEVICE AMREX_FORCE_INLINE amrex::Real air_viscosity(amrex::Real T_degK)
Definition: ERF_MOSTUtils.H:581
AMREX_GPU_DEVICE AMREX_FORCE_INLINE amrex::Real Charnock_roughness(amrex::Real ustar, amrex::Real Cnk_a, amrex::Real nu, bool visc)
Definition: ERF_MOSTUtils.H:600
constexpr amrex::Real zero
Definition: ERF_NumericalConstants.H:36
amrex::Real Real
Definition: ERF_ShocInterface.H:19
@ ustar
Definition: ERF_SLM.H:28
const amrex::Real WSMIN
Definition: ERF_MOSTStress.H:189
const amrex::Real tol_z
Definition: ERF_MOSTStress.H:187
amrex::Real kappa
von Karman constant
Definition: ERF_MOSTUtils.H:16
Here is the call graph for this function:

Member Data Documentation

◆ mdata

most_data adiabatic_charnock::mdata
private

Referenced by adiabatic_charnock(), and iterate_flux().

◆ sfuns

similarity_funs adiabatic_charnock::sfuns
private

◆ tol_z

const amrex::Real adiabatic_charnock::tol_z = amrex::Real(1.0e-10)
private

Referenced by iterate_flux().

◆ WSMIN

const amrex::Real adiabatic_charnock::WSMIN = most_min_wind_speed
private

Referenced by iterate_flux().


The documentation for this struct was generated from the following file: