[Commits] [svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 386)

[rhaas at tapir.caltech.edu]

User: rhaas
Date: 2012/07/05 12:36 AM

Modified:
 /trunk/src/
  GRHydro_Con2PrimM.F90, GRHydro_Source.F90

Log:
 GRHydro: remove unused variables

File Changes:

Directory: /trunk/src/
======================

File [modified]: GRHydro_Con2PrimM.F90
Delta lines: +2 -2
===================================================================
--- trunk/src/GRHydro_Con2PrimM.F90	2012-07-05 05:36:48 UTC (rev 385)
+++ trunk/src/GRHydro_Con2PrimM.F90	2012-07-05 05:36:50 UTC (rev 386)
@@ -549,7 +549,7 @@
 
   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 @@
   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)

File [modified]: GRHydro_Source.F90
Delta lines: +0 -5
===================================================================
--- trunk/src/GRHydro_Source.F90	2012-07-05 05:36:48 UTC (rev 385)
+++ trunk/src/GRHydro_Source.F90	2012-07-05 05:36:50 UTC (rev 386)
@@ -93,11 +93,6 @@
   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