Theorem oncutlt 28435

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 28426	. . . . 5 ⊢ (𝐴 ∈ Ons → 𝐴 ∈ No )
2		ltonsex 28433	. . . . 5 ⊢ (𝐴 ∈ No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ V)
3	1, 2	syl 18	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ V)
4		snexg 5413	. . . 4 ⊢ (𝐴 ∈ Ons → {𝐴} ∈ V)
5		ssrab2 4035	. . . . . 6 ⊢ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ Ons
6		onssno 28425	. . . . . 6 ⊢ Ons ⊆ No
7	5, 6	sstri 3947	. . . . 5 ⊢ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ No
8	7	a1i 11	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ No )
9	1	snssd 4753	. . . 4 ⊢ (𝐴 ∈ Ons → {𝐴} ⊆ No )
10		breq1 5113	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 <s 𝐴 ↔ 𝑦 <s 𝐴))
11	10	elrab 3651	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ↔ (𝑦 ∈ Ons ∧ 𝑦 <s 𝐴))
12	11	simprbi 502	. . . . . . 7 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} → 𝑦 <s 𝐴)
13		velsn 4606	. . . . . . . 8 ⊢ (𝑧 ∈ {𝐴} ↔ 𝑧 = 𝐴)
14		breq2 5114	. . . . . . . 8 ⊢ (𝑧 = 𝐴 → (𝑦 <s 𝑧 ↔ 𝑦 <s 𝐴))
15	13, 14	sylbi 220	. . . . . . 7 ⊢ (𝑧 ∈ {𝐴} → (𝑦 <s 𝑧 ↔ 𝑦 <s 𝐴))
16	12, 15	syl5ibrcom 250	. . . . . 6 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} → (𝑧 ∈ {𝐴} → 𝑦 <s 𝑧))
17	16	imp 411	. . . . 5 ⊢ ((𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
18	17	3adant1 1148	. . . 4 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
19	3, 4, 8, 9, 18	sltsd 27939	. . 3 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴})
20		snelpwi 5427	. . . 4 ⊢ (𝐴 ∈ No → {𝐴} ∈ 𝒫 No )
21		nulsgts 27947	. . . 4 ⊢ ({𝐴} ∈ 𝒫 No → {𝐴} <<s ∅)
22	1, 20, 21	3syl 19	. . 3 ⊢ (𝐴 ∈ Ons → {𝐴} <<s ∅)
23		sltssep 27938	. . . . . . 7 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤)
24		vex 3459	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
25		breq2 5114	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑧 <s 𝑤 ↔ 𝑧 <s 𝑦))
26	24, 25	ralsn 4648	. . . . . . . . 9 ⊢ (∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ 𝑧 <s 𝑦)
27	26	ralbii 3111	. . . . . . . 8 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}𝑧 <s 𝑦)
28		breq1 5113	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → (𝑥 <s 𝐴 ↔ 𝑧 <s 𝐴))
29	28	ralrab 3658	. . . . . . . 8 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}𝑧 <s 𝑦 ↔ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
30	27, 29	bitri 278	. . . . . . 7 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
31	23, 30	sylib 221	. . . . . 6 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
32		fvex 6896	. . . . . . . . . . . . 13 ⊢ ( L ‘𝑦) ∈ V
33		fvex 6896	. . . . . . . . . . . . 13 ⊢ ( R ‘𝑦) ∈ V
34	32, 33	unex 7744	. . . . . . . . . . . 12 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V
35	34	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V)
36		leftssno 28044	. . . . . . . . . . . . 13 ⊢ ( L ‘𝑦) ⊆ No
37		rightssno 28045	. . . . . . . . . . . . 13 ⊢ ( R ‘𝑦) ⊆ No
38	36, 37	unssi 4145	. . . . . . . . . . . 12 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No
39	38	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
40		eqidd 2764	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
41	35, 39, 40	elons2d 28430	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons)
42	34	elpw 4567	. . . . . . . . . . . . . . . . 17 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No ↔ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
43	38, 42	mpbir 234	. . . . . . . . . . . . . . . 16 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No
44		nulsgts 27947	. . . . . . . . . . . . . . . 16 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
45	43, 44	mp1i 14	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
46		un0 4352	. . . . . . . . . . . . . . . . . 18 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = (( L ‘𝑦) ∪ ( R ‘𝑦))
47		lrold 28068	. . . . . . . . . . . . . . . . . 18 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( O ‘( bday ‘𝑦))
48	46, 47	eqtri 2786	. . . . . . . . . . . . . . . . 17 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = ( O ‘( bday ‘𝑦))
49	48	imaeq2i 6062	. . . . . . . . . . . . . . . 16 ⊢ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) = ( bday “ ( O ‘( bday ‘𝑦)))
50		simpr 489	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → 𝑧 ∈ ( O ‘( bday ‘𝑦)))
51		bdayon 27923	. . . . . . . . . . . . . . . . . . . 20 ⊢ ( bday ‘𝑦) ∈ On
52		oldssno 28012	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ( O ‘( bday ‘𝑦)) ⊆ No
53	52	sseli 3934	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 ∈ ( O ‘( bday ‘𝑦)) → 𝑧 ∈ No )
54	53	adantl 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → 𝑧 ∈ No )
55		oldbday 28072	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((( bday ‘𝑦) ∈ On ∧ 𝑧 ∈ No ) → (𝑧 ∈ ( O ‘( bday ‘𝑦)) ↔ ( bday ‘𝑧) ∈ ( bday ‘𝑦)))
56	51, 54, 55	sylancr 598	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → (𝑧 ∈ ( O ‘( bday ‘𝑦)) ↔ ( bday ‘𝑧) ∈ ( bday ‘𝑦)))
57	50, 56	mpbid 235	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → ( bday ‘𝑧) ∈ ( bday ‘𝑦))
58	57	ralrimiva 3157	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∀𝑧 ∈ ( O ‘( bday ‘𝑦))( bday ‘𝑧) ∈ ( bday ‘𝑦))
59		bdayfun 27918	. . . . . . . . . . . . . . . . . 18 ⊢ Fun bday
60		bdaydm 27920	. . . . . . . . . . . . . . . . . . 19 ⊢ dom bday = No
61	52, 60	sseqtrri 3987	. . . . . . . . . . . . . . . . . 18 ⊢ ( O ‘( bday ‘𝑦)) ⊆ dom bday
62		funimass4 6947	. . . . . . . . . . . . . . . . . 18 ⊢ ((Fun bday ∧ ( O ‘( bday ‘𝑦)) ⊆ dom bday ) → (( bday “ ( O ‘( bday ‘𝑦))) ⊆ ( bday ‘𝑦) ↔ ∀𝑧 ∈ ( O ‘( bday ‘𝑦))( bday ‘𝑧) ∈ ( bday ‘𝑦)))
63	59, 61, 62	mp2an 704	. . . . . . . . . . . . . . . . 17 ⊢ (( bday “ ( O ‘( bday ‘𝑦))) ⊆ ( bday ‘𝑦) ↔ ∀𝑧 ∈ ( O ‘( bday ‘𝑦))( bday ‘𝑧) ∈ ( bday ‘𝑦))
64	58, 63	sylibr 237	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday “ ( O ‘( bday ‘𝑦))) ⊆ ( bday ‘𝑦))
65	49, 64	eqsstrid 3976	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦))
66		cutbdaybnd 27966	. . . . . . . . . . . . . . . 16 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday ‘𝑦) ∈ On ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
67	51, 66	mp3an2 1478	. . . . . . . . . . . . . . 15 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
68	45, 65, 67	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
69		simpr 489	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘𝑦) ∈ ( bday ‘𝐴))
70		bdayon 27923	. . . . . . . . . . . . . . 15 ⊢ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ On
71		bdayon 27923	. . . . . . . . . . . . . . 15 ⊢ ( bday ‘𝐴) ∈ On
72		ontr2 6411	. . . . . . . . . . . . . . 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 704	. . . . . . . . . . . . . 14 ⊢ ((( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴))
74	68, 69, 73	syl2anc 595	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴))
75	45	cutscld 27954	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
76		oldbday 28072	. . . . . . . . . . . . . 14 ⊢ ((( bday ‘𝐴) ∈ On ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No ) → (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday ‘𝐴)) ↔ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴)))
77	71, 75, 76	sylancr 598	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday ‘𝐴)) ↔ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ ( bday ‘𝐴)))
78	74, 77	mpbird 260	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( O ‘( bday ‘𝐴)))
79		elons 28424	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ Ons ↔ (𝐴 ∈ No ∧ ( R ‘𝐴) = ∅))
80	79	simprbi 502	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ Ons → ( R ‘𝐴) = ∅)
81	80	ad2antrr 738	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( R ‘𝐴) = ∅)
82	81	uneq2d 4123	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝐴) ∪ ( R ‘𝐴)) = (( L ‘𝐴) ∪ ∅))
83		lrold 28068	. . . . . . . . . . . . 13 ⊢ (( L ‘𝐴) ∪ ( R ‘𝐴)) = ( O ‘( bday ‘𝐴))
84		un0 4352	. . . . . . . . . . . . 13 ⊢ (( L ‘𝐴) ∪ ∅) = ( L ‘𝐴)
85	82, 83, 84	3eqtr3g 2821	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( O ‘( bday ‘𝐴)) = ( L ‘𝐴))
86	78, 85	eleqtrd 2865	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴))
87		leftlt 28024	. . . . . . . . . . 11 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴)
88	86, 87	syl 18	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴)
89		simplr 780	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ∈ No )
90		lesid 27909	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ No → 𝑦 ≤s 𝑦)
91		lrcut 28075	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ No → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
92	90, 91	breqtrrd 5140	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ No → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
93	89, 92	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
94		uneq2 4117	. . . . . . . . . . . . . . . 16 ⊢ (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = (( L ‘𝑦) ∪ ∅))
95		un0 4352	. . . . . . . . . . . . . . . 16 ⊢ (( L ‘𝑦) ∪ ∅) = ( L ‘𝑦)
96	94, 95	eqtrdi 2814	. . . . . . . . . . . . . . 15 ⊢ (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( L ‘𝑦))
97		eqcom 2770	. . . . . . . . . . . . . . . 16 ⊢ (( R ‘𝑦) = ∅ ↔ ∅ = ( R ‘𝑦))
98	97	biimpi 219	. . . . . . . . . . . . . . 15 ⊢ (( R ‘𝑦) = ∅ → ∅ = ( R ‘𝑦))
99	96, 98	oveq12d 7430	. . . . . . . . . . . . . 14 ⊢ (( R ‘𝑦) = ∅ → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = (( L ‘𝑦) |s ( R ‘𝑦)))
100	99	breq2d 5122	. . . . . . . . . . . . 13 ⊢ (( R ‘𝑦) = ∅ → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦))))
101	93, 100	imbitrrid 249	. . . . . . . . . . . 12 ⊢ (( R ‘𝑦) = ∅ → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
102		simprlr 791	. . . . . . . . . . . . . 14 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ∈ No )
103	75	adantl 486	. . . . . . . . . . . . . 14 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
104		n0 4308	. . . . . . . . . . . . . . . . . 18 ⊢ (( R ‘𝑦) ≠ ∅ ↔ ∃𝑤 𝑤 ∈ ( R ‘𝑦))
105		breq2 5114	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = 𝑤 → (𝑦 ≤s 𝑧 ↔ 𝑦 ≤s 𝑤))
106		elun2 4137	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑤 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦)))
107	106	adantr 485	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑤 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦)))
108		simprlr 791	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ∈ No )
109	37	sseli 3934	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑤 ∈ No )
110	109	adantr 485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑤 ∈ No )
111		rightgt 28025	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑦 <s 𝑤)
112	111	adantr 485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 <s 𝑤)
113	108, 110, 112	ltlesd 27915	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ≤s 𝑤)
114	105, 107, 113	rspcedvdw 3585	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧)
115	114	ex 417	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑤 ∈ ( R ‘𝑦) → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
116	115	exlimiv 1960	. . . . . . . . . . . . . . . . . 18 ⊢ (∃𝑤 𝑤 ∈ ( R ‘𝑦) → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
117	104, 116	sylbi 220	. . . . . . . . . . . . . . . . 17 ⊢ (( R ‘𝑦) ≠ ∅ → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧))
118	117	imp 411	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧)
119	118	orcd 886	. . . . . . . . . . . . . . 15 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
120		lltr 28033	. . . . . . . . . . . . . . . . 17 ⊢ ( L ‘𝑦) <<s ( R ‘𝑦)
121	120	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ( L ‘𝑦) <<s ( R ‘𝑦))
122	43, 44	mp1i 14	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
123	102, 91	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
124	123	eqcomd 2769	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 = (( L ‘𝑦) |s ( R ‘𝑦)))
125		eqidd 2764	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
126	121, 122, 124, 125	ltsrecd 27973	. . . . . . . . . . . . . . 15 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → (𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ (∃𝑧 ∈ (( L ‘𝑦) ∪ ( R ‘𝑦))𝑦 ≤s 𝑧 ∨ ∃𝑤 ∈ ( R ‘𝑦)𝑤 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))))
127	119, 126	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 <s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
128	102, 103, 127	ltlesd 27915	. . . . . . . . . . . . 13 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
129	128	ex 417	. . . . . . . . . . . 12 ⊢ (( R ‘𝑦) ≠ ∅ → (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)))
130	101, 129	pm2.61ine 3041	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
131		lenlts 27894	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ No ∧ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No ) → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
132	89, 75, 131	syl2anc 595	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
133	130, 132	mpbid 235	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)
134		breq1 5113	. . . . . . . . . . . 12 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝐴 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴))
135		breq1 5113	. . . . . . . . . . . . 13 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝑦 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
136	135	notbid 321	. . . . . . . . . . . 12 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (¬ 𝑧 <s 𝑦 ↔ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦))
137	134, 136	anbi12d 643	. . . . . . . . . . 11 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → ((𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦) ↔ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴 ∧ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)))
138	137	rspcev 3582	. . . . . . . . . 10 ⊢ ((((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons ∧ (((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴 ∧ ¬ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝑦)) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦))
139	41, 88, 133, 138	syl12anc 849	. . . . . . . . 9 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦))
140	139	ex 417	. . . . . . . 8 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (( bday ‘𝑦) ∈ ( bday ‘𝐴) → ∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦)))
141		ontri1 6397	. . . . . . . . . 10 ⊢ ((( bday ‘𝐴) ∈ On ∧ ( bday ‘𝑦) ∈ On) → (( bday ‘𝐴) ⊆ ( bday ‘𝑦) ↔ ¬ ( bday ‘𝑦) ∈ ( bday ‘𝐴)))
142	71, 51, 141	mp2an 704	. . . . . . . . 9 ⊢ (( bday ‘𝐴) ⊆ ( bday ‘𝑦) ↔ ¬ ( bday ‘𝑦) ∈ ( bday ‘𝐴))
143	142	con2bii 360	. . . . . . . 8 ⊢ (( bday ‘𝑦) ∈ ( bday ‘𝐴) ↔ ¬ ( bday ‘𝐴) ⊆ ( bday ‘𝑦))
144		rexanali 3119	. . . . . . . 8 ⊢ (∃𝑧 ∈ Ons (𝑧 <s 𝐴 ∧ ¬ 𝑧 <s 𝑦) ↔ ¬ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦))
145	140, 143, 144	3imtr3g 298	. . . . . . 7 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (¬ ( bday ‘𝐴) ⊆ ( bday ‘𝑦) → ¬ ∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦)))
146	145	con4d 116	. . . . . 6 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (∀𝑧 ∈ Ons (𝑧 <s 𝐴 → 𝑧 <s 𝑦) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
147	31, 146	syl5 35	. . . . 5 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
148	147	adantrd 496	. . . 4 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) → (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
149	148	ralrimiva 3157	. . 3 ⊢ (𝐴 ∈ Ons → ∀𝑦 ∈ No (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))
150	3, 8	elpwd 4569	. . . . 5 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ 𝒫 No )
151		nulsgts 27947	. . . . 5 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ 𝒫 No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅)
152	150, 151	syl 18	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅)
153		eqcuts2 27957	. . . 4 ⊢ (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅ ∧ 𝐴 ∈ No ) → (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴 ↔ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴} ∧ {𝐴} <<s ∅ ∧ ∀𝑦 ∈ No (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))))
154	152, 1, 153	syl2anc 595	. . 3 ⊢ (𝐴 ∈ Ons → (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴 ↔ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴} ∧ {𝐴} <<s ∅ ∧ ∀𝑦 ∈ No (({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} ∧ {𝑦} <<s ∅) → ( bday ‘𝐴) ⊆ ( bday ‘𝑦)))))
155	19, 22, 149, 154	mpbir3and 1361	. 2 ⊢ (𝐴 ∈ Ons → ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴)
156	155	eqcomd 2769	1 ⊢ (𝐴 ∈ Ons → 𝐴 = ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   ∧ w3a 1103   = wceq 1570  ∃wex 1809   ∈ wcel 2143   ≠ wne 2958  ∀wral 3079  ∃wrex 3089  {crab 3416  Vcvv 3455   ∪ cun 3904   ⊆ wss 3906  ∅c0 4287  𝒫 cpw 4563  {csn 4590   class class class wbr 5110  dom cdm 5663   “ cima 5666  Oncon0 6362  Fun wfun 6532  ‘cfv 6538  (class class class)co 7412   No csur 27782   <s clts 27783   bday cbday 27784   ≤s cles 27886   <<s cslts 27928   |s ccuts 27930   O cold 27994   L cleft 27996   R cright 27997  On_scons 28422

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-tp 4595  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-1o 8454  df-2o 8455  df-no 27785  df-lts 27786  df-bday 27787  df-les 27887  df-slts 27929  df-cuts 27931  df-made 27998  df-old 27999  df-new 28000  df-left 28001  df-right 28002  df-ons 28423

This theorem is referenced by:  bdayons  28447  onsfi  28527  n0cutlt  28530