module Functions where import Data.Word f :: Word8 -> Word8 f w = w + 100 g :: Word16 -> Double g w = fromIntegral w / fromIntegral (maxBound :: Word16)