Theorem oncutlt 28415

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 28406	. . . . 5 ⊢ (𝐴 ∈ Ons → 𝐴 ∈ No )
2		ltonsex 28413	. . . . 5 ⊢ (𝐴 ∈ No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ V)
3	1, 2	syl 18	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ V)
4		snexg 5402	. . . 4 ⊢ (𝐴 ∈ Ons → {𝐴} ∈ V)
5		ssrab2 4036	. . . . . 6 ⊢ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ Ons
6		onssno 28405	. . . . . 6 ⊢ Ons ⊆ No
7	5, 6	sstri 3948	. . . . 5 ⊢ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ No
8	7	a1i 11	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ No )
9	1	snssd 4748	. . . 4 ⊢ (𝐴 ∈ Ons → {𝐴} ⊆ No )
10		breq1 5108	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 <s 𝐴 ↔ 𝑦 <s 𝐴))
11	10	elrab 3653	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ↔ (𝑦 ∈ Ons ∧ 𝑦 <s 𝐴))
12	11	simprbi 502	. . . . . . 7 ⊢ (𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} → 𝑦 <s 𝐴)
13		velsn 4601	. . . . . . . 8 ⊢ (𝑧 ∈ {𝐴} ↔ 𝑧 = 𝐴)
14		breq2 5109	. . . . . . . 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 1146	. . . 4 ⊢ ((𝐴 ∈ Ons ∧ 𝑦 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
19	3, 4, 8, 9, 18	sltsd 27919	. . 3 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝐴})
20		snelpwi 5416	. . . 4 ⊢ (𝐴 ∈ No → {𝐴} ∈ 𝒫 No )
21		nulsgts 27927	. . . 4 ⊢ ({𝐴} ∈ 𝒫 No → {𝐴} <<s ∅)
22	1, 20, 21	3syl 19	. . 3 ⊢ (𝐴 ∈ Ons → {𝐴} <<s ∅)
23		sltssep 27918	. . . . . . 7 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s {𝑦} → ∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤)
24		vex 3461	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
25		breq2 5109	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑧 <s 𝑤 ↔ 𝑧 <s 𝑦))
26	24, 25	ralsn 4643	. . . . . . . . 9 ⊢ (∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ 𝑧 <s 𝑦)
27	26	ralbii 3111	. . . . . . . 8 ⊢ (∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}∀𝑤 ∈ {𝑦}𝑧 <s 𝑤 ↔ ∀𝑧 ∈ {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴}𝑧 <s 𝑦)
28		breq1 5108	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → (𝑥 <s 𝐴 ↔ 𝑧 <s 𝐴))
29	28	ralrab 3660	. . . . . . . 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 6884	. . . . . . . . . . . . 13 ⊢ ( L ‘𝑦) ∈ V
33		fvex 6884	. . . . . . . . . . . . 13 ⊢ ( R ‘𝑦) ∈ V
34	32, 33	unex 7731	. . . . . . . . . . . 12 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V
35	34	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ V)
36		leftssno 28024	. . . . . . . . . . . . 13 ⊢ ( L ‘𝑦) ⊆ No
37		rightssno 28025	. . . . . . . . . . . . 13 ⊢ ( R ‘𝑦) ⊆ No
38	36, 37	unssi 4146	. . . . . . . . . . . 12 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No
39	38	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
40		eqidd 2766	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
41	35, 39, 40	elons2d 28410	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ Ons)
42	34	elpw 4562	. . . . . . . . . . . . . . . . 17 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No ↔ (( L ‘𝑦) ∪ ( R ‘𝑦)) ⊆ No )
43	38, 42	mpbir 234	. . . . . . . . . . . . . . . 16 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No
44		nulsgts 27927	. . . . . . . . . . . . . . . 16 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∈ 𝒫 No → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
45	43, 44	mp1i 14	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅)
46		un0 4351	. . . . . . . . . . . . . . . . . 18 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = (( L ‘𝑦) ∪ ( R ‘𝑦))
47		lrold 28048	. . . . . . . . . . . . . . . . . 18 ⊢ (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( O ‘( bday ‘𝑦))
48	46, 47	eqtri 2788	. . . . . . . . . . . . . . . . 17 ⊢ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅) = ( O ‘( bday ‘𝑦))
49	48	imaeq2i 6051	. . . . . . . . . . . . . . . 16 ⊢ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) = ( bday “ ( O ‘( bday ‘𝑦)))
50		simpr 489	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → 𝑧 ∈ ( O ‘( bday ‘𝑦)))
51		bdayon 27903	. . . . . . . . . . . . . . . . . . . 20 ⊢ ( bday ‘𝑦) ∈ On
52		oldssno 27992	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ( O ‘( bday ‘𝑦)) ⊆ No
53	52	sseli 3935	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 ∈ ( O ‘( bday ‘𝑦)) → 𝑧 ∈ No )
54	53	adantl 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) ∧ 𝑧 ∈ ( O ‘( bday ‘𝑦))) → 𝑧 ∈ No )
55		oldbday 28052	. . . . . . . . . . . . . . . . . . . 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 27898	. . . . . . . . . . . . . . . . . 18 ⊢ Fun bday
60		bdaydm 27900	. . . . . . . . . . . . . . . . . . 19 ⊢ dom bday = No
61	52, 60	sseqtrri 3988	. . . . . . . . . . . . . . . . . 18 ⊢ ( O ‘( bday ‘𝑦)) ⊆ dom bday
62		funimass4 6935	. . . . . . . . . . . . . . . . . 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 3977	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦))
66		cutbdaybnd 27946	. . . . . . . . . . . . . . . 16 ⊢ (((( L ‘𝑦) ∪ ( R ‘𝑦)) <<s ∅ ∧ ( bday ‘𝑦) ∈ On ∧ ( bday “ ((( L ‘𝑦) ∪ ( R ‘𝑦)) ∪ ∅)) ⊆ ( bday ‘𝑦)) → ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ⊆ ( bday ‘𝑦))
67	51, 66	mp3an2 1473	. . . . . . . . . . . . . . 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 27903	. . . . . . . . . . . . . . 15 ⊢ ( bday ‘((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅)) ∈ On
71		bdayon 27903	. . . . . . . . . . . . . . 15 ⊢ ( bday ‘𝐴) ∈ On
72		ontr2 6398	. . . . . . . . . . . . . . 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 27934	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ No )
76		oldbday 28052	. . . . . . . . . . . . . 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 28404	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ Ons ↔ (𝐴 ∈ No ∧ ( R ‘𝐴) = ∅))
80	79	simprbi 502	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ Ons → ( R ‘𝐴) = ∅)
81	80	ad2antrr 738	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( R ‘𝐴) = ∅)
82	81	uneq2d 4124	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → (( L ‘𝐴) ∪ ( R ‘𝐴)) = (( L ‘𝐴) ∪ ∅))
83		lrold 28048	. . . . . . . . . . . . 13 ⊢ (( L ‘𝐴) ∪ ( R ‘𝐴)) = ( O ‘( bday ‘𝐴))
84		un0 4351	. . . . . . . . . . . . 13 ⊢ (( L ‘𝐴) ∪ ∅) = ( L ‘𝐴)
85	82, 83, 84	3eqtr3g 2823	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ( O ‘( bday ‘𝐴)) = ( L ‘𝐴))
86	78, 85	eleqtrd 2867	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) ∈ ( L ‘𝐴))
87		leftlt 28004	. . . . . . . . . . 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 27889	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ No → 𝑦 ≤s 𝑦)
91		lrcut 28055	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ No → (( L ‘𝑦) |s ( R ‘𝑦)) = 𝑦)
92	90, 91	breqtrrd 5133	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ No → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
93	89, 92	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s (( L ‘𝑦) |s ( R ‘𝑦)))
94		uneq2 4118	. . . . . . . . . . . . . . . 16 ⊢ (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = (( L ‘𝑦) ∪ ∅))
95		un0 4351	. . . . . . . . . . . . . . . 16 ⊢ (( L ‘𝑦) ∪ ∅) = ( L ‘𝑦)
96	94, 95	eqtrdi 2816	. . . . . . . . . . . . . . 15 ⊢ (( R ‘𝑦) = ∅ → (( L ‘𝑦) ∪ ( R ‘𝑦)) = ( L ‘𝑦))
97		eqcom 2772	. . . . . . . . . . . . . . . 16 ⊢ (( R ‘𝑦) = ∅ ↔ ∅ = ( R ‘𝑦))
98	97	biimpi 219	. . . . . . . . . . . . . . 15 ⊢ (( R ‘𝑦) = ∅ → ∅ = ( R ‘𝑦))
99	96, 98	oveq12d 7418	. . . . . . . . . . . . . 14 ⊢ (( R ‘𝑦) = ∅ → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = (( L ‘𝑦) |s ( R ‘𝑦)))
100	99	breq2d 5117	. . . . . . . . . . . . 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 5109	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = 𝑤 → (𝑦 ≤s 𝑧 ↔ 𝑦 ≤s 𝑤))
106		elun2 4138	. . . . . . . . . . . . . . . . . . . . . 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 3935	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑤 ∈ No )
110	109	adantr 485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑤 ∈ No )
111		rightgt 28005	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 ∈ ( R ‘𝑦) → 𝑦 <s 𝑤)
112	111	adantr 485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 <s 𝑤)
113	108, 110, 112	ltlesd 27895	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑤 ∈ ( R ‘𝑦) ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 ≤s 𝑤)
114	105, 107, 113	rspcedvdw 3587	. . . . . . . . . . . . . . . . . . . 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 1953	. . . . . . . . . . . . . . . . . 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 28013	. . . . . . . . . . . . . . . . 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 2771	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → 𝑦 = (( L ‘𝑦) |s ( R ‘𝑦)))
125		eqidd 2766	. . . . . . . . . . . . . . . 16 ⊢ ((( R ‘𝑦) ≠ ∅ ∧ ((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴))) → ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
126	121, 122, 124, 125	ltsrecd 27953	. . . . . . . . . . . . . . 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 27895	. . . . . . . . . . . . 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 3043	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Ons ∧ 𝑦 ∈ No ) ∧ ( bday ‘𝑦) ∈ ( bday ‘𝐴)) → 𝑦 ≤s ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅))
131		lenlts 27874	. . . . . . . . . . . 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 5108	. . . . . . . . . . . 12 ⊢ (𝑧 = ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) → (𝑧 <s 𝐴 ↔ ((( L ‘𝑦) ∪ ( R ‘𝑦)) |s ∅) <s 𝐴))
135		breq1 5108	. . . . . . . . . . . . 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 3584	. . . . . . . . . 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 6384	. . . . . . . . . 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 4564	. . . . 5 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ 𝒫 No )
151		nulsgts 27927	. . . . 5 ⊢ ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ∈ 𝒫 No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅)
152	150, 151	syl 18	. . . 4 ⊢ (𝐴 ∈ Ons → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} <<s ∅)
153		eqcuts2 27937	. . . 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 1359	. 2 ⊢ (𝐴 ∈ Ons → ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅) = 𝐴)
156	155	eqcomd 2771	1 ⊢ (𝐴 ∈ Ons → 𝐴 = ({𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} |s ∅))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   ∧ w3a 1101   = wceq 1563  ∃wex 1802   ∈ wcel 2145   ≠ wne 2960  ∀wral 3079  ∃wrex 3089  {crab 3417  Vcvv 3457   ∪ cun 3905   ⊆ wss 3907  ∅c0 4288  𝒫 cpw 4558  {csn 4585   class class class wbr 5105  dom cdm 5652   “ cima 5655  Oncon0 6350  Fun wfun 6519  ‘cfv 6525  (class class class)co 7400   No csur 27762   <s clts 27763   bday cbday 27764   ≤s cles 27866   <<s cslts 27908   |s ccuts 27910   O cold 27974   L cleft 27976   R cright 27977  On_scons 28402

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5232  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4869  df-int 4909  df-iun 4954  df-br 5106  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5547  df-eprel 5552  df-po 5560  df-so 5561  df-fr 5605  df-we 5607  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-pred 6292  df-ord 6353  df-on 6354  df-suc 6356  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-2nd 7975  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-1o 8441  df-2o 8442  df-no 27765  df-lts 27766  df-bday 27767  df-les 27867  df-slts 27909  df-cuts 27911  df-made 27978  df-old 27979  df-new 27980  df-left 27981  df-right 27982  df-ons 28403

This theorem is referenced by:  bdayons  28427  onsfi  28507  n0cutlt  28510