9bfa3ee70cf3a259103510eafa8fdb4b492017be
[lambda.git] / week4.mdwn
1 [[!toc]]
2
3 #Q: How do you know that every term in the untyped lambda calculus has a fixed point?#
4
5 A: That's easy: let `T` be an arbitrary term in the lambda calculus.  If
6 `T` has a fixed point, then there exists some `X` such that `X <~~>
7 TX` (that's what it means to *have* a fixed point).
8
9 <pre><code>let L = \x. T (x x) in
10 let X = L L in
11 X &equiv; L L &equiv; (\x. T (x x)) L ~~> T (L L) &equiv; T X
12 </code></pre>
13
14 Please slow down and make sure that you understand what justified each
15 of the equalities in the last line.
16
17 #Q: How do you know that for any term `T`, `Y T` is a fixed point of `T`?#
18
19 A: Note that in the proof given in the previous answer, we chose `T`
20 and then set `X = L L = (\x. T (x x)) (\x. T (x x))`.  If we abstract over
21 `T`, we get the Y combinator, `\T. (\x. T (x x)) (\x. T (x x))`.  No matter
22 what argument `T` we feed `Y`, it returns some `X` that is a fixed point
23 of `T`, by the reasoning in the previous answer.
24
25 #Q: So if every term has a fixed point, even `Y` has fixed point.#
26
27 A: Right:
28
29 <pre><code>let Y = \T. (\x. T (x x)) (\x. T (x x)) in
30 Y Y &equiv; \T. (\x. T (x x)) (\x. T (x x)) Y
31 ~~> (\x. Y (x x)) (\x. Y (x x))
32 ~~> Y ((\x. Y (x x)) (\x. Y (x x)))
33 ~~> Y (Y ((\x. Y (x x)) (\x. Y (x x))))
34 ~~> Y (Y (Y (...(Y (Y Y))...)))</code></pre>
35
36
37 #Q: Ouch!  Stop hurting my brain.#
38
39 A: Is that a question?
40
41 Let's come at it from the direction of arithmetic.  Recall that we
42 claimed that even `succ`---the function that added one to any
43 number---had a fixed point.  How could there be an X such that X = X+1?
44 That would imply that
45
46     X <~~> succ X <~~> succ (succ X) <~~> succ (succ (succ (X))) <~~> succ (... (succ X)...)
47
48 In other words, the fixed point of `succ` is a term that is its own
49 successor.  Let's just check that `X = succ X`:
50
51 <pre><code>let succ = \n s z. s (n s z) in
52 let X = (\x. succ (x x)) (\x. succ (x x)) in
53 succ X 
54 &equiv; succ ( (\x. succ (x x)) (\x. succ (x x)) ) 
55 ~~> succ (succ ( (\x. succ (x x)) (\x. succ (x x))))
56 &equiv; succ (succ X)
57 </code></pre>
58
59 You should see the close similarity with `Y Y` here.
60
61
62 #Q. So `Y` applied to `succ` returns a number that is not finite!#
63
64 A. Yes!  Let's see why it makes sense to think of `Y succ` as a Church
65 numeral:
66
67         [same definitions]
68         succ X
69         = (\n s z. s (n s z)) X 
70         = \s z. s (X s z)
71         = succ (\s z. s (X s z)) ; using fixed-point reasoning
72         = \s z. s ([succ (\s z. s (X s z))] s z)
73         = \s z. s ([\s z. s ([succ (\s z. s (X s z))] s z)] s z)
74         = \s z. s (s (succ (\s z. s (X s z))))
75
76 So `succ X` looks like a numeral: it takes two arguments, `s` and `z`,
77 and returns a sequence of nested applications of `s`...
78
79 You should be able to prove that `add 2 (Y succ) <~~> Y succ`,
80 likewise for `mult`, `minus`, `pow`.  What happens if we try `minus (Y
81 succ)(Y succ)`?  What would you expect infinity minus infinity to be?
82 (Hint: choose your evaluation strategy so that you add two `s`s to the
83 first number for every `s` that you add to the second number.)
84
85 This is amazing, by the way: we're proving things about a term that
86 represents arithmetic infinity.  
87
88 It's important to bear in mind the simplest term in question is not
89 infinite:
90
91         Y succ = (\f. (\x. f (x x)) (\x. f (x x))) (\n s z. s (n s z))
92
93 The way that infinity enters into the picture is that this term has
94 no normal form: no matter how many times we perform beta reduction,
95 there will always be an opportunity for more beta reduction.  (Lather,
96 rinse, repeat!)
97
98