m_modnet_z0corr Module

Corrects ustar and Obukhov length to a target roughness length. Assumptions: wind speed at 50 m is roughness-invariant; direct temperature-effect corrections are not applied.

Uses

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Subroutines

public subroutine modmet_solve_z0_corr(z0_in, z0_lu, ol_old, ust_old, ol_new, ust_new, max_iter, tol, min_change)

Internal residual function for roughness-length correction.

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	z0_in	source roughness length [m]
real,	intent(in)			::	z0_lu	target roughness length [m]
real,	intent(in)			::	ol_old	original Obukhov length [m]
real,	intent(in)			::	ust_old	original friction velocity [m/s]
real,	intent(out)			::	ol_new	corrected Obukhov length [m]
real,	intent(out)			::	ust_new	corrected friction velocity [m/s]
integer,	intent(in),	optional		::	max_iter	maximum iterations for root-finding (default 40)
real,	intent(in),	optional		::	tol	convergence tolerance for root-finding (default 0.015)
real,	intent(in),	optional		::	min_change	minimum change for convergence (default 0.1)