[Dart-dev] [5670] DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90: no code change; correct a couple comments in the null version
nancy at ucar.edu
nancy at ucar.edu
Mon Apr 9 10:08:21 MDT 2012
Revision: 5670
Author: nancy
Date: 2012-04-09 10:08:21 -0600 (Mon, 09 Apr 2012)
Log Message:
-----------
no code change; correct a couple comments in the null version
to be more helpful. the null version of this code does no
communication because you only have 1 task.
Modified Paths:
--------------
DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90
-------------- next part --------------
Modified: DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90
===================================================================
--- DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90 2012-04-09 15:17:03 UTC (rev 5669)
+++ DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90 2012-04-09 16:08:21 UTC (rev 5670)
@@ -516,9 +516,8 @@
call error_handler(E_ERR,'broadcast_send', errstring, source, revision, revdate)
endif
-! this must be paired with broadcast_recv() on all other tasks.
-! it will not return until all tasks in the communications group have
-! made the call.
+! this does nothing, because the array already has the data.
+! the subroutine does validate 'from' to be sure it's a valid task id.
call array_broadcast(array1, from)
end subroutine broadcast_send
@@ -546,9 +545,8 @@
call error_handler(E_ERR,'broadcast_recv', errstring, source, revision, revdate)
endif
-! this must be paired with a single broadcast_send() on the 'from' task.
-! it will not return until all tasks in the communications group have
-! made the call.
+! this does nothing, because the array already has the data.
+! the subroutine does validate 'from' to be sure it's a valid task id.
call array_broadcast(array1, from)
end subroutine broadcast_recv
More information about the Dart-dev
mailing list