1 module Hdoc.TCT.Utils where
3 import Data.Function ((.), flip)
4 import Data.Functor (Functor, (<$>))
5 import Data.Int (Int, Int64)
6 import Prelude (Num(..), Integral(..))
9 int :: Integral i => i -> Int
10 int = fromInteger . toInteger
12 int64 :: Integral i => i -> Int64
13 int64 = fromInteger . toInteger
16 (<&>) :: Functor f => f a -> (a -> b) -> f b