[cig-commits] [commit] devel: Fix a problem with remove_min_to_start_at_zero in AXISYM option (c5d302b)

[cig_noreply at geodynamics.org]

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

On branch  : devel
Link       : https://github.com/geodynamics/specfem2d/compare/1bf2f9afb1921add757b42837c8e2517c3df028d...c5d302b407be76dc8b15fd41b30dd9a6f73fe91e

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

commit c5d302b407be76dc8b15fd41b30dd9a6f73fe91e
Author: Alexis Bottero <alexis.bottero at gmail.com>
Date:   Fri Oct 31 14:33:54 2014 +0100

    Fix a problem with remove_min_to_start_at_zero in AXISYM option


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

c5d302b407be76dc8b15fd41b30dd9a6f73fe91e
 src/meshfem2D/meshfem2D.F90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/meshfem2D/meshfem2D.F90 b/src/meshfem2D/meshfem2D.F90
index bcdcb33..44b1e04 100644
--- a/src/meshfem2D/meshfem2D.F90
+++ b/src/meshfem2D/meshfem2D.F90
@@ -820,6 +820,8 @@ program meshfem2D
 
     else ! if the mesh has been made by the internal mesher
     
+      remove_min_to_start_at_zero = 0
+
       if(xmin * xmax < 0) stop 'in axisymmetric mode xmin and xmax must have the same sign, they cannot cross the symmetry axis'
       if(xmin < 0) stop 'in axisymmetric mode, case of symmetry axis on the right edge instead of left not supported yet'