ormolu-0.8.1.1: data/examples/declaration/value/function/arrow/proc-parentheses-out.hs

{-# LANGUAGE Arrows #-}

foo f = proc a -> (f -< a)

bar f g = proc a ->
  ( ( (f)
        (g)
    )
      -<
        ( ( ( ( ( ( g
                      a
                  )
                )
              )
            )
          )
        )
  )