Update dimensionless alpha's (Source File: alpha_mnb.F90)


INTERFACE:

    subroutine alpha_mnb(nlev,NN,SS)
DESCRIPTION:

This subroutine updates the dimensionless numbers $ \alpha_M$, $ \alpha_N$, and $ \alpha_b$ according to (45). Note that according to (64) and (67) the following identities are valid

$\displaystyle \alpha_M = \overline{S}^2 \; , \quad \alpha_N = \overline{N}^2 \; , \quad \alpha_b = \overline{T} \quad .$ (149)


USES:

   use turbulence,  only:     tke,eps,kb
   use turbulence,  only:     as,an,at
   IMPLICIT NONE
INPUT PARAMETERS:
   integer,  intent(in)      :: nlev
   REALTYPE, intent(in)      :: NN(0:nlev),SS(0:nlev)
REVISION HISTORY:
    Original author(s): Lars Umlauf
    $Log: alpha_mnb.F90,v $
    Revision 1.2  2006-03-20 09:06:37  kbk
    removed explicit double precission dependency
    Revision 1.1  2005/06/27 10:54:33  kbk
    new files needed



Karsten Bolding 2012-01-24