[Commits] [svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 493)
rhaas at tapir.caltech.edu
rhaas at tapir.caltech.edu
Wed Mar 27 20:46:32 CDT 2013
User: rhaas
Date: 2013/03/27 08:46 PM
Modified:
/trunk/src/
GRHydro_HLLE.F90
Log:
GRHydro: convert more tabs to (8) spaces. No other changes.
From: Roland Haas <rhaas at tapir.caltech.edu>
File Changes:
Directory: /trunk/src/
======================
File [modified]: GRHydro_HLLE.F90
Delta lines: +4 -4
===================================================================
--- trunk/src/GRHydro_HLLE.F90 2013-03-28 01:46:29 UTC (rev 492)
+++ trunk/src/GRHydro_HLLE.F90 2013-03-28 01:46:32 UTC (rev 493)
@@ -114,13 +114,13 @@
if (evolve_temper.ne.1) then
call EOS_Omni_press(GRHydro_eos_handle,keytemp,GRHydro_eos_rf_prec,n,&
- rho(i,j,k),eps(i,j,k),xtemp,xye,xpress,keyerr,anyerr)
+ rho(i,j,k),eps(i,j,k),xtemp,xye,xpress,keyerr,anyerr)
- call EOS_Omni_DPressByDEps(GRHydro_eos_handle,keytemp,GRHydro_eos_rf_prec,n,&
- rho(i,j,k),eps(i,j,k),xtemp,xye,dpdeps,keyerr,anyerr)
+ call EOS_Omni_DPressByDEps(GRHydro_eos_handle,keytemp,GRHydro_eos_rf_prec,n,&
+ rho(i,j,k),eps(i,j,k),xtemp,xye,dpdeps,keyerr,anyerr)
call EOS_Omni_DPressByDRho(GRHydro_eos_handle,keytemp,GRHydro_eos_rf_prec,n,&
- rho(i,j,k),eps(i,j,k),xtemp,xye,dpdrho,keyerr,anyerr)
+ rho(i,j,k),eps(i,j,k),xtemp,xye,dpdrho,keyerr,anyerr)
cs2 = (dpdrho + xpress(1) * dpdeps / (rho(i,j,k)**2))/ &
(1.0d0 + eps(i,j,k) + xpress(1)/rho(i,j,k))
More information about the Commits
mailing list