New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Diff from branches/UKMO/dev_r5518_GO6_XIOS25_cpl/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90@12796 to branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90@11101 – NEMO

Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90

    r12796 r11101  
    2626#if defined key_oasis3 
    2727   USE mod_oasis                    ! OASIS3-MCT module 
    28 #if defined key_iomput && defined key_xios25 
    29    USE xios, ONLY:xios_oasis_enddef 
    30 #endif 
    3128#endif 
    3229   USE par_oce                      ! ocean parameters 
     
    417414      ! End of definition phase 
    418415      !------------------------------------------------------------------ 
    419 #if defined key_iomput && defined key_xios25 
    420 !needed for XIOS 2.5 
    421       CALL xios_oasis_enddef() 
    422 #endif 
     416       
    423417      CALL oasis_enddef(nerror) 
    424418      IF( nerror /= OASIS_Ok )   CALL oasis_abort ( ncomp_id, 'cpl_define', 'Failure in oasis_enddef') 
Note: See TracChangeset for help on using the changeset viewer.