computeChecksum :: Word32 -> S.ByteString -> Word16
computeChecksum c0 =
  complement . fromIntegral . fold32 . fold32 . computePartialChecksum c0
computeChecksum :: Word32 -> S.ByteString -> Word16
computeChecksum c0 =
  complement . fromIntegral . fold32 . fold32 . computePartialChecksum c0
computeChecksum c0 =
  complement . fromIntegral . fold32 . fold32 . computePartialChecksum c0