on f86e01e help sign in
11 lines 144 B history raw
1{-# LANGUAGE Arrows #-}
3foo f g x y = (| test (f -< x) (g -< y) |)
5bar f g x y = (|
6 test
7 (f
8 -< x)
9 (g
10 -< y)
11 |)