diff options
Diffstat (limited to 'src/EOS_Omni_Module.F90')
-rw-r--r-- | src/EOS_Omni_Module.F90 | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/EOS_Omni_Module.F90 b/src/EOS_Omni_Module.F90 index 75c6c2d..f98930d 100644 --- a/src/EOS_Omni_Module.F90 +++ b/src/EOS_Omni_Module.F90 @@ -3,23 +3,22 @@ module EOS_Omni_Module implicit none real*8,parameter :: rho_gf = 1.61620075314614d-18 -! real*8,parameter :: rho_gf = 1.61930347d-18 real*8,parameter :: press_gf = 1.7982953469278d-39 -! real*8,parameter :: press_gf = 1.80171810d-39 real*8,parameter :: eps_gf = 1.11265006d-21 real*8,parameter :: time_gf = 2.03001708d+05 real*8,parameter :: mass_gf = 5.02765209d-34 real*8,parameter :: length_gf = 6.77140812d-06 real*8,parameter :: inv_rho_gf = 6.18735016707159d17 -! real*8,parameter :: inv_rho_gf = 6.17549470205236d17 real*8,parameter :: inv_press_gf = 5.56082181777535d38 -! real*8,parameter :: inv_press_gf = 5.55025783445257d38 real*8,parameter :: inv_eps_gf = 8.98755175549085d20 real*8,parameter :: inv_time_gf = 4.92606692747629d-6 real*8,parameter :: inv_mass_gf = 1.98899999860571d33 real*8,parameter :: inv_length_gf = 147679.77092481d0 + real*8,parameter :: clite = 2.99792458d10 + real*8,parameter :: cliteinv2 = 1.11265005605362d-21 + real*8 :: poly_k_cgs = 0.0d0 real*8 :: gl_k_cgs = 0.0d0 |