Changeset 3465 for LMDZ6/trunk/libf/misc

Timestamp:

Mar 14, 2019, 10:34:31 AM (6 years ago)

Author:

Laurent Fairhead

Message:

Further modifications for DYNAMICO/LMDZ convergence. These are based
on Yann's LMDZ6_V2 sources. Compiles on irene and converges with revision 3459
in a bucket configuration
YM/LF

File:

• LMDZ6/trunk/libf/misc/wxios.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/misc/wxios.F90

@@ -348 +348 @@
         INTEGER :: ind_cell_glo_mpi(klon_mpi)
         TYPE(xios_domain) :: dom
+        
         LOGICAL :: remap_output
 
@@ -369 +370 @@
         IF (remap_output) THEN
           CALL xios_set_domain_attr("dom_out", domain_ref="dom_regular")
-          CALL xios_set_fieldgroup_attr("dom_out", domain_ref="dom_regular")
           CALL xios_set_fieldgroup_attr("remap_expr", expr="@this_ref")
+          CALL xios_set_fieldgroup_attr("remap_1800s", freq_op=xios_duration_convert_from_string("1800s"))
+          CALL xios_set_fieldgroup_attr("remap_1h",    freq_op=xios_duration_convert_from_string("1h"))
+          CALL xios_set_fieldgroup_attr("remap_3h",    freq_op=xios_duration_convert_from_string("3h"))
+          CALL xios_set_fieldgroup_attr("remap_6h",    freq_op=xios_duration_convert_from_string("6h"))
+          CALL xios_set_fieldgroup_attr("remap_1d",    freq_op=xios_duration_convert_from_string("1d"))
+          CALL xios_set_fieldgroup_attr("remap_1mo",   freq_op=xios_duration_convert_from_string("1mo"))
         ENDIF
 !$OMP END MASTER