ormolu-0.0.1.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