Changeset 2915 for LMDZ5/trunk/libf/phylmd/comsoil.h

Timestamp:

Jun 16, 2017, 6:03:16 PM (7 years ago)

Author:

jbmadeleine

Message:

Improved the way thermal inertia works in simulations using imposed SST and sea ice.
Removed inertie_ice which was confusing; Added inertie_sic for sea-ice and inertie_lic for
land-ice. When snow is present, inertie_sno is used instead of inertie_sol, inertie_sic or
inertie_lic. For sea-ice, added a flag called iflag_sic:
If iflag_sic=0, thermal inertia is changed over sea-ice when snow is present
If iflag_sic=1, thermal inertia is kept constant and equal to inertie_sic

File:

• LMDZ5/trunk/libf/phylmd/comsoil.h (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/comsoil.h

@@ -3 +3 @@
 !
 
-      common /comsoil/inertie_sol,inertie_sno,inertie_ice
-      real inertie_sol,inertie_sno,inertie_ice
+      common /comsoil/inertie_sol,inertie_sno,inertie_sic,inertie_lic,  &
+     &                iflag_sic
+      real inertie_sol,inertie_sno,inertie_sic,inertie_lic
+      integer iflag_sic
 !$OMP THREADPRIVATE(/comsoil/)