Changeset 9536


Ignore:
Timestamp:
2018-05-01T13:37:48+02:00 (2 years ago)
Author:
andmirek
Message:

#1953 and #1962 stop immediately if XIOS restart read/write functionality is used without key_iomput

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

    r9535 r9536  
    266266   ENDIF 
    267267#else 
    268         clinfo = 'key_iomput is needed to use XIOS restart read/write functionality' 
    269         CALL ctl_stop(TRIM(clinfo)) 
     268        clinfo = 'iom_set_rstw_var_active: key_iomput is needed to use XIOS restart read/write functionality' 
     269        CALL ctl_stop('STOP', TRIM(clinfo)) 
    270270#endif 
    271271 
     
    373373   ENDIF 
    374374#else 
    375         clinfo = 'key_iomput is needed to use XIOS restart read/write functionality' 
    376         CALL ctl_stop(TRIM(clinfo)) 
     375        clinfo = 'iom_set_rstw_core: key_iomput is needed to use XIOS restart read/write functionality' 
     376        CALL ctl_stop('STOP', TRIM(clinfo)) 
    377377#endif 
    378378   END SUBROUTINE iom_set_rstw_core 
Note: See TracChangeset for help on using the changeset viewer.