monin_obukhov_inter

Utility routines to be used in monin_obukhov_mod. More...

Data Types
interface	monin_obukhov_derivative_m
interface	monin_obukhov_derivative_t
interface	monin_obukhov_drag_1d
interface	monin_obukhov_integral_m
interface	monin_obukhov_integral_tq
interface	monin_obukhov_profile_1d
interface	monin_obukhov_solve_zeta
interface	monin_obukhov_stable_mix

Functions/Subroutines
pure subroutine	monin_obukhov_derivative_m_ (stable_option, rich_crit, zeta_trans, n, phi_m, zeta, mask, ier)
	monin_obukhov_derivative_m_r4
	monin_obukhov_derivative_m_r8
pure subroutine	monin_obukhov_derivative_t_ (stable_option, new_mo_option, rich_crit, zeta_trans, n, phi_t, zeta, mask, ier)
	The differential similarity function for buoyancy and tracers.
	monin_obukhov_derivative_t_r4
	monin_obukhov_derivative_t_r8
pure subroutine	monin_obukhov_diff_ (vonkarm, ustar_min, neutral, stable_option, new_mo_option, rich_crit, zeta_trans, ni, nj, nk, z, u_star, b_star, k_m, k_h, ier)
	monin_obukhov_diff_r4
	monin_obukhov_diff_r8
pure subroutine	monin_obukhov_drag_1d_ (grav, vonkarm, error, zeta_min, max_iter, small, neutral, stable_option, new_mo_option, rich_crit, zeta_trans, drag_min_heat, drag_min_moist, drag_min_mom, n, pt, pt0, z, z0, zt, zq, speed, drag_m, drag_t, drag_q, u_star, b_star, lavail, avail, ier)
	monin_obukhov_drag_1d_r4
	monin_obukhov_drag_1d_r8
pure subroutine	monin_obukhov_integral_m_ (stable_option, rich_crit, zeta_trans, n, psi_m, zeta, zeta_0, ln_z_z0, mask, ier)
	The integral similarity function for momentum.
	monin_obukhov_integral_m_r4
	monin_obukhov_integral_m_r8
pure subroutine	monin_obukhov_integral_tq_ (stable_option, new_mo_option, rich_crit, zeta_trans, n, psi_t, psi_q, zeta, zeta_t, zeta_q, ln_z_zt, ln_z_zq, mask, ier)
	The integral similarity function for moisture and tracers.
	monin_obukhov_integral_tq_r4
	monin_obukhov_integral_tq_r8
pure subroutine	monin_obukhov_profile_1d_ (vonkarm, neutral, stable_option, new_mo_option, rich_crit, zeta_trans, n, zref, zref_t, z, z0, zt, zq, u_star, b_star, q_star, del_m, del_t, del_q, lavail, avail, ier)
	monin_obukhov_profile_1d_r4
	monin_obukhov_profile_1d_r8
pure subroutine	monin_obukhov_solve_zeta_ (error, zeta_min, max_iter, small, stable_option, new_mo_option, rich_crit, zeta_trans, n, rich, z, z0, zt, zq, f_m, f_t, f_q, mask, ier)
	monin_obukhov_solve_zeta_r4
	monin_obukhov_solve_zeta_r8
pure subroutine	monin_obukhov_stable_mix_ (stable_option, rich_crit, zeta_trans, n, rich, mix, ier)
	monin_obukhov_stable_mix_r4
	monin_obukhov_stable_mix_r8

Detailed Description

Utility routines to be used in monin_obukhov_mod.

---

Data Type Documentation

monin_obukhov_inter::monin_obukhov_derivative_m

interface monin_obukhov_inter::monin_obukhov_derivative_m

Definition at line 58 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_derivative_m_r4
	monin_obukhov_derivative_m_r8

monin_obukhov_inter::monin_obukhov_derivative_t

interface monin_obukhov_inter::monin_obukhov_derivative_t

Definition at line 54 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_derivative_t_r4
	monin_obukhov_derivative_t_r8

monin_obukhov_inter::monin_obukhov_drag_1d

interface monin_obukhov_inter::monin_obukhov_drag_1d

Definition at line 46 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_drag_1d_r4
	monin_obukhov_drag_1d_r8

monin_obukhov_inter::monin_obukhov_integral_m

interface monin_obukhov_inter::monin_obukhov_integral_m

Definition at line 66 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_integral_m_r4
	monin_obukhov_integral_m_r8

monin_obukhov_inter::monin_obukhov_integral_tq

interface monin_obukhov_inter::monin_obukhov_integral_tq

Definition at line 70 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_integral_tq_r4
	monin_obukhov_integral_tq_r8

monin_obukhov_inter::monin_obukhov_profile_1d

interface monin_obukhov_inter::monin_obukhov_profile_1d

Definition at line 62 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_profile_1d_r4
	monin_obukhov_profile_1d_r8

monin_obukhov_inter::monin_obukhov_solve_zeta

interface monin_obukhov_inter::monin_obukhov_solve_zeta

Definition at line 50 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_solve_zeta_r4
	monin_obukhov_solve_zeta_r8

monin_obukhov_inter::monin_obukhov_stable_mix

interface monin_obukhov_inter::monin_obukhov_stable_mix

Definition at line 74 of file monin_obukhov_inter.F90.

Private Member Functions
	monin_obukhov_stable_mix_r4
	monin_obukhov_stable_mix_r8

Function/Subroutine Documentation

monin_obukhov_diff_()

pure subroutine monin_obukhov_diff_	(	real(kind=fms_mo_kind_), intent(in)	vonkarm,
		real(kind=fms_mo_kind_), intent(in)	ustar_min,
		logical, intent(in)	neutral,
		integer, intent(in)	stable_option,
		logical, intent(in)	new_mo_option,
		real(kind=fms_mo_kind_), intent(in)	rich_crit,
		real(kind=fms_mo_kind_), intent(in)	zeta_trans,
		integer, intent(in)	ni,
		integer, intent(in)	nj,
		integer, intent(in)	nk,
		real(kind=fms_mo_kind_), dimension(ni, nj, nk), intent(in)	z,
		real(kind=fms_mo_kind_), dimension(ni, nj), intent(in)	u_star,
		real(kind=fms_mo_kind_), dimension(ni, nj), intent(in)	b_star,
		real(kind=fms_mo_kind_), dimension(ni, nj, nk), intent(out)	k_m,
		real(kind=fms_mo_kind_), dimension(ni, nj, nk), intent(out)	k_h,
		integer, intent(out)	ier
	)

Parameters

[in]

ustar_min

= 1.0E-10

Definition at line 24 of file monin_obukhov_inter.inc.

monin_obukhov_drag_1d_()

pure subroutine monin_obukhov_drag_1d_	(	real(kind=fms_mo_kind_), intent(in)	grav,
		real(kind=fms_mo_kind_), intent(in)	vonkarm,
		real(kind=fms_mo_kind_), intent(in)	error,
		real(kind=fms_mo_kind_), intent(in)	zeta_min,
		integer, intent(in)	max_iter,
		real(kind=fms_mo_kind_), intent(in)	small,
		logical, intent(in)	neutral,
		integer, intent(in)	stable_option,
		logical, intent(in)	new_mo_option,
		real(kind=fms_mo_kind_), intent(in)	rich_crit,
		real(kind=fms_mo_kind_), intent(in)	zeta_trans,
		real(kind=fms_mo_kind_), intent(in)	drag_min_heat,
		real(kind=fms_mo_kind_), intent(in)	drag_min_moist,
		real(kind=fms_mo_kind_), intent(in)	drag_min_mom,
		integer, intent(in)	n,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	pt,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	pt0,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	z,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	z0,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	zt,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	zq,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	speed,
		real(kind=fms_mo_kind_), dimension(n), intent(inout)	drag_m,
		real(kind=fms_mo_kind_), dimension(n), intent(inout)	drag_t,
		real(kind=fms_mo_kind_), dimension(n), intent(inout)	drag_q,
		real(kind=fms_mo_kind_), dimension(n), intent(inout)	u_star,
		real(kind=fms_mo_kind_), dimension(n), intent(inout)	b_star,
		logical, intent(in)	lavail,
		logical, dimension(n), intent(in)	avail,
		integer, intent(out)	ier
	)

Parameters

[in]	error	= 1.0E-04
[in]	zeta_min	= 1.0E-06
[in]	max_iter	= 20
[in]	small	= 1.0E-04
[in]	lavail	whether to use provided mask or not
[in]	avail	provided mask

Definition at line 72 of file monin_obukhov_inter.inc.

monin_obukhov_profile_1d_()

pure subroutine monin_obukhov_profile_1d_	(	real(kind=fms_mo_kind_), intent(in)	vonkarm,
		logical, intent(in)	neutral,
		integer, intent(in)	stable_option,
		logical, intent(in)	new_mo_option,
		real(kind=fms_mo_kind_), intent(in)	rich_crit,
		real(kind=fms_mo_kind_), intent(in)	zeta_trans,
		integer, intent(in)	n,
		real(kind=fms_mo_kind_), intent(in)	zref,
		real(kind=fms_mo_kind_), intent(in)	zref_t,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	z,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	z0,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	zt,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	zq,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	u_star,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	b_star,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	q_star,
		real(kind=fms_mo_kind_), dimension(n), intent(out)	del_m,
		real(kind=fms_mo_kind_), dimension(n), intent(out)	del_t,
		real(kind=fms_mo_kind_), dimension(n), intent(out)	del_q,
		logical, intent(in)	lavail,
		logical, dimension(n), intent(in)	avail,
		integer, intent(out)	ier
	)

Parameters

[in]	lavail	whether to use provided mask or not
[in]	avail	provided mask

Definition at line 408 of file monin_obukhov_inter.inc.

monin_obukhov_solve_zeta_()

pure subroutine monin_obukhov_solve_zeta_	(	real(kind=fms_mo_kind_), intent(in)	error,
		real(kind=fms_mo_kind_), intent(in)	zeta_min,
		integer, intent(in)	max_iter,
		real(kind=fms_mo_kind_), intent(in)	small,
		integer, intent(in)	stable_option,
		logical, intent(in)	new_mo_option,
		real(kind=fms_mo_kind_), intent(in)	rich_crit,
		real(kind=fms_mo_kind_), intent(in)	zeta_trans,
		integer, intent(in)	n,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	rich,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	z,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	z0,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	zt,
		real(kind=fms_mo_kind_), dimension(n), intent(in)	zq,
		real(kind=fms_mo_kind_), dimension(n), intent(out)	f_m,
		real(kind=fms_mo_kind_), dimension(n), intent(out)	f_t,
		real(kind=fms_mo_kind_), dimension(n), intent(out)	f_q,
		logical, dimension(n), intent(in)	mask,
		integer, intent(out)	ier
	)

Parameters

[in]	error	= 1.0E-04
[in]	zeta_min	= 1.0E-06
[in]	max_iter	= 20
[in]	small	= 1.0E-04

Definition at line 184 of file monin_obukhov_inter.inc.