diff options
author | rhaas <rhaas@c83d129a-5a75-4d5a-9c4d-ed3a5855bf45> | 2012-07-05 05:36:50 +0000 |
---|---|---|
committer | rhaas <rhaas@c83d129a-5a75-4d5a-9c4d-ed3a5855bf45> | 2012-07-05 05:36:50 +0000 |
commit | 1431ad4c469e6312c256b88a93bdddf3e9d6badd (patch) | |
tree | 1f636d723385ca0306d9b2192b2fac4cef2992c7 /src/GRHydro_Source.F90 | |
parent | b7fc70097d5d453b086792bcbc761e8d54e2b571 (diff) |
GRHydro: remove unused variables
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEvolve/GRHydro/trunk@386 c83d129a-5a75-4d5a-9c4d-ed3a5855bf45
Diffstat (limited to 'src/GRHydro_Source.F90')
-rw-r--r-- | src/GRHydro_Source.F90 | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/GRHydro_Source.F90 b/src/GRHydro_Source.F90 index c72ea5e..be915ea 100644 --- a/src/GRHydro_Source.F90 +++ b/src/GRHydro_Source.F90 @@ -93,11 +93,6 @@ subroutine SourceTerms(CCTK_ARGUMENTS) CCTK_REAL, DIMENSION(:,:,:), POINTER :: beta1, beta2, beta3 CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup - ! poison hack - CCTK_INT, SAVE :: reflevel = -1 - CCTK_INT, SAVE :: last_iteration_seen = -1 - CCTK_INT, SAVE :: mol_substep = -1 - if (GRHydro_UseGeneralCoordinates(cctkGH).ne.0) then g11 => gaa g12 => gab |