Changeset 3995 for trunk/LMDZ.GENERIC/libf/phystd/dyn1d

Timestamp:

Jan 5, 2026, 5:00:27 PM (2 weeks ago)

Author:

emillour

Message:

Generic PCM:
Enable using XIOS with rcm1d. This implies compiling with MPI (makelmdz_fcm ...
-parallel mpi -io xios ... rcm1d) and having adequate xml files at hand.
While at it cleaned up turbdiff_mod.F90 to use write_output() instead of
calls to writediagfi() and updated reference field_def_physics.xml
EM

Location:

trunk/LMDZ.GENERIC/libf/phystd/dyn1d

Files:

• mod_const_mpi.F90 (added)
• parallel_lmdz.F90 (added)
• rcm1d.F (modified) (2 diffs)

trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F

@@ -46 +46 @@
       !use inichim_1D_mod, only: inichim_1D
       !use initracer_1D_mod, only: initracer_1D
+#ifdef CPP_XIOS
+      use mod_const_mpi, only: init_const_mpi
+      use parallel_lmdz, only: init_parallel
+#endif
 
       implicit none
@@ -202 +206 @@
         call system("echo 'INCLUDEDEF=rcm1d.def' >> run.def")
       endif
+
+#ifdef CPP_XIOS
+      CALL init_const_mpi
+      CALL init_parallel
+#endif
 
 ! Check restart