aboutsummaryrefslogtreecommitdiff
path: root/src/GRHydro_Flux.F90
diff options
context:
space:
mode:
Diffstat (limited to 'src/GRHydro_Flux.F90')
-rw-r--r--src/GRHydro_Flux.F901
1 files changed, 0 insertions, 1 deletions
diff --git a/src/GRHydro_Flux.F90 b/src/GRHydro_Flux.F90
index f467e1c..0b9eaab 100644
--- a/src/GRHydro_Flux.F90
+++ b/src/GRHydro_Flux.F90
@@ -36,7 +36,6 @@ subroutine num_flux(xoffset,yoffset,zoffset,dens,sx,sy,sz,tau,&
CCTK_REAL :: dens,sx,sy,sz,tau,velx,vely,velz,det
CCTK_REAL :: densf,sxf,syf,szf,tauf
CCTK_REAL :: alp,beta,press
- integer :: i,j,k
integer :: xoffset,yoffset,zoffset
densf = dens * ( (velx*xoffset + vely*yoffset + &