psis Function

public elemental function psis(zeta) result(r)

Purpose

Evaluates the integrated similarity function for turbulent transfer of scalars, $\psi_s(\xi)$.

Method

Uses the Businger-Dyer form for unstable conditions ($\xi<0$) and the Beljaars-Holtslag form for stable conditions ($\xi>0$).

This function is used in the evaluation of the resistance network component rt1usc in define_canopy.

References

• Beljaars and Holtslag (1991)
• Businger et al. (1971)
• Dyer (1974)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	zeta	current value of stability parameter $\xi$ (-)

Return Value real

OUT $\psi_s (\xi)$