psis Function

public elemental function psis(zeta) result(r)

Purpose

Evaluates the integrated similarity function for turbulent transfer of scalars, .

Method

Uses the Businger-Dyer form for unstable conditions () and the Beljaars-Holtslag form for stable conditions ().

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

References

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: zeta

current value of stability parameter (-)

Return Value real

OUT


Calls

proc~~psis~~CallsGraph proc~psis psis alog alog proc~psis->alog

Called by

proc~~psis~~CalledByGraph proc~psis psis proc~define_canopy define_canopy proc~define_canopy->proc~psis proc~cbm cbm proc~cbm->proc~define_canopy proc~mpidrv_worker~2 mpidrv_worker proc~mpidrv_worker~2->proc~cbm proc~serialdrv serialdrv proc~serialdrv->proc~cbm program~cable_offline_driver cable_offline_driver program~cable_offline_driver->proc~serialdrv