diff options
Diffstat (limited to 'src/GRHydro_Eigenproblem.F90')
-rw-r--r-- | src/GRHydro_Eigenproblem.F90 | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/GRHydro_Eigenproblem.F90 b/src/GRHydro_Eigenproblem.F90 index 7fe8bdb..4981508 100644 --- a/src/GRHydro_Eigenproblem.F90 +++ b/src/GRHydro_Eigenproblem.F90 @@ -145,7 +145,6 @@ subroutine eigenvalues_hot(handle,keytemp,ii,jj,kk,rho,velx,vely,velz,eps, & CCTK_REAL vlowx,vlowy,vlowz,v2,w CCTK_REAL lam1,lam2,lam3,lamm,lamp,lamm_nobeta,lamp_nobeta CCTK_INT handle,ii,jj,kk - CCTK_REAL dpdrho,dpdeps,press ! begin EOS Omni vars integer :: n,keytemp,anyerr,keyerr(1) @@ -598,7 +597,7 @@ subroutine eigenproblem_leftright(handle,rho,velx,vely,velz,eps,& CCTK_REAL lam1,lam2,lam3,lamm,lamp,lamm_nobeta,lamp_nobeta CCTK_REAL cs2,one,two CCTK_REAL vlowx,vlowy,vlowz,v2,w - CCTK_REAL press,dpdrho,dpdeps,enthalpy,kappa + CCTK_REAL press,dpdeps,enthalpy,kappa CCTK_REAL axp,axm,vxp,vxm,cxx,cxy,cxz,gam,xsi,dlt CCTK_INT handle |