ormolu-0.0.1.0: data/examples/declaration/value/function/arrow/expression-forms.hs

{-# LANGUAGE Arrows #-}

foo f g x y = (| test (f -< x) (g -< y) |)

bar f g x y = (|
    test
      (f
       -< x)
      (g
       -< y)
  |)