[cig-commits] r11929 - seismo/3D/SPECFEM3D_GLOBE/trunk

dkomati1 at geodynamics.org dkomati1 at geodynamics.org
Fri May 9 04:19:47 PDT 2008


Author: dkomati1
Date: 2008-05-09 04:19:47 -0700 (Fri, 09 May 2008)
New Revision: 11929

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90
Log:
updated test for negative values of NSPEC


Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90	2008-05-09 00:17:33 UTC (rev 11928)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90	2008-05-09 11:19:47 UTC (rev 11929)
@@ -2261,9 +2261,7 @@
          (NEX_PER_PROC_ETA / ratio_divide_central_cube) * &
          (NEX_XI / ratio_divide_central_cube)
 
-!! DK DK temporary check because at very high resolution there is a bug somewhere
-!! DK DK (maybe in auto_ner)
-  if(minval(NSPEC) < 0) stop 'negative NSPEC, there is a bug somewhere, maybe in auto_ner'
+  if(minval(NSPEC) <= 0) stop 'negative NSPEC, there is a problem somewhere'
 
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 !!!!!!



More information about the cig-commits mailing list