Changeset 1786 for palm/trunk/SOURCE/pmc_handle_communicator.f90

Timestamp:

Mar 8, 2016 5:49:27 AM (8 years ago)

Author:

raasch

Message:

pmc-change in server-client get-put, spectra-directives removed, spectra-package modularized

File:

• palm/trunk/SOURCE/pmc_handle_communicator.f90 (modified) (2 diffs)

palm/trunk/SOURCE/pmc_handle_communicator.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-!
+! Bugfix: nesting_mode is broadcast now
 !
 ! Former revisions:
@@ -211 +211 @@
          CALL MPI_BCAST( m_couplers(i)%lower_left_x, 1, MPI_REAL,    0, MPI_COMM_WORLD, istat )
          CALL MPI_BCAST( m_couplers(i)%lower_left_y, 1, MPI_REAL,    0, MPI_COMM_WORLD, istat )
+         CALL MPI_BCAST( nesting_mode, LEN( nesting_mode ), MPI_CHARACTER, 0, MPI_COMM_WORLD, istat )
       ENDDO