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_Con2PrimM.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_Con2PrimM.F90')
-rw-r--r-- | src/GRHydro_Con2PrimM.F90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/GRHydro_Con2PrimM.F90 b/src/GRHydro_Con2PrimM.F90 index 1d66cca..2712397 100644 --- a/src/GRHydro_Con2PrimM.F90 +++ b/src/GRHydro_Con2PrimM.F90 @@ -549,7 +549,7 @@ subroutine Conservative2PrimitivePolytypeM(CCTK_ARGUMENTS) CCTK_INT :: epsnegative - CCTK_REAL :: local_min_tracer, local_gam, local_pgam,local_K, sc + CCTK_REAL :: local_min_tracer, local_pgam,local_K, sc ! character(len=400) :: warnline ! begin EOS Omni vars @@ -672,7 +672,7 @@ subroutine Con2PrimBoundsPolytypeM(CCTK_ARGUMENTS) CCTK_REAL :: b2minus, b2plus CCTK_INT :: epsnegative - CCTK_REAL :: local_gam, local_pgam,local_K,scplus,scminus + CCTK_REAL :: local_pgam,local_K,scplus,scminus ! begin EOS Omni vars integer :: n,keytemp,anyerr,keyerr(1) |