Ignore:
Timestamp:
Sep 20, 2024, 3:50:41 PM (7 weeks ago)
Author:
Laurent Fairhead
Message:

Corrections to properly close XIOS contexts in LMDZ (either with DYNAMICO or lonlat)
Anne Cozic

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dyn3dmem/parallel_lmdz.F90

    r4848 r5206  
    418418        IF (using_xios) THEN
    419419          !Fermeture propre de XIOS
     420          ! close xios dynamic context if is defined (call LMDZDYN)   
     421          IF (ok_dyn_xios) THEN
     422             CALL xios_context_finalize()
     423          ENDIF
    420424          CALL wxios_close()
    421425          CALL prism_terminate_proto(ierr)
    … …  
    435439        IF (using_xios) THEN
    436440          !Fermeture propre de XIOS
     441          IF (ok_dyn_xios) THEN
     442             CALL xios_context_finalize()
     443          ENDIF
    437444          CALL wxios_close()
    438445        ENDIF
Note: See TracChangeset for help on using the changeset viewer.