[cig-commits] [commit] devel, master: Adds initilization for backward trace arrays (1956d2e)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Thu Nov 6 08:33:07 PST 2014
Repository : https://github.com/geodynamics/specfem3d_globe
On branches: devel,master
Link : https://github.com/geodynamics/specfem3d_globe/compare/bc58e579b3b0838a0968725a076f5904845437ca...be63f20cbb6f462104e949894dbe205d2398cd7f
>---------------------------------------------------------------
commit 1956d2e9e20ac649523f0f5c46469ce22253610f
Author: Matthieu Lefebvre <ml15 at princeton.edu>
Date: Tue Oct 28 13:48:54 2014 -0400
Adds initilization for backward trace arrays
>---------------------------------------------------------------
1956d2e9e20ac649523f0f5c46469ce22253610f
src/specfem3D/prepare_timerun.f90 | 2 ++
1 file changed, 2 insertions(+)
diff --git a/src/specfem3D/prepare_timerun.f90 b/src/specfem3D/prepare_timerun.f90
index 5f90e63..33b02d1 100644
--- a/src/specfem3D/prepare_timerun.f90
+++ b/src/specfem3D/prepare_timerun.f90
@@ -1203,12 +1203,14 @@
b_epsilondev_xy_crust_mantle = 0._CUSTOM_REAL
b_epsilondev_xz_crust_mantle = 0._CUSTOM_REAL
b_epsilondev_yz_crust_mantle = 0._CUSTOM_REAL
+ b_eps_trace_over_3_crust_mantle = init_value
b_epsilondev_xx_inner_core = 0._CUSTOM_REAL
b_epsilondev_yy_inner_core = 0._CUSTOM_REAL
b_epsilondev_xy_inner_core = 0._CUSTOM_REAL
b_epsilondev_xz_inner_core = 0._CUSTOM_REAL
b_epsilondev_yz_inner_core = 0._CUSTOM_REAL
+ b_eps_trace_over_3_inner_core = init_value
if (ROTATION_VAL) then
b_A_array_rotation = 0._CUSTOM_REAL
More information about the CIG-COMMITS
mailing list