mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-09-11 11:56:54 +03:00
5 lines
100 B
Plaintext
5 lines
100 B
Plaintext
(Warp s (Tree/Leaf a) (Tree/Leaf b)) = 0
|
|
(Warp s (Tree/Node a b) (Tree/Node c d)) = 1
|
|
|
|
main = *
|