diff options
Diffstat (limited to 'src/GRHydro_EoSChangeGamma.F90')
| -rw-r--r-- | src/GRHydro_EoSChangeGamma.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GRHydro_EoSChangeGamma.F90 b/src/GRHydro_EoSChangeGamma.F90 index 432b469..2820c1b 100644 --- a/src/GRHydro_EoSChangeGamma.F90 +++ b/src/GRHydro_EoSChangeGamma.F90 @@ -195,7 +195,7 @@ subroutine GRHydro_EoSChangeK(CCTK_ARGUMENTS) end if press = local_k * rho**local_gamma - eps = (local_gamma - 1.d0) * local_k * rho**local_gamma + eps = local_k / (local_gamma - 1.d0) * rho**(local_gamma-1) call Primitive2ConservativePolyCells(CCTK_ARGUMENTS) |