Ignore:
Timestamp:
Jan 30, 2019, 2:54:30 PM (5 years ago)
Author:
Laurent Fairhead
Message:

Wrong order in call sequence of XIOS context initialisation meant that the coupled model hung.
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/iophy.F90

    r3435 r3457  
    4949  USE mod_grid_phy_lmdz, ONLY: nbp_lon, nbp_lat, klon_glo, grid_type, unstructured
    5050  USE print_control_mod, ONLY: prt_level,lunout
     51  USE surface_data,     ONLY : type_ocean
    5152#ifdef CPP_IOIPSL
    5253    USE ioipsl, ONLY: flio_dom_set
    … …  
    7374
    7475#ifdef CPP_XIOS
     76    IF ( type_ocean /= 'couple' ) THEN
    7577      CALL wxios_context_init
     78    ENDIF
    7679#endif
    7780   
Note: See TracChangeset for help on using the changeset viewer.