Changeset 2132 for branches/devmercator2010_1/NEMO/OPA_SRC/ZDF/zdfbfr.F90
- Timestamp:
- 2010-09-29T17:31:36+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/devmercator2010_1/NEMO/OPA_SRC/ZDF/zdfbfr.F90
r1708 r2132 29 29 30 30 REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: bfrua , bfrva !: Bottom friction coefficients set in zdfbfr 31 #if defined key_zdfgls 32 REAL(wp), PUBLIC :: rn_hbro = 0.003_wp ! Bottom roughness (m) 33 REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: wbotu, wbotv ! Bottom stresses 34 #endif 31 35 32 36 ! !!* Namelist nambfr: bottom friction namelist *
Note: See TracChangeset
for help on using the changeset viewer.