[cig-commits] r12589 - in seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta: DATA setup

dkomati1 at geodynamics.org dkomati1 at geodynamics.org
Fri Aug 8 02:59:24 PDT 2008


Author: dkomati1
Date: 2008-08-08 02:59:24 -0700 (Fri, 08 Aug 2008)
New Revision: 12589

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/DATA/Par_file
   seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/setup/constants.h
Log:
put output to data file (IMAIN = 42) and NCHUNKS = 6 back for the tests


Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/DATA/Par_file	2008-08-08 01:55:06 UTC (rev 12588)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/DATA/Par_file	2008-08-08 09:59:24 UTC (rev 12589)
@@ -4,7 +4,7 @@
 SAVE_FORWARD                    = .false.  # save last frame of forward simulation or not
 
 # number of chunks (1,2,3 or 6)
-NCHUNKS                         = 1
+NCHUNKS                         = 6
 
 # angular width of the first chunk (not used if full sphere with six chunks)
 ANGULAR_WIDTH_XI_IN_DEGREES   = 90.d0      # angular size of a chunk

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/setup/constants.h
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/setup/constants.h	2008-08-08 01:55:06 UTC (rev 12588)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/setup/constants.h	2008-08-08 09:59:24 UTC (rev 12589)
@@ -56,9 +56,9 @@
 ! local file unit for output of buffers
   integer, parameter :: IOUT_BUFFERS = 35
 ! uncomment this to write messages to a text file
-! integer, parameter :: IMAIN = 42
+  integer, parameter :: IMAIN = 42
 ! uncomment this to write messages to the screen (slows down the code)
-  integer, parameter :: IMAIN = ISTANDARD_OUTPUT
+! integer, parameter :: IMAIN = ISTANDARD_OUTPUT
 
 ! R_EARTH is the radius of the bottom of the oceans (radius of Earth in m)
   double precision, parameter :: R_EARTH = 6371000.d0



More information about the cig-commits mailing list