Metamath Proof Explorer


Theorem bdayfin

Description: A surreal has a finite birthday iff it is a dyadic fraction. (Contributed by Scott Fenton, 26-Feb-2026)

Ref Expression
Assertion bdayfin Could not format assertion : No typesetting found for |- ( A e. No -> ( A e. ZZ_s[1/2] <-> ( bday ` A ) e. _om ) ) with typecode |-

Proof

Step Hyp Ref Expression
1 z12bday Could not format ( A e. ZZ_s[1/2] -> ( bday ` A ) e. _om ) : No typesetting found for |- ( A e. ZZ_s[1/2] -> ( bday ` A ) e. _om ) with typecode |-
2 bdayfinlem Could not format ( ( A e. No /\ 0s <_s A /\ ( bday ` A ) e. _om ) -> A e. ZZ_s[1/2] ) : No typesetting found for |- ( ( A e. No /\ 0s <_s A /\ ( bday ` A ) e. _om ) -> A e. ZZ_s[1/2] ) with typecode |-
3 2 3exp Could not format ( A e. No -> ( 0s <_s A -> ( ( bday ` A ) e. _om -> A e. ZZ_s[1/2] ) ) ) : No typesetting found for |- ( A e. No -> ( 0s <_s A -> ( ( bday ` A ) e. _om -> A e. ZZ_s[1/2] ) ) ) with typecode |-
4 negscl ⊢ A ∈ No → + s ⁡ A ∈ No
5 bdayfinlem Could not format ( ( ( -us ` A ) e. No /\ 0s <_s ( -us ` A ) /\ ( bday ` ( -us ` A ) ) e. _om ) -> ( -us ` A ) e. ZZ_s[1/2] ) : No typesetting found for |- ( ( ( -us ` A ) e. No /\ 0s <_s ( -us ` A ) /\ ( bday ` ( -us ` A ) ) e. _om ) -> ( -us ` A ) e. ZZ_s[1/2] ) with typecode |-
6 5 3expib Could not format ( ( -us ` A ) e. No -> ( ( 0s <_s ( -us ` A ) /\ ( bday ` ( -us ` A ) ) e. _om ) -> ( -us ` A ) e. ZZ_s[1/2] ) ) : No typesetting found for |- ( ( -us ` A ) e. No -> ( ( 0s <_s ( -us ` A ) /\ ( bday ` ( -us ` A ) ) e. _om ) -> ( -us ` A ) e. ZZ_s[1/2] ) ) with typecode |-
7 4 6 syl Could not format ( A e. No -> ( ( 0s <_s ( -us ` A ) /\ ( bday ` ( -us ` A ) ) e. _om ) -> ( -us ` A ) e. ZZ_s[1/2] ) ) : No typesetting found for |- ( A e. No -> ( ( 0s <_s ( -us ` A ) /\ ( bday ` ( -us ` A ) ) e. _om ) -> ( -us ` A ) e. ZZ_s[1/2] ) ) with typecode |-
8 0no ⊢ 0 s ∈ No
9 lenegs ⊢ A ∈ No ∧ 0 s ∈ No → A ≤ s 0 s ↔ + s ⁡ 0 s ≤ s + s ⁡ A
10 8 9 mpan2 ⊢ A ∈ No → A ≤ s 0 s ↔ + s ⁡ 0 s ≤ s + s ⁡ A
11 neg0s ⊢ + s ⁡ 0 s = 0 s
12 11 breq1i ⊢ + s ⁡ 0 s ≤ s + s ⁡ A ↔ 0 s ≤ s + s ⁡ A
13 10 12 bitrdi ⊢ A ∈ No → A ≤ s 0 s ↔ 0 s ≤ s + s ⁡ A
14 negbday ⊢ A ∈ No → bday ⁡ + s ⁡ A = bday ⁡ A
15 14 eqcomd ⊢ A ∈ No → bday ⁡ A = bday ⁡ + s ⁡ A
16 15 eleq1d ⊢ A ∈ No → bday ⁡ A ∈ ω ↔ bday ⁡ + s ⁡ A ∈ ω
17 13 16 anbi12d ⊢ A ∈ No → A ≤ s 0 s ∧ bday ⁡ A ∈ ω ↔ 0 s ≤ s + s ⁡ A ∧ bday ⁡ + s ⁡ A ∈ ω
18 z12negsclb Could not format ( A e. No -> ( A e. ZZ_s[1/2] <-> ( -us ` A ) e. ZZ_s[1/2] ) ) : No typesetting found for |- ( A e. No -> ( A e. ZZ_s[1/2] <-> ( -us ` A ) e. ZZ_s[1/2] ) ) with typecode |-
19 7 17 18 3imtr4d Could not format ( A e. No -> ( ( A <_s 0s /\ ( bday ` A ) e. _om ) -> A e. ZZ_s[1/2] ) ) : No typesetting found for |- ( A e. No -> ( ( A <_s 0s /\ ( bday ` A ) e. _om ) -> A e. ZZ_s[1/2] ) ) with typecode |-
20 19 expd Could not format ( A e. No -> ( A <_s 0s -> ( ( bday ` A ) e. _om -> A e. ZZ_s[1/2] ) ) ) : No typesetting found for |- ( A e. No -> ( A <_s 0s -> ( ( bday ` A ) e. _om -> A e. ZZ_s[1/2] ) ) ) with typecode |-
21 lestric ⊢ 0 s ∈ No ∧ A ∈ No → 0 s ≤ s A ∨ A ≤ s 0 s
22 8 21 mpan ⊢ A ∈ No → 0 s ≤ s A ∨ A ≤ s 0 s
23 3 20 22 mpjaod Could not format ( A e. No -> ( ( bday ` A ) e. _om -> A e. ZZ_s[1/2] ) ) : No typesetting found for |- ( A e. No -> ( ( bday ` A ) e. _om -> A e. ZZ_s[1/2] ) ) with typecode |-
24 1 23 impbid2 Could not format ( A e. No -> ( A e. ZZ_s[1/2] <-> ( bday ` A ) e. _om ) ) : No typesetting found for |- ( A e. No -> ( A e. ZZ_s[1/2] <-> ( bday ` A ) e. _om ) ) with typecode |-