Theorem sltsbday 28147

Description: Birthday comparison rule for surreals. (Contributed by Scott Fenton, 23-Feb-2026.)

Hypotheses

Ref	Expression
sltsbday.1	⊢ (𝜑 → 𝐴 = (𝐿 |s 𝑅))
sltsbday.2	⊢ (𝜑 → 𝐵 ∈ No )
sltsbday.3	⊢ (𝜑 → 𝐿 <<s {𝐵})
sltsbday.4	⊢ (𝜑 → {𝐵} <<s 𝑅)

Assertion

Ref	Expression
sltsbday	⊢ (𝜑 → ( bday ‘𝐴) ⊆ ( bday ‘𝐵))

Proof of Theorem sltsbday

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		sltsbday.1	. . 3 ⊢ (𝜑 → 𝐴 = (𝐿 |s 𝑅))
2	1	fveq2d 6892	. 2 ⊢ (𝜑 → ( bday ‘𝐴) = ( bday ‘(𝐿 |s 𝑅)))
3		sltsbday.3	. . . . 5 ⊢ (𝜑 → 𝐿 <<s {𝐵})
4		sltsbday.4	. . . . 5 ⊢ (𝜑 → {𝐵} <<s 𝑅)
5		sltsbday.2	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ No )
6	5	snn0d 4746	. . . . 5 ⊢ (𝜑 → {𝐵} ≠ ∅)
7		sltstr 28017	. . . . 5 ⊢ ((𝐿 <<s {𝐵} ∧ {𝐵} <<s 𝑅 ∧ {𝐵} ≠ ∅) → 𝐿 <<s 𝑅)
8	3, 4, 6, 7	syl3anc 1398	. . . 4 ⊢ (𝜑 → 𝐿 <<s 𝑅)
9		cutbday 28014	. . . 4 ⊢ (𝐿 <<s 𝑅 → ( bday ‘(𝐿 |s 𝑅)) = ∩ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}))
10	8, 9	syl 18	. . 3 ⊢ (𝜑 → ( bday ‘(𝐿 |s 𝑅)) = ∩ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}))
11		bdayfn 27978	. . . . 5 ⊢ bday Fn No
12		ssrab2 4037	. . . . 5 ⊢ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)} ⊆ No
13		sneq 4604	. . . . . . . 8 ⊢ (𝑥 = 𝐵 → {𝑥} = {𝐵})
14	13	breq2d 5126	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝐿 <<s {𝑥} ↔ 𝐿 <<s {𝐵}))
15	13	breq1d 5124	. . . . . . 7 ⊢ (𝑥 = 𝐵 → ({𝑥} <<s 𝑅 ↔ {𝐵} <<s 𝑅))
16	14, 15	anbi12d 644	. . . . . 6 ⊢ (𝑥 = 𝐵 → ((𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅) ↔ (𝐿 <<s {𝐵} ∧ {𝐵} <<s 𝑅)))
17	3, 4	jca 521	. . . . . 6 ⊢ (𝜑 → (𝐿 <<s {𝐵} ∧ {𝐵} <<s 𝑅))
18	16, 5, 17	elrabd 3655	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)})
19		fnfvima 7238	. . . . 5 ⊢ (( bday Fn No ∧ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)} ⊆ No ∧ 𝐵 ∈ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}) → ( bday ‘𝐵) ∈ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}))
20	11, 12, 18, 19	mp3an12i 1494	. . . 4 ⊢ (𝜑 → ( bday ‘𝐵) ∈ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}))
21		intss1 4933	. . . 4 ⊢ (( bday ‘𝐵) ∈ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}) → ∩ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}) ⊆ ( bday ‘𝐵))
22	20, 21	syl 18	. . 3 ⊢ (𝜑 → ∩ ( bday “ {𝑥 ∈ No ∣ (𝐿 <<s {𝑥} ∧ {𝑥} <<s 𝑅)}) ⊆ ( bday ‘𝐵))
23	10, 22	eqsstrd 3974	. 2 ⊢ (𝜑 → ( bday ‘(𝐿 |s 𝑅)) ⊆ ( bday ‘𝐵))
24	2, 23	eqsstrd 3974	1 ⊢ (𝜑 → ( bday ‘𝐴) ⊆ ( bday ‘𝐵))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2146   ≠ wne 2961  {crab 3419   ⊆ wss 3908  ∅c0 4289  {csn 4594  ∩ cint 4917   class class class wbr 5114   “ cima 5669   Fn wfn 6538  ‘cfv 6543  (class class class)co 7423   No csur 27841   bday cbday 27843   <<s cslts 27987   |s ccuts 27989

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-uni 4878  df-int 4918  df-br 5115  df-opab 5179  df-mpt 5198  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-ord 6370  df-on 6371  df-suc 6373  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7380  df-ov 7426  df-oprab 7427  df-mpo 7428  df-1o 8462  df-2o 8463  df-no 27844  df-lts 27845  df-bday 27846  df-slts 27988  df-cuts 27990

This theorem is used by:  bdayfinbndlem1  28697