Changeset 4103 for trunk/LMDZ.MARS/libf/phymars/surfdat_h.F90

Timestamp:

Mar 5, 2026, 2:59:01 PM (2 days ago)

Author:

jbclement

Message:

Mars PCM:
Deletion of unused and redundant declaration of coefficient 'dryness' in "tracer_mod.F90".
JBC

File:

• trunk/LMDZ.MARS/libf/phymars/surfdat_h.F90 (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/surfdat_h.F90

@@ -9 +9 @@
   logical              :: TESicealbedo ! use TES ice cap albedoes (if set to .true.)
   logical, allocatable :: watercaptag(:) ! flag for water ice surface
-  real,    allocatable :: dryness(:)
+  real,    allocatable :: dryness(:) ! "Dryness coefficient" for ground water ice sublimation
 
 !$OMP THREADPRIVATE(albedodat, phisfi,albedice,emisice,emissiv,TESicealbedo,     &