Added a default definition for (<>) in terms of mappend