- Timestamp:
- 2014-07-23T18:27:21+02:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4650_UKMO2_ice_shelves/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90
r4666 r4726 1152 1152 END DO 1153 1153 1154 tmask_i (:,:) = lmask(:,:) * tmask_i(:,:)1154 tmask_i (:,:) = ssmask(:,:) * tmask_i(:,:) 1155 1155 1156 1156 ENDIF ! ln_mask_file=.TRUE. 1157 1157 1158 bdytmask(:,:) = lmask(:,:)1158 bdytmask(:,:) = ssmask(:,:) 1159 1159 IF( .not. ln_mask_file ) THEN 1160 1160 ! If .not. ln_mask_file then we need to derive mask on U and V grid
Note: See TracChangeset
for help on using the changeset viewer.