From cf53e9b88d392c279bf953dc9a690fc5c975b19e Mon Sep 17 00:00:00 2001
From: diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c>
Date: Tue, 22 Jun 2004 13:24:09 +0000
Subject: Removed some local variables. Added another. To work with Carpet.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@176 2a26948c-0e4f-0410-aee8-f1d3e353619c
---
 src/EHFinder_mod.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/EHFinder_mod.F90 b/src/EHFinder_mod.F90
index 3fe10a5..d07ab6a 100644
--- a/src/EHFinder_mod.F90
+++ b/src/EHFinder_mod.F90
@@ -11,7 +11,8 @@ module EHFinder_mod
   CCTK_REAL :: hfac
   CCTK_INT :: nx, ny, nz, ngx, ngy, ngz
   CCTK_INT :: max_handle, min_handle, sum_handle
-  CCTK_INT :: ncalls, ierr
+  CCTK_INT :: last_called_at_iteration = -1
+  CCTK_INT :: ierr
   CCTK_REAL :: delta
   CCTK_REAL :: h
   CCTK_REAL :: ex_value
-- 
cgit v1.2.3