INTERFACE:
subroutine stratification(nlev,buoy_method,dt,cnpar,nub,gamB)DESCRIPTION:
This routine computes the mean potential density,
, the mean
potential buoyancy,
, defined in (33), and the mean buoyancy
frequency,
The mean potential density is evaluated from the equation of state, (242), according to
Alternatively to the procedure outlined above, depending on the values of the
parameter buoy_method, the buoyancy may be calculated by means of the
transport equation (34). This equation then replaces the computation of
and
and is only recommended for idealized studies.
USES:
use meanflow, only: h,S,T,buoy,rho
use meanflow, only: NN,NNT,NNS
use meanflow, only: gravity,rho_0
use eqstate, only: eqstate1
IMPLICIT NONE
INPUT PARAMETERS:
number of vertical layers
integer, intent(in) :: nlev
method to compute buoyancy
integer, intent(in) :: buoy_method
time step (s)
REALTYPE, intent(in) :: dt
numerical "implicitness" parameter
REALTYPE, intent(in) :: cnpar
diffusivity of buoyancy (m^2/s)
REALTYPE, intent(in) :: nub(0:nlev)
non-local buoyancy flux (m^2/s^3)
REALTYPE, intent(in) :: gamb(0:nlev)
OUTPUT PARAMETERS:
REVISION HISTORY:
Original author(s): Karsten Bolding & Hans Burchard
$Log: stratification.F90,v $
Revision 1.7 2005-07-18 08:54:33 lars
changed docu for html compliance
Revision 1.6 2005/06/27 13:44:07 kbk
modified + removed traling blanks
Revision 1.5 2003/03/28 09:20:35 kbk
added new copyright to files
Revision 1.4 2003/03/28 08:56:56 kbk
removed tabs
Revision 1.3 2003/03/10 08:50:07 gotm
Improved documentation and cleaned up code
Revision 1.2 2001/11/18 11:50:37 gotm
Cleaned
Revision 1.1.1.1 2001/02/12 15:55:57 gotm
initial import into CVS
Karsten Bolding 2012-01-24