- Timestamp:
- 2019-09-16T18:54:28+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/ISF/isfcav.F90
r11541 r11553 192 192 END SELECT 193 193 ! 194 ! compute mask 195 mskisf_cav(:,:) = (1._wp - tmask(:,:,1)) * ssmask(:,:) 196 ! 194 197 END SUBROUTINE isf_cav_init 195 198
Note: See TracChangeset
for help on using the changeset viewer.