[project @ 1999-01-14 18:12:47 by sof]

[ghc-hetmet.git] / ghc / lib / std / Ratio.lhs

diff --git a/ghc/lib/std/Ratio.lhs b/ghc/lib/std/Ratio.lhs
index 02e32e3..7c8107f 100644 (file)
--- a/ghc/lib/std/Ratio.lhs
+++ b/ghc/lib/std/Ratio.lhs
@@ -1,5 +1,5 @@
 %
-% (c) The AQUA Project, Glasgow University, 1994-1996
+% (c) The AQUA Project, Glasgow University, 1994-1999
 %
 
 \section[Ratio]{Module @Ratio@}
@@ -9,12 +9,29 @@ Standard functions on rational numbers
 \begin{code}
 {-# OPTIONS -fno-implicit-prelude #-}
 
-module Ratio (
-    Ratio, Rational, (%), numerator, denominator, approxRational
+module Ratio
+    ( Ratio
+    , Rational
+    , (%)              -- :: (Integral a) => a -> a -> Ratio a
+    , numerator                -- :: (Integral a) => Ratio a -> a
+    , denominator      -- :: (Integral a) => Ratio a -> a
+    , approxRational   -- :: (RealFrac a) => a -> a -> Rational
+
+    -- Ratio instances: 
+    --   (Integral a) => Eq   (Ratio a)
+    --   (Integral a) => Ord  (Ratio a)
+    --   (Integral a) => Num  (Ratio a)
+    --   (Integral a) => Real (Ratio a)
+    --   (Integral a) => Fractional (Ratio a)
+    --   (Integral a) => RealFrac (Ratio a)
+    --   (Integral a) => Enum    (Ratio a)
+    --   (Read a, Integral a) => Read (Ratio a)
+    --   (Integral a) => Show    (Ratio a)
+    --
+    -- Implementation checked wrt. Haskell 98 lib report, 1/99.
+
   ) where
 
 import PrelNum
 import PrelNumExtra
 \end{code}
-
-