Changeset 5320 for branches/2015/dev_r5302_CNRS18_HPC_scalability/NEMOGCM/NEMO/LIM_SRC_3/ice.F90

Timestamp:

2015-05-29T18:13:37+02:00 (9 years ago)

Author:

mcastril

Message:

ticket #1523 Convergence Check

File:

• branches/2015/dev_r5302_CNRS18_HPC_scalability/NEMOGCM/NEMO/LIM_SRC_3/ice.F90 (modified) (2 diffs)

branches/2015/dev_r5302_CNRS18_HPC_scalability/NEMOGCM/NEMO/LIM_SRC_3/ice.F90

@@ -181 +181 @@
    REAL(wp), PUBLIC ::   rn_ahi0_ref      !: sea-ice hor. eddy diffusivity coeff. (m2/s)
    REAL(wp), PUBLIC ::   rn_relast        !: ratio => telast/rdt_ice (1/3 or 1/9 depending on nb of subcycling nevp) 
-
+   LOGICAL , PUBLIC ::  cc_opt
+   INTEGER , PUBLIC ::  cc_freq
+   
    !                                     !!** ice-salinity namelist (namicesal) **
    REAL(wp), PUBLIC ::   rn_simax         !: maximum ice salinity [PSU]
@@ -398 +400 @@
    REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:)     ::   diag_vice     !: ice volume variation   [m/s] 
    REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:)     ::   diag_vsnw     !: snw volume variation   [m/s] 
+
    !
    !!----------------------------------------------------------------------