- Timestamp:
- 2015-12-08T12:39:53+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/icebergs_restart_single_file/NEMOGCM/NEMO/TOP_SRC/TRP/trcsbc.F90
r6019 r6020 31 31 32 32 !! * Substitutions 33 # include "top_substitute.h90" 33 # include "domzgr_substitute.h90" 34 # include "vectopt_loop_substitute.h90" 34 35 !!---------------------------------------------------------------------- 35 36 !! NEMO/TOP 3.3 , NEMO Consortium (2010) … … 83 84 CASE( 0 ) ; zswitch = 1 ! (0) standard levitating sea-ice : salt exchange only 84 85 CASE( 1, 2 ) ; zswitch = 0 ! (1) levitating sea-ice: salt and volume exchange but no pressure effect 85 86 ! ! (2) embedded sea-ice : salt and volume fluxes and pressure 86 87 END SELECT 87 88
Note: See TracChangeset
for help on using the changeset viewer.