Theorem ovl 107

Description: Evaluate a lambda expression in a binary operation.

Hypotheses

Ref	Expression
ovl.1	⊢ A:γ
ovl.2	⊢ S:α
ovl.3	⊢ T:β
ovl.4	⊢ [x:α = S]⊧[A = B]
ovl.5	⊢ [y:β = T]⊧[B = C]

Assertion

Ref	Expression
ovl	⊢ ⊤⊧[[Sλx:α λy:β AT] = C]

Distinct variable groups:   x,B   y,C   x,y,S   y,T   α,x   β,y

Proof of Theorem ovl

Step	Hyp	Ref	Expression
1		ovl.1	. . . . 5 ⊢ A:γ
2	1	wl 59	. . . 4 ⊢ λy:β A:(β → γ)
3	2	wl 59	. . 3 ⊢ λx:α λy:β A:(α → (β → γ))
4		ovl.2	. . 3 ⊢ S:α
5		ovl.3	. . 3 ⊢ T:β
6	3, 4, 5	wov 64	. 2 ⊢ [Sλx:α λy:β AT]:γ
7		weq 38	. . . 4 ⊢ = :(γ → (γ → ∗))
8	3, 4	wc 45	. . . . 5 ⊢ (λx:α λy:β AS):(β → γ)
9	8, 5	wc 45	. . . 4 ⊢ ((λx:α λy:β AS)T):γ
10		wtru 40	. . . . 5 ⊢ ⊤:∗
11	3, 4, 5	df-ov 65	. . . . 5 ⊢ ⊤⊧(( = [Sλx:α λy:β AT])((λx:α λy:β AS)T))
12	10, 11	a1i 28	. . . 4 ⊢ ⊤⊧(( = [Sλx:α λy:β AT])((λx:α λy:β AS)T))
13	7, 6, 9, 12	dfov2 67	. . 3 ⊢ ⊤⊧[[Sλx:α λy:β AT] = ((λx:α λy:β AS)T)]
14	1, 4	distrl 84	. . . . 5 ⊢ ⊤⊧[(λx:α λy:β AS) = λy:β (λx:α AS)]
15	10, 14	a1i 28	. . . 4 ⊢ ⊤⊧[(λx:α λy:β AS) = λy:β (λx:α AS)]
16	8, 5, 15	ceq1 79	. . 3 ⊢ ⊤⊧[((λx:α λy:β AS)T) = (λy:β (λx:α AS)T)]
17	6, 13, 16	eqtri 85	. 2 ⊢ ⊤⊧[[Sλx:α λy:β AT] = (λy:β (λx:α AS)T)]
18	1	wl 59	. . . 4 ⊢ λx:α A:(α → γ)
19	18, 4	wc 45	. . 3 ⊢ (λx:α AS):γ
20		wv 58	. . . . . 6 ⊢ y:β:β
21	20, 5	weqi 68	. . . . 5 ⊢ [y:β = T]:∗
22		ovl.4	. . . . . 6 ⊢ [x:α = S]⊧[A = B]
23	1, 4, 22	cl 106	. . . . 5 ⊢ ⊤⊧[(λx:α AS) = B]
24	21, 23	a1i 28	. . . 4 ⊢ [y:β = T]⊧[(λx:α AS) = B]
25		ovl.5	. . . 4 ⊢ [y:β = T]⊧[B = C]
26	19, 24, 25	eqtri 85	. . 3 ⊢ [y:β = T]⊧[(λx:α AS) = C]
27	19, 5, 26	cl 106	. 2 ⊢ ⊤⊧[(λy:β (λx:α AS)T) = C]
28	6, 17, 27	eqtri 85	1 ⊢ ⊤⊧[[Sλx:α λy:β AT] = C]

Syntax hints:  tv 1   → ht 2  kc 5  λkl 6   = ke 7  ⊤kt 8  [kbr 9  ⊧wffMMJ2 11  wffMMJ2t 12

This theorem was proved from axioms:  ax-syl 15  ax-jca 17  ax-simpl 20  ax-simpr 21  ax-id 24  ax-trud 26  ax-cb1 29  ax-cb2 30  ax-refl 39  ax-eqmp 42  ax-ceq 46  ax-beta 60  ax-distrc 61  ax-leq 62  ax-distrl 63  ax-hbl1 93  ax-17 95  ax-inst 103

This theorem depends on definitions:  df-ov 65

This theorem is referenced by:  imval  136  orval  137  anval  138  dfan2  144