CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ yang_2008()

subroutine module_sf_mynn::yang_2008 ( real(kind_phys), intent(in) z_0,
real(kind_phys), intent(out) zt,
real(kind_phys), intent(out) zq,
real(kind_phys), intent(in) ustar,
real(kind_phys), intent(in) tstar,
real(kind_phys), intent(in) qst,
real(kind_phys), intent(in) ren,
real(kind_phys), intent(in) visc )

The original formulation relates the thermal roughness length (Zt) to u* and T*:

Zt = ht * EXP(-beta*(ustar**0.5)*(ABS(tstar)**0.25))

where ht = Renc*visc/ustar and the critical Reynolds number (Renc) = 70. Beta was originally = 10 (2002 paper) but was revised to 7.2 (in 2008 paper). Their form typically varies the ratio Z0/Zt by a few orders of magnitude (1-1E4).

This modified form uses beta = 1.5 and a variable Renc (function of Z_0), so zt generally varies similarly to the Zilitinkevich form (with Czil = 0.1) for very small or negative surface heat fluxes but can become close to the Zilitinkevich with Czil = 0.2 for very large HFX (large negative T*). Also, the exponent (0.25) on tstar was changed to 1.0, since we found Zt was reduced too much for low-moderate positive heat fluxes.

This should only be used over land!

Definition at line 2885 of file module_sf_mynn.F90.

Referenced by sfclay1d_mynn().

Here is the caller graph for this function: