Changeset 11901 for NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/OCE/DOM/domain.F90

Timestamp:

2019-11-13T18:27:42+01:00 (4 years ago)

Author:

andmirek

Message:

Ticket #2323 SI3 restart read/write with XIOS for AGRIF

File:

• NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/OCE/DOM/domain.F90 (modified) (2 diffs)

NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/OCE/DOM/domain.F90

@@ -344 +344 @@
          WRITE(numout,*) '      NetCDF chunksize (bytes)        nn_chunksz      = ', nn_chunksz
          WRITE(numout,*) '      IS coupling at the restart step ln_iscpl        = ', ln_iscpl
-         IF( TRIM(Agrif_CFixed()) == '0' ) THEN
-            WRITE(numout,*) '      READ restart for a single file using XIOS ln_xios_read =', ln_xios_read
-            WRITE(numout,*) '      Write restart using XIOS        nn_wxios   = ', nn_wxios
-         ELSE
-            WRITE(numout,*) "      AGRIF: nn_wxios will be ingored. See setting for parent"
-            WRITE(numout,*) "      AGRIF: ln_xios_read will be ingored. See setting for parent"
-         ENDIF
+         WRITE(numout,*) '      READ restart for a single file using XIOS ln_xios_read =', ln_xios_read
+         WRITE(numout,*) '      Write restart using XIOS        nn_wxios   = ', nn_wxios
       ENDIF
 
@@ -427 +422 @@
       rdt  = rn_rdt
 
-      IF( TRIM(Agrif_CFixed()) == '0' ) THEN
-         lrxios = ln_xios_read.AND.ln_rstart
+      lrxios = ln_xios_read.AND.ln_rstart
 !set output file type for XIOS based on NEMO namelist 
-         IF (nn_wxios > 0) lwxios = .TRUE. 
-         nxioso = nn_wxios
-      ENDIF
+      IF (nn_wxios > 0) lwxios = .TRUE. 
+      nxioso = nn_wxios
 
 #if defined key_netcdf4