fourmolu-0.0.6.0: data/examples/declaration/class/single-parameters-out.hs

module Main where

-- | Something.
class Foo a where foo :: a

-- | Something more.
class Bar a where
  -- | Bar
  bar :: a -> a -> a

class Baz a where
  -- | Baz
  baz ::
    -- | First argument
    ( a,
      a
    ) ->
    -- | Second argument
    a ->
    -- | Return value
    a

class BarBaz a where
  barbaz ::
    a -> b
  bazbar :: b -> a