Changeset 8630 for branches/2017/dev_r8600_xios_write/NEMOGCM/NEMO/OPA_SRC/IOM/iom_def.F90

Timestamp:

2017-10-17T14:31:49+02:00 (7 years ago)

Author:

andmirek

Message:

#1962 merge with branches/UKMO/dev_r7573_xios_write (doesn't woork)

File:

• branches/2017/dev_r8600_xios_write/NEMOGCM/NEMO/OPA_SRC/IOM/iom_def.F90 (modified) (2 diffs)

branches/2017/dev_r8600_xios_write/NEMOGCM/NEMO/OPA_SRC/IOM/iom_def.F90

@@ -46 +46 @@
 !$AGRIF_DO_NOT_TREAT
    INTEGER, PUBLIC            ::   iom_open_init = 0   !: used to initialize iom_file(:)%nfid to 0
+!XIOS read restart   
+   LOGICAL, PUBLIC            ::   lwxios          !: read single file restart using XIOS
+   INTEGER, PUBLIC            ::   wxioso          !: type of restart file when writing using XIOS 1 - single, 2 - multiple
+
+
 
    TYPE, PUBLIC ::   file_descriptor
@@ -67 +72 @@
    TYPE(file_descriptor), DIMENSION(jpmax_files), PUBLIC ::   iom_file !: array containing the info for all opened files
 !$AGRIF_END_DO_NOT_TREAT
-
    !!=====================================================================
 END MODULE iom_def