Changeset 4067


Ignore:
Timestamp:
Jul 1, 2019 1:29:25 PM (5 years ago)
Author:
suehring
Message:

Bugfix, pass dummy string to MPI_INFO_SET

File:
1 edited

Legend:

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

    r4039 r4067  
    2828! -----------------
    2929! $Id$
     30! Bugfix, pass dummy string to MPI_INFO_SET (J. Resler)
     31!
     32! 4039 2019-06-18 10:32:41Z suehring
    3033! Bugfix for masked data output
    3134!
     
    63956398              FLUSH(9)
    63966399          ENDIF
    6397           CALL MPI_Info_set(minfo, 'accumulate_ordering', '', ierr)
     6400          CALL MPI_Info_set(minfo, 'accumulate_ordering', 'none', ierr)
    63986401          IF ( ierr /= 0 ) THEN
    63996402              WRITE(9,*) 'Error MPI_Info_set1:', ierr
     
    68356838                    FLUSH(9)
    68366839                ENDIF
    6837                 CALL MPI_Info_set(minfo, 'accumulate_ordering', '', ierr)
     6840                CALL MPI_Info_set(minfo, 'accumulate_ordering', 'none', ierr)
    68386841                IF ( ierr /= 0 ) THEN
    68396842                    WRITE(9,*) 'Error MPI_Info_set5:', ierr
Note: See TracChangeset for help on using the changeset viewer.