Changeset 2023 for trunk

Timestamp:

Oct 24, 2018, 8:38:48 AM (6 years ago)

Author:

emillour

Message:

Mars GCM:

• Fix writediagsoil so that it also works in parallel.

EM

Location:

trunk/LMDZ.MARS

Files:

• README (modified) (1 diff)
• libf/phymars/writediagsoil.F90 (modified) (2 diffs)

trunk/LMDZ.MARS/README

@@ -2656 +2656 @@
   to co2condens and turn it into a module.
 
-
+== 24/10/2018 == EM
+- Fix writediagsoil so that it also works in parallel.
+
+

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

@@ -98 +98 @@
     stop
    endif
+  endif
 
 #ifdef CPP_PARA
@@ -109 +110 @@
 #endif
 
+  if (is_master) then
    ! build inertia() and area()
    if (klon_glo>1) then