There's a bug in the code submission, it didn't like <> in haskell, replacing it with `mappend` was fine