Create String From List Comprehension Haskell