[cig-commits] [commit] devel: Fix an unnecessarily inverted condition. (b9d571a)

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


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

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

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

commit b9d571ac504e71a09422da9254ecc0963b7821fb
Author: Elliott Sales de Andrade <esalesde at physics.utoronto.ca>
Date:   Thu Sep 11 03:06:05 2014 -0400

    Fix an unnecessarily inverted condition.


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

b9d571ac504e71a09422da9254ecc0963b7821fb
 src/auxiliaries/combine_surf_data.f90 | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/auxiliaries/combine_surf_data.f90 b/src/auxiliaries/combine_surf_data.f90
index 6a337ee..6cae224 100644
--- a/src/auxiliaries/combine_surf_data.f90
+++ b/src/auxiliaries/combine_surf_data.f90
@@ -180,10 +180,10 @@ program combine_surf_data
     close(27)
   enddo
 
-  if (.not. FILE_ARRAY_IS_3D) then
-    allocate(data_2D(NGLLX,NGLLY,nspec_surf))
-  else
+  if (FILE_ARRAY_IS_3D) then
     allocate(data_3D(NGLLX,NGLLY,NGLLZ,NSPEC_CRUST_MANTLE))
+  else
+    allocate(data_2D(NGLLX,NGLLY,nspec_surf))
   endif
 
   ! open Paraview output mesh file



More information about the CIG-COMMITS mailing list