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

[dkomati1 at geodynamics.org]

Author: dkomati1
Date: 2011-12-27 19:32:05 -0800 (Tue, 27 Dec 2011)
New Revision: 19322

Modified:
   seismo/2D/SPECFEM2D/trunk/src/specfem2D/paco_beyond_critical.f90
Log:
fixed a typo in a print statement


Modified: seismo/2D/SPECFEM2D/trunk/src/specfem2D/paco_beyond_critical.f90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/src/specfem2D/paco_beyond_critical.f90	2011-12-28 03:23:47 UTC (rev 19321)
+++ seismo/2D/SPECFEM2D/trunk/src/specfem2D/paco_beyond_critical.f90	2011-12-28 03:32:05 UTC (rev 19322)
@@ -211,7 +211,7 @@
         end if
 
         if (mod(indice,500)==0) then
-           print *,indice,"points have been have been computed out of ",npt
+           print *,indice,"points have been computed out of ",npt
         end if
 
 !