- Timestamp:
- 2017-12-01T10:48:12+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/ROMS_WAD_7832/NEMOGCM/NEMO/OPA_SRC/DYN/sshwzv.F90
r7753 r8870 94 94 ! ! After Sea Surface Height ! 95 95 ! !------------------------------! 96 IF(ln_wd ) THEN96 IF(ln_wd_il) THEN 97 97 CALL wad_lmt(sshb, zcoef * (emp_b(:,:) + emp(:,:)), z2dt) 98 98 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.