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 5412 for trunk/NEMOGCM/NEMO/OPA_SRC/IOM – NEMO

Ignore:
Timestamp:
2015-06-12T20:29:43+02:00 (9 years ago)
Author:
hadcv
Message:
  • Set mpi_comm_opa in non-MPP cases (addresses #1533)
  • Add an xios_context_finalize in step_C1D
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

    r5407 r5412  
    102102      clname = cdname 
    103103      IF( TRIM(Agrif_CFixed()) /= '0' )   clname = TRIM(Agrif_CFixed())//"_"//TRIM(cdname) 
    104 # if defined key_mpp_mpi 
    105104      CALL xios_context_initialize(TRIM(clname), mpi_comm_opa) 
    106 # else 
    107       CALL xios_context_initialize(TRIM(clname), 0) 
    108 # endif 
    109105      CALL iom_swap( cdname ) 
    110106 
Note: See TracChangeset for help on using the changeset viewer.