Changeset 11837 for NEMO/branches/2019/dev_r11756_SI3restart_XIOS/src/SAS/step.F90

Timestamp:

2019-10-30T15:10:36+01:00 (4 years ago)

Author:

andmirek

Message:

ticket #2323 read SI3 restart with XIOS

File:

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

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

@@ -140 +140 @@
       ENDIF
       IF( kstp == nitend .OR. indic < 0 ) THEN
+                  IF(lrxios) THEN
+#if defined key_si3
+                             CALL iom_context_finalize( crixios_context)
+#endif
+                             CALL iom_context_finalize( crxios_context)
+                  ENDIF
                              CALL iom_context_finalize( cxios_context ) ! needed for XIOS+AGRIF
       ENDIF