1data Mono = Monoid [String]
2
3instance Semigroup Mono where
4  (<>) = undefined
5
6instance Monoid Mono where
7  mempty = Monoid mempty
8
9