diff options
| author | knarf <knarf@c83d129a-5a75-4d5a-9c4d-ed3a5855bf45> | 2013-03-04 15:11:17 +0000 |
|---|---|---|
| committer | knarf <knarf@c83d129a-5a75-4d5a-9c4d-ed3a5855bf45> | 2013-03-04 15:11:17 +0000 |
| commit | 718f43b6350665df6df9c58ab2c278f9919e7014 (patch) | |
| tree | 5a6493e54874df654a6c4743a1c0f23d5c7fd471 | |
| parent | 24123195b04d196bb01777549d1531e8b05b43a6 (diff) | |
remove unused variables
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEvolve/GRHydro/trunk@484 c83d129a-5a75-4d5a-9c4d-ed3a5855bf45
| -rw-r--r-- | src/GRHydro_Boundaries.F90 | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/GRHydro_Boundaries.F90 b/src/GRHydro_Boundaries.F90 index 90852fc..99a8e89 100644 --- a/src/GRHydro_Boundaries.F90 +++ b/src/GRHydro_Boundaries.F90 @@ -41,12 +41,8 @@ subroutine GRHydro_InitSymBound(CCTK_ARGUMENTS) integer, dimension(3) :: sym integer :: ierr = 0 - integer :: itracer CCTK_INT :: GRHydro_UseGeneralCoordinates, general_coordinates - character(len=100) tracername - character(len=100) tracerindex - sym(1) = 1 sym(2) = 1 sym(3) = 1 @@ -178,7 +174,6 @@ subroutine GRHydro_Boundaries(CCTK_ARGUMENTS) integer, dimension(3) :: sw integer :: ierr = 0 - integer :: i,j,k CCTK_INT :: GRHydro_UseGeneralCoordinates, general_coordinates CCTK_INT, parameter :: faces=CCTK_ALL_FACES |