Changeset 4496 for palm/trunk/SOURCE/read_restart_data_mod.f90

Timestamp:

Apr 15, 2020 8:37:26 AM (4 years ago)

Author:

raasch

Message:

bugfixes for restart with MPI-IO: problem with posix read arguments for surface data fixed, MPI barrier removed, coupling character added to restart input and output filename

File:

• palm/trunk/SOURCE/read_restart_data_mod.f90 (modified) (3 diffs)

palm/trunk/SOURCE/read_restart_data_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! bugfix: MPI barrier removed, coupling character added to input filename
+! 
+! 4495 2020-04-13 20:11:20Z raasch
 ! restart data handling with MPI-IO added
 ! 
@@ -842 +845 @@
 !
 !--    Open the MPI-IO restart file.
-       CALL rd_mpi_io_open( 'read', 'BININ', only_global = .TRUE. )
+       CALL rd_mpi_io_open( 'read', 'BININ' // TRIM( coupling_char ), only_global = .TRUE. )
 
 !
@@ -1141 +1144 @@
        CALL rd_mpi_io_close
 
-#if defined( __parallel )
-       CALL MPI_BARRIER( MPI_COMM_WORLD, ierr )
-#endif
-
     ENDIF