[Commits] [svn:einsteintoolkit] incoming/EOS_Omni/src/ (Rev. 4)

[cott at tapir.caltech.edu]

User: cott
Date: 2010/08/09 09:20 AM

Modified:
 /EOS_Omni/src/
  EOS_Omni_Startup.F90

Log:
 * fix a bug in the Hybrid part of OmniEOS

File Changes:

Directory: /EOS_Omni/src/
=========================

File [modified]: EOS_Omni_Startup.F90
Delta lines: +1 -1
===================================================================
--- EOS_Omni/src/EOS_Omni_Startup.F90	2010-07-02 21:41:51 UTC (rev 3)
+++ EOS_Omni/src/EOS_Omni_Startup.F90	2010-08-09 14:20:16 UTC (rev 4)
@@ -17,7 +17,7 @@
 
   hybrid_k1_cgs = hybrid_k1 * rho_gf**poly_gamma_ini / press_gf
 
-  hybrid_k2_cgs = hybrid_k1 * (hybrid_rho_nuc * inv_rho_gf)**(hybrid_gamma1-hybrid_gamma2)
+  hybrid_k2_cgs = hybrid_k1_cgs * (hybrid_rho_nuc * inv_rho_gf)**(hybrid_gamma1-hybrid_gamma2)
 
 
 end subroutine EOS_Omni_Startup