- Timestamp:
- 2018-03-22T18:55:41+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/LIM_SRC_3/iceitd.F90
r9398 r9421 714 714 IF(lwp) WRITE(numout,*) ' hi_max(:)= ', hi_max(0:jpl) 715 715 ! 716 IF( hi_max(1) < rn_himin ) CALL ctl_stop('ice_itd_init: the upper bound of the 1st category must be bigger than rn_himin') 717 ! 716 718 END SUBROUTINE ice_itd_init 717 719
Note: See TracChangeset
for help on using the changeset viewer.