diff options
author | rhaas <rhaas@8e189c6b-2ab8-4400-aa02-70a9cfce18b9> | 2013-02-11 16:35:39 +0000 |
---|---|---|
committer | rhaas <rhaas@8e189c6b-2ab8-4400-aa02-70a9cfce18b9> | 2013-02-11 16:35:39 +0000 |
commit | e35d6e7aa0f9bdfa99bebe01df327eca59ef9817 (patch) | |
tree | 10a690cdc74f0c7671ceb018c35fb59fdd17dec5 /src/EOS_Omni_Startup.F90 | |
parent | ec464f0fb0bb2d9faed7b9de03fb6e6a48a38afe (diff) |
remove poly_gamma_ini
EOS_Omni used this to compute (initially) conversion factors from code (assumed
to e G=c=M_sun=1) to cgs units. It then goes back and forth between these units
even for polytropic and gamma law eos. This is very confusing since
poly_gamma_ini since poly_gamma_ini must mast poly_gamma and gl_gamma for a
"usual" run with a Gamma law eos.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEOS/EOS_Omni/trunk@73 8e189c6b-2ab8-4400-aa02-70a9cfce18b9
Diffstat (limited to 'src/EOS_Omni_Startup.F90')
-rw-r--r-- | src/EOS_Omni_Startup.F90 | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/src/EOS_Omni_Startup.F90 b/src/EOS_Omni_Startup.F90 index e1fc6a3..2995393 100644 --- a/src/EOS_Omni_Startup.F90 +++ b/src/EOS_Omni_Startup.F90 @@ -11,13 +11,7 @@ subroutine EOS_Omni_Startup(CCTK_ARGUMENTS) DECLARE_CCTK_PARAMETERS DECLARE_CCTK_ARGUMENTS - poly_k_cgs = poly_k * rho_gf**poly_gamma_ini / press_gf - - gl_k_cgs = gl_k * rho_gf**poly_gamma_ini / press_gf - - hybrid_k1_cgs = hybrid_k1 * rho_gf**poly_gamma_ini / press_gf - - hybrid_k2_cgs = hybrid_k1_cgs * & - (hybrid_rho_nuc * inv_rho_gf)**(hybrid_gamma1-hybrid_gamma2) + hybrid_k2 = hybrid_k1 * & + hybrid_rho_nuc**(hybrid_gamma1-hybrid_gamma2) end subroutine EOS_Omni_Startup |