#ifdef ALLOW_BBL

C     bbl_wvel    :: default vertical entrainment velocity (m/s)
C     bbl_hvvel   :: default horizontal velocity of BBL (m/s)
C     bbl_initEta :: default initial thickness of BBL (m)
      _RL                 bbl_wvel, bbl_hvel, bbl_initEta
      COMMON /BBL_PARM_R/ bbl_wvel, bbl_hvel, 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)
      _RL bbl_rho_nr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      COMMON /BBL_STATE_2D/ bbl_theta, bbl_salt, bbl_eta, bbl_rho_nr

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: ***
