[cig-commits] r19194 - seismo/2D/SPECFEM2D/trunk/src/specfem2D

[dkomati1 at geodynamics.org]

Author: dkomati1
Date: 2011-11-14 08:48:42 -0800 (Mon, 14 Nov 2011)
New Revision: 19194

Modified:
   seismo/2D/SPECFEM2D/trunk/src/specfem2D/create_color_image.f90
Log:
changed the name of image / movie files when numbering them sequentially instead of based on the time step number, to avoid confusion.


Modified: seismo/2D/SPECFEM2D/trunk/src/specfem2D/create_color_image.f90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/src/specfem2D/create_color_image.f90	2011-11-14 15:57:18 UTC (rev 19193)
+++ seismo/2D/SPECFEM2D/trunk/src/specfem2D/create_color_image.f90	2011-11-14 16:48:42 UTC (rev 19194)
@@ -72,9 +72,10 @@
   character(len=100) :: filename
 
 ! open the image file
+! slightly change the beginning of the file name depending if we use the time step of the image number, to avoid confusion
   if(USE_SNAPSHOT_NUMBER_IN_FILENAME) then
     isnapshot_number = isnapshot_number + 1
-    write(filename,"('OUTPUT_FILES/image',i7.7,'.jpg')") isnapshot_number
+    write(filename,"('OUTPUT_FILES/img',i7.7,'.jpg')") isnapshot_number
   else
     write(filename,"('OUTPUT_FILES/image',i7.7,'.jpg')") it
   endif