[cig-commits] [commit] devel, master: also output a timestamp file for ispec == nspec (178f39e)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/specfem3d_globe

On branches: devel,master
Link       : https://github.com/geodynamics/specfem3d_globe/compare/bc58e579b3b0838a0968725a076f5904845437ca...be63f20cbb6f462104e949894dbe205d2398cd7f

>---------------------------------------------------------------

commit 178f39ebc58ed0ae38e4239a10a384026602dd30
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Mon May 19 22:24:50 2014 +0200

    also output a timestamp file for ispec == nspec


>---------------------------------------------------------------

178f39ebc58ed0ae38e4239a10a384026602dd30
 src/meshfem3D/compute_volumes_and_areas.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/meshfem3D/compute_volumes_and_areas.F90 b/src/meshfem3D/compute_volumes_and_areas.F90
index 5f5344a..8a15087 100644
--- a/src/meshfem3D/compute_volumes_and_areas.F90
+++ b/src/meshfem3D/compute_volumes_and_areas.F90
@@ -306,7 +306,7 @@
   do ispec = 1,nspec
 
     ! print information about number of elements done so far
-    if(myrank == 0 .and. mod(ispec,NSPEC_DISPLAY_INTERVAL) == 0) then
+    if(myrank == 0 .and. (mod(ispec,NSPEC_DISPLAY_INTERVAL) == 0 .or. ispec == nspec)) then
        write(IMAIN,*) 'for Roland_Sylvain integrals ',ispec,' elements computed out of ',nspec
        ! write time stamp file to give information about progression of simulation
        write(outputname,"('/timestamp_reg',i1.1,'_ispec',i7.7,'_out_of_',i7.7)") iregion_code,ispec,nspec