module Statistics.Constants
(
m_epsilon
, m_huge
, m_1_sqrt_2
, m_2_sqrt_pi
, m_max_exp
, m_sqrt_2
, m_sqrt_2_pi
) where
m_huge :: Double
m_huge = 1.7976931348623157e308
m_max_exp :: Int
m_max_exp = 1024
m_sqrt_2 :: Double
m_sqrt_2 = 1.4142135623730950488016887242096980785696718753769480731766
m_sqrt_2_pi :: Double
m_sqrt_2_pi = 2.5066282746310005024157652848110452530069867406099383166299
m_2_sqrt_pi :: Double
m_2_sqrt_pi = 1.1283791670955125738961589031215451716881012586579977136881
m_1_sqrt_2 :: Double
m_1_sqrt_2 = 0.7071067811865475244008443621048490392848359376884740365883
m_epsilon :: Double
m_epsilon = encodeFloat (signif+1) expo 1.0
where (signif,expo) = decodeFloat (1.0::Double)