[cig-commits] [commit] devel: initialize moho to zero (66411e2)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Fri May 23 14:03:38 PDT 2014


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

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d_globe/compare/44a503fd274d733c8a95ec4ba2c6eea4df4e6a76...dd7f9adac5fcd34a9ee46ae8a6c65cc6d42fc00e

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

commit 66411e25f591cf01afdd272d50fe7a3e0b6db8a8
Author: hejunzhu <hzhu at jsg.utexas.edu>
Date:   Fri May 23 14:24:45 2014 -0500

    initialize moho to zero


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

66411e25f591cf01afdd272d50fe7a3e0b6db8a8
 DATA                        | 2 +-
 m4                          | 2 +-
 src/meshfem3D/get_model.f90 | 2 ++
 3 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/DATA b/DATA
index 9f21cd3..414b996 160000
--- a/DATA
+++ b/DATA
@@ -1 +1 @@
-Subproject commit 9f21cd3879ab26f8b8164aa218ccbeca0ddb2bf5
+Subproject commit 414b9967a8db10aaddbcda86322e651a49a4f9c3
diff --git a/m4 b/m4
index b58c6fb..09ca47b 160000
--- a/m4
+++ b/m4
@@ -1 +1 @@
-Subproject commit b58c6fb1cdfc650eeca28274913dc239888a09d4
+Subproject commit 09ca47be4e87a6133563b7e8e32974a6da7c5d58
diff --git a/src/meshfem3D/get_model.f90 b/src/meshfem3D/get_model.f90
index fe8295e..5d8e8aa 100644
--- a/src/meshfem3D/get_model.f90
+++ b/src/meshfem3D/get_model.f90
@@ -82,6 +82,8 @@
   double precision :: r,r_prem,moho
   integer :: i,j,k,i_sls
 
+  moho=0.0
+
   ! loops over all GLL points for this spectral element
   do k=1,NGLLZ
     do j=1,NGLLY



More information about the CIG-COMMITS mailing list