Changeset 3265 for trunk/LMDZ.GENERIC/libf/phystd

Timestamp:

Mar 13, 2024, 4:45:15 PM (9 months ago)

Author:

mturbet

Message:

Very minor change of max sea ice fraction in ocean model

File:

• trunk/LMDZ.GENERIC/libf/phystd/ocean_slab_mod.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/ocean_slab_mod.F90

@@ -213 +213 @@
 
 ! ********** Sea Ice parameters ***********
-    ice_frac_max = 0.99 ! frac = 1 may lead to some problems.
+    ice_frac_max = 0.999999 ! frac = 1 may lead to some problems.
     CALL getin_p('ice_frac_max',ice_frac_max)
     h_ice_thick = 1.5