[cig-commits] r21397 - seismo/3D/SPECFEM3D_GLOBE/trunk/utils/Visualization/VTK_ParaView/global_slice_util

[elliott.sales.de.andrade at geodynamics.org]

Author: elliott.sales.de.andrade
Date: 2013-02-25 23:37:24 -0800 (Mon, 25 Feb 2013)
New Revision: 21397

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/utils/Visualization/VTK_ParaView/global_slice_util/global_slice_number.f90
Log:
Fix incorrect parentheses.

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/utils/Visualization/VTK_ParaView/global_slice_util/global_slice_number.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/utils/Visualization/VTK_ParaView/global_slice_util/global_slice_number.f90	2013-02-26 07:37:15 UTC (rev 21396)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/utils/Visualization/VTK_ParaView/global_slice_util/global_slice_number.f90	2013-02-26 07:37:24 UTC (rev 21397)
@@ -163,7 +163,7 @@
         endif
       enddo
 
-      if (nchunks /= 6 .and. (chunk(i) > nchunks .or. abs(xi(i) > pi/2) .or. abs(eta(i)) > pi/2)) then
+      if (nchunks /= 6 .and. (chunk(i) > nchunks .or. abs(xi(i)) > pi/2 .or. abs(eta(i)) > pi/2)) then
         write(ch_usage,*) 'Check if point ', x, ',', y, ',', z, ' is within the region or not'
         print *, trim(ch_usage)
         stop