Step | Hyp | Ref
| Expression |
1 | | rami.m |
. 2
β’ (π β π β
β0) |
2 | | rami.r |
. 2
β’ (π β π
β π) |
3 | | rami.f |
. 2
β’ (π β πΉ:π
βΆβ0) |
4 | | breq1 5151 |
. . . . 5
β’ (π = π β (π β€ (β―βπ ) β π β€ (β―βπ ))) |
5 | 4 | imbi1d 341 |
. . . 4
β’ (π = π β ((π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π}))) β (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π}))))) |
6 | 5 | albidv 1923 |
. . 3
β’ (π = π β (βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π}))) β βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π}))))) |
7 | | ramub.n |
. . 3
β’ (π β π β
β0) |
8 | | elmapi 8845 |
. . . . . 6
β’ (π β (π
βm (π πΆπ)) β π:(π πΆπ)βΆπ
) |
9 | | ramub.i |
. . . . . . . 8
β’ ((π β§ (π β€ (β―βπ ) β§ π:(π πΆπ)βΆπ
)) β βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π}))) |
10 | 9 | ancom2s 648 |
. . . . . . 7
β’ ((π β§ (π:(π πΆπ)βΆπ
β§ π β€ (β―βπ ))) β βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π}))) |
11 | 10 | expr 457 |
. . . . . 6
β’ ((π β§ π:(π πΆπ)βΆπ
) β (π β€ (β―βπ ) β βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))) |
12 | 8, 11 | sylan2 593 |
. . . . 5
β’ ((π β§ π β (π
βm (π πΆπ))) β (π β€ (β―βπ ) β βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))) |
13 | 12 | ralrimdva 3154 |
. . . 4
β’ (π β (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))) |
14 | 13 | alrimiv 1930 |
. . 3
β’ (π β βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))) |
15 | 6, 7, 14 | elrabd 3685 |
. 2
β’ (π β π β {π β β0 β£
βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))}) |
16 | | rami.c |
. . 3
β’ πΆ = (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π}) |
17 | | eqid 2732 |
. . 3
β’ {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))} = {π β β0 β£
βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))} |
18 | 16, 17 | ramtub 16949 |
. 2
β’ (((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β§ π β {π β β0 β£
βπ (π β€ (β―βπ ) β βπ β (π
βm (π πΆπ))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯πΆπ) β (β‘π β {π})))}) β (π Ramsey πΉ) β€ π) |
19 | 1, 2, 3, 15, 18 | syl31anc 1373 |
1
β’ (π β (π Ramsey πΉ) β€ π) |