-- For some reason integerToWord and wordToInteger (GHC.Integer.Type)
-- work over Word#
integerToWordX :: Integer -> Word
integerToWordX i = W# (integerToWord i)
integerToWordX :: Integer -> Word
integerToWordX i = W# (integerToWord i)
integerToWordX i = W# (integerToWord i)