Step | Hyp | Ref
| Expression |
1 | | eqid 2733 |
. . 3
β’ (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π}) = (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π}) |
2 | | id 22 |
. . 3
β’ (π β β0
β π β
β0) |
3 | | 0ex 5307 |
. . . 4
β’ β
β V |
4 | 3 | a1i 11 |
. . 3
β’ (π β β0
β β
β V) |
5 | | f0 6770 |
. . . 4
β’
β
:β
βΆβ0 |
6 | 5 | a1i 11 |
. . 3
β’ (π β β0
β β
:β
βΆβ0) |
7 | | f00 6771 |
. . . . 5
β’ (π:(π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π)βΆβ
β (π = β
β§ (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
)) |
8 | | vex 3479 |
. . . . . . . . . 10
β’ π β V |
9 | | simpl 484 |
. . . . . . . . . 10
β’ ((π β β0
β§ π β€
(β―βπ )) β
π β
β0) |
10 | 1 | hashbcval 16932 |
. . . . . . . . . 10
β’ ((π β V β§ π β β0)
β (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = {π₯ β π« π β£ (β―βπ₯) = π}) |
11 | 8, 9, 10 | sylancr 588 |
. . . . . . . . 9
β’ ((π β β0
β§ π β€
(β―βπ )) β
(π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = {π₯ β π« π β£ (β―βπ₯) = π}) |
12 | | hashfz1 14303 |
. . . . . . . . . . . . . . . 16
β’ (π β β0
β (β―β(1...π)) = π) |
13 | 12 | breq1d 5158 |
. . . . . . . . . . . . . . 15
β’ (π β β0
β ((β―β(1...π)) β€ (β―βπ ) β π β€ (β―βπ ))) |
14 | 13 | biimpar 479 |
. . . . . . . . . . . . . 14
β’ ((π β β0
β§ π β€
(β―βπ )) β
(β―β(1...π))
β€ (β―βπ )) |
15 | | fzfid 13935 |
. . . . . . . . . . . . . . 15
β’ ((π β β0
β§ π β€
(β―βπ )) β
(1...π) β
Fin) |
16 | | hashdom 14336 |
. . . . . . . . . . . . . . 15
β’
(((1...π) β Fin
β§ π β V) β
((β―β(1...π))
β€ (β―βπ )
β (1...π) βΌ
π )) |
17 | 15, 8, 16 | sylancl 587 |
. . . . . . . . . . . . . 14
β’ ((π β β0
β§ π β€
(β―βπ )) β
((β―β(1...π))
β€ (β―βπ )
β (1...π) βΌ
π )) |
18 | 14, 17 | mpbid 231 |
. . . . . . . . . . . . 13
β’ ((π β β0
β§ π β€
(β―βπ )) β
(1...π) βΌ π ) |
19 | 8 | domen 8954 |
. . . . . . . . . . . . 13
β’
((1...π) βΌ
π β βπ₯((1...π) β π₯ β§ π₯ β π )) |
20 | 18, 19 | sylib 217 |
. . . . . . . . . . . 12
β’ ((π β β0
β§ π β€
(β―βπ )) β
βπ₯((1...π) β π₯ β§ π₯ β π )) |
21 | | simprr 772 |
. . . . . . . . . . . . . . . 16
β’ (((π β β0
β§ π β€
(β―βπ )) β§
((1...π) β π₯ β§ π₯ β π )) β π₯ β π ) |
22 | | velpw 4607 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β π« π β π₯ β π ) |
23 | 21, 22 | sylibr 233 |
. . . . . . . . . . . . . . 15
β’ (((π β β0
β§ π β€
(β―βπ )) β§
((1...π) β π₯ β§ π₯ β π )) β π₯ β π« π ) |
24 | | hasheni 14305 |
. . . . . . . . . . . . . . . . 17
β’
((1...π) β
π₯ β
(β―β(1...π)) =
(β―βπ₯)) |
25 | 24 | ad2antrl 727 |
. . . . . . . . . . . . . . . 16
β’ (((π β β0
β§ π β€
(β―βπ )) β§
((1...π) β π₯ β§ π₯ β π )) β (β―β(1...π)) = (β―βπ₯)) |
26 | 12 | ad2antrr 725 |
. . . . . . . . . . . . . . . 16
β’ (((π β β0
β§ π β€
(β―βπ )) β§
((1...π) β π₯ β§ π₯ β π )) β (β―β(1...π)) = π) |
27 | 25, 26 | eqtr3d 2775 |
. . . . . . . . . . . . . . 15
β’ (((π β β0
β§ π β€
(β―βπ )) β§
((1...π) β π₯ β§ π₯ β π )) β (β―βπ₯) = π) |
28 | 23, 27 | jca 513 |
. . . . . . . . . . . . . 14
β’ (((π β β0
β§ π β€
(β―βπ )) β§
((1...π) β π₯ β§ π₯ β π )) β (π₯ β π« π β§ (β―βπ₯) = π)) |
29 | 28 | ex 414 |
. . . . . . . . . . . . 13
β’ ((π β β0
β§ π β€
(β―βπ )) β
(((1...π) β π₯ β§ π₯ β π ) β (π₯ β π« π β§ (β―βπ₯) = π))) |
30 | 29 | eximdv 1921 |
. . . . . . . . . . . 12
β’ ((π β β0
β§ π β€
(β―βπ )) β
(βπ₯((1...π) β π₯ β§ π₯ β π ) β βπ₯(π₯ β π« π β§ (β―βπ₯) = π))) |
31 | 20, 30 | mpd 15 |
. . . . . . . . . . 11
β’ ((π β β0
β§ π β€
(β―βπ )) β
βπ₯(π₯ β π« π β§ (β―βπ₯) = π)) |
32 | | df-rex 3072 |
. . . . . . . . . . 11
β’
(βπ₯ β
π« π (β―βπ₯) = π β βπ₯(π₯ β π« π β§ (β―βπ₯) = π)) |
33 | 31, 32 | sylibr 233 |
. . . . . . . . . 10
β’ ((π β β0
β§ π β€
(β―βπ )) β
βπ₯ β π«
π (β―βπ₯) = π) |
34 | | rabn0 4385 |
. . . . . . . . . 10
β’ ({π₯ β π« π β£ (β―βπ₯) = π} β β
β βπ₯ β π« π (β―βπ₯) = π) |
35 | 33, 34 | sylibr 233 |
. . . . . . . . 9
β’ ((π β β0
β§ π β€
(β―βπ )) β
{π₯ β π« π β£ (β―βπ₯) = π} β β
) |
36 | 11, 35 | eqnetrd 3009 |
. . . . . . . 8
β’ ((π β β0
β§ π β€
(β―βπ )) β
(π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β β
) |
37 | 36 | neneqd 2946 |
. . . . . . 7
β’ ((π β β0
β§ π β€
(β―βπ )) β
Β¬ (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
) |
38 | 37 | pm2.21d 121 |
. . . . . 6
β’ ((π β β0
β§ π β€
(β―βπ )) β
((π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
β βπ β β
βπ₯ β π« π ((β
βπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))) |
39 | 38 | adantld 492 |
. . . . 5
β’ ((π β β0
β§ π β€
(β―βπ )) β
((π = β
β§ (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
) β βπ β β
βπ₯ β π« π ((β
βπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))) |
40 | 7, 39 | biimtrid 241 |
. . . 4
β’ ((π β β0
β§ π β€
(β―βπ )) β
(π:(π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π)βΆβ
β βπ β β
βπ₯ β π« π ((β
βπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))) |
41 | 40 | impr 456 |
. . 3
β’ ((π β β0
β§ (π β€
(β―βπ ) β§
π:(π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π)βΆβ
)) β βπ β β
βπ₯ β π« π ((β
βπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π}))) |
42 | 1, 2, 4, 6, 2, 41 | ramub 16943 |
. 2
β’ (π β β0
β (π Ramsey β
)
β€ π) |
43 | | nnnn0 12476 |
. . . . . 6
β’ (π β β β π β
β0) |
44 | 3 | a1i 11 |
. . . . . 6
β’ (π β β β β
β V) |
45 | 5 | a1i 11 |
. . . . . 6
β’ (π β β β
β
:β
βΆβ0) |
46 | | nnm1nn0 12510 |
. . . . . 6
β’ (π β β β (π β 1) β
β0) |
47 | | f0 6770 |
. . . . . . 7
β’
β
:β
βΆβ
|
48 | | fzfid 13935 |
. . . . . . . . . . 11
β’ (π β β β
(1...(π β 1)) β
Fin) |
49 | 1 | hashbc2 16936 |
. . . . . . . . . . 11
β’
(((1...(π β
1)) β Fin β§ π
β β0) β (β―β((1...(π β 1))(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π)) = ((β―β(1...(π β 1)))Cπ)) |
50 | 48, 43, 49 | syl2anc 585 |
. . . . . . . . . 10
β’ (π β β β
(β―β((1...(π
β 1))(π β V,
π β
β0 β¦ {π β π« π β£ (β―βπ) = π})π)) = ((β―β(1...(π β 1)))Cπ)) |
51 | | hashfz1 14303 |
. . . . . . . . . . . 12
β’ ((π β 1) β
β0 β (β―β(1...(π β 1))) = (π β 1)) |
52 | 46, 51 | syl 17 |
. . . . . . . . . . 11
β’ (π β β β
(β―β(1...(π
β 1))) = (π β
1)) |
53 | 52 | oveq1d 7421 |
. . . . . . . . . 10
β’ (π β β β
((β―β(1...(π
β 1)))Cπ) = ((π β 1)Cπ)) |
54 | | nnz 12576 |
. . . . . . . . . . 11
β’ (π β β β π β
β€) |
55 | | nnre 12216 |
. . . . . . . . . . . . 13
β’ (π β β β π β
β) |
56 | 55 | ltm1d 12143 |
. . . . . . . . . . . 12
β’ (π β β β (π β 1) < π) |
57 | 56 | olcd 873 |
. . . . . . . . . . 11
β’ (π β β β (π < 0 β¨ (π β 1) < π)) |
58 | | bcval4 14264 |
. . . . . . . . . . 11
β’ (((π β 1) β
β0 β§ π
β β€ β§ (π
< 0 β¨ (π β 1)
< π)) β ((π β 1)Cπ) = 0) |
59 | 46, 54, 57, 58 | syl3anc 1372 |
. . . . . . . . . 10
β’ (π β β β ((π β 1)Cπ) = 0) |
60 | 50, 53, 59 | 3eqtrd 2777 |
. . . . . . . . 9
β’ (π β β β
(β―β((1...(π
β 1))(π β V,
π β
β0 β¦ {π β π« π β£ (β―βπ) = π})π)) = 0) |
61 | | ovex 7439 |
. . . . . . . . . 10
β’
((1...(π β
1))(π β V, π β β0
β¦ {π β π«
π β£
(β―βπ) = π})π) β V |
62 | | hasheq0 14320 |
. . . . . . . . . 10
β’
(((1...(π β
1))(π β V, π β β0
β¦ {π β π«
π β£
(β―βπ) = π})π) β V β
((β―β((1...(π
β 1))(π β V,
π β
β0 β¦ {π β π« π β£ (β―βπ) = π})π)) = 0 β ((1...(π β 1))(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
)) |
63 | 61, 62 | ax-mp 5 |
. . . . . . . . 9
β’
((β―β((1...(π β 1))(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π)) = 0 β ((1...(π β 1))(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
) |
64 | 60, 63 | sylib 217 |
. . . . . . . 8
β’ (π β β β
((1...(π β 1))(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) = β
) |
65 | 64 | feq2d 6701 |
. . . . . . 7
β’ (π β β β
(β
:((1...(π β
1))(π β V, π β β0
β¦ {π β π«
π β£
(β―βπ) = π})π)βΆβ
β
β
:β
βΆβ
)) |
66 | 47, 65 | mpbiri 258 |
. . . . . 6
β’ (π β β β
β
:((1...(π β
1))(π β V, π β β0
β¦ {π β π«
π β£
(β―βπ) = π})π)βΆβ
) |
67 | | noel 4330 |
. . . . . . . 8
β’ Β¬
π β
β
|
68 | 67 | pm2.21i 119 |
. . . . . . 7
β’ (π β β
β ((π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘β
β {π}) β (β―βπ₯) < (β
βπ))) |
69 | 68 | ad2antrl 727 |
. . . . . 6
β’ ((π β β β§ (π β β
β§ π₯ β (1...(π β 1)))) β ((π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘β
β {π}) β (β―βπ₯) < (β
βπ))) |
70 | 1, 43, 44, 45, 46, 66, 69 | ramlb 16949 |
. . . . 5
β’ (π β β β (π β 1) < (π Ramsey
β
)) |
71 | | ramubcl 16948 |
. . . . . . 7
β’ (((π β β0
β§ β
β V β§ β
:β
βΆβ0) β§
(π β
β0 β§ (π Ramsey β
) β€ π)) β (π Ramsey β
) β
β0) |
72 | 2, 4, 6, 2, 42, 71 | syl32anc 1379 |
. . . . . 6
β’ (π β β0
β (π Ramsey β
)
β β0) |
73 | | nn0lem1lt 12624 |
. . . . . 6
β’ ((π β β0
β§ (π Ramsey β
)
β β0) β (π β€ (π Ramsey β
) β (π β 1) < (π Ramsey β
))) |
74 | 43, 72, 73 | syl2anc2 586 |
. . . . 5
β’ (π β β β (π β€ (π Ramsey β
) β (π β 1) < (π Ramsey β
))) |
75 | 70, 74 | mpbird 257 |
. . . 4
β’ (π β β β π β€ (π Ramsey β
)) |
76 | 75 | a1i 11 |
. . 3
β’ (π β β0
β (π β β
β π β€ (π Ramsey
β
))) |
77 | 72 | nn0ge0d 12532 |
. . . 4
β’ (π β β0
β 0 β€ (π Ramsey
β
)) |
78 | | breq1 5151 |
. . . 4
β’ (π = 0 β (π β€ (π Ramsey β
) β 0 β€ (π Ramsey
β
))) |
79 | 77, 78 | syl5ibrcom 246 |
. . 3
β’ (π β β0
β (π = 0 β π β€ (π Ramsey β
))) |
80 | | elnn0 12471 |
. . . 4
β’ (π β β0
β (π β β
β¨ π =
0)) |
81 | 80 | biimpi 215 |
. . 3
β’ (π β β0
β (π β β
β¨ π =
0)) |
82 | 76, 79, 81 | mpjaod 859 |
. 2
β’ (π β β0
β π β€ (π Ramsey
β
)) |
83 | 72 | nn0red 12530 |
. . 3
β’ (π β β0
β (π Ramsey β
)
β β) |
84 | | nn0re 12478 |
. . 3
β’ (π β β0
β π β
β) |
85 | 83, 84 | letri3d 11353 |
. 2
β’ (π β β0
β ((π Ramsey β
)
= π β ((π Ramsey β
) β€ π β§ π β€ (π Ramsey β
)))) |
86 | 42, 82, 85 | mpbir2and 712 |
1
β’ (π β β0
β (π Ramsey β
) =
π) |