Changeset 2911

Timestamp:

Mar 12, 2023, 4:42:02 PM (21 months ago)

Author:

emillour

Message:

Mars PCM:
Follow-up on the addition of an nslope dimension, also adapt XIOS outputs.
EM

Location:

trunk/LMDZ.MARS

Files:

• README (modified) (1 diff)
• libf/phymars/physiq_mod.F (modified) (1 diff)

trunk/LMDZ.MARS/README

@@ -3936 +3936 @@
 allocated ones and assume that the "mola64.nc" file is in "datadir" rather
 than a hard coded location.
+
+== 12/03/2023 == EM
+Follow-up on the addition of an nslope dimension, also adapt XIOS outputs.

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

@@ -4348 +4348 @@
       CALL send_xios_field("OLR",fluxtop_lw)
 
-      CALL send_xios_field("tsurf",tsurf)
+      CALL send_xios_field("tsurf",tsurf(:,iflat))
 !      CALL send_xios_field("inertiedat",inertiedat)
-      CALL send_xios_field("tsoil",tsoil)
-      CALL send_xios_field("co2ice",qsurf(:,igcm_co2))
+      CALL send_xios_field("tsoil",tsoil(:,:,iflat))
+      CALL send_xios_field("co2ice",qsurf(:,igcm_co2,iflat))
       
 !      CALL send_xios_field("temp",zt)