neutral_wall_stress Subroutine

public pure subroutine neutral_wall_stress(u_sample, w_sample, kappa, roughness_length, sampling_height, tau_x, tau_z)

Neutral rough-wall drag law. Returns the wall value of the SGS stress tau_xy (and tau_yz), signed so that a positive sample gives a positive stress and hence a momentum sink once differentiated.

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: u_sample
real(kind=dp), intent(in) :: w_sample
real(kind=dp), intent(in) :: kappa
real(kind=dp), intent(in) :: roughness_length
real(kind=dp), intent(in) :: sampling_height
real(kind=dp), intent(out) :: tau_x
real(kind=dp), intent(out) :: tau_z

Calls

proc~~neutral_wall_stress~~CallsGraph proc~neutral_wall_stress m_les::neutral_wall_stress proc~neutral_drag_coefficient m_les::neutral_drag_coefficient proc~neutral_wall_stress->proc~neutral_drag_coefficient