[cig-commits] r8518 - seismo/2D/SPECFEM2D/trunk
walter at geodynamics.org
walter at geodynamics.org
Fri Dec 7 15:52:56 PST 2007
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
More information about the cig-commits
mailing list