git.iko.soy/ormolu
on d82d607 help sign in
ormolu/data/examples/declaration/value/function/arrow/proc-lets-out.hs
12 lines 172 B history raw
1{-# LANGUAGE Arrows #-}
3foo f = proc a -> let b = a in f -< b
5bar f g = proc a ->
6 let h =
7 f .
8 g a
9 j =
10 g .
11 h
12 in id -< (h, j)