Metamath Proof Explorer


Theorem bdayfinbnd

Description: Given a non-negative integer and a non-negative surreal of lesser or equal birthday, show that the surreal can be expressed as a dyadic fraction with an upper bound on the integer and exponent. This proof follows the proof from Mizar at https://mizar.uwb.edu.pl/version/current/html/surrealn.html . (Contributed by Scott Fenton, 26-Feb-2026)

Ref Expression
Hypotheses bdayfinbnd.1 ⊢ φ → N ∈ ℕ 0s
bdayfinbnd.2 ⊢ φ → Z ∈ No
bdayfinbnd.3 ⊢ φ → bday ⁡ Z ⊆ bday ⁡ N
bdayfinbnd.4 ⊢ φ → 0 s ≤ s Z
Assertion bdayfinbnd Could not format assertion : No typesetting found for |- ( ph -> ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y

Proof

Step Hyp Ref Expression
1 bdayfinbnd.1 ⊢ φ → N ∈ ℕ 0s
2 bdayfinbnd.2 ⊢ φ → Z ∈ No
3 bdayfinbnd.3 ⊢ φ → bday ⁡ Z ⊆ bday ⁡ N
4 bdayfinbnd.4 ⊢ φ → 0 s ≤ s Z
5 fveq2 ⊢ z = Z → bday ⁡ z = bday ⁡ Z
6 5 sseq1d ⊢ z = Z → bday ⁡ z ⊆ bday ⁡ N ↔ bday ⁡ Z ⊆ bday ⁡ N
7 breq2 ⊢ z = Z → 0 s ≤ s z ↔ 0 s ≤ s Z
8 6 7 anbi12d ⊢ z = Z → bday ⁡ z ⊆ bday ⁡ N ∧ 0 s ≤ s z ↔ bday ⁡ Z ⊆ bday ⁡ N ∧ 0 s ≤ s Z
9 eqeq1 ⊢ z = Z → z = N ↔ Z = N
10 eqeq1 Could not format ( z = Z -> ( z = ( x +s ( y /su ( 2s ^su p ) ) ) <-> Z = ( x +s ( y /su ( 2s ^su p ) ) ) ) ) : No typesetting found for |- ( z = Z -> ( z = ( x +s ( y /su ( 2s ^su p ) ) ) <-> Z = ( x +s ( y /su ( 2s ^su p ) ) ) ) ) with typecode |-
11 10 3anbi1d Could not format ( z = Z -> ( ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
12 11 rexbidv Could not format ( z = Z -> ( E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
13 12 2rexbidv Could not format ( z = Z -> ( E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
14 9 13 orbi12d Could not format ( z = Z -> ( ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
15 8 14 imbi12d Could not format ( z = Z -> ( ( ( ( bday ` z ) C_ ( bday ` N ) /\ 0s <_s z ) -> ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( ( ( bday ` Z ) C_ ( bday ` N ) /\ 0s <_s Z ) -> ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( ( ( ( bday ` z ) C_ ( bday ` N ) /\ 0s <_s z ) -> ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( ( ( bday ` Z ) C_ ( bday ` N ) /\ 0s <_s Z ) -> ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
16 bdayfinbndlem2 Could not format ( N e. NN0_s -> A. z e. No ( ( ( bday ` z ) C_ ( bday ` N ) /\ 0s <_s z ) -> ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y A. z e. No ( ( ( bday ` z ) C_ ( bday ` N ) /\ 0s <_s z ) -> ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
17 1 16 syl Could not format ( ph -> A. z e. No ( ( ( bday ` z ) C_ ( bday ` N ) /\ 0s <_s z ) -> ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y A. z e. No ( ( ( bday ` z ) C_ ( bday ` N ) /\ 0s <_s z ) -> ( z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
18 15 17 2 rspcdva Could not format ( ph -> ( ( ( bday ` Z ) C_ ( bday ` N ) /\ 0s <_s Z ) -> ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( ( ( bday ` Z ) C_ ( bday ` N ) /\ 0s <_s Z ) -> ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y
19 3 4 18 mp2and Could not format ( ph -> ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y ( Z = N \/ E. x e. NN0_s E. y e. NN0_s E. p e. NN0_s ( Z = ( x +s ( y /su ( 2s ^su p ) ) ) /\ y