- Timestamp:
- 2017-11-17T10:22:38+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/ice.F90
r8678 r8726 196 196 ! ! = 2 Redistribute a single flux over categories 197 197 198 INTEGER , PUBLIC :: nice_jules ! Choice of jules coupling 199 ! ! Associated indices 200 INTEGER , PUBLIC, PARAMETER :: np_jules_OFF = 0 ! no Jules coupling (ice thermodynamics forced via qsr and qns) 201 INTEGER , PUBLIC, PARAMETER :: np_jules_EMULE = 1 ! emulated Jules coupling via icethd_zdf.F90 (BL99) (1st round compute qcn and qsr_tr, 2nd round use it) 202 INTEGER , PUBLIC, PARAMETER :: np_jules_ACTIVE = 2 ! active Jules coupling (SM0L) (compute qcn and qsr_tr via sbcblk.F90 or sbccpl.F90) 203 198 204 ! !!** ice-salinity namelist (namthd_sal) ** 199 205 INTEGER , PUBLIC :: nn_icesal !: salinity configuration used in the model
Note: See TracChangeset
for help on using the changeset viewer.