INTERFACE:
subroutine cmue_d(nlev)DESCRIPTION:
This subroutine updates the explicit solution of (72) and (73) under the same assumptions as those discussed in section 4.26. Now, however, an additional equilibrium assumption is invoked. With the help of (80), one can write the equilibrium condition for the TKE as
USES:
use turbulence, only: an,as,at use turbulence, only: cmue1,cmue2 use turbulence, only: cm0 use turbulence, only: cc1 use turbulence, only: ct1,ctt use turbulence, only: a1,a2,a3,a4,a5 use turbulence, only: at1,at2,at3,at4,at5 IMPLICIT NONEINPUT PARAMETERS:
number of vertical layers integer, intent(in) :: nlevDEFINED PARAMETERS:
REALTYPE, parameter :: anLimitFact = 0.5D0 REALTYPE, parameter :: small = 1.0D-10REVISION HISTORY:
Original author(s): Lars Umlauf
Karsten Bolding 2012-12-28