shithub: MicroHs

ref: e0aea1f7c8371b5a747b2b755dcd0a2af0b8137b
dir: /lib/Data/Real.hs/

View raw version 
module Data.Real(module Data.Real) where
import Prelude()              -- do not import Prelude
import Primitives
import Data.Num
import Data.Ord
import Data.Ratio_Type

class (Num a, Ord a) => Real a where
  toRational :: a -> Rational