[Haskell-beginners] How to convert ST.Trans Array to ByteString efficiently?