- Timestamp:
- 2017-12-13T15:58:53+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/SBC/sbcfwb.F90
r6140 r9019 17 17 USE dom_oce ! ocean space and time domain 18 18 USE sbc_oce ! surface ocean boundary condition 19 USE sbc_ice , ONLY : snwice_mass, snwice_mass_b, snwice_fmass 19 20 USE phycst ! physical constants 20 21 USE sbcrnf ! ocean runoffs … … 94 95 ! and in case of no melt, it can generate HSSW. 95 96 ! 96 #if ! defined key_lim 2 && ! defined key_lim3 && ! defined key_cice97 #if ! defined key_lim3 && ! defined key_cice 97 98 snwice_mass_b(:,:) = 0.e0 ! no sea-ice model is being used : no snow+ice mass 98 99 snwice_mass (:,:) = 0.e0
Note: See TracChangeset
for help on using the changeset viewer.