- Timestamp:
- 2014-11-27T17:13:38+01:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_CNRS_2014/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim_2.F90
r4901 r4902 53 53 USE agrif_lim2_update 54 54 # endif 55 56 #if defined key_bdy 57 USE bdyice_lim ! unstructured open boundary data (bdy_ice_lim routine) 58 #endif 55 59 56 60 IMPLICIT NONE … … 217 221 CALL lim_trp_2 ( kt ) ! Ice transport ( Advection/diffusion ) 218 222 IF( ln_limdmp ) CALL lim_dmp_2 ( kt ) ! Ice damping 223 #if defined key_bdy 224 CALL bdy_ice_lim( kt ) ! bdy ice thermo 225 #endif 219 226 END IF 220 227 ! ! Ice surface fluxes in coupled mode
Note: See TracChangeset
for help on using the changeset viewer.