[cig-commits] r22838 - seismo/3D/SPECFEM3D_GLOBE/branches/SPECFEM3D_GLOBE_SUNFLOWER/src/meshfem3D
dkomati1 at geodynamics.org
dkomati1 at geodynamics.org
Sat Sep 21 18:08:57 PDT 2013
Author: dkomati1
Date: 2013-09-21 18:08:57 -0700 (Sat, 21 Sep 2013)
New Revision: 22838
Modified:
seismo/3D/SPECFEM3D_GLOBE/branches/SPECFEM3D_GLOBE_SUNFLOWER/src/meshfem3D/create_regions_mesh.F90
Log:
made a message from the mesher more precise
Modified: seismo/3D/SPECFEM3D_GLOBE/branches/SPECFEM3D_GLOBE_SUNFLOWER/src/meshfem3D/create_regions_mesh.F90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/branches/SPECFEM3D_GLOBE_SUNFLOWER/src/meshfem3D/create_regions_mesh.F90 2013-09-21 23:23:44 UTC (rev 22837)
+++ seismo/3D/SPECFEM3D_GLOBE/branches/SPECFEM3D_GLOBE_SUNFLOWER/src/meshfem3D/create_regions_mesh.F90 2013-09-22 01:08:57 UTC (rev 22838)
@@ -950,7 +950,7 @@
! user output
write(IMAIN,'(a,f5.1,a,a,i2.2,a,i2.2,a,i2.2,a)') &
" ",(ilayer_loop-ifirst_region+1.0)/(ilast_region-ifirst_region+1.0) * 100.0,"%", &
- " time: ",tval(5),"h ",tval(6),"min ",tval(7),"sec"
+ " current clock time is: ",tval(5),"h ",tval(6),"min ",tval(7),"sec"
! flushes I/O buffer
call flush_IMAIN()
More information about the CIG-COMMITS
mailing list