The algebraic kb-equation

INTERFACE:

   subroutine kbalgebraic(nlev)

DESCRIPTION:

The algebraic equation for $k_b$ simply assumes equilibrium in (158),

$$P_b = \epsilon_b \quad .$$ (171)

This equation can be re-written as

$$k_b = \dfrac{k_b \epsilon}{k \epsilon_b} \dfrac{k}{\epsilon} P_b = r \dfrac{k}{\epsilon} P_b = c_b \dfrac{k}{\epsilon} P_b \; , \quad$$ (172)

where we used the definition of the time scale ratio $r$ in (66), and assumed that $r=c_b$ is a constant.

USES:

   use turbulence,  only:     tke,eps,kb,Pb
   use turbulence,  only:     ctt,kb_min
 
  IMPLICIT NONE

INPUT PARAMETERS:

 
  number of vertical layers
   integer,  intent(in)                 :: nlev

REVISION HISTORY:

   Original author(s): Lars Umlauf
   $Log: kbalgebraic.F90,v $
   Revision 1.1  2005-06-27 10:54:33  kbk
   new files needed