[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