module EOS_Omni_Module

  implicit none

  ! Magic numbers in convenient units, calculated by someone whom we
  ! trust to have worked very carefully

  real*8,parameter :: rho_gf = 1.61620075314614d-18
  real*8,parameter :: press_gf = 1.7982953469278d-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
  
  ! Inverses of the numbers above, calculated manually instead of by
  ! the compiler
  
  real*8,parameter :: inv_rho_gf = 6.18735016707159d17
  real*8,parameter :: inv_press_gf = 5.56082181777535d38
  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

  ! These values are set by EOS_Omni_Startup

  real*8 :: poly_k_cgs = 0.0d0
  real*8 :: gl_k_cgs   = 0.0d0

  real*8 :: hybrid_k1_cgs = 0.0d0
  real*8 :: hybrid_k2_cgs = 0.0d0

end module EOS_Omni_Module