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.
Changeset 14239 for NEMO/trunk/src/SAS/step.F90 – NEMO

Ignore:
Timestamp:
2020-12-23T09:57:16+01:00 (3 years ago)
Author:
smasson
Message:

trunk: replace key_iomput by key_xios

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/SAS/step.F90

    r14227 r14239  
    3232   USE lbclnk           ! 
    3333   USE timing           ! Timing             
    34 #if defined key_iomput 
     34#if defined key_xios 
    3535   USE xios 
    3636#endif 
     
    8484      ENDIF 
    8585      IF( kstp == nit000 + 1 )   lk_agrif_fstep = .FALSE. 
    86 # if defined key_iomput 
     86# if defined key_xios 
    8787      IF( Agrif_Nbstepint() == 0 )   CALL iom_swap( cxios_context ) 
    8888# endif    
     
    156156      IF( lk_oasis .AND. nstop == 0 ) CALL sbc_cpl_snd( kstp, Nbb, Nnn )       ! coupled mode : field exchanges if OASIS-coupled ice 
    157157 
    158 #if defined key_iomput 
     158#if defined key_xios 
    159159      IF( kstp == nitrst ) THEN 
    160160         IF(.NOT.lwxios) THEN 
Note: See TracChangeset for help on using the changeset viewer.