- Timestamp:
- 2017-12-13T14:57:33+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/OPA_SRC/CRS/crsdomwri.F90
r6140 r9012 133 133 134 134 tmask_i_crs(:,:) = tmask_crs(:,:,1) 135 iif = jpreci136 iil = nlci_crs - jpreci+ 1137 ijf = jpreci138 ijl = nlcj_crs - jprecj+ 1135 iif = nn_hls 136 iil = nlci_crs - nn_hls + 1 137 ijf = nn_hls 138 ijl = nlcj_crs - nn_hls + 1 139 139 140 140 tmask_i_crs( 1:iif , : ) = 0._wp
Note: See TracChangeset
for help on using the changeset viewer.