- 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/BDY/bdydyn2d.F90
r8865 r8870 170 170 ii = idx%nbi(jb,igrd) 171 171 ij = idx%nbj(jb,igrd) 172 IF( ln_wd .OR. ln_rwd) THEN172 IF( ln_wd_il .OR. ln_wd_dl ) THEN 173 173 spgu(ii, ij) = dta%ssh(jb) - rn_ssh_ref 174 174 ELSE
Note: See TracChangeset
for help on using the changeset viewer.