[cig-commits] r8518 - seismo/2D/SPECFEM2D/trunk

[walter at geodynamics.org]

Author: walter
Date: 2007-12-07 15:52:56 -0800 (Fri, 07 Dec 2007)
New Revision: 8518

Modified:
   seismo/2D/SPECFEM2D/trunk/specfem2D.f90
Log:
suppressed useless white spaces


Modified: seismo/2D/SPECFEM2D/trunk/specfem2D.f90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/specfem2D.f90	2007-04-18 10:39:45 UTC (rev 8517)
+++ seismo/2D/SPECFEM2D/trunk/specfem2D.f90	2007-12-07 23:52:56 UTC (rev 8518)
@@ -235,10 +235,10 @@
 !
 !***********************************************************************
 
-  open (IIN,file='OUTPUT_FILES/Database')
+  open(IIN,file='OUTPUT_FILES/Database')
 
 ! determine if we write to file instead of standard output
-  if(IOUT /= ISTANDARD_OUTPUT) open (IOUT,file='simulation_results.txt')
+  if(IOUT /= ISTANDARD_OUTPUT) open(IOUT,file='simulation_results.txt')
 
 !
 !---  read job title and skip remaining titles of the input file