[cig-commits] [commit] devel: removed an unused variable (dae5895)

[cig_noreply at geodynamics.org]

Repository : ssh://geoshell/specfem2d

On branch  : devel
Link       : https://github.com/geodynamics/specfem2d/compare/32bed13f841e61bacdbd35fb1e0cde9c161a6931...2a7e7fc79c4454cffb70ac15f7f1766d7756c12d

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

commit dae5895285e99cb05a48b5282e745a8380d87783
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Sun Apr 27 00:36:01 2014 +0200

    removed an unused variable


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

dae5895285e99cb05a48b5282e745a8380d87783
 src/specfem2D/define_external_model.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/specfem2D/define_external_model.f90 b/src/specfem2D/define_external_model.f90
index d94f120..a28f526 100644
--- a/src/specfem2D/define_external_model.f90
+++ b/src/specfem2D/define_external_model.f90
@@ -1169,7 +1169,7 @@
 ! region flag to assign the Atmosphere model
   integer, parameter :: IREGION_AIR = 1
 
-  integer :: i,j,ispec,iglob,ii,iglob1
+  integer :: i,j,ispec,iglob,ii
 
   double precision :: x,z,frac,tmp2