Changeset 5856


Ignore:
Timestamp:
Oct 21, 2025, 12:36:50 PM (10 hours ago)
Author:
Laurent Fairhead
Message:

Extra MPI_Finalize that are not needed anymore
AC/LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/create_etat0_limit_unstruct_mod.f90

    r5268 r5856  
    8181                CALL xios_context_finalize()
    8282                CALL xios_finalize()
    83                 CALL MPI_Finalize(ierr)
     83!                CALL MPI_Finalize(ierr)
    8484                abort_message='create_etat0_limit_unstruct, Initial state file are created, all is fine'
    8585                write(lunout,*) abort_message
    … …  
    9999                CALL xios_context_finalize()
    100100                CALL xios_finalize()
    101                 CALL MPI_Finalize(ierr)
     101!                CALL MPI_Finalize(ierr)
    102102              ENDIF
    103103!$OMP BARRIER
Note: See TracChangeset for help on using the changeset viewer.