[cig-commits] [commit] devel: Hard fail if resolution is set to invalid value. (31c4e16)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Thu Sep 18 16:18:11 PDT 2014


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

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d_globe/compare/c6e8e9a46f1a4bfcf8b3725426d1dd528b7dabea...44c2c95f23a37e3e2af17b5f784a8521c8197b8b

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

commit 31c4e16e1fac1b983cbc687b47dc663475fcf67b
Author: Elliott Sales de Andrade <esalesde at physics.utoronto.ca>
Date:   Wed Sep 10 01:20:14 2014 -0400

    Hard fail if resolution is set to invalid value.


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

31c4e16e1fac1b983cbc687b47dc663475fcf67b
 src/auxiliaries/combine_vol_data.F90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/auxiliaries/combine_vol_data.F90 b/src/auxiliaries/combine_vol_data.F90
index 6974830..fa83f47 100644
--- a/src/auxiliaries/combine_vol_data.F90
+++ b/src/auxiliaries/combine_vol_data.F90
@@ -240,6 +240,8 @@ program combine_vol_data
     di = int((NGLLX-1)/2.0)
     dj = int((NGLLY-1)/2.0)
     dk = int((NGLLZ-1)/2.0)
+  else
+    stop 'resolution setting must be 0, 1, or 2'
   endif
 
   ! output info



More information about the CIG-COMMITS mailing list