Changeset 11870 for NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/OCE/step.F90

Timestamp:

2019-11-07T12:27:28+01:00 (4 years ago)

Author:

andmirek

Message:

Ticket #2323: open single restart write context for all restart files

File:

• NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/OCE/step.F90 (modified) (1 diff)

NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/OCE/step.F90

@@ -102 +102 @@
                              CALL iom_init(      cxios_context          )  ! for model grid (including passible AGRIF zoom)
          IF( ln_crs      )   CALL iom_init( TRIM(cxios_context)//"_crs" )  ! for coarse grid
+         IF( lwxios      )   CALL iom_init( cwxios_context              )  ! restart write context
       ENDIF
       IF( kstp /= nit000 )   CALL day( kstp )         ! Calendar (day was already called at nit000 in day_init)