bbl/code/BBL.h

C $Header: /u/gcmpack/MITgcm_contrib/bbl/code/BBL.h,v 1.1 2010/11/18 04:00:04 dimitri Exp $
C $Name:  $

#ifdef ALLOW_BBL

C     bbl_RelaxH  :: horizontal relaxation coefficient for
C                    transferring properties downslope (s)
C     bbl_RelaxR  :: vertical relaxation coefficient for exchanging
C                    properties with containing grid cell (s)
C     bbl_InitEta :: default bbl thickness
      _RL                 bbl_RelaxH, bbl_RelaxR, bbl_InitEta
      COMMON /BBL_PARM_R/ bbl_RelaxH, bbl_RelaxR, bbl_InitEta

C     file names for initial conditions:
      CHARACTER*(MAX_LEN_FNAM) bbl_thetaFile
      CHARACTER*(MAX_LEN_FNAM) bbl_saltFile
      CHARACTER*(MAX_LEN_FNAM) bbl_etaFile
      COMMON /BBL_PARM_C/ bbl_thetaFile, bbl_saltFile, bbl_etaFile

C     BBL 2-dim. fields
      _RL bbl_theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      _RL bbl_salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      _RL bbl_eta  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      COMMON /BBL_STATE_2D/ bbl_theta, bbl_salt, bbl_eta

C     BBL tendency terms
      _RL bbl_TendTheta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      _RL bbl_TendSalt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      COMMON /BBL_TENDENCY/ bbl_TendTheta, bbl_TendSalt

#endif /* ALLOW_BBL */

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	dimitri	1.2	C $Header: /u/gcmpack/MITgcm_contrib/bbl/code/BBL.h,v 1.1 2010/11/18 04:00:04 dimitri Exp $
2	dimitri	1.1	C $Name: $
3
4			#ifdef ALLOW_BBL
5
6			C bbl_RelaxH :: horizontal relaxation coefficient for
7			C transferring properties downslope (s)
8			C bbl_RelaxR :: vertical relaxation coefficient for exchanging
9			C properties with containing grid cell (s)
10			C bbl_InitEta :: default bbl thickness
11			_RL bbl_RelaxH, bbl_RelaxR, bbl_InitEta
12			COMMON /BBL_PARM_R/ bbl_RelaxH, bbl_RelaxR, bbl_InitEta
13
14			C file names for initial conditions:
15			CHARACTER*(MAX_LEN_FNAM) bbl_thetaFile
16			CHARACTER*(MAX_LEN_FNAM) bbl_saltFile
17			CHARACTER*(MAX_LEN_FNAM) bbl_etaFile
18			COMMON /BBL_PARM_C/ bbl_thetaFile, bbl_saltFile, bbl_etaFile
19
20			C BBL 2-dim. fields
21			_RL bbl_theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
22			_RL bbl_salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
23			_RL bbl_eta (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
24			COMMON /BBL_STATE_2D/ bbl_theta, bbl_salt, bbl_eta
25
26			C BBL tendency terms
27			_RL bbl_TendTheta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
28			_RL bbl_TendSalt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
29			COMMON /BBL_TENDENCY/ bbl_TendTheta, bbl_TendSalt
30
31			#endif /* ALLOW_BBL */
32
33			CEH3 ;;; Local Variables: ***
34			CEH3 ;;; mode:fortran ***
35			CEH3 ;;; End: ***