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

[dkomati1 at geodynamics.org]

Author: dkomati1
Date: 2011-12-29 01:45:39 -0800 (Thu, 29 Dec 2011)
New Revision: 19326

Modified:
   seismo/2D/SPECFEM2D/trunk/src/specfem2D/specfem2D.F90
Log:
changed ADD_A_CRACK from .true. to .false. by default


Modified: seismo/2D/SPECFEM2D/trunk/src/specfem2D/specfem2D.F90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/src/specfem2D/specfem2D.F90	2011-12-29 00:43:30 UTC (rev 19325)
+++ seismo/2D/SPECFEM2D/trunk/src/specfem2D/specfem2D.F90	2011-12-29 09:45:39 UTC (rev 19326)
@@ -402,7 +402,7 @@
   double precision :: dxd,dyd,dzd,dcurld,valux,valuy,valuz,valcurl,hlagrange,rhol,xi,gamma,x,z
 
 !! DK DK Dec 2011: add a crack manually
-  logical, parameter :: ADD_A_CRACK = .true. ! .false.
+  logical, parameter :: ADD_A_CRACK = .false.
 !! must be set equal to the number of spectral elements on one vertical side of the crack
   integer :: NB_POINTS_TO_ADD_TO_NPGEO = 3
   integer :: check_nb_points_to_add_to_npgeo,current_last_point,npgeo_ori,original_value,ignod