- Timestamp:
- 2015-07-10T18:09:23+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5107_hadgem3_cplfld/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90
r5575 r5592 1981 1981 & + 0.25 * ( v_ice(ji-1,jj-1) + v_ice(ji,jj-1) & 1982 1982 & + v_ice(ji-1,jj ) + v_ice(ji,jj ) ) * fr_i(ji,jj) 1983 END DO 1983 END DO 1984 END DO 1984 1985 #if defined key_cice 1985 1986 ELSE
Note: See TracChangeset
for help on using the changeset viewer.