Changeset 9242 for branches/UKMO/dev_r5518_new_runoff_coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90
- Timestamp:
- 2018-01-16T15:42:45+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_new_runoff_coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90
r8163 r9242 139 139 CALL cice_sbc_force(kt) 140 140 ELSE IF ( ksbc == jp_purecpl ) THEN 141 CALL sbc_cpl_ice_flx( 1.0-fr_i )141 CALL sbc_cpl_ice_flx( kt, 1.0-fr_i ) 142 142 ENDIF 143 143
Note: See TracChangeset
for help on using the changeset viewer.