hls-tactics-plugin-1.8.0.0: old/test/golden/KnownPolyMonoid.expected.hs

data Mono a = Monoid [String] a

instance Semigroup (Mono a) where
  (<>) = undefined

instance Monoid a => Monoid (Mono a) where
  mempty = Monoid mempty mempty