[cig-commits] r22517 - seismo/3D/SPECFEM3D_GLOBE/trunk/setup

dkomati1 at geodynamics.org dkomati1 at geodynamics.org
Sat Jul 6 07:02:19 PDT 2013


Author: dkomati1
Date: 2013-07-06 07:02:18 -0700 (Sat, 06 Jul 2013)
New Revision: 22517

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/setup/constants.h.in
Log:
fixed a missing white space at the end of the file


Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/setup/constants.h.in
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/setup/constants.h.in	2013-07-06 02:15:56 UTC (rev 22516)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/setup/constants.h.in	2013-07-06 14:02:18 UTC (rev 22517)
@@ -5,8 +5,8 @@
 !
 !          Main authors: Dimitri Komatitsch and Jeroen Tromp
 !                        Princeton University, USA
-!             and University of Pau / CNRS / INRIA, France
-! (c) Princeton University / California Institute of Technology and University of Pau / CNRS / INRIA
+!             and CNRS / INRIA / University of Pau, France
+! (c) Princeton University and CNRS / INRIA / University of Pau
 !                            April 2011
 !
 ! This program is free software; you can redistribute it and/or modify
@@ -280,13 +280,13 @@
 ! output approximate hessian in crust mantle region
   logical, parameter :: APPROXIMATE_HESS_KL = .false.
 
-! output kernel mask to zero out source region
-  logical, parameter :: SAVE_SOURCE_MASK = .false.
-
 ! forces transverse isotropy for all mantle elements
 ! (default is to use transverse isotropy only between MOHO and 220 )
   logical, parameter :: USE_FULL_TISO_MANTLE = .false.
 
+! output kernel mask to zero out source region
+  logical, parameter :: SAVE_SOURCE_MASK = .false.
+
 ! regular kernel parameters
   character(len=*), parameter :: PATHNAME_KL_REG = 'DATA/kl_reg_grid.txt'
   integer, parameter :: NM_KL_REG_LAYER = 100
@@ -497,7 +497,7 @@
 ! if this is set to .true. then the hardcoded values will be used
 ! otherwise they are computed automatically from the Number of elements
 ! This *may* be a useful parameter for Benchmarking against older versions
-  logical, parameter           :: ATTENUATION_RANGE_PREDEFINED = .false.
+  logical, parameter :: ATTENUATION_RANGE_PREDEFINED = .false.
 
 ! flag for the four edges of each slice and for the bottom edge
   integer, parameter :: XI_MIN  = 1
@@ -648,9 +648,6 @@
 !  integer, parameter :: GLL_REFERENCE_1D_MODEL = REFERENCE_MODEL_1DREF
 !  integer, parameter :: GLL_REFERENCE_MODEL = THREE_D_MODEL_S362ANI
 
-
-!!!!!!!!!!!!!! end of parameters added for the thread-safe version of the code
-
 !!-----------------------------------------------------------
 !!
 !! crustal stretching



More information about the CIG-COMMITS mailing list