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

Theorem onscutlt 28172
Description: A surreal ordinal is the simplest number greater than all previous surreal ordinals. Theorem 15 of [Conway] p. 28. (Contributed by Scott Fenton, 4-Nov-2025.)
Assertion
Ref Expression
onscutlt (𝐴 ∈ Ons𝐴 = ({𝑥 ∈ Ons𝑥 <s 𝐴} |s ∅))
Distinct variable group:   𝑥,𝐴

Proof of Theorem onscutlt
Dummy variables 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 onsno 28163 . . . . 5 (𝐴 ∈ Ons𝐴 No )
2 sltonex 28170 . . . . 5 (𝐴 No → {𝑥 ∈ Ons𝑥 <s 𝐴} ∈ V)
31, 2syl 17 . . . 4 (𝐴 ∈ Ons → {𝑥 ∈ Ons𝑥 <s 𝐴} ∈ V)
4 snexg 5393 . . . 4 (𝐴 ∈ Ons → {𝐴} ∈ V)
5 ssrab2 4046 . . . . . 6 {𝑥 ∈ Ons𝑥 <s 𝐴} ⊆ Ons
6 onssno 28162 . . . . . 6 Ons No
75, 6sstri 3959 . . . . 5 {𝑥 ∈ Ons𝑥 <s 𝐴} ⊆ No
87a1i 11 . . . 4 (𝐴 ∈ Ons → {𝑥 ∈ Ons𝑥 <s 𝐴} ⊆ No )
91snssd 4776 . . . 4 (𝐴 ∈ Ons → {𝐴} ⊆ No )
10 breq1 5113 . . . . . . . . 9 (𝑥 = 𝑦 → (𝑥 <s 𝐴𝑦 <s 𝐴))
1110elrab 3662 . . . . . . . 8 (𝑦 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴} ↔ (𝑦 ∈ Ons𝑦 <s 𝐴))
1211simprbi 496 . . . . . . 7 (𝑦 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴} → 𝑦 <s 𝐴)
13 velsn 4608 . . . . . . . 8 (𝑧 ∈ {𝐴} ↔ 𝑧 = 𝐴)
14 breq2 5114 . . . . . . . 8 (𝑧 = 𝐴 → (𝑦 <s 𝑧𝑦 <s 𝐴))
1513, 14sylbi 217 . . . . . . 7 (𝑧 ∈ {𝐴} → (𝑦 <s 𝑧𝑦 <s 𝐴))
1612, 15syl5ibrcom 247 . . . . . 6 (𝑦 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴} → (𝑧 ∈ {𝐴} → 𝑦 <s 𝑧))
1716imp 406 . . . . 5 ((𝑦 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
18173adant1 1130 . . . 4 ((𝐴 ∈ Ons𝑦 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
193, 4, 8, 9, 18ssltd 27710 . . 3 (𝐴 ∈ Ons → {𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝐴})
20 snelpwi 5406 . . . 4 (𝐴 No → {𝐴} ∈ 𝒫 No )
21 nulssgt 27717 . . . 4 ({𝐴} ∈ 𝒫 No → {𝐴} <<s ∅)
221, 20, 213syl 18 . . 3 (𝐴 ∈ Ons → {𝐴} <<s ∅)
23 ssltsep 27709 . . . . . . 7 ({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤)
24 vex 3454 . . . . . . . . . 10 𝑦 ∈ V
25 breq2 5114 . . . . . . . . . 10 (𝑤 = 𝑦 → (𝑧 <s 𝑤𝑧 <s 𝑦))
2624, 25ralsn 4648 . . . . . . . . 9 (∀𝑤 ∈ {𝑦}𝑧 <s 𝑤𝑧 <s 𝑦)
2726ralbii 3076 . . . . . . . 8 (∀𝑧 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴}𝑧 <s 𝑦)
28 breq1 5113 . . . . . . . . 9 (𝑥 = 𝑧 → (𝑥 <s 𝐴𝑧 <s 𝐴))
2928ralrab 3668 . . . . . . . 8 (∀𝑧 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴}𝑧 <s 𝑦 ↔ ∀𝑧 ∈ Ons (𝑧 <s 𝐴𝑧 <s 𝑦))
3027, 29bitri 275 . . . . . . 7 (∀𝑧 ∈ {𝑥 ∈ Ons𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ Ons (𝑧 <s 𝐴𝑧 <s 𝑦))
3123, 30sylib 218 . . . . . 6 ({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ Ons (𝑧 <s 𝐴𝑧 <s 𝑦))
32 fvex 6874 . . . . . . . . . . . . 13 ( L ‘𝑦) ∈ V
33 fvex 6874 . . . . . . . . . . . . 13 ( R ‘𝑦) ∈ V
3432, 33unex 7723 . . . . . . . . . . . 12 (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V
3534a1i 11 . . . . . . . . . . 11 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V)
36 leftssno 27799 . . . . . . . . . . . . 13 ( L ‘𝑦) ⊆ No
37 rightssno 27800 . . . . . . . . . . . . 13 ( R ‘𝑦) ⊆ No
3836, 37unssi 4157 . . . . . . . . . . . 12 (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No
3938a1i 11 . . . . . . . . . . 11 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
40 eqidd 2731 . . . . . . . . . . 11 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
4135, 39, 40elons2d 28167 . . . . . . . . . 10 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons)
4234elpw 4570 . . . . . . . . . . . . . . . . 17 ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No ↔ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
4338, 42mpbir 231 . . . . . . . . . . . . . . . 16 (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No
44 nulssgt 27717 . . . . . . . . . . . . . . . 16 ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
4543, 44mp1i 13 . . . . . . . . . . . . . . 15 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
46 un0 4360 . . . . . . . . . . . . . . . . . 18 ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = (( L ‘𝑦) ∪ ( R ‘𝑦))
47 lrold 27815 . . . . . . . . . . . . . . . . . 18 (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( O ‘( bday 𝑦))
4846, 47eqtri 2753 . . . . . . . . . . . . . . . . 17 ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = ( O ‘( bday 𝑦))
4948imaeq2i 6032 . . . . . . . . . . . . . . . 16 ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) = ( bday “ ( O ‘( bday 𝑦)))
50 simpr 484 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) ∧ 𝑧 ∈ ( O ‘( bday 𝑦))) → 𝑧 ∈ ( O ‘( bday 𝑦)))
51 bdayelon 27695 . . . . . . . . . . . . . . . . . . . 20 ( bday 𝑦) ∈ On
52 oldssno 27776 . . . . . . . . . . . . . . . . . . . . . 22 ( O ‘( bday 𝑦)) ⊆ No
5352sseli 3945 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 ∈ ( O ‘( bday 𝑦)) → 𝑧 No )
5453adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) ∧ 𝑧 ∈ ( O ‘( bday 𝑦))) → 𝑧 No )
55 oldbday 27819 . . . . . . . . . . . . . . . . . . . 20 ((( bday 𝑦) ∈ On ∧ 𝑧 No ) → (𝑧 ∈ ( O ‘( bday 𝑦)) ↔ ( bday 𝑧) ∈ ( bday 𝑦)))
5651, 54, 55sylancr 587 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) ∧ 𝑧 ∈ ( O ‘( bday 𝑦))) → (𝑧 ∈ ( O ‘( bday 𝑦)) ↔ ( bday 𝑧) ∈ ( bday 𝑦)))
5750, 56mpbid 232 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) ∧ 𝑧 ∈ ( O ‘( bday 𝑦))) → ( bday 𝑧) ∈ ( bday 𝑦))
5857ralrimiva 3126 . . . . . . . . . . . . . . . . 17 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ∀𝑧 ∈ ( O ‘( bday 𝑦))( bday 𝑧) ∈ ( bday 𝑦))
59 bdayfun 27691 . . . . . . . . . . . . . . . . . 18 Fun bday
60 bdaydm 27693 . . . . . . . . . . . . . . . . . . 19 dom bday = No
6152, 60sseqtrri 3999 . . . . . . . . . . . . . . . . . 18 ( O ‘( bday 𝑦)) ⊆ dom bday
62 funimass4 6928 . . . . . . . . . . . . . . . . . 18 ((Fun bday ∧ ( O ‘( bday 𝑦)) ⊆ dom bday ) → (( bday “ ( O ‘( bday 𝑦))) ⊆ ( bday 𝑦) ↔ ∀𝑧 ∈ ( O ‘( bday 𝑦))( bday 𝑧) ∈ ( bday 𝑦)))
6359, 61, 62mp2an 692 . . . . . . . . . . . . . . . . 17 (( bday “ ( O ‘( bday 𝑦))) ⊆ ( bday 𝑦) ↔ ∀𝑧 ∈ ( O ‘( bday 𝑦))( bday 𝑧) ∈ ( bday 𝑦))
6458, 63sylibr 234 . . . . . . . . . . . . . . . 16 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday “ ( O ‘( bday 𝑦))) ⊆ ( bday 𝑦))
6549, 64eqsstrid 3988 . . . . . . . . . . . . . . 15 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday 𝑦))
66 scutbdaybnd 27734 . . . . . . . . . . . . . . . 16 (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday 𝑦) ∈ On ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday 𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday 𝑦))
6751, 66mp3an2 1451 . . . . . . . . . . . . . . 15 (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday 𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday 𝑦))
6845, 65, 67syl2anc 584 . . . . . . . . . . . . . 14 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday 𝑦))
69 simpr 484 . . . . . . . . . . . . . 14 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday 𝑦) ∈ ( bday 𝐴))
70 bdayelon 27695 . . . . . . . . . . . . . . 15 ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ On
71 bdayelon 27695 . . . . . . . . . . . . . . 15 ( bday 𝐴) ∈ On
72 ontr2 6383 . . . . . . . . . . . . . . 15 ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ On ∧ ( bday 𝐴) ∈ On) → ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday 𝑦) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday 𝐴)))
7370, 71, 72mp2an 692 . . . . . . . . . . . . . 14 ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday 𝑦) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday 𝐴))
7468, 69, 73syl2anc 584 . . . . . . . . . . . . 13 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday 𝐴))
7545scutcld 27722 . . . . . . . . . . . . . 14 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
76 oldbday 27819 . . . . . . . . . . . . . 14 ((( bday 𝐴) ∈ On ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No ) → (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday 𝐴)) ↔ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday 𝐴)))
7771, 75, 76sylancr 587 . . . . . . . . . . . . 13 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday 𝐴)) ↔ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday 𝐴)))
7874, 77mpbird 257 . . . . . . . . . . . 12 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday 𝐴)))
79 elons 28161 . . . . . . . . . . . . . . . 16 (𝐴 ∈ Ons ↔ (𝐴 No ∧ ( R ‘𝐴) = ∅))
8079simprbi 496 . . . . . . . . . . . . . . 15 (𝐴 ∈ Ons → ( R ‘𝐴) = ∅)
8180ad2antrr 726 . . . . . . . . . . . . . 14 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( R ‘𝐴) = ∅)
8281uneq2d 4134 . . . . . . . . . . . . 13 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → (( L ‘𝐴) ∪ ( R ‘𝐴)) = (( L ‘𝐴) ∪ ∅))
83 lrold 27815 . . . . . . . . . . . . 13 (( L ‘𝐴) ∪ ( R ‘𝐴)) = ( O ‘( bday 𝐴))
84 un0 4360 . . . . . . . . . . . . 13 (( L ‘𝐴) ∪ ∅) = ( L ‘𝐴)
8582, 83, 843eqtr3g 2788 . . . . . . . . . . . 12 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ( O ‘( bday 𝐴)) = ( L ‘𝐴))
8678, 85eleqtrd 2831 . . . . . . . . . . 11 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴))
87 leftlt 27782 . . . . . . . . . . 11 (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴)
8886, 87syl 17 . . . . . . . . . 10 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴)
89 simplr 768 . . . . . . . . . . . . . 14 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → 𝑦 No )
90 slerflex 27682 . . . . . . . . . . . . . . 15 (𝑦 No 𝑦 ≤s 𝑦)
91 lrcut 27822 . . . . . . . . . . . . . . 15 (𝑦 No → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
9290, 91breqtrrd 5138 . . . . . . . . . . . . . 14 (𝑦 No 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
9389, 92syl 17 . . . . . . . . . . . . 13 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
94 uneq2 4128 . . . . . . . . . . . . . . . 16 (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = (( L ‘𝑦) ∪ ∅))
95 un0 4360 . . . . . . . . . . . . . . . 16 (( L ‘𝑦) ∪ ∅) = ( L ‘𝑦)
9694, 95eqtrdi 2781 . . . . . . . . . . . . . . 15 (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( L ‘𝑦))
97 eqcom 2737 . . . . . . . . . . . . . . . 16 (( R ‘𝑦) = ∅ ↔ ∅ = ( R ‘𝑦))
9897biimpi 216 . . . . . . . . . . . . . . 15 (( R ‘𝑦) = ∅ → ∅ = ( R ‘𝑦))
9996, 98oveq12d 7408 . . . . . . . . . . . . . 14 (( R ‘𝑦) = ∅ → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = (( L ‘𝑦) |s ( R ‘𝑦)))
10099breq2d 5122 . . . . . . . . . . . . 13 (( R ‘𝑦) = ∅ → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦))))
10193, 100imbitrrid 246 . . . . . . . . . . . 12 (( R ‘𝑦) = ∅ → (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
102 simprlr 779 . . . . . . . . . . . . . 14 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 No )
10375adantl 481 . . . . . . . . . . . . . 14 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
104 n0 4319 . . . . . . . . . . . . . . . . . 18 (( R ‘𝑦) ≠ ∅ ↔ ∃𝑤 𝑤 ∈ ( R ‘𝑦))
105 breq2 5114 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = 𝑤 → (𝑦 ≤s 𝑧𝑦 ≤s 𝑤))
106 elun2 4149 . . . . . . . . . . . . . . . . . . . . . 22 (𝑤 ∈ ( R ‘𝑦) → 𝑤 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦)))
107106adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑤 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦)))
108 simprlr 779 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 No )
10937sseli 3945 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑤 ∈ ( R ‘𝑦) → 𝑤 No )
110109adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑤 No )
111 rightgt 27783 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑤 ∈ ( R ‘𝑦) → 𝑦 <s 𝑤)
112111adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 <s 𝑤)
113108, 110, 112sltled 27688 . . . . . . . . . . . . . . . . . . . . 21 ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 ≤s 𝑤)
114105, 107, 113rspcedvdw 3594 . . . . . . . . . . . . . . . . . . . 20 ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧)
115114ex 412 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ ( R ‘𝑦) → (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
116115exlimiv 1930 . . . . . . . . . . . . . . . . . 18 (∃𝑤 𝑤 ∈ ( R ‘𝑦) → (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
117104, 116sylbi 217 . . . . . . . . . . . . . . . . 17 (( R ‘𝑦) ≠ ∅ → (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
118117imp 406 . . . . . . . . . . . . . . . 16 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧)
119118orcd 873 . . . . . . . . . . . . . . 15 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
120 lltropt 27791 . . . . . . . . . . . . . . . . 17 ( L ‘𝑦) <<s ( R ‘𝑦)
121120a1i 11 . . . . . . . . . . . . . . . 16 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → ( L ‘𝑦) <<s ( R ‘𝑦))
12243, 44mp1i 13 . . . . . . . . . . . . . . . 16 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
123102, 91syl 17 . . . . . . . . . . . . . . . . 17 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
124123eqcomd 2736 . . . . . . . . . . . . . . . 16 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 = (( L ‘𝑦) |s ( R ‘𝑦)))
125 eqidd 2731 . . . . . . . . . . . . . . . 16 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
126 sltrec 27739 . . . . . . . . . . . . . . . 16 (((( L ‘𝑦) <<s ( R ‘𝑦) ∧ (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅) ∧ (𝑦 = (( L ‘𝑦) |s ( R ‘𝑦)) ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))) → (𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))))
127121, 122, 124, 125, 126syl22anc 838 . . . . . . . . . . . . . . 15 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → (𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))))
128119, 127mpbird 257 . . . . . . . . . . . . . 14 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
129102, 103, 128sltled 27688 . . . . . . . . . . . . 13 ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴))) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
130129ex 412 . . . . . . . . . . . 12 (( R ‘𝑦) ≠ ∅ → (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
131101, 130pm2.61ine 3009 . . . . . . . . . . 11 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
132 slenlt 27671 . . . . . . . . . . . 12 ((𝑦 No ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No ) → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
13389, 75, 132syl2anc 584 . . . . . . . . . . 11 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
134131, 133mpbid 232 . . . . . . . . . 10 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)
135 breq1 5113 . . . . . . . . . . . 12 (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝐴 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴))
136 breq1 5113 . . . . . . . . . . . . 13 (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝑦 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
137136notbid 318 . . . . . . . . . . . 12 (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (¬ 𝑧 <s 𝑦 ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
138135, 137anbi12d 632 . . . . . . . . . . 11 (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → ((𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦) ↔ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴 ∧ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)))
139138rspcev 3591 . . . . . . . . . 10 ((((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons ∧ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴 ∧ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦))
14041, 88, 134, 139syl12anc 836 . . . . . . . . 9 (((𝐴 ∈ Ons𝑦 No ) ∧ ( bday 𝑦) ∈ ( bday 𝐴)) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦))
141140ex 412 . . . . . . . 8 ((𝐴 ∈ Ons𝑦 No ) → (( bday 𝑦) ∈ ( bday 𝐴) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦)))
142 ontri1 6369 . . . . . . . . . 10 ((( bday 𝐴) ∈ On ∧ ( bday 𝑦) ∈ On) → (( bday 𝐴) ⊆ ( bday 𝑦) ↔ ¬ ( bday 𝑦) ∈ ( bday 𝐴)))
14371, 51, 142mp2an 692 . . . . . . . . 9 (( bday 𝐴) ⊆ ( bday 𝑦) ↔ ¬ ( bday 𝑦) ∈ ( bday 𝐴))
144143con2bii 357 . . . . . . . 8 (( bday 𝑦) ∈ ( bday 𝐴) ↔ ¬ ( bday 𝐴) ⊆ ( bday 𝑦))
145 rexanali 3085 . . . . . . . 8 (∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦) ↔ ¬ ∀𝑧 ∈ Ons (𝑧 <s 𝐴𝑧 <s 𝑦))
146141, 144, 1453imtr3g 295 . . . . . . 7 ((𝐴 ∈ Ons𝑦 No ) → (¬ ( bday 𝐴) ⊆ ( bday 𝑦) → ¬ ∀𝑧 ∈ Ons (𝑧 <s 𝐴𝑧 <s 𝑦)))
147146con4d 115 . . . . . 6 ((𝐴 ∈ Ons𝑦 No ) → (∀𝑧 ∈ Ons (𝑧 <s 𝐴𝑧 <s 𝑦) → ( bday 𝐴) ⊆ ( bday 𝑦)))
14831, 147syl5 34 . . . . 5 ((𝐴 ∈ Ons𝑦 No ) → ({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} → ( bday 𝐴) ⊆ ( bday 𝑦)))
149148adantrd 491 . . . 4 ((𝐴 ∈ Ons𝑦 No ) → (({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday 𝐴) ⊆ ( bday 𝑦)))
150149ralrimiva 3126 . . 3 (𝐴 ∈ Ons → ∀𝑦 No (({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday 𝐴) ⊆ ( bday 𝑦)))
1513, 8elpwd 4572 . . . . 5 (𝐴 ∈ Ons → {𝑥 ∈ Ons𝑥 <s 𝐴} ∈ 𝒫 No )
152 nulssgt 27717 . . . . 5 ({𝑥 ∈ Ons𝑥 <s 𝐴} ∈ 𝒫 No → {𝑥 ∈ Ons𝑥 <s 𝐴} <<s ∅)
153151, 152syl 17 . . . 4 (𝐴 ∈ Ons → {𝑥 ∈ Ons𝑥 <s 𝐴} <<s ∅)
154 eqscut2 27725 . . . 4 (({𝑥 ∈ Ons𝑥 <s 𝐴} <<s ∅ ∧ 𝐴 No ) → (({𝑥 ∈ Ons𝑥 <s 𝐴} |s ∅) = 𝐴 ↔ ({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝐴} ∧ {𝐴} <<s ∅ ∧ ∀𝑦 No (({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday 𝐴) ⊆ ( bday 𝑦)))))
155153, 1, 154syl2anc 584 . . 3 (𝐴 ∈ Ons → (({𝑥 ∈ Ons𝑥 <s 𝐴} |s ∅) = 𝐴 ↔ ({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝐴} ∧ {𝐴} <<s ∅ ∧ ∀𝑦 No (({𝑥 ∈ Ons𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday 𝐴) ⊆ ( bday 𝑦)))))
15619, 22, 150, 155mpbir3and 1343 . 2 (𝐴 ∈ Ons → ({𝑥 ∈ Ons𝑥 <s 𝐴} |s ∅) = 𝐴)
157156eqcomd 2736 1 (𝐴 ∈ Ons𝐴 = ({𝑥 ∈ Ons𝑥 <s 𝐴} |s ∅))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847  w3a 1086   = wceq 1540  wex 1779  wcel 2109  wne 2926  wral 3045  wrex 3054  {crab 3408  Vcvv 3450  cun 3915  wss 3917  c0 4299  𝒫 cpw 4566  {csn 4592   class class class wbr 5110  dom cdm 5641  cima 5644  Oncon0 6335  Fun wfun 6508  cfv 6514  (class class class)co 7390   No csur 27558   <s cslt 27559   bday cbday 27560   ≤s csle 27663   <<s csslt 27699   |s cscut 27701   O cold 27758   L cleft 27760   R cright 27761  Onscons 28159
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-tp 4597  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-pred 6277  df-ord 6338  df-on 6339  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-2nd 7972  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-1o 8437  df-2o 8438  df-no 27561  df-slt 27562  df-bday 27563  df-sle 27664  df-sslt 27700  df-scut 27702  df-made 27762  df-old 27763  df-new 27764  df-left 27765  df-right 27766  df-ons 28160
This theorem is referenced by:  bdayon  28180  onsfi  28254  n0cutlt  28256
  Copyright terms: Public domain W3C validator