Changeset 8885 for branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/NST_SRC
- Timestamp:
- 2017-12-04T10:41:40+01:00 (6 years ago)
- Location:
- branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/NST_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/NST_SRC/agrif_lim3_interp.F90
r8882 r8885 52 52 !!----------------------------------------------------------------------- 53 53 ! 54 IF( Agrif_Root() .OR. nn_ice==0 ) RETURN ! clem2017:do not interpolate if inside Parent domain or if child domain does not have ice54 IF( Agrif_Root() .OR. nn_ice==0 ) RETURN ! do not interpolate if inside Parent domain or if child domain does not have ice 55 55 ! 56 56 SELECT CASE( cd_type ) -
branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/NST_SRC/agrif_lim3_update.F90
r8882 r8885 54 54 IF( ( MOD( (kt-nit000)/nn_fsbc + 1, Agrif_irhot() * Agrif_Parent(nn_fsbc) / nn_fsbc ) /=0 ) .AND. (kt /= 0) ) RETURN ! do not update if nb of child time steps differ from time refinement 55 55 ! i.e. update only at the parent time step 56 IF( nn_ice == 0 ) RETURN ! clem2017:do not update if child domain does not have ice56 IF( nn_ice == 0 ) RETURN ! do not update if child domain does not have ice 57 57 ! 58 58 Agrif_SpecialValueFineGrid = -9999.
Note: See TracChangeset
for help on using the changeset viewer.