lookup-tables-0.1.0.0: test/Functions.hs

module Functions where

import Data.Word

f :: Word8 -> Word8
f w = w + 100

g :: Word16 -> Double
g w = fromIntegral w / fromIntegral (maxBound :: Word16)