[cig-commits] [commit] devel: Modif for specfem-DSM (d759e09)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/specfem3d

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d/compare/8a3f14d7d473f70feb7f073639045daa35c587bc...d759e09dd946c593868753fbb4253d77378fb276

>---------------------------------------------------------------

commit d759e09dd946c593868753fbb4253d77378fb276
Author: Clément Durochat <c.durochat at gmail.com>
Date:   Fri Aug 1 18:48:12 2014 +0200

    Modif for specfem-DSM


>---------------------------------------------------------------

d759e09dd946c593868753fbb4253d77378fb276
 src/generate_databases/get_model.f90        | 2 +-
 src/generate_databases/model_tomography.f90 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/generate_databases/get_model.f90 b/src/generate_databases/get_model.f90
index 6a3a215..525ecca 100644
--- a/src/generate_databases/get_model.f90
+++ b/src/generate_databases/get_model.f90
@@ -29,7 +29,7 @@
   subroutine get_model(myrank)
 
   use generate_databases_par, only: IMODEL,nspec => NSPEC_AB,ibool,mat_ext_mesh, &
-       materials_ext_mesh,nmat_ext_mesh,undef_mat_prop,nundefMat_ext_mesh,ANISOTROPY
+       materials_ext_mesh,nmat_ext_mesh,undef_mat_prop,nundefMat_ext_mesh,ANISOTROPY,COUPLE_WITH_DSM
 
   use create_regions_mesh_ext_par
 
diff --git a/src/generate_databases/model_tomography.f90 b/src/generate_databases/model_tomography.f90
index 5b6ec81..71cf005 100644
--- a/src/generate_databases/model_tomography.f90
+++ b/src/generate_databases/model_tomography.f90
@@ -80,7 +80,7 @@
 
   use constants, only: MAX_STRING_LEN
   use tomography_par
-  use generate_databases_par, only: TOMOGRAPHY_PATH,undef_mat_prop,nundefMat_ext_mesh
+  use generate_databases_par, only: TOMOGRAPHY_PATH,undef_mat_prop,nundefMat_ext_mesh,COUPLE_WITH_DSM
 
   implicit none