Metamath Proof Explorer


Theorem 0reno

Description: Surreal zero is a surreal real. (Contributed by Scott Fenton, 15-Apr-2025)

Ref Expression
Assertion 0reno 0 s s

Proof

Step Hyp Ref Expression
1 0sno 0 s No
2 1nns 1 s s
3 0slt1s 0 s < s 1 s
4 1sno 1 s No
5 sltneg 0 s No 1 s No 0 s < s 1 s + s 1 s < s + s 0 s
6 1 4 5 mp2an 0 s < s 1 s + s 1 s < s + s 0 s
7 3 6 mpbi + s 1 s < s + s 0 s
8 negs0s + s 0 s = 0 s
9 7 8 breqtri + s 1 s < s 0 s
10 9 3 pm3.2i + s 1 s < s 0 s 0 s < s 1 s
11 fveq2 n = 1 s + s n = + s 1 s
12 11 breq1d n = 1 s + s n < s 0 s + s 1 s < s 0 s
13 breq2 n = 1 s 0 s < s n 0 s < s 1 s
14 12 13 anbi12d n = 1 s + s n < s 0 s 0 s < s n + s 1 s < s 0 s 0 s < s 1 s
15 14 rspcev 1 s s + s 1 s < s 0 s 0 s < s 1 s n s + s n < s 0 s 0 s < s n
16 2 10 15 mp2an n s + s n < s 0 s 0 s < s n
17 4 a1i n s 1 s No
18 nnsno n s n No
19 nnne0s n s n 0 s
20 17 18 19 divscld n s 1 s / su n No
21 20 negsval2d n s + s 1 s / su n = 0 s - s 1 s / su n
22 21 eqeq2d n s x = + s 1 s / su n x = 0 s - s 1 s / su n
23 22 bicomd n s x = 0 s - s 1 s / su n x = + s 1 s / su n
24 23 rexbiia n s x = 0 s - s 1 s / su n n s x = + s 1 s / su n
25 24 abbii x | n s x = 0 s - s 1 s / su n = x | n s x = + s 1 s / su n
26 addslid 1 s / su n No 0 s + s 1 s / su n = 1 s / su n
27 20 26 syl n s 0 s + s 1 s / su n = 1 s / su n
28 27 eqeq2d n s x = 0 s + s 1 s / su n x = 1 s / su n
29 28 rexbiia n s x = 0 s + s 1 s / su n n s x = 1 s / su n
30 29 abbii x | n s x = 0 s + s 1 s / su n = x | n s x = 1 s / su n
31 25 30 oveq12i x | n s x = 0 s - s 1 s / su n | s x | n s x = 0 s + s 1 s / su n = x | n s x = + s 1 s / su n | s x | n s x = 1 s / su n
32 nnsex s V
33 32 abrexex x | n s x = + s 1 s / su n V
34 33 a1i x | n s x = + s 1 s / su n V
35 snex 0 s V
36 35 a1i 0 s V
37 20 negscld n s + s 1 s / su n No
38 eleq1 x = + s 1 s / su n x No + s 1 s / su n No
39 37 38 syl5ibrcom n s x = + s 1 s / su n x No
40 39 rexlimiv n s x = + s 1 s / su n x No
41 40 a1i n s x = + s 1 s / su n x No
42 41 abssdv x | n s x = + s 1 s / su n No
43 1 a1i 0 s No
44 43 snssd 0 s No
45 vex z V
46 eqeq1 x = z x = + s 1 s / su n z = + s 1 s / su n
47 46 rexbidv x = z n s x = + s 1 s / su n n s z = + s 1 s / su n
48 45 47 elab z x | n s x = + s 1 s / su n n s z = + s 1 s / su n
49 velsn y 0 s y = 0 s
50 48 49 anbi12i z x | n s x = + s 1 s / su n y 0 s n s z = + s 1 s / su n y = 0 s
51 r19.41v n s z = + s 1 s / su n y = 0 s n s z = + s 1 s / su n y = 0 s
52 50 51 bitr4i z x | n s x = + s 1 s / su n y 0 s n s z = + s 1 s / su n y = 0 s
53 muls02 n No 0 s s n = 0 s
54 18 53 syl n s 0 s s n = 0 s
55 54 3 eqbrtrdi n s 0 s s n < s 1 s
56 1 a1i n s 0 s No
57 nnsgt0 n s 0 s < s n
58 56 17 18 57 sltmuldivd n s 0 s s n < s 1 s 0 s < s 1 s / su n
59 55 58 mpbid n s 0 s < s 1 s / su n
60 20 slt0neg2d n s 0 s < s 1 s / su n + s 1 s / su n < s 0 s
61 59 60 mpbid n s + s 1 s / su n < s 0 s
62 breq12 z = + s 1 s / su n y = 0 s z < s y + s 1 s / su n < s 0 s
63 61 62 syl5ibrcom n s z = + s 1 s / su n y = 0 s z < s y
64 63 rexlimiv n s z = + s 1 s / su n y = 0 s z < s y
65 52 64 sylbi z x | n s x = + s 1 s / su n y 0 s z < s y
66 65 3adant1 z x | n s x = + s 1 s / su n y 0 s z < s y
67 34 36 42 44 66 ssltd x | n s x = + s 1 s / su n s 0 s
68 32 abrexex x | n s x = 1 s / su n V
69 68 a1i x | n s x = 1 s / su n V
70 eleq1 x = 1 s / su n x No 1 s / su n No
71 20 70 syl5ibrcom n s x = 1 s / su n x No
72 71 rexlimiv n s x = 1 s / su n x No
73 72 a1i n s x = 1 s / su n x No
74 73 abssdv x | n s x = 1 s / su n No
75 eqeq1 x = z x = 1 s / su n z = 1 s / su n
76 75 rexbidv x = z n s x = 1 s / su n n s z = 1 s / su n
77 45 76 elab z x | n s x = 1 s / su n n s z = 1 s / su n
78 49 77 anbi12i y 0 s z x | n s x = 1 s / su n y = 0 s n s z = 1 s / su n
79 r19.42v n s y = 0 s z = 1 s / su n y = 0 s n s z = 1 s / su n
80 78 79 bitr4i y 0 s z x | n s x = 1 s / su n n s y = 0 s z = 1 s / su n
81 breq12 y = 0 s z = 1 s / su n y < s z 0 s < s 1 s / su n
82 59 81 syl5ibrcom n s y = 0 s z = 1 s / su n y < s z
83 82 rexlimiv n s y = 0 s z = 1 s / su n y < s z
84 83 a1i n s y = 0 s z = 1 s / su n y < s z
85 80 84 biimtrid y 0 s z x | n s x = 1 s / su n y < s z
86 85 3impib y 0 s z x | n s x = 1 s / su n y < s z
87 36 69 44 74 86 ssltd 0 s s x | n s x = 1 s / su n
88 67 87 cuteq0 x | n s x = + s 1 s / su n | s x | n s x = 1 s / su n = 0 s
89 88 mptru x | n s x = + s 1 s / su n | s x | n s x = 1 s / su n = 0 s
90 31 89 eqtr2i 0 s = x | n s x = 0 s - s 1 s / su n | s x | n s x = 0 s + s 1 s / su n
91 16 90 pm3.2i n s + s n < s 0 s 0 s < s n 0 s = x | n s x = 0 s - s 1 s / su n | s x | n s x = 0 s + s 1 s / su n
92 elreno 0 s s 0 s No n s + s n < s 0 s 0 s < s n 0 s = x | n s x = 0 s - s 1 s / su n | s x | n s x = 0 s + s 1 s / su n
93 1 91 92 mpbir2an 0 s s