diff options
author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-09-30 09:34:03 +0000 |
---|---|---|
committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-09-30 09:34:03 +0000 |
commit | a4e40fd09ef88a0744bd366fbe0a007901046a53 (patch) | |
tree | 4f324b965a84fcb234f1a39816e05396cb04d978 | |
parent | adb278b7109cc35ea4e934567ead92ac67c766a3 (diff) |
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
-rw-r--r-- | src/EHFinder_Sources.F90 | 1 |
1 files changed, 0 insertions, 1 deletions
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 |