Changeset 10355 for NEMO/trunk/src
- Timestamp:
- 2018-11-21T18:31:21+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/ASM/asminc.F90
r10068 r10355 911 911 ! Nudge sea ice depth to bring it up to a required minimum depth 912 912 WHERE( zseaicendg(:,:) > 0.0_wp .AND. hm_i(:,:) < zhicifmin ) 913 zhicifinc(:,:) = (zhicifmin - hm_i(:,:)) * zincwgt913 zhicifinc(:,:) = zhicifmin - hm_i(:,:) 914 914 ELSEWHERE 915 915 zhicifinc(:,:) = 0.0_wp
Note: See TracChangeset
for help on using the changeset viewer.