Changeset 9239 for branches/2017
- Timestamp:
- 2018-01-15T18:22:41+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/DYN/sshwzv.F90
r9124 r9239 244 244 ENDIF 245 245 ! !== Euler time-stepping: no filter, just swap ==! 246 IF ( neuler == 0 .AND. kt == nit000 ) THEN 247 sshb(:,:) = sshn(:,:) ! before <-- now 246 IF ( neuler == 0 .AND. kt == nit000 ) THEN 248 247 sshn(:,:) = ssha(:,:) ! now <-- after (before already = now) 249 248 !
Note: See TracChangeset
for help on using the changeset viewer.