Changeset 9107 for branches/2017
- Timestamp:
- 2017-12-15T19:03:37+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfphy.F90
r9106 r9107 298 298 IF( ln_isfcav ) THEN ; CALL lbc_lnk_multi( rCdU_top, 'T', 1. , rCdU_bot, 'T', 1. ) ! top & bot drag 299 299 ELSE ; CALL lbc_lnk ( rCdU_bot, 'T', 1. ) ! bottom drag only 300 ENDIF 300 301 ENDIF 301 302 !
Note: See TracChangeset
for help on using the changeset viewer.