blob: 5c39cd8bd0f23e5252a4cbfaa4253ee97fbccb05 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
(\ true false and or not .
or false true
-- Should reduce to true, i.e., \ x y . x
)
-- true
(\ x y . x)
-- false
(\ x y . y)
-- and
(\ p q . p q p)
-- or
(\ p q . p p q)
-- not
(\ p x y . p y x)
|