on d82d607 help sign in
17 lines 224 B history raw
1{-# LANGUAGE Arrows #-}
3foo x = proc a -> a -< x
5bar f x =
6 proc (
7 y,
8 z,
9 w
10 ) -> f -- The value
11 -< (
12 x, -- Foo
13 w, -- Bar
14 z -- Baz
15 )
17baz x = proc a -> a -<< x