Ignore:
Timestamp:
Sep 12, 2018 3:02:00 PM (3 years ago)
Author:
raasch
Message:

various changes to avoid compiler warnings (mainly removal of unused variables)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/message.f90

    r3019 r3241  
    2525! -----------------
    2626! $Id$
     27! unused variables removed
     28!
     29! 3019 2018-05-13 07:05:43Z maronga
    2730! Temporaraly deactivate MPI_BARRIER as long as nested systems freeze due to
    2831! asynchronous calls of location_message.
     
    263266
    264267    USE pmc_interface,                                                         &
    265         ONLY:  cpl_id, nested_run
     268        ONLY:  cpl_id
    266269
    267270    IMPLICIT NONE
     
    270273    LOGICAL          ::  advance  !< switch for advancing/noadvancing I/O
    271274
    272 #if defined( __parallel )
    273 !    IF ( nested_run )  CALL MPI_BARRIER( MPI_COMM_WORLD, ierr )
    274 #endif
    275275!
    276276!-- Output for nested runs only on the root domain
Note: See TracChangeset for help on using the changeset viewer.