[cig-commits] [commit] devel: updated a comment (47b844e)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Wed Dec 10 16:24:24 PST 2014
Repository : https://github.com/geodynamics/specfem3d_globe
On branch : devel
Link : https://github.com/geodynamics/specfem3d_globe/compare/974e7967ade0fb9a177011279f9b60337901793c...47b844e0941e7031b9b9330a3ed6e3a5e6b6407a
>---------------------------------------------------------------
commit 47b844e0941e7031b9b9330a3ed6e3a5e6b6407a
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date: Thu Dec 11 01:13:39 2014 +0100
updated a comment
>---------------------------------------------------------------
47b844e0941e7031b9b9330a3ed6e3a5e6b6407a
src/shared/parallel.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/shared/parallel.f90 b/src/shared/parallel.f90
index 98a4ab8..cb123eb 100644
--- a/src/shared/parallel.f90
+++ b/src/shared/parallel.f90
@@ -78,7 +78,7 @@ end module my_mpi
if (ier /= 0 ) stop 'Error initializing MPI'
! we need to make sure that NUMBER_OF_SIMULTANEOUS_RUNS and BROADCAST_SAME_MESH_AND_MODEL are read before calling world_split()
- ! read the parameter file and compute additional parameters
+ ! thus read the parameter file
call MPI_COMM_RANK(MPI_COMM_WORLD,myrank,ier)
if (myrank == 0) call read_parameter_file()
! broadcast parameters read from master to all processes
More information about the CIG-COMMITS
mailing list