- let true = \then else. then in
- let false = \then else. else in
- let iszero = \n. n (\x. false) true in
- let pred = \n f z. n (\u v. v (u f)) (K z) I in
- let succ = \n f z. f (n f z) in
- let add = \n m .n succ m in
- let mult = \n m.n(add m)0 in
- let Y = \h . (\f . h (f f)) (\f . h (f f)) in
+ let true = \then else. then in
+ let false = \then else. else in
+ let iszero = \n. n (\x. false) true in
+ let pred = \n f z. n (\u v. v (u f)) (K z) I in
+ let succ = \n f z. f (n f z) in
+ let add = \n m .n succ m in
+ let mult = \n m.n(add m)0 in
+ let Y = \h . (\f . h (f f)) (\f . h (f f)) in