diff options
| author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2004-06-22 13:24:09 +0000 |
|---|---|---|
| committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2004-06-22 13:24:09 +0000 |
| commit | cf53e9b88d392c279bf953dc9a690fc5c975b19e (patch) | |
| tree | f4773c3e8bddd09ca4d666237761c98fc4e2fec8 | |
| parent | 3651083015d1ac75c649a3606af9741e89744ba5 (diff) | |
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
| -rw-r--r-- | src/EHFinder_mod.F90 | 3 |
1 files changed, 2 insertions, 1 deletions
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 |