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

#include <ERF_MOSTStress.H>

Collaboration diagram for adiabatic_wave_coupled:

Public Member Functions

 adiabatic_wave_coupled (amrex::Real zref, amrex::Real Tflux, amrex::Real Qvflux)
 
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< amrex::Real > &z0_arr, const amrex::Array4< const amrex::Real > &umm_arr, const amrex::Array4< const amrex::Real > &, 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 > &Hwave_arr, const amrex::Array4< amrex::Real > &Lwave_arr, const amrex::Array4< amrex::Real > &eta_arr) const
 

Private Attributes

most_data mdata
 
similarity_funs sfuns
 
const amrex::Real tol = 1.0e-5
 
const amrex::Real eps = 1e-15
 
const amrex::Real z0_eps = 1.0e-6
 
const amrex::Real z0_max = 0.1
 
const amrex::Real WSMIN = 0.1
 

Detailed Description

Adiabatic with wave-coupled roughness

Constructor & Destructor Documentation

◆ adiabatic_wave_coupled()

adiabatic_wave_coupled::adiabatic_wave_coupled ( amrex::Real  zref,
amrex::Real  Tflux,
amrex::Real  Qvflux 
)
inline
435  {
436  mdata.zref = zref;
437  mdata.surf_temp_flux = Tflux;
438  mdata.surf_moist_flux = Qvflux;
439  }
most_data mdata
Definition: ERF_MOSTStress.H:493
amrex::Real surf_moist_flux
Moisture flux.
Definition: ERF_MOSTStress.H:20
amrex::Real zref
Reference height (m)
Definition: ERF_MOSTStress.H:15
amrex::Real surf_temp_flux
Heat flux TODO: decide whether this is <θ'w'> or <θv'w'> under moist conditions.
Definition: ERF_MOSTStress.H:19

Member Function Documentation

◆ iterate_flux()

AMREX_GPU_DEVICE AMREX_FORCE_INLINE void adiabatic_wave_coupled::iterate_flux ( const int &  i,
const int &  j,
const int &  k,
const int &  max_iters,
const amrex::Array4< amrex::Real > &  z0_arr,
const amrex::Array4< const amrex::Real > &  umm_arr,
const amrex::Array4< const amrex::Real > &  ,
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 > &  Hwave_arr,
const amrex::Array4< amrex::Real > &  Lwave_arr,
const amrex::Array4< amrex::Real > &  eta_arr 
) const
inline
464  {
465  int iter = 0;
466  amrex::Real umm = std::max(umm_arr(i,j,k), WSMIN);
467  amrex::Real ustar = 0.0;
468  amrex::Real z0 = 0.0;
469  int ie, je;
470  ie = i < lbound(eta_arr).x ? lbound(eta_arr).x : i;
471  je = j < lbound(eta_arr).y ? lbound(eta_arr).y : j;
472  ie = ie > ubound(eta_arr).x ? ubound(eta_arr).x : ie;
473  je = je > ubound(eta_arr).y ? ubound(eta_arr).y : je;
474  u_star_arr(i,j,k) = mdata.kappa * umm / std::log(mdata.zref / z0_arr(i,j,k));
475  do {
476  ustar = u_star_arr(i,j,k);
477  z0 = std::min( std::max(1200.0 * Hwave_arr(i,j,k) * std::pow( Hwave_arr(i,j,k)/(Lwave_arr(i,j,k)+eps), 4.5 )
478  + 0.11 * eta_arr(ie,je,k,EddyDiff::Mom_v) / ustar, z0_eps), z0_max );
479  u_star_arr(i,j,k) = mdata.kappa * umm / std::log(mdata.zref / z0);
480  ++iter;
481  } while ((std::abs(u_star_arr(i,j,k) - ustar) > tol) && iter <= max_iters);
482  AMREX_ALWAYS_ASSERT_WITH_MESSAGE(iter < max_iters,
483  "Maximum number of MOST iterations reached.");
484 
485  // Populate the stored MOST arrays
486  z0_arr(i,j,k) = z0;
487  olen_arr(i,j,k) = 1.0e16;
488  t_star_arr(i,j,k) = 0.0;
489  q_star_arr(i,j,k) = 0.0;
490  }
amrex::Real Real
Definition: ERF_ShocInterface.H:19
@ Mom_v
Definition: ERF_IndexDefines.H:175
const amrex::Real eps
Definition: ERF_MOSTStress.H:496
const amrex::Real z0_eps
Definition: ERF_MOSTStress.H:497
const amrex::Real WSMIN
Definition: ERF_MOSTStress.H:499
const amrex::Real tol
Definition: ERF_MOSTStress.H:495
const amrex::Real z0_max
Definition: ERF_MOSTStress.H:498
amrex::Real kappa
von Karman constant
Definition: ERF_MOSTStress.H:17

Member Data Documentation

◆ eps

const amrex::Real adiabatic_wave_coupled::eps = 1e-15
private

Referenced by iterate_flux().

◆ mdata

most_data adiabatic_wave_coupled::mdata
private

◆ sfuns

similarity_funs adiabatic_wave_coupled::sfuns
private

◆ tol

const amrex::Real adiabatic_wave_coupled::tol = 1.0e-5
private

Referenced by iterate_flux().

◆ WSMIN

const amrex::Real adiabatic_wave_coupled::WSMIN = 0.1
private

Referenced by iterate_flux().

◆ z0_eps

const amrex::Real adiabatic_wave_coupled::z0_eps = 1.0e-6
private

Referenced by iterate_flux().

◆ z0_max

const amrex::Real adiabatic_wave_coupled::z0_max = 0.1
private

Referenced by iterate_flux().


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