fork download
  1. import Data.List
  2.  
  3. greet = ["Hello,", "yes", "this", "is", "dog."]
  4.  
  5. main = print $ foldr1 (++) $ intersperse " " greet
Success #stdin #stdout 0s 6228KB
stdin
Standard input is empty
stdout
"Hello, yes this is dog."