How do you use Data.Text.intersperse :: Char -> Text -> Text?