Changeset 15486 for NEMO/branches/UKMO/NEMO_4.0.4_FOAM_package/src/ICE/ice.F90

Timestamp:

2021-11-09T11:42:25+01:00 (3 years ago)

Author:

dcarneir

Message:

SIC assimilation interface (IAU) for SI3

File:

• NEMO/branches/UKMO/NEMO_4.0.4_FOAM_package/src/ICE/ice.F90 (modified) (1 diff)

NEMO/branches/UKMO/NEMO_4.0.4_FOAM_package/src/ICE/ice.F90

@@ -234 +234 @@
    REAL(wp), PUBLIC ::   rswitch          !: switch for the presence of ice (1) or not (0)
    REAL(wp), PUBLIC ::   rdiag_v, rdiag_s, rdiag_t, rdiag_fv, rdiag_fs, rdiag_ft   !: conservation diagnostics
+   REAL(wp), PUBLIC, PARAMETER ::   epsi02 = 1.e-02_wp  !: small number 
+   REAL(wp), PUBLIC, PARAMETER ::   epsi03 = 1.e-03_wp  !: small number 
    REAL(wp), PUBLIC, PARAMETER ::   epsi06 = 1.e-06_wp  !: small number 
    REAL(wp), PUBLIC, PARAMETER ::   epsi10 = 1.e-10_wp  !: small number