[cig-commits] r13306 - seismo/3D/SPECFEM3D_SESAME/trunk

[nlegoff at geodynamics.org]

Author: nlegoff
Date: 2008-11-14 05:21:24 -0800 (Fri, 14 Nov 2008)
New Revision: 13306

Modified:
   seismo/3D/SPECFEM3D_SESAME/trunk/create_regions_mesh.f90
Log:
changed density for the asteroid model.

Modified: seismo/3D/SPECFEM3D_SESAME/trunk/create_regions_mesh.f90
===================================================================
--- seismo/3D/SPECFEM3D_SESAME/trunk/create_regions_mesh.f90	2008-11-14 07:51:42 UTC (rev 13305)
+++ seismo/3D/SPECFEM3D_SESAME/trunk/create_regions_mesh.f90	2008-11-14 13:21:24 UTC (rev 13306)
@@ -1601,7 +1601,7 @@
       case (1)
         select case (i)
           case (1)
-            materials_ext_mesh = 2000.d0
+            materials_ext_mesh = 2700.d0
           case (2)
             materials_ext_mesh = 3000.d0
           case (3)