Changeset 4177 for trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

Timestamp:

Apr 9, 2026, 2:42:11 PM (9 hours ago)

Author:

jmauxion

Message:

Mars PCM:

• Adding write_output for inertiedat.
• Adding an icelocationmode = 6 that uses surface thermal inertia to

prescribe watercaptag. Can be irrelevant if the spatial resolution is too
coarse.
JM

File:

• trunk/LMDZ.MARS/libf/phymars/physiq_mod.F (modified) (2 diffs)

trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

@@ -3339 +3339 @@
          call write_output("watercaptag","Watercap tag"
      &         ,"Boolean",watercaptag(:))
+         call write_output("inertiedat","Soil inertia",
+     &                 "J/kg/K",inertiedat(:,:))
          if (grid_type == regular_lonlat) then
            call write_output("area","Mesh area","m2",
@@ -3447 +3449 @@
      &                 "K",tsoil(:,:,iflat))
       call write_output("inertiedat","Soil inertia",
-     &                 "K",inertiedat(:,:))
+     &                 "J/kg/K",inertiedat(:,:))
 #endif