lowercase :: ByteString -> ByteString
lowercase = B.map (\x -> toLowerW8 AU.! x)
lowercase :: ByteString -> ByteString
lowercase = B.map (\x -> toLowerW8 AU.! x)
lowercase = B.map (\x -> toLowerW8 AU.! x)