-- | Crunching 'Word32' values, defined in terms of 'crunch64'.
crunch32 :: [Word32] -> [Word64]
crunch32 = crunch64 . (map fromIntegral)
crunch32 :: [Word32] -> [Word64]
crunch32 = crunch64 . (map fromIntegral)
crunch32 = crunch64 . (map fromIntegral)