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

    -- | Bar.
    bar :: a