Step | Hyp | Ref
| Expression |
1 | | eqid 2733 |
. . . . 5
β’ (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π}) = (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π}) |
2 | | eqid 2733 |
. . . . 5
β’ {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} = {π β β0 β£
βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} |
3 | 1, 2 | ramcl2lem 16939 |
. . . 4
β’ ((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β (π Ramsey πΉ) = if({π β β0 β£
βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} = β
, +β, inf({π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))}, β, < ))) |
4 | | iftrue 4534 |
. . . 4
β’ ({π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} = β
β if({π β β0 β£
βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} = β
, +β, inf({π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))}, β, < )) =
+β) |
5 | 3, 4 | sylan9eq 2793 |
. . 3
β’ (((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β§ {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} = β
) β (π Ramsey πΉ) = +β) |
6 | | ssun2 4173 |
. . . 4
β’
{+β} β (β0 βͺ
{+β}) |
7 | | pnfex 11264 |
. . . . 5
β’ +β
β V |
8 | 7 | snss 4789 |
. . . 4
β’ (+β
β (β0 βͺ {+β}) β {+β} β
(β0 βͺ {+β})) |
9 | 6, 8 | mpbir 230 |
. . 3
β’ +β
β (β0 βͺ {+β}) |
10 | 5, 9 | eqeltrdi 2842 |
. 2
β’ (((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β§ {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} = β
) β (π Ramsey πΉ) β (β0 βͺ
{+β})) |
11 | | ssun1 4172 |
. . 3
β’
β0 β (β0 βͺ
{+β}) |
12 | 1, 2 | ramtcl2 16941 |
. . . 4
β’ ((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β ((π Ramsey πΉ) β β0 β {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} β β
)) |
13 | 12 | biimpar 479 |
. . 3
β’ (((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β§ {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} β β
) β (π Ramsey πΉ) β
β0) |
14 | 11, 13 | sselid 3980 |
. 2
β’ (((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β§ {π β β0
β£ βπ (π β€ (β―βπ ) β βπ β (π
βm (π (π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π))βπ β π
βπ₯ β π« π ((πΉβπ) β€ (β―βπ₯) β§ (π₯(π β V, π β β0 β¦ {π β π« π β£ (β―βπ) = π})π) β (β‘π β {π})))} β β
) β (π Ramsey πΉ) β (β0 βͺ
{+β})) |
15 | 10, 14 | pm2.61dane 3030 |
1
β’ ((π β β0
β§ π
β π β§ πΉ:π
βΆβ0) β (π Ramsey πΉ) β (β0 βͺ
{+β})) |