fixed an undeclared variable

SPECFEM · Jul 7, 2012 · 126c2da · 126c2da
1 parent 2b9c5bc
commit 126c2da
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/shared/auto_ner.f90 b/src/shared/auto_ner.f90
@@ -407,7 +407,7 @@ end subroutine compute_nex
 
   subroutine get_element(points, ispec, npts, pts)
     implicit none
-    integer :: npts,ispec,istart_left,istart_right
+    integer :: npts,ispec,istart_left,istart_right,i
     integer, parameter :: NBNODE = 8
     double precision pts(NBNODE+1,2), points(npts,2)