MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  0ram Structured version   Visualization version   GIF version

Theorem 0ram 16950
Description: The Ramsey number when 𝑀 = 0. (Contributed by Mario Carneiro, 22-Apr-2015.)
Assertion
Ref Expression
0ram (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (0 Ramsey 𝐹) = sup(ran 𝐹, ℝ, < ))
Distinct variable groups:   π‘₯,𝑦,𝑅   π‘₯,𝐹,𝑦   π‘₯,𝑉
Allowed substitution hint:   𝑉(𝑦)

Proof of Theorem 0ram
Dummy variables 𝑏 𝑑 𝑧 𝑓 𝑐 𝑠 π‘Ž 𝑖 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2733 . . 3 (π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖}) = (π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})
2 0nn0 12484 . . . 4 0 ∈ β„•0
32a1i 11 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ 0 ∈ β„•0)
4 simpl1 1192 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ 𝑅 ∈ 𝑉)
5 simpl3 1194 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ 𝐹:π‘…βŸΆβ„•0)
65frnd 6723 . . . 4 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ ran 𝐹 βŠ† β„•0)
7 nn0ssz 12578 . . . . . 6 β„•0 βŠ† β„€
86, 7sstrdi 3994 . . . . 5 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ ran 𝐹 βŠ† β„€)
95fdmd 6726 . . . . . . 7 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ dom 𝐹 = 𝑅)
10 simpl2 1193 . . . . . . 7 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ 𝑅 β‰  βˆ…)
119, 10eqnetrd 3009 . . . . . 6 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ dom 𝐹 β‰  βˆ…)
12 dm0rn0 5923 . . . . . . 7 (dom 𝐹 = βˆ… ↔ ran 𝐹 = βˆ…)
1312necon3bii 2994 . . . . . 6 (dom 𝐹 β‰  βˆ… ↔ ran 𝐹 β‰  βˆ…)
1411, 13sylib 217 . . . . 5 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ ran 𝐹 β‰  βˆ…)
15 simpr 486 . . . . 5 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯)
16 suprzcl2 12919 . . . . 5 ((ran 𝐹 βŠ† β„€ ∧ ran 𝐹 β‰  βˆ… ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
178, 14, 15, 16syl3anc 1372 . . . 4 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹)
186, 17sseldd 3983 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ sup(ran 𝐹, ℝ, < ) ∈ β„•0)
191hashbc0 16935 . . . . . . 7 (𝑠 ∈ V β†’ (𝑠(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) = {βˆ…})
2019elv 3481 . . . . . 6 (𝑠(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) = {βˆ…}
2120feq2i 6707 . . . . 5 (𝑓:(𝑠(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0)βŸΆπ‘… ↔ 𝑓:{βˆ…}βŸΆπ‘…)
2221biimpi 215 . . . 4 (𝑓:(𝑠(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0)βŸΆπ‘… β†’ 𝑓:{βˆ…}βŸΆπ‘…)
23 simprr 772 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ 𝑓:{βˆ…}βŸΆπ‘…)
24 0ex 5307 . . . . . . 7 βˆ… ∈ V
2524snid 4664 . . . . . 6 βˆ… ∈ {βˆ…}
26 ffvelcdm 7081 . . . . . 6 ((𝑓:{βˆ…}βŸΆπ‘… ∧ βˆ… ∈ {βˆ…}) β†’ (π‘“β€˜βˆ…) ∈ 𝑅)
2723, 25, 26sylancl 587 . . . . 5 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (π‘“β€˜βˆ…) ∈ 𝑅)
28 vex 3479 . . . . . . 7 𝑠 ∈ V
2928pwid 4624 . . . . . 6 𝑠 ∈ 𝒫 𝑠
3029a1i 11 . . . . 5 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ 𝑠 ∈ 𝒫 𝑠)
315adantr 482 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ 𝐹:π‘…βŸΆβ„•0)
3231, 27ffvelcdmd 7085 . . . . . . . 8 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ∈ β„•0)
3332nn0red 12530 . . . . . . 7 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ∈ ℝ)
3433rexrd 11261 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ∈ ℝ*)
3518nn0red 12530 . . . . . . . 8 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ sup(ran 𝐹, ℝ, < ) ∈ ℝ)
3635rexrd 11261 . . . . . . 7 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ sup(ran 𝐹, ℝ, < ) ∈ ℝ*)
3736adantr 482 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ sup(ran 𝐹, ℝ, < ) ∈ ℝ*)
38 hashxrcl 14314 . . . . . . 7 (𝑠 ∈ V β†’ (β™―β€˜π‘ ) ∈ ℝ*)
3928, 38mp1i 13 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (β™―β€˜π‘ ) ∈ ℝ*)
408adantr 482 . . . . . . 7 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ ran 𝐹 βŠ† β„€)
4115adantr 482 . . . . . . 7 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯)
4231ffnd 6716 . . . . . . . 8 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ 𝐹 Fn 𝑅)
43 fnfvelrn 7080 . . . . . . . 8 ((𝐹 Fn 𝑅 ∧ (π‘“β€˜βˆ…) ∈ 𝑅) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ∈ ran 𝐹)
4442, 27, 43syl2anc 585 . . . . . . 7 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ∈ ran 𝐹)
45 suprzub 12920 . . . . . . 7 ((ran 𝐹 βŠ† β„€ ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯ ∧ (πΉβ€˜(π‘“β€˜βˆ…)) ∈ ran 𝐹) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ≀ sup(ran 𝐹, ℝ, < ))
4640, 41, 44, 45syl3anc 1372 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ≀ sup(ran 𝐹, ℝ, < ))
47 simprl 770 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ))
4834, 37, 39, 46, 47xrletrd 13138 . . . . 5 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘ ))
4925a1i 11 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ βˆ… ∈ {βˆ…})
50 fvex 6902 . . . . . . . 8 (π‘“β€˜βˆ…) ∈ V
5150snid 4664 . . . . . . 7 (π‘“β€˜βˆ…) ∈ {(π‘“β€˜βˆ…)}
5251a1i 11 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (π‘“β€˜βˆ…) ∈ {(π‘“β€˜βˆ…)})
53 ffn 6715 . . . . . . 7 (𝑓:{βˆ…}βŸΆπ‘… β†’ 𝑓 Fn {βˆ…})
54 elpreima 7057 . . . . . . 7 (𝑓 Fn {βˆ…} β†’ (βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)}) ↔ (βˆ… ∈ {βˆ…} ∧ (π‘“β€˜βˆ…) ∈ {(π‘“β€˜βˆ…)})))
5523, 53, 543syl 18 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ (βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)}) ↔ (βˆ… ∈ {βˆ…} ∧ (π‘“β€˜βˆ…) ∈ {(π‘“β€˜βˆ…)})))
5649, 52, 55mpbir2and 712 . . . . 5 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)}))
57 fveq2 6889 . . . . . . . 8 (𝑐 = (π‘“β€˜βˆ…) β†’ (πΉβ€˜π‘) = (πΉβ€˜(π‘“β€˜βˆ…)))
5857breq1d 5158 . . . . . . 7 (𝑐 = (π‘“β€˜βˆ…) β†’ ((πΉβ€˜π‘) ≀ (β™―β€˜π‘§) ↔ (πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘§)))
591hashbc0 16935 . . . . . . . . . . 11 (𝑧 ∈ V β†’ (𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) = {βˆ…})
6059elv 3481 . . . . . . . . . 10 (𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) = {βˆ…}
6160sseq1i 4010 . . . . . . . . 9 ((𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐}) ↔ {βˆ…} βŠ† (◑𝑓 β€œ {𝑐}))
6224snss 4789 . . . . . . . . 9 (βˆ… ∈ (◑𝑓 β€œ {𝑐}) ↔ {βˆ…} βŠ† (◑𝑓 β€œ {𝑐}))
6361, 62bitr4i 278 . . . . . . . 8 ((𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐}) ↔ βˆ… ∈ (◑𝑓 β€œ {𝑐}))
64 sneq 4638 . . . . . . . . . 10 (𝑐 = (π‘“β€˜βˆ…) β†’ {𝑐} = {(π‘“β€˜βˆ…)})
6564imaeq2d 6058 . . . . . . . . 9 (𝑐 = (π‘“β€˜βˆ…) β†’ (◑𝑓 β€œ {𝑐}) = (◑𝑓 β€œ {(π‘“β€˜βˆ…)}))
6665eleq2d 2820 . . . . . . . 8 (𝑐 = (π‘“β€˜βˆ…) β†’ (βˆ… ∈ (◑𝑓 β€œ {𝑐}) ↔ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)})))
6763, 66bitrid 283 . . . . . . 7 (𝑐 = (π‘“β€˜βˆ…) β†’ ((𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐}) ↔ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)})))
6858, 67anbi12d 632 . . . . . 6 (𝑐 = (π‘“β€˜βˆ…) β†’ (((πΉβ€˜π‘) ≀ (β™―β€˜π‘§) ∧ (𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐})) ↔ ((πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘§) ∧ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)}))))
69 fveq2 6889 . . . . . . . 8 (𝑧 = 𝑠 β†’ (β™―β€˜π‘§) = (β™―β€˜π‘ ))
7069breq2d 5160 . . . . . . 7 (𝑧 = 𝑠 β†’ ((πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘§) ↔ (πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘ )))
7170anbi1d 631 . . . . . 6 (𝑧 = 𝑠 β†’ (((πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘§) ∧ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)})) ↔ ((πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘ ) ∧ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)}))))
7268, 71rspc2ev 3624 . . . . 5 (((π‘“β€˜βˆ…) ∈ 𝑅 ∧ 𝑠 ∈ 𝒫 𝑠 ∧ ((πΉβ€˜(π‘“β€˜βˆ…)) ≀ (β™―β€˜π‘ ) ∧ βˆ… ∈ (◑𝑓 β€œ {(π‘“β€˜βˆ…)}))) β†’ βˆƒπ‘ ∈ 𝑅 βˆƒπ‘§ ∈ 𝒫 𝑠((πΉβ€˜π‘) ≀ (β™―β€˜π‘§) ∧ (𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐})))
7327, 30, 48, 56, 72syl112anc 1375 . . . 4 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:{βˆ…}βŸΆπ‘…)) β†’ βˆƒπ‘ ∈ 𝑅 βˆƒπ‘§ ∈ 𝒫 𝑠((πΉβ€˜π‘) ≀ (β™―β€˜π‘§) ∧ (𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐})))
7422, 73sylanr2 682 . . 3 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (sup(ran 𝐹, ℝ, < ) ≀ (β™―β€˜π‘ ) ∧ 𝑓:(𝑠(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0)βŸΆπ‘…)) β†’ βˆƒπ‘ ∈ 𝑅 βˆƒπ‘§ ∈ 𝒫 𝑠((πΉβ€˜π‘) ≀ (β™―β€˜π‘§) ∧ (𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (◑𝑓 β€œ {𝑐})))
751, 3, 4, 5, 18, 74ramub 16943 . 2 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (0 Ramsey 𝐹) ≀ sup(ran 𝐹, ℝ, < ))
76 ffn 6715 . . . . 5 (𝐹:π‘…βŸΆβ„•0 β†’ 𝐹 Fn 𝑅)
77 fvelrnb 6950 . . . . 5 (𝐹 Fn 𝑅 β†’ (sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹 ↔ βˆƒπ‘ ∈ 𝑅 (πΉβ€˜π‘) = sup(ran 𝐹, ℝ, < )))
785, 76, 773syl 18 . . . 4 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (sup(ran 𝐹, ℝ, < ) ∈ ran 𝐹 ↔ βˆƒπ‘ ∈ 𝑅 (πΉβ€˜π‘) = sup(ran 𝐹, ℝ, < )))
7917, 78mpbid 231 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ βˆƒπ‘ ∈ 𝑅 (πΉβ€˜π‘) = sup(ran 𝐹, ℝ, < ))
802a1i 11 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ 0 ∈ β„•0)
81 simpll1 1213 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ 𝑅 ∈ 𝑉)
82 simpll3 1215 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ 𝐹:π‘…βŸΆβ„•0)
83 nnm1nn0 12510 . . . . . . . . . 10 ((πΉβ€˜π‘) ∈ β„• β†’ ((πΉβ€˜π‘) βˆ’ 1) ∈ β„•0)
8483ad2antll 728 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ ((πΉβ€˜π‘) βˆ’ 1) ∈ β„•0)
85 vex 3479 . . . . . . . . . . . . 13 𝑐 ∈ V
8624, 85f1osn 6871 . . . . . . . . . . . 12 {βŸ¨βˆ…, π‘βŸ©}:{βˆ…}–1-1-ontoβ†’{𝑐}
87 f1of 6831 . . . . . . . . . . . 12 ({βŸ¨βˆ…, π‘βŸ©}:{βˆ…}–1-1-ontoβ†’{𝑐} β†’ {βŸ¨βˆ…, π‘βŸ©}:{βˆ…}⟢{𝑐})
8886, 87ax-mp 5 . . . . . . . . . . 11 {βŸ¨βˆ…, π‘βŸ©}:{βˆ…}⟢{𝑐}
89 simprl 770 . . . . . . . . . . . 12 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ 𝑐 ∈ 𝑅)
9089snssd 4812 . . . . . . . . . . 11 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ {𝑐} βŠ† 𝑅)
91 fss 6732 . . . . . . . . . . 11 (({βŸ¨βˆ…, π‘βŸ©}:{βˆ…}⟢{𝑐} ∧ {𝑐} βŠ† 𝑅) β†’ {βŸ¨βˆ…, π‘βŸ©}:{βˆ…}βŸΆπ‘…)
9288, 90, 91sylancr 588 . . . . . . . . . 10 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ {βŸ¨βˆ…, π‘βŸ©}:{βˆ…}βŸΆπ‘…)
93 ovex 7439 . . . . . . . . . . . 12 (1...((πΉβ€˜π‘) βˆ’ 1)) ∈ V
941hashbc0 16935 . . . . . . . . . . . 12 ((1...((πΉβ€˜π‘) βˆ’ 1)) ∈ V β†’ ((1...((πΉβ€˜π‘) βˆ’ 1))(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) = {βˆ…})
9593, 94ax-mp 5 . . . . . . . . . . 11 ((1...((πΉβ€˜π‘) βˆ’ 1))(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) = {βˆ…}
9695feq2i 6707 . . . . . . . . . 10 ({βŸ¨βˆ…, π‘βŸ©}:((1...((πΉβ€˜π‘) βˆ’ 1))(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0)βŸΆπ‘… ↔ {βŸ¨βˆ…, π‘βŸ©}:{βˆ…}βŸΆπ‘…)
9792, 96sylibr 233 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ {βŸ¨βˆ…, π‘βŸ©}:((1...((πΉβ€˜π‘) βˆ’ 1))(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0)βŸΆπ‘…)
9860sseq1i 4010 . . . . . . . . . . 11 ((𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) ↔ {βˆ…} βŠ† (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}))
9924snss 4789 . . . . . . . . . . 11 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) ↔ {βˆ…} βŠ† (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}))
10098, 99bitr4i 278 . . . . . . . . . 10 ((𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) ↔ βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}))
101 fzfid 13935 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (1...((πΉβ€˜π‘) βˆ’ 1)) ∈ Fin)
102 simprr 772 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))
103 ssdomg 8993 . . . . . . . . . . . . . . 15 ((1...((πΉβ€˜π‘) βˆ’ 1)) ∈ Fin β†’ (𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)) β†’ 𝑧 β‰Ό (1...((πΉβ€˜π‘) βˆ’ 1))))
104101, 102, 103sylc 65 . . . . . . . . . . . . . 14 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ 𝑧 β‰Ό (1...((πΉβ€˜π‘) βˆ’ 1)))
105101, 102ssfid 9264 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ 𝑧 ∈ Fin)
106 hashdom 14336 . . . . . . . . . . . . . . 15 ((𝑧 ∈ Fin ∧ (1...((πΉβ€˜π‘) βˆ’ 1)) ∈ Fin) β†’ ((β™―β€˜π‘§) ≀ (β™―β€˜(1...((πΉβ€˜π‘) βˆ’ 1))) ↔ 𝑧 β‰Ό (1...((πΉβ€˜π‘) βˆ’ 1))))
107105, 101, 106syl2anc 585 . . . . . . . . . . . . . 14 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ ((β™―β€˜π‘§) ≀ (β™―β€˜(1...((πΉβ€˜π‘) βˆ’ 1))) ↔ 𝑧 β‰Ό (1...((πΉβ€˜π‘) βˆ’ 1))))
108104, 107mpbird 257 . . . . . . . . . . . . 13 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (β™―β€˜π‘§) ≀ (β™―β€˜(1...((πΉβ€˜π‘) βˆ’ 1))))
10984adantr 482 . . . . . . . . . . . . . 14 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ ((πΉβ€˜π‘) βˆ’ 1) ∈ β„•0)
110 hashfz1 14303 . . . . . . . . . . . . . 14 (((πΉβ€˜π‘) βˆ’ 1) ∈ β„•0 β†’ (β™―β€˜(1...((πΉβ€˜π‘) βˆ’ 1))) = ((πΉβ€˜π‘) βˆ’ 1))
111109, 110syl 17 . . . . . . . . . . . . 13 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (β™―β€˜(1...((πΉβ€˜π‘) βˆ’ 1))) = ((πΉβ€˜π‘) βˆ’ 1))
112108, 111breqtrd 5174 . . . . . . . . . . . 12 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (β™―β€˜π‘§) ≀ ((πΉβ€˜π‘) βˆ’ 1))
113 hashcl 14313 . . . . . . . . . . . . . 14 (𝑧 ∈ Fin β†’ (β™―β€˜π‘§) ∈ β„•0)
114105, 113syl 17 . . . . . . . . . . . . 13 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (β™―β€˜π‘§) ∈ β„•0)
1155ffvelcdmda 7084 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ (πΉβ€˜π‘) ∈ β„•0)
116115adantrr 716 . . . . . . . . . . . . . 14 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ (πΉβ€˜π‘) ∈ β„•0)
117116adantr 482 . . . . . . . . . . . . 13 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (πΉβ€˜π‘) ∈ β„•0)
118 nn0ltlem1 12619 . . . . . . . . . . . . 13 (((β™―β€˜π‘§) ∈ β„•0 ∧ (πΉβ€˜π‘) ∈ β„•0) β†’ ((β™―β€˜π‘§) < (πΉβ€˜π‘) ↔ (β™―β€˜π‘§) ≀ ((πΉβ€˜π‘) βˆ’ 1)))
119114, 117, 118syl2anc 585 . . . . . . . . . . . 12 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ ((β™―β€˜π‘§) < (πΉβ€˜π‘) ↔ (β™―β€˜π‘§) ≀ ((πΉβ€˜π‘) βˆ’ 1)))
120112, 119mpbird 257 . . . . . . . . . . 11 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (β™―β€˜π‘§) < (πΉβ€˜π‘))
12124, 85fvsn 7176 . . . . . . . . . . . . . . 15 ({βŸ¨βˆ…, π‘βŸ©}β€˜βˆ…) = 𝑐
122 f1ofn 6832 . . . . . . . . . . . . . . . . 17 ({βŸ¨βˆ…, π‘βŸ©}:{βˆ…}–1-1-ontoβ†’{𝑐} β†’ {βŸ¨βˆ…, π‘βŸ©} Fn {βˆ…})
123 elpreima 7057 . . . . . . . . . . . . . . . . 17 ({βŸ¨βˆ…, π‘βŸ©} Fn {βˆ…} β†’ (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) ↔ (βˆ… ∈ {βˆ…} ∧ ({βŸ¨βˆ…, π‘βŸ©}β€˜βˆ…) ∈ {𝑑})))
12486, 122, 123mp2b 10 . . . . . . . . . . . . . . . 16 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) ↔ (βˆ… ∈ {βˆ…} ∧ ({βŸ¨βˆ…, π‘βŸ©}β€˜βˆ…) ∈ {𝑑}))
125124simprbi 498 . . . . . . . . . . . . . . 15 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ ({βŸ¨βˆ…, π‘βŸ©}β€˜βˆ…) ∈ {𝑑})
126121, 125eqeltrrid 2839 . . . . . . . . . . . . . 14 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ 𝑐 ∈ {𝑑})
127 elsni 4645 . . . . . . . . . . . . . 14 (𝑐 ∈ {𝑑} β†’ 𝑐 = 𝑑)
128126, 127syl 17 . . . . . . . . . . . . 13 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ 𝑐 = 𝑑)
129128fveq2d 6893 . . . . . . . . . . . 12 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ (πΉβ€˜π‘) = (πΉβ€˜π‘‘))
130129breq2d 5160 . . . . . . . . . . 11 (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ ((β™―β€˜π‘§) < (πΉβ€˜π‘) ↔ (β™―β€˜π‘§) < (πΉβ€˜π‘‘)))
131120, 130syl5ibcom 244 . . . . . . . . . 10 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ (βˆ… ∈ (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ (β™―β€˜π‘§) < (πΉβ€˜π‘‘)))
132100, 131biimtrid 241 . . . . . . . . 9 (((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) ∧ (𝑑 ∈ 𝑅 ∧ 𝑧 βŠ† (1...((πΉβ€˜π‘) βˆ’ 1)))) β†’ ((𝑧(π‘Ž ∈ V, 𝑖 ∈ β„•0 ↦ {𝑏 ∈ 𝒫 π‘Ž ∣ (β™―β€˜π‘) = 𝑖})0) βŠ† (β—‘{βŸ¨βˆ…, π‘βŸ©} β€œ {𝑑}) β†’ (β™―β€˜π‘§) < (πΉβ€˜π‘‘)))
1331, 80, 81, 82, 84, 97, 132ramlb 16949 . . . . . . . 8 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ ((πΉβ€˜π‘) βˆ’ 1) < (0 Ramsey 𝐹))
134 ramubcl 16948 . . . . . . . . . . 11 (((0 ∈ β„•0 ∧ 𝑅 ∈ 𝑉 ∧ 𝐹:π‘…βŸΆβ„•0) ∧ (sup(ran 𝐹, ℝ, < ) ∈ β„•0 ∧ (0 Ramsey 𝐹) ≀ sup(ran 𝐹, ℝ, < ))) β†’ (0 Ramsey 𝐹) ∈ β„•0)
1353, 4, 5, 18, 75, 134syl32anc 1379 . . . . . . . . . 10 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (0 Ramsey 𝐹) ∈ β„•0)
136135adantr 482 . . . . . . . . 9 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ (0 Ramsey 𝐹) ∈ β„•0)
137 nn0lem1lt 12624 . . . . . . . . 9 (((πΉβ€˜π‘) ∈ β„•0 ∧ (0 Ramsey 𝐹) ∈ β„•0) β†’ ((πΉβ€˜π‘) ≀ (0 Ramsey 𝐹) ↔ ((πΉβ€˜π‘) βˆ’ 1) < (0 Ramsey 𝐹)))
138116, 136, 137syl2anc 585 . . . . . . . 8 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ ((πΉβ€˜π‘) ≀ (0 Ramsey 𝐹) ↔ ((πΉβ€˜π‘) βˆ’ 1) < (0 Ramsey 𝐹)))
139133, 138mpbird 257 . . . . . . 7 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ (𝑐 ∈ 𝑅 ∧ (πΉβ€˜π‘) ∈ β„•)) β†’ (πΉβ€˜π‘) ≀ (0 Ramsey 𝐹))
140139expr 458 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ ((πΉβ€˜π‘) ∈ β„• β†’ (πΉβ€˜π‘) ≀ (0 Ramsey 𝐹)))
141135adantr 482 . . . . . . . 8 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ (0 Ramsey 𝐹) ∈ β„•0)
142141nn0ge0d 12532 . . . . . . 7 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ 0 ≀ (0 Ramsey 𝐹))
143 breq1 5151 . . . . . . 7 ((πΉβ€˜π‘) = 0 β†’ ((πΉβ€˜π‘) ≀ (0 Ramsey 𝐹) ↔ 0 ≀ (0 Ramsey 𝐹)))
144142, 143syl5ibrcom 246 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ ((πΉβ€˜π‘) = 0 β†’ (πΉβ€˜π‘) ≀ (0 Ramsey 𝐹)))
145 elnn0 12471 . . . . . . 7 ((πΉβ€˜π‘) ∈ β„•0 ↔ ((πΉβ€˜π‘) ∈ β„• ∨ (πΉβ€˜π‘) = 0))
146115, 145sylib 217 . . . . . 6 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ ((πΉβ€˜π‘) ∈ β„• ∨ (πΉβ€˜π‘) = 0))
147140, 144, 146mpjaod 859 . . . . 5 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ (πΉβ€˜π‘) ≀ (0 Ramsey 𝐹))
148 breq1 5151 . . . . 5 ((πΉβ€˜π‘) = sup(ran 𝐹, ℝ, < ) β†’ ((πΉβ€˜π‘) ≀ (0 Ramsey 𝐹) ↔ sup(ran 𝐹, ℝ, < ) ≀ (0 Ramsey 𝐹)))
149147, 148syl5ibcom 244 . . . 4 ((((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) ∧ 𝑐 ∈ 𝑅) β†’ ((πΉβ€˜π‘) = sup(ran 𝐹, ℝ, < ) β†’ sup(ran 𝐹, ℝ, < ) ≀ (0 Ramsey 𝐹)))
150149rexlimdva 3156 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (βˆƒπ‘ ∈ 𝑅 (πΉβ€˜π‘) = sup(ran 𝐹, ℝ, < ) β†’ sup(ran 𝐹, ℝ, < ) ≀ (0 Ramsey 𝐹)))
15179, 150mpd 15 . 2 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ sup(ran 𝐹, ℝ, < ) ≀ (0 Ramsey 𝐹))
152135nn0red 12530 . . 3 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (0 Ramsey 𝐹) ∈ ℝ)
153152, 35letri3d 11353 . 2 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ ((0 Ramsey 𝐹) = sup(ran 𝐹, ℝ, < ) ↔ ((0 Ramsey 𝐹) ≀ sup(ran 𝐹, ℝ, < ) ∧ sup(ran 𝐹, ℝ, < ) ≀ (0 Ramsey 𝐹))))
15475, 151, 153mpbir2and 712 1 (((𝑅 ∈ 𝑉 ∧ 𝑅 β‰  βˆ… ∧ 𝐹:π‘…βŸΆβ„•0) ∧ βˆƒπ‘₯ ∈ β„€ βˆ€π‘¦ ∈ ran 𝐹 𝑦 ≀ π‘₯) β†’ (0 Ramsey 𝐹) = sup(ran 𝐹, ℝ, < ))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∨ wo 846   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107   β‰  wne 2941  βˆ€wral 3062  βˆƒwrex 3071  {crab 3433  Vcvv 3475   βŠ† wss 3948  βˆ…c0 4322  π’« cpw 4602  {csn 4628  βŸ¨cop 4634   class class class wbr 5148  β—‘ccnv 5675  dom cdm 5676  ran crn 5677   β€œ cima 5679   Fn wfn 6536  βŸΆwf 6537  β€“1-1-ontoβ†’wf1o 6540  β€˜cfv 6541  (class class class)co 7406   ∈ cmpo 7408   β‰Ό cdom 8934  Fincfn 8936  supcsup 9432  β„cr 11106  0cc0 11107  1c1 11108  β„*cxr 11244   < clt 11245   ≀ cle 11246   βˆ’ cmin 11441  β„•cn 12209  β„•0cn0 12469  β„€cz 12555  ...cfz 13481  β™―chash 14287   Ramsey cram 16929
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-om 7853  df-1st 7972  df-2nd 7973  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-oadd 8467  df-er 8700  df-map 8819  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-sup 9434  df-inf 9435  df-card 9931  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-nn 12210  df-n0 12470  df-xnn0 12542  df-z 12556  df-uz 12820  df-fz 13482  df-hash 14288  df-ram 16931
This theorem is referenced by:  0ram2  16951  ramz  16955
  Copyright terms: Public domain W3C validator