Theorem oncutlt 28281

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
oncutlt	⊢ (𝐴 ∈ Ons → 𝐴 = ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅))

Distinct variable group:   𝑥,𝐴

Proof of Theorem oncutlt

Dummy variables 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		onno 28272	. . . . 5 ⊢ (𝐴 ∈ Ons → 𝐴 ∈ No )
2		ltonsex 28279	. . . . 5 ⊢ (𝐴 ∈ No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ V)
3	1, 2	syl 17	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ V)
4		snexg 5376	. . . 4 ⊢ (𝐴 ∈ Ons → {𝐴} ∈ V)
5		ssrab2 4018	. . . . . 6 ⊢ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ Ons
6		onssno 28271	. . . . . 6 ⊢ Ons ⊆ No
7	5, 6	sstri 3931	. . . . 5 ⊢ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ No
8	7	a1i 11	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ No )
9	1	snssd 4725	. . . 4 ⊢ (𝐴 ∈ Ons → {𝐴} ⊆ No )
10		breq1 5082	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 <s 𝐴 ↔ 𝑦 <s 𝐴))
11	10	elrab 3636	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ↔ (𝑦 ∈ Ons ∧ 𝑦 <s 𝐴))
12	11	simprbi 498	. . . . . . 7 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} → 𝑦 <s 𝐴)
13		velsn 4578	. . . . . . . 8 ⊢ (𝑧 ∈ {𝐴} ↔ 𝑧 = 𝐴)
14		breq2 5083	. . . . . . . 8 ⊢ (𝑧 = 𝐴 → (𝑦 <s 𝑧 ↔ 𝑦 <s 𝐴))
15	13, 14	sylbi 218	. . . . . . 7 ⊢ (𝑧 ∈ {𝐴} → (𝑦 <s 𝑧 ↔ 𝑦 <s 𝐴))
16	12, 15	syl5ibrcom 248	. . . . . 6 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} → (𝑧 ∈ {𝐴} → 𝑦 <s 𝑧))
17	16	imp 407	. . . . 5 ⊢ ((𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
18	17	3adant1 1136	. . . 4 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
19	3, 4, 8, 9, 18	sltsd 27785	. . 3 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴})
20		snelpwi 5390	. . . 4 ⊢ (𝐴 ∈ No → {𝐴} ∈ 𝒫 No )
21		nulsgts 27793	. . . 4 ⊢ ({𝐴} ∈ 𝒫 No → {𝐴} <<s ∅)
22	1, 20, 21	3syl 18	. . 3 ⊢ (𝐴 ∈ Ons → {𝐴} <<s ∅)
23		sltssep 27784	. . . . . . 7 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤)
24		vex 3436	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
25		breq2 5083	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑧 <s 𝑤 ↔ 𝑧 <s 𝑦))
26	24, 25	ralsn 4620	. . . . . . . . 9 ⊢ (∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ 𝑧 <s 𝑦)
27	26	ralbii 3086	. . . . . . . 8 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}𝑧 <s 𝑦)
28		breq1 5082	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → (𝑥 <s 𝐴 ↔ 𝑧 <s 𝐴))
29	28	ralrab 3642	. . . . . . . 8 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}𝑧 <s 𝑦 ↔ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
30	27, 29	bitri 276	. . . . . . 7 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
31	23, 30	sylib 219	. . . . . 6 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
32		fvex 6847	. . . . . . . . . . . . 13 ⊢ ( L ‘𝑦) ∈ V
33		fvex 6847	. . . . . . . . . . . . 13 ⊢ ( R ‘𝑦) ∈ V
34	32, 33	unex 7694	. . . . . . . . . . . 12 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V
35	34	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V)
36		leftssno 27890	. . . . . . . . . . . . 13 ⊢ ( L ‘𝑦) ⊆ No
37		rightssno 27891	. . . . . . . . . . . . 13 ⊢ ( R ‘𝑦) ⊆ No
38	36, 37	unssi 4127	. . . . . . . . . . . 12 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No
39	38	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
40		eqidd 2741	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
41	35, 39, 40	elons2d 28276	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons)
42	34	elpw 4540	. . . . . . . . . . . . . . . . 17 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No ↔ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
43	38, 42	mpbir 232	. . . . . . . . . . . . . . . 16 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No
44		nulsgts 27793	. . . . . . . . . . . . . . . 16 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
45	43, 44	mp1i 13	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
46		un0 4329	. . . . . . . . . . . . . . . . . 18 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = (( L ‘𝑦) ∪ ( R ‘𝑦))
47		lrold 27914	. . . . . . . . . . . . . . . . . 18 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( O ‘( bday ‘𝑦))
48	46, 47	eqtri 2763	. . . . . . . . . . . . . . . . 17 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = ( O ‘( bday ‘𝑦))
49	48	imaeq2i 6017	. . . . . . . . . . . . . . . 16 ⊢ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) = ( bday “ ( O ‘( bday ‘𝑦)))
50		simpr 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → 𝑧 ∈ ( O ‘( bday ‘𝑦)))
51		bdayon 27769	. . . . . . . . . . . . . . . . . . . 20 ⊢ ( bday ‘𝑦) ∈ On
52		oldssno 27858	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ( O ‘( bday ‘𝑦)) ⊆ No
53	52	sseli 3918	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 ∈ ( O ‘( bday ‘𝑦)) → 𝑧 ∈ No )
54	53	adantl 482	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → 𝑧 ∈ No )
55		oldbday 27918	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((( bday ‘𝑦) ∈ On ∧ 𝑧 ∈ No ) → (𝑧 ∈ ( O ‘( bday ‘𝑦)) ↔ ( bday ‘𝑧) ∈ ( bday ‘𝑦)))
56	51, 54, 55	sylancr 593	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → (𝑧 ∈ ( O ‘( bday ‘𝑦)) ↔ ( bday ‘𝑧) ∈ ( bday ‘𝑦)))
57	50, 56	mpbid 233	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → ( bday ‘𝑧) ∈ ( bday ‘𝑦))
58	57	ralrimiva 3132	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∀𝑧 ∈ ( O ‘( bday ‘𝑦))( bday ‘𝑧) ∈ ( bday ‘𝑦))
59		bdayfun 27765	. . . . . . . . . . . . . . . . . 18 ⊢ Fun bday
60		bdaydm 27767	. . . . . . . . . . . . . . . . . . 19 ⊢ dom bday = No
61	52, 60	sseqtrri 3971	. . . . . . . . . . . . . . . . . 18 ⊢ ( O ‘( bday ‘𝑦)) ⊆ dom bday
62		funimass4 6898	. . . . . . . . . . . . . . . . . 18 ⊢ ((Fun bday ∧ ( O ‘( bday ‘𝑦)) ⊆ dom bday ) → (( bday “ ( O ‘( bday ‘𝑦))) ⊆ ( bday ‘𝑦) ↔ ∀𝑧 ∈ ( O ‘( bday ‘𝑦))( bday ‘𝑧) ∈ ( bday ‘𝑦)))
63	59, 61, 62	mp2an 698	. . . . . . . . . . . . . . . . 17 ⊢ (( bday “ ( O ‘( bday ‘𝑦))) ⊆ ( bday ‘𝑦) ↔ ∀𝑧 ∈ ( O ‘( bday ‘𝑦))( bday ‘𝑧) ∈ ( bday ‘𝑦))
64	58, 63	sylibr 235	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday “ ( O ‘( bday ‘𝑦))) ⊆ ( bday ‘𝑦))
65	49, 64	eqsstrid 3960	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦))
66		cutbdaybnd 27812	. . . . . . . . . . . . . . . 16 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday ‘𝑦) ∈ On ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
67	51, 66	mp3an2 1457	. . . . . . . . . . . . . . 15 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
68	45, 65, 67	syl2anc 590	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
69		simpr 485	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘𝑦) ∈ ( bday ‘𝐴))
70		bdayon 27769	. . . . . . . . . . . . . . 15 ⊢ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ On
71		bdayon 27769	. . . . . . . . . . . . . . 15 ⊢ ( bday ‘𝐴) ∈ On
72		ontr2 6365	. . . . . . . . . . . . . . 15 ⊢ ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ On ∧ ( bday ‘𝐴) ∈ On) → ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴)))
73	70, 71, 72	mp2an 698	. . . . . . . . . . . . . 14 ⊢ ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴))
74	68, 69, 73	syl2anc 590	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴))
75	45	cutscld 27800	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
76		oldbday 27918	. . . . . . . . . . . . . 14 ⊢ ((( bday ‘𝐴) ∈ On ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No ) → (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday ‘𝐴)) ↔ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴)))
77	71, 75, 76	sylancr 593	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday ‘𝐴)) ↔ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴)))
78	74, 77	mpbird 258	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday ‘𝐴)))
79		elons 28270	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ Ons ↔ (𝐴 ∈ No ∧ ( R ‘𝐴) = ∅))
80	79	simprbi 498	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ Ons → ( R ‘𝐴) = ∅)
81	80	ad2antrr 732	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( R ‘𝐴) = ∅)
82	81	uneq2d 4105	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝐴) ∪ ( R ‘𝐴)) = (( L ‘𝐴) ∪ ∅))
83		lrold 27914	. . . . . . . . . . . . 13 ⊢ (( L ‘𝐴) ∪ ( R ‘𝐴)) = ( O ‘( bday ‘𝐴))
84		un0 4329	. . . . . . . . . . . . 13 ⊢ (( L ‘𝐴) ∪ ∅) = ( L ‘𝐴)
85	82, 83, 84	3eqtr3g 2798	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( O ‘( bday ‘𝐴)) = ( L ‘𝐴))
86	78, 85	eleqtrd 2842	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴))
87		leftlt 27870	. . . . . . . . . . 11 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴)
88	86, 87	syl 17	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴)
89		simplr 774	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ∈ No )
90		lesid 27756	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ No → 𝑦 ≤s 𝑦)
91		lrcut 27921	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ No → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
92	90, 91	breqtrrd 5107	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ No → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
93	89, 92	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
94		uneq2 4099	. . . . . . . . . . . . . . . 16 ⊢ (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = (( L ‘𝑦) ∪ ∅))
95		un0 4329	. . . . . . . . . . . . . . . 16 ⊢ (( L ‘𝑦) ∪ ∅) = ( L ‘𝑦)
96	94, 95	eqtrdi 2791	. . . . . . . . . . . . . . 15 ⊢ (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( L ‘𝑦))
97		eqcom 2747	. . . . . . . . . . . . . . . 16 ⊢ (( R ‘𝑦) = ∅ ↔ ∅ = ( R ‘𝑦))
98	97	biimpi 217	. . . . . . . . . . . . . . 15 ⊢ (( R ‘𝑦) = ∅ → ∅ = ( R ‘𝑦))
99	96, 98	oveq12d 7381	. . . . . . . . . . . . . 14 ⊢ (( R ‘𝑦) = ∅ → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = (( L ‘𝑦) |s ( R ‘𝑦)))
100	99	breq2d 5091	. . . . . . . . . . . . 13 ⊢ (( R ‘𝑦) = ∅ → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦))))
101	93, 100	imbitrrid 247	. . . . . . . . . . . 12 ⊢ (( R ‘𝑦) = ∅ → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
102		simprlr 785	. . . . . . . . . . . . . 14 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ∈ No )
103	75	adantl 482	. . . . . . . . . . . . . 14 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
104		n0 4288	. . . . . . . . . . . . . . . . . 18 ⊢ (( R ‘𝑦) ≠ ∅ ↔ ∃𝑤 𝑤 ∈ ( R ‘𝑦))
105		breq2 5083	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = 𝑤 → (𝑦 ≤s 𝑧 ↔ 𝑦 ≤s 𝑤))
106		elun2 4119	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑤 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦)))
107	106	adantr 481	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑤 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦)))
108		simprlr 785	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ∈ No )
109	37	sseli 3918	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑤 ∈ No )
110	109	adantr 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑤 ∈ No )
111		rightgt 27871	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑦 <s 𝑤)
112	111	adantr 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 <s 𝑤)
113	108, 110, 112	ltlesd 27762	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ≤s 𝑤)
114	105, 107, 113	rspcedvdw 3570	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧)
115	114	ex 413	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑤 ∈ ( R ‘𝑦) → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
116	115	exlimiv 1937	. . . . . . . . . . . . . . . . . 18 ⊢ (∃𝑤 𝑤 ∈ ( R ‘𝑦) → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
117	104, 116	sylbi 218	. . . . . . . . . . . . . . . . 17 ⊢ (( R ‘𝑦) ≠ ∅ → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
118	117	imp 407	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧)
119	118	orcd 879	. . . . . . . . . . . . . . 15 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
120		lltr 27879	. . . . . . . . . . . . . . . . 17 ⊢ ( L ‘𝑦) <<s ( R ‘𝑦)
121	120	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ( L ‘𝑦) <<s ( R ‘𝑦))
122	43, 44	mp1i 13	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
123	102, 91	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
124	123	eqcomd 2746	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 = (( L ‘𝑦) |s ( R ‘𝑦)))
125		eqidd 2741	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
126	121, 122, 124, 125	ltsrecd 27819	. . . . . . . . . . . . . . 15 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))))
127	119, 126	mpbird 258	. . . . . . . . . . . . . 14 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
128	102, 103, 127	ltlesd 27762	. . . . . . . . . . . . 13 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
129	128	ex 413	. . . . . . . . . . . 12 ⊢ (( R ‘𝑦) ≠ ∅ → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
130	101, 129	pm2.61ine 3018	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
131		lenlts 27741	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ No ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No ) → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
132	89, 75, 131	syl2anc 590	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
133	130, 132	mpbid 233	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)
134		breq1 5082	. . . . . . . . . . . 12 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝐴 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴))
135		breq1 5082	. . . . . . . . . . . . 13 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝑦 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
136	135	notbid 319	. . . . . . . . . . . 12 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (¬ 𝑧 <s 𝑦 ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
137	134, 136	anbi12d 638	. . . . . . . . . . 11 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → ((𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦) ↔ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴 ∧ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)))
138	137	rspcev 3567	. . . . . . . . . 10 ⊢ ((((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons ∧ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴 ∧ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦))
139	41, 88, 133, 138	syl12anc 842	. . . . . . . . 9 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦))
140	139	ex 413	. . . . . . . 8 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (( bday ‘𝑦) ∈ ( bday ‘𝐴) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦)))
141		ontri1 6351	. . . . . . . . . 10 ⊢ ((( bday ‘𝐴) ∈ On ∧ ( bday ‘𝑦) ∈ On) → (( bday ‘𝐴) ⊆ ( bday ‘𝑦) ↔ ¬ ( bday ‘𝑦) ∈ ( bday ‘𝐴)))
142	71, 51, 141	mp2an 698	. . . . . . . . 9 ⊢ (( bday ‘𝐴) ⊆ ( bday ‘𝑦) ↔ ¬ ( bday ‘𝑦) ∈ ( bday ‘𝐴))
143	142	con2bii 358	. . . . . . . 8 ⊢ (( bday ‘𝑦) ∈ ( bday ‘𝐴) ↔ ¬ ( bday ‘𝐴) ⊆ ( bday ‘𝑦))
144		rexanali 3094	. . . . . . . 8 ⊢ (∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦) ↔ ¬ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
145	140, 143, 144	3imtr3g 296	. . . . . . 7 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (¬ ( bday ‘𝐴) ⊆ ( bday ‘𝑦) → ¬ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦)))
146	145	con4d 115	. . . . . 6 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
147	31, 146	syl5 34	. . . . 5 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
148	147	adantrd 492	. . . 4 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
149	148	ralrimiva 3132	. . 3 ⊢ (𝐴 ∈ Ons → ∀𝑦 ∈ No (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
150	3, 8	elpwd 4542	. . . . 5 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ 𝒫 No )
151		nulsgts 27793	. . . . 5 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ 𝒫 No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅)
152	150, 151	syl 17	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅)
153		eqcuts2 27803	. . . 4 ⊢ (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅ ∧ 𝐴 ∈ No ) → (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴 ↔ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴} ∧ {𝐴} <<s ∅ ∧ ∀𝑦 ∈ No (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))))
154	152, 1, 153	syl2anc 590	. . 3 ⊢ (𝐴 ∈ Ons → (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴 ↔ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴} ∧ {𝐴} <<s ∅ ∧ ∀𝑦 ∈ No (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))))
155	19, 22, 149, 154	mpbir3and 1349	. 2 ⊢ (𝐴 ∈ Ons → ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴)
156	155	eqcomd 2746	1 ⊢ (𝐴 ∈ Ons → 𝐴 = ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 207   ∧ wa 396   ∨ wo 853   ∧ w3a 1092   = wceq 1547  ∃wex 1786   ∈ wcel 2119   ≠ wne 2935  ∀wral 3054  ∃wrex 3064  {crab 3392  Vcvv 3432   ∪ cun 3888   ⊆ wss 3890  ∅c0 4268  𝒫 cpw 4536  {csn 4562   class class class wbr 5079  dom cdm 5625   “ cima 5628  Oncon0 6317  Fun wfun 6486  ‘cfv 6492  (class class class)co 7363   No csur 27628   <s clts 27629   bday cbday 27630   ≤s cles 27733   <<s cslts 27774   |s ccuts 27776   O cold 27840   L cleft 27842   R cright 27843  On_scons 28268

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-tp 4567  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-1o 8402  df-2o 8403  df-no 27631  df-lts 27632  df-bday 27633  df-les 27734  df-slts 27775  df-cuts 27777  df-made 27844  df-old 27845  df-new 27846  df-left 27847  df-right 27848  df-ons 28269

This theorem is referenced by:  bdayons  28293  onsfi  28373  n0cutlt  28376