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

[knarf at cct.lsu.edu]

User: knarf
Date: 2011/11/01 06:22 PM

Modified:
 /trunk/src/
  GRHydro_PPM.F90, GRHydro_PPMM.F90

Log:
 remove unused macros SpaceMask_CheckStateBitsF90_1D

File Changes:

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

File [modified]: GRHydro_PPM.F90
Delta lines: +0 -4
===================================================================
--- trunk/src/GRHydro_PPM.F90	2011-11-01 23:21:17 UTC (rev 292)
+++ trunk/src/GRHydro_PPM.F90	2011-11-01 23:22:50 UTC (rev 293)
@@ -47,10 +47,6 @@
 
 @@*/
 
-#define SpaceMask_CheckStateBitsF90_1D(mask,i,type_bits,state_bits) \
-  (iand(mask((i)),(type_bits)).eq.(state_bits))
-
-
 subroutine SimplePPM_1d(handle,poly,&
      nx,dx,rho,velx,vely,velz,eps,press,rhominus,&
      velxminus,velyminus,velzminus,epsminus,rhoplus,velxplus,velyplus,&

File [modified]: GRHydro_PPMM.F90
Delta lines: +0 -4
===================================================================
--- trunk/src/GRHydro_PPMM.F90	2011-11-01 23:21:17 UTC (rev 292)
+++ trunk/src/GRHydro_PPMM.F90	2011-11-01 23:22:50 UTC (rev 293)
@@ -30,10 +30,6 @@
 
 @@*/
 
-#define SpaceMask_CheckStateBitsF90_1D(mask,i,type_bits,state_bits) \
-  (iand(mask((i)),(type_bits)).eq.(state_bits))
-
-
 subroutine SimplePPM_1dM(handle,poly,nx,dx,&
      rho,velx,vely,velz,Bvcx,Bvcy,Bvcz,psidc,eps,press,&
      rhominus,velxminus,velyminus,velzminus,Bvcxminus,Bvcyminus,Bvczminus,psidcminus,epsminus,&