From a4e40fd09ef88a0744bd366fbe0a007901046a53 Mon Sep 17 00:00:00 2001
From: diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c>
Date: Tue, 30 Sep 2003 09:34:03 +0000
Subject: Removed re-declaration of the inverse 3-metric.

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

(limited to 'src')

diff --git a/src/EHFinder_Sources.F90 b/src/EHFinder_Sources.F90
index 69a5464..6e0b0dd 100644
--- a/src/EHFinder_Sources.F90
+++ b/src/EHFinder_Sources.F90
@@ -18,7 +18,6 @@ subroutine EHFinder_Sources(CCTK_ARGUMENTS)
   CCTK_INT :: i, j, k, l
   CCTK_REAL :: idx, idy, idz, mdelta
   CCTK_REAL :: a, b, c
-  CCTK_REAL :: g3xx, g3xy, g3xz, g3yy, g3yz, g3zz
   CCTK_REAL :: gxxc, gxyc, gxzc, gyyc, gyzc, gzzc, psito4
   CCTK_REAL :: idetg, alp2, tmp1, tmp2, tmp3
   CCTK_REAL :: ratio, cfactor, ssign
-- 
cgit v1.2.3