src/Prelude.hs

   1 {-# LANGUAGE PackageImports #-}
   2 module Prelude (
   3   -- module BasePrelude
   4   module Prelude,
   5   (^),
   6   Bounded (..),
   7   Double,
   8   Enum,
   9   Fractional (..),
  10   Integral(..),
  11   Num (..),
  12   Rational,
  13   Real,
  14   error,
  15   fromIntegral,
  16   pi,
  17   tan,
  18   toRational,
  19   undefined,
  20   IO,
  21   max,
  22   min,
  23 )
  24 where
  25
  26 import "base" Prelude as BasePrelude
  27
  28 -- | Reverse function composition (do f first, then g)
  29 (>.>) :: (a -> b) -> (b -> c) -> a -> c
  30 infixr 9 >.>
  31 (f >.> g) x = g (f x)
  32 {-# INLINE (>.>) #-}