Theorem ltonold 28269

Description: The class of ordinals less than any surreal is a subset of that surreal's old set. (Contributed by Scott Fenton, 22-Mar-2025.)

Assertion

Ref	Expression
ltonold	⊢ (𝐴 ∈ No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ ( O ‘( bday ‘𝐴)))

Distinct variable group:   𝑥,𝐴

Proof of Theorem ltonold

Step	Hyp	Ref	Expression
1		bdayon 27760	. . . . . . 7 ⊢ ( bday ‘𝑥) ∈ On
2	1	onordi 6438	. . . . . 6 ⊢ Ord ( bday ‘𝑥)
3		bdayon 27760	. . . . . . 7 ⊢ ( bday ‘𝐴) ∈ On
4	3	onordi 6438	. . . . . 6 ⊢ Ord ( bday ‘𝐴)
5		ordtri2or 6425	. . . . . 6 ⊢ ((Ord ( bday ‘𝑥) ∧ Ord ( bday ‘𝐴)) → (( bday ‘𝑥) ∈ ( bday ‘𝐴) ∨ ( bday ‘𝐴) ⊆ ( bday ‘𝑥)))
6	2, 4, 5	mp2an 693	. . . . 5 ⊢ (( bday ‘𝑥) ∈ ( bday ‘𝐴) ∨ ( bday ‘𝐴) ⊆ ( bday ‘𝑥))
7	6	a1i 11	. . . 4 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ 𝑥 <s 𝐴) → (( bday ‘𝑥) ∈ ( bday ‘𝐴) ∨ ( bday ‘𝐴) ⊆ ( bday ‘𝑥)))
8		madeun 27892	. . . . . . . . . 10 ⊢ ( M ‘( bday ‘𝑥)) = (( O ‘( bday ‘𝑥)) ∪ ( N ‘( bday ‘𝑥)))
9	8	eleq2i 2829	. . . . . . . . 9 ⊢ (𝐴 ∈ ( M ‘( bday ‘𝑥)) ↔ 𝐴 ∈ (( O ‘( bday ‘𝑥)) ∪ ( N ‘( bday ‘𝑥))))
10		elun 4107	. . . . . . . . 9 ⊢ (𝐴 ∈ (( O ‘( bday ‘𝑥)) ∪ ( N ‘( bday ‘𝑥))) ↔ (𝐴 ∈ ( O ‘( bday ‘𝑥)) ∨ 𝐴 ∈ ( N ‘( bday ‘𝑥))))
11	9, 10	bitri 275	. . . . . . . 8 ⊢ (𝐴 ∈ ( M ‘( bday ‘𝑥)) ↔ (𝐴 ∈ ( O ‘( bday ‘𝑥)) ∨ 𝐴 ∈ ( N ‘( bday ‘𝑥))))
12		lrold 27905	. . . . . . . . . . 11 ⊢ (( L ‘𝑥) ∪ ( R ‘𝑥)) = ( O ‘( bday ‘𝑥))
13	12	eleq2i 2829	. . . . . . . . . 10 ⊢ (𝐴 ∈ (( L ‘𝑥) ∪ ( R ‘𝑥)) ↔ 𝐴 ∈ ( O ‘( bday ‘𝑥)))
14		elons 28261	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ Ons ↔ (𝑥 ∈ No ∧ ( R ‘𝑥) = ∅))
15	14	simprbi 497	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ Ons → ( R ‘𝑥) = ∅)
16	15	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → ( R ‘𝑥) = ∅)
17	16	uneq2d 4122	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (( L ‘𝑥) ∪ ( R ‘𝑥)) = (( L ‘𝑥) ∪ ∅))
18		un0 4348	. . . . . . . . . . . . 13 ⊢ (( L ‘𝑥) ∪ ∅) = ( L ‘𝑥)
19	17, 18	eqtrdi 2788	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (( L ‘𝑥) ∪ ( R ‘𝑥)) = ( L ‘𝑥))
20	19	eleq2d 2823	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ (( L ‘𝑥) ∪ ( R ‘𝑥)) ↔ 𝐴 ∈ ( L ‘𝑥)))
21		simpll 767	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ 𝐴 ∈ ( L ‘𝑥)) → 𝐴 ∈ No )
22		onno 28263	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ Ons → 𝑥 ∈ No )
23	22	ad2antlr 728	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ 𝐴 ∈ ( L ‘𝑥)) → 𝑥 ∈ No )
24		leftlt 27861	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ( L ‘𝑥) → 𝐴 <s 𝑥)
25	24	adantl 481	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ 𝐴 ∈ ( L ‘𝑥)) → 𝐴 <s 𝑥)
26	21, 23, 25	ltlesd 27753	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ 𝐴 ∈ ( L ‘𝑥)) → 𝐴 ≤s 𝑥)
27	26	ex 412	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ ( L ‘𝑥) → 𝐴 ≤s 𝑥))
28	20, 27	sylbid 240	. . . . . . . . . 10 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ (( L ‘𝑥) ∪ ( R ‘𝑥)) → 𝐴 ≤s 𝑥))
29	13, 28	biimtrrid 243	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ ( O ‘( bday ‘𝑥)) → 𝐴 ≤s 𝑥))
30		newbday 27910	. . . . . . . . . . . 12 ⊢ ((( bday ‘𝑥) ∈ On ∧ 𝐴 ∈ No ) → (𝐴 ∈ ( N ‘( bday ‘𝑥)) ↔ ( bday ‘𝐴) = ( bday ‘𝑥)))
31	1, 30	mpan 691	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → (𝐴 ∈ ( N ‘( bday ‘𝑥)) ↔ ( bday ‘𝐴) = ( bday ‘𝑥)))
32	31	adantr 480	. . . . . . . . . 10 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ ( N ‘( bday ‘𝑥)) ↔ ( bday ‘𝐴) = ( bday ‘𝑥)))
33		leftssold 27879	. . . . . . . . . . . . 13 ⊢ ( L ‘𝐴) ⊆ ( O ‘( bday ‘𝐴))
34		fveq2 6842	. . . . . . . . . . . . . . 15 ⊢ (( bday ‘𝐴) = ( bday ‘𝑥) → ( O ‘( bday ‘𝐴)) = ( O ‘( bday ‘𝑥)))
35	34	adantl 481	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → ( O ‘( bday ‘𝐴)) = ( O ‘( bday ‘𝑥)))
36		onleft 28268	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ Ons → ( O ‘( bday ‘𝑥)) = ( L ‘𝑥))
37	36	ad2antlr 728	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → ( O ‘( bday ‘𝑥)) = ( L ‘𝑥))
38	35, 37	eqtr2d 2773	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → ( L ‘𝑥) = ( O ‘( bday ‘𝐴)))
39	33, 38	sseqtrrid 3979	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → ( L ‘𝐴) ⊆ ( L ‘𝑥))
40		leslss 27917	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ No ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → (𝐴 ≤s 𝑥 ↔ ( L ‘𝐴) ⊆ ( L ‘𝑥)))
41	22, 40	syl3an2 1165	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → (𝐴 ≤s 𝑥 ↔ ( L ‘𝐴) ⊆ ( L ‘𝑥)))
42	41	3expa 1119	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → (𝐴 ≤s 𝑥 ↔ ( L ‘𝐴) ⊆ ( L ‘𝑥)))
43	39, 42	mpbird 257	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ No ∧ 𝑥 ∈ Ons) ∧ ( bday ‘𝐴) = ( bday ‘𝑥)) → 𝐴 ≤s 𝑥)
44	43	ex 412	. . . . . . . . . 10 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (( bday ‘𝐴) = ( bday ‘𝑥) → 𝐴 ≤s 𝑥))
45	32, 44	sylbid 240	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ ( N ‘( bday ‘𝑥)) → 𝐴 ≤s 𝑥))
46	29, 45	jaod 860	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → ((𝐴 ∈ ( O ‘( bday ‘𝑥)) ∨ 𝐴 ∈ ( N ‘( bday ‘𝑥))) → 𝐴 ≤s 𝑥))
47	11, 46	biimtrid 242	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ ( M ‘( bday ‘𝑥)) → 𝐴 ≤s 𝑥))
48		madebday 27908	. . . . . . . . 9 ⊢ ((( bday ‘𝑥) ∈ On ∧ 𝐴 ∈ No ) → (𝐴 ∈ ( M ‘( bday ‘𝑥)) ↔ ( bday ‘𝐴) ⊆ ( bday ‘𝑥)))
49	1, 48	mpan 691	. . . . . . . 8 ⊢ (𝐴 ∈ No → (𝐴 ∈ ( M ‘( bday ‘𝑥)) ↔ ( bday ‘𝐴) ⊆ ( bday ‘𝑥)))
50	49	adantr 480	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ∈ ( M ‘( bday ‘𝑥)) ↔ ( bday ‘𝐴) ⊆ ( bday ‘𝑥)))
51		lenlts 27732	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ No ) → (𝐴 ≤s 𝑥 ↔ ¬ 𝑥 <s 𝐴))
52	22, 51	sylan2 594	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝐴 ≤s 𝑥 ↔ ¬ 𝑥 <s 𝐴))
53	47, 50, 52	3imtr3d 293	. . . . . 6 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (( bday ‘𝐴) ⊆ ( bday ‘𝑥) → ¬ 𝑥 <s 𝐴))
54	53	con2d 134	. . . . 5 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons) → (𝑥 <s 𝐴 → ¬ ( bday ‘𝐴) ⊆ ( bday ‘𝑥)))
55	54	3impia 1118	. . . 4 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ 𝑥 <s 𝐴) → ¬ ( bday ‘𝐴) ⊆ ( bday ‘𝑥))
56	7, 55	olcnd 878	. . 3 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ 𝑥 <s 𝐴) → ( bday ‘𝑥) ∈ ( bday ‘𝐴))
57	22	3ad2ant2 1135	. . . 4 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ 𝑥 <s 𝐴) → 𝑥 ∈ No )
58		oldbday 27909	. . . 4 ⊢ ((( bday ‘𝐴) ∈ On ∧ 𝑥 ∈ No ) → (𝑥 ∈ ( O ‘( bday ‘𝐴)) ↔ ( bday ‘𝑥) ∈ ( bday ‘𝐴)))
59	3, 57, 58	sylancr 588	. . 3 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ 𝑥 <s 𝐴) → (𝑥 ∈ ( O ‘( bday ‘𝐴)) ↔ ( bday ‘𝑥) ∈ ( bday ‘𝐴)))
60	56, 59	mpbird 257	. 2 ⊢ ((𝐴 ∈ No ∧ 𝑥 ∈ Ons ∧ 𝑥 <s 𝐴) → 𝑥 ∈ ( O ‘( bday ‘𝐴)))
61	60	rabssdv 4028	1 ⊢ (𝐴 ∈ No → {𝑥 ∈ Ons ∣ 𝑥 <s 𝐴} ⊆ ( O ‘( bday ‘𝐴)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 848   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114  {crab 3401   ∪ cun 3901   ⊆ wss 3903  ∅c0 4287   class class class wbr 5100  Ord word 6324  Oncon0 6325  ‘cfv 6500   No csur 27619   <s clts 27620   bday cbday 27621   ≤s cles 27724   M cmade 27830   O cold 27831   N cnew 27832   L cleft 27833   R cright 27834  On_scons 28259

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-1o 8407  df-2o 8408  df-no 27622  df-lts 27623  df-bday 27624  df-les 27725  df-slts 27766  df-cuts 27768  df-made 27835  df-old 27836  df-new 27837  df-left 27838  df-right 27839  df-ons 28260

This theorem is referenced by:  ltonsex  28270  onsfi  28364