Changeset 4018 for trunk/LMDZ.MARS/libf/phymars/soilwater.F90

Timestamp:

Jan 20, 2026, 12:11:57 AM (5 days ago)

Author:

aslmd

Message:

MESOSCALE: no planetwide, no write_output, no future for meeeee

File:

• trunk/LMDZ.MARS/libf/phymars/soilwater.F90 (modified) (3 diffs)

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

@@ -9 +9 @@
     use surfdat_h, only: watercaptag
     use geometry_mod, only: cell_area, latitude_deg
+#ifndef MESOSCALE
     use write_output_mod, only: write_output
+#endif
 
     implicit none
@@ -1209 +1211 @@
 enddo
 
+#ifndef MESOSCALE
 if (writeoutput) then
     zalpha(1, nsoil) = 0.D0
@@ -1223 +1226 @@
     call write_output("flux_rego", 'flux of water from the regolith', 'kg/m^2', zdqsdifrego)
 endif
-
+#endif
 END