Ignore:
Timestamp:
Jun 29, 2020 7:54:21 AM (15 months ago)
Author:
raasch
Message:

bugfix for aborts in case of nested runs, data handling with MPI-IO for cyclic-fill added (so far only for global data)

File:
1 edited

Legend:

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

    r4578 r4580  
    2525! -----------------
    2626! $Id$
     27! bugfix for aborts in case of nested runs
     28!
     29! 4578 2020-06-25 15:43:32Z gronemeier
    2730! bugfix : do not save input values from last call of routines debug_message and location_message
    2831! changes: layout changes according to PALM coding standards
     
    220223    IF ( requested_action > 0 )  THEN
    221224       abort_mode = requested_action
    222        CALL local_stop
     225!
     226!--    Since nested runs always use MPI_ABORT, let only the PE which output a message initiate
     227!--    the abort. Others just wait.
     228       IF ( nested_run  .AND.  requested_action == 1  .AND.  .NOT. do_output )  THEN
     229#if defined( __parallel )
     230          CALL MPI_BARRIER( comm2d, ierr )
     231#endif
     232       ELSE
     233          CALL local_stop
     234       ENDIF
    223235    ENDIF
    224236
Note: See TracChangeset for help on using the changeset viewer.