fourmolu-0.0.6.0: data/examples/declaration/instance/single-parameter-out.hs

instance Monoid Int where (<>) x y = x + y

instance Enum Int where
  fromEnum x = x
  toEnum =
    \x ->
      x

instance Foo Int where foo x = x; bar y = y