Changeset 196 for trunk/NEMO/OPA_SRC/TRA
- Timestamp:
- 2004-12-22T16:46:34+01:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/TRA/trabbl.F90
r106 r196 30 30 !! * Shared module variables 31 31 LOGICAL, PUBLIC, PARAMETER :: & !: 32 lk_trabbl_dif = .TRUE. !: diffusive bottom boundary layer flag 32 lk_trabbl_dif = .TRUE. !: diffusive bottom boundary layer flag 33 REAL(wp), PUBLIC :: & !!: * bbl namelist * 34 atrbbl = 1.e+3 !: lateral coeff. for bottom boundary 35 ! ! layer scheme (m2/s) 33 36 # if defined key_trabbl_adv 34 37 LOGICAL, PUBLIC, PARAMETER :: & !: … … 46 49 INTEGER, DIMENSION(jpi,jpj) :: & !: 47 50 mbkt, mbku, mbkv ! ??? 48 REAL(wp) :: & !!! * bbl namelist *49 atrbbl = 1.e+3 ! lateral coeff. for bottom boundary layer scheme (m2/s)50 51 51 52 !! * Substitutions
Note: See TracChangeset
for help on using the changeset viewer.