Changeset 8079 for branches/UKMO/dev_r7573_xios_write/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

Timestamp:

2017-05-26T12:09:41+02:00 (7 years ago)

Author:

andmirek

Message:

#1882 a first working version with XIOS writing restart file. Works with MO suite u-am389

File:

• branches/UKMO/dev_r7573_xios_write/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90 (modified) (2 diffs)

branches/UKMO/dev_r7573_xios_write/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

@@ -49 +49 @@
    LOGICAL       ::   ln_clobber       !: clobber (overwrite) an existing file
    INTEGER       ::   nn_chunksz       !: chunksize (bytes) for NetCDF file (works only with iom_nf90 routines)
+   INTEGER       ::   nn_wxios         !: write resart using xios 0 - no, 1 - single, 2 - multiple file output
 #if defined key_netcdf4
    !!----------------------------------------------------------------------
@@ -152 +153 @@
    LOGICAL       ::   lsp_area = .TRUE.     !: to make a control print over a specific area
    CHARACTER(lc) ::   cxios_context         !: context name used in xios
+   CHARACTER(lc) ::   wxios_context = "nemo_rstw" !: context name used in xios to write restart file
 
    !!----------------------------------------------------------------------