Changeset 8821

Timestamp:

2017-11-27T14:46:12+01:00 (6 years ago)

Author:

andmirek

Message:

#1953 and #1962 disable restart reading with XIOS for SAS

File:

• branches/2017/dev_r8600_xios_read_write_v2/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90 (modified) (1 diff)

branches/2017/dev_r8600_xios_read_write_v2/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90

@@ -138 +138 @@
          CALL iom_set_rstw_core(cdstr)
       ENDIF
+!reset namelist for SAS
+      IF(cdstr == 'SAS') THEN
+         IF(lrxios) THEN
+               IF(lwp) write(numout,*) 'Disable reading restart file using XIOS for SAS'
+               lrxios = .FALSE.
+         ENDIF
+      ENDIF
       !
       CALL dom_clo( cn_cfg, nn_cfg )   ! Closed seas and lake