Step | Hyp | Ref
| Expression |
1 | | 0sno 27678 |
. 2
โข
0s โ No |
2 | | 1nns 28134 |
. . . 4
โข
1s โ โs |
3 | | 0slt1s 27681 |
. . . . . . 7
โข
0s <s 1s |
4 | | 1sno 27679 |
. . . . . . . 8
โข
1s โ No |
5 | | sltneg 27876 |
. . . . . . . 8
โข ((
0s โ No โง 1s
โ No ) โ ( 0s <s
1s โ ( -us โ 1s ) <s (
-us โ 0s ))) |
6 | 1, 4, 5 | mp2an 689 |
. . . . . . 7
โข (
0s <s 1s โ ( -us โ 1s
) <s ( -us โ 0s )) |
7 | 3, 6 | mpbi 229 |
. . . . . 6
โข (
-us โ 1s ) <s ( -us โ
0s ) |
8 | | negs0s 27858 |
. . . . . 6
โข (
-us โ 0s ) = 0s |
9 | 7, 8 | breqtri 5164 |
. . . . 5
โข (
-us โ 1s ) <s 0s |
10 | 9, 3 | pm3.2i 470 |
. . . 4
โข ((
-us โ 1s ) <s 0s โง 0s
<s 1s ) |
11 | | fveq2 6882 |
. . . . . . 7
โข (๐ = 1s โ (
-us โ๐) =
( -us โ 1s )) |
12 | 11 | breq1d 5149 |
. . . . . 6
โข (๐ = 1s โ ((
-us โ๐)
<s 0s โ ( -us โ 1s ) <s
0s )) |
13 | | breq2 5143 |
. . . . . 6
โข (๐ = 1s โ (
0s <s ๐
โ 0s <s 1s )) |
14 | 12, 13 | anbi12d 630 |
. . . . 5
โข (๐ = 1s โ (((
-us โ๐)
<s 0s โง 0s <s ๐) โ (( -us โ
1s ) <s 0s โง 0s <s 1s
))) |
15 | 14 | rspcev 3604 |
. . . 4
โข ((
1s โ โs โง (( -us โ
1s ) <s 0s โง 0s <s 1s ))
โ โ๐ โ
โs (( -us โ๐) <s 0s โง 0s
<s ๐)) |
16 | 2, 10, 15 | mp2an 689 |
. . 3
โข
โ๐ โ
โs (( -us โ๐) <s 0s โง 0s
<s ๐) |
17 | 4 | a1i 11 |
. . . . . . . . . . 11
โข (๐ โ โs
โ 1s โ No ) |
18 | | nnsno 28115 |
. . . . . . . . . . 11
โข (๐ โ โs
โ ๐ โ No ) |
19 | | nnne0s 28124 |
. . . . . . . . . . 11
โข (๐ โ โs
โ ๐ โ 0s
) |
20 | 17, 18, 19 | divscld 28041 |
. . . . . . . . . 10
โข (๐ โ โs
โ ( 1s /su ๐) โ No
) |
21 | 20 | negsval2d 27894 |
. . . . . . . . 9
โข (๐ โ โs
โ ( -us โ( 1s /su ๐)) = ( 0s
-s ( 1s /su ๐))) |
22 | 21 | eqeq2d 2735 |
. . . . . . . 8
โข (๐ โ โs
โ (๐ฅ = (
-us โ( 1s /su ๐)) โ ๐ฅ = ( 0s -s (
1s /su ๐)))) |
23 | 22 | bicomd 222 |
. . . . . . 7
โข (๐ โ โs
โ (๐ฅ = ( 0s
-s ( 1s /su ๐)) โ ๐ฅ = ( -us โ( 1s
/su ๐)))) |
24 | 23 | rexbiia 3084 |
. . . . . 6
โข
(โ๐ โ
โs ๐ฅ = (
0s -s ( 1s /su ๐)) โ โ๐ โ โs
๐ฅ = ( -us
โ( 1s /su ๐))) |
25 | 24 | abbii 2794 |
. . . . 5
โข {๐ฅ โฃ โ๐ โ โs
๐ฅ = ( 0s
-s ( 1s /su ๐))} = {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐))} |
26 | | addslid 27804 |
. . . . . . . . 9
โข ((
1s /su ๐) โ No
โ ( 0s +s ( 1s /su ๐)) = ( 1s
/su ๐)) |
27 | 20, 26 | syl 17 |
. . . . . . . 8
โข (๐ โ โs
โ ( 0s +s ( 1s /su ๐)) = ( 1s
/su ๐)) |
28 | 27 | eqeq2d 2735 |
. . . . . . 7
โข (๐ โ โs
โ (๐ฅ = ( 0s
+s ( 1s /su ๐)) โ ๐ฅ = ( 1s /su ๐))) |
29 | 28 | rexbiia 3084 |
. . . . . 6
โข
(โ๐ โ
โs ๐ฅ = (
0s +s ( 1s /su ๐)) โ โ๐ โ โs
๐ฅ = ( 1s
/su ๐)) |
30 | 29 | abbii 2794 |
. . . . 5
โข {๐ฅ โฃ โ๐ โ โs
๐ฅ = ( 0s
+s ( 1s /su ๐))} = {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)} |
31 | 25, 30 | oveq12i 7414 |
. . . 4
โข ({๐ฅ โฃ โ๐ โ โs
๐ฅ = ( 0s
-s ( 1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 0s +s
( 1s /su ๐))}) = ({๐ฅ โฃ โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)}) |
32 | | nnsex 28109 |
. . . . . . . . 9
โข
โs โ V |
33 | 32 | abrexex 7943 |
. . . . . . . 8
โข {๐ฅ โฃ โ๐ โ โs
๐ฅ = ( -us
โ( 1s /su ๐))} โ V |
34 | 33 | a1i 11 |
. . . . . . 7
โข (โค
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐))} โ V) |
35 | | snex 5422 |
. . . . . . . 8
โข {
0s } โ V |
36 | 35 | a1i 11 |
. . . . . . 7
โข (โค
โ { 0s } โ V) |
37 | 20 | negscld 27868 |
. . . . . . . . . . 11
โข (๐ โ โs
โ ( -us โ( 1s /su ๐)) โ
No ) |
38 | | eleq1 2813 |
. . . . . . . . . . 11
โข (๐ฅ = ( -us โ(
1s /su ๐)) โ (๐ฅ โ No
โ ( -us โ( 1s /su ๐)) โ
No )) |
39 | 37, 38 | syl5ibrcom 246 |
. . . . . . . . . 10
โข (๐ โ โs
โ (๐ฅ = (
-us โ( 1s /su ๐)) โ ๐ฅ โ No
)) |
40 | 39 | rexlimiv 3140 |
. . . . . . . . 9
โข
(โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐)) โ ๐ฅ โ No
) |
41 | 40 | a1i 11 |
. . . . . . . 8
โข (โค
โ (โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐)) โ ๐ฅ โ No
)) |
42 | 41 | abssdv 4058 |
. . . . . . 7
โข (โค
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐))} โ No
) |
43 | 1 | a1i 11 |
. . . . . . . 8
โข (โค
โ 0s โ No ) |
44 | 43 | snssd 4805 |
. . . . . . 7
โข (โค
โ { 0s } โ No
) |
45 | | vex 3470 |
. . . . . . . . . . . 12
โข ๐ง โ V |
46 | | eqeq1 2728 |
. . . . . . . . . . . . 13
โข (๐ฅ = ๐ง โ (๐ฅ = ( -us โ( 1s
/su ๐))
โ ๐ง = ( -us
โ( 1s /su ๐)))) |
47 | 46 | rexbidv 3170 |
. . . . . . . . . . . 12
โข (๐ฅ = ๐ง โ (โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐)) โ โ๐ โ โs ๐ง = ( -us โ(
1s /su ๐)))) |
48 | 45, 47 | elab 3661 |
. . . . . . . . . . 11
โข (๐ง โ {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐))} โ โ๐ โ โs ๐ง = ( -us โ(
1s /su ๐))) |
49 | | velsn 4637 |
. . . . . . . . . . 11
โข (๐ฆ โ { 0s } โ
๐ฆ = 0s
) |
50 | 48, 49 | anbi12i 626 |
. . . . . . . . . 10
โข ((๐ง โ {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐))} โง ๐ฆ โ { 0s }) โ
(โ๐ โ
โs ๐ง = (
-us โ( 1s /su ๐)) โง ๐ฆ = 0s )) |
51 | | r19.41v 3180 |
. . . . . . . . . 10
โข
(โ๐ โ
โs (๐ง = (
-us โ( 1s /su ๐)) โง ๐ฆ = 0s ) โ (โ๐ โ โs
๐ง = ( -us
โ( 1s /su ๐)) โง ๐ฆ = 0s )) |
52 | 50, 51 | bitr4i 278 |
. . . . . . . . 9
โข ((๐ง โ {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐))} โง ๐ฆ โ { 0s }) โ
โ๐ โ
โs (๐ง = (
-us โ( 1s /su ๐)) โง ๐ฆ = 0s )) |
53 | | muls02 27960 |
. . . . . . . . . . . . . . 15
โข (๐ โ
No โ ( 0s ยทs ๐) = 0s ) |
54 | 18, 53 | syl 17 |
. . . . . . . . . . . . . 14
โข (๐ โ โs
โ ( 0s ยทs ๐) = 0s ) |
55 | 54, 3 | eqbrtrdi 5178 |
. . . . . . . . . . . . 13
โข (๐ โ โs
โ ( 0s ยทs ๐) <s 1s ) |
56 | 1 | a1i 11 |
. . . . . . . . . . . . . 14
โข (๐ โ โs
โ 0s โ No ) |
57 | | nnsgt0 28126 |
. . . . . . . . . . . . . 14
โข (๐ โ โs
โ 0s <s ๐) |
58 | 56, 17, 18, 57 | sltmuldivd 28046 |
. . . . . . . . . . . . 13
โข (๐ โ โs
โ (( 0s ยทs ๐) <s 1s โ 0s
<s ( 1s /su ๐))) |
59 | 55, 58 | mpbid 231 |
. . . . . . . . . . . 12
โข (๐ โ โs
โ 0s <s ( 1s /su ๐)) |
60 | 20 | slt0neg2d 27882 |
. . . . . . . . . . . 12
โข (๐ โ โs
โ ( 0s <s ( 1s /su ๐) โ ( -us
โ( 1s /su ๐)) <s 0s )) |
61 | 59, 60 | mpbid 231 |
. . . . . . . . . . 11
โข (๐ โ โs
โ ( -us โ( 1s /su ๐)) <s 0s
) |
62 | | breq12 5144 |
. . . . . . . . . . 11
โข ((๐ง = ( -us โ(
1s /su ๐)) โง ๐ฆ = 0s ) โ (๐ง <s ๐ฆ โ ( -us โ(
1s /su ๐)) <s 0s )) |
63 | 61, 62 | syl5ibrcom 246 |
. . . . . . . . . 10
โข (๐ โ โs
โ ((๐ง = (
-us โ( 1s /su ๐)) โง ๐ฆ = 0s ) โ ๐ง <s ๐ฆ)) |
64 | 63 | rexlimiv 3140 |
. . . . . . . . 9
โข
(โ๐ โ
โs (๐ง = (
-us โ( 1s /su ๐)) โง ๐ฆ = 0s ) โ ๐ง <s ๐ฆ) |
65 | 52, 64 | sylbi 216 |
. . . . . . . 8
โข ((๐ง โ {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( -us โ(
1s /su ๐))} โง ๐ฆ โ { 0s }) โ ๐ง <s ๐ฆ) |
66 | 65 | 3adant1 1127 |
. . . . . . 7
โข
((โค โง ๐ง
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐))} โง ๐ฆ โ { 0s }) โ ๐ง <s ๐ฆ) |
67 | 34, 36, 42, 44, 66 | ssltd 27643 |
. . . . . 6
โข (โค
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐))} <<s { 0s
}) |
68 | 32 | abrexex 7943 |
. . . . . . . 8
โข {๐ฅ โฃ โ๐ โ โs
๐ฅ = ( 1s
/su ๐)}
โ V |
69 | 68 | a1i 11 |
. . . . . . 7
โข (โค
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
1s /su ๐)} โ V) |
70 | | eleq1 2813 |
. . . . . . . . . . 11
โข (๐ฅ = ( 1s
/su ๐)
โ (๐ฅ โ No โ ( 1s /su ๐) โ
No )) |
71 | 20, 70 | syl5ibrcom 246 |
. . . . . . . . . 10
โข (๐ โ โs
โ (๐ฅ = ( 1s
/su ๐)
โ ๐ฅ โ No )) |
72 | 71 | rexlimiv 3140 |
. . . . . . . . 9
โข
(โ๐ โ
โs ๐ฅ = (
1s /su ๐) โ ๐ฅ โ No
) |
73 | 72 | a1i 11 |
. . . . . . . 8
โข (โค
โ (โ๐ โ
โs ๐ฅ = (
1s /su ๐) โ ๐ฅ โ No
)) |
74 | 73 | abssdv 4058 |
. . . . . . 7
โข (โค
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
1s /su ๐)} โ No
) |
75 | | eqeq1 2728 |
. . . . . . . . . . . . 13
โข (๐ฅ = ๐ง โ (๐ฅ = ( 1s /su ๐) โ ๐ง = ( 1s /su ๐))) |
76 | 75 | rexbidv 3170 |
. . . . . . . . . . . 12
โข (๐ฅ = ๐ง โ (โ๐ โ โs ๐ฅ = ( 1s
/su ๐)
โ โ๐ โ
โs ๐ง = (
1s /su ๐))) |
77 | 45, 76 | elab 3661 |
. . . . . . . . . . 11
โข (๐ง โ {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)}
โ โ๐ โ
โs ๐ง = (
1s /su ๐)) |
78 | 49, 77 | anbi12i 626 |
. . . . . . . . . 10
โข ((๐ฆ โ { 0s } โง
๐ง โ {๐ฅ โฃ โ๐ โ โs
๐ฅ = ( 1s
/su ๐)})
โ (๐ฆ = 0s
โง โ๐ โ
โs ๐ง = (
1s /su ๐))) |
79 | | r19.42v 3182 |
. . . . . . . . . 10
โข
(โ๐ โ
โs (๐ฆ =
0s โง ๐ง = (
1s /su ๐)) โ (๐ฆ = 0s โง โ๐ โ โs
๐ง = ( 1s
/su ๐))) |
80 | 78, 79 | bitr4i 278 |
. . . . . . . . 9
โข ((๐ฆ โ { 0s } โง
๐ง โ {๐ฅ โฃ โ๐ โ โs
๐ฅ = ( 1s
/su ๐)})
โ โ๐ โ
โs (๐ฆ =
0s โง ๐ง = (
1s /su ๐))) |
81 | | breq12 5144 |
. . . . . . . . . . . 12
โข ((๐ฆ = 0s โง ๐ง = ( 1s
/su ๐))
โ (๐ฆ <s ๐ง โ 0s <s (
1s /su ๐))) |
82 | 59, 81 | syl5ibrcom 246 |
. . . . . . . . . . 11
โข (๐ โ โs
โ ((๐ฆ = 0s
โง ๐ง = ( 1s
/su ๐))
โ ๐ฆ <s ๐ง)) |
83 | 82 | rexlimiv 3140 |
. . . . . . . . . 10
โข
(โ๐ โ
โs (๐ฆ =
0s โง ๐ง = (
1s /su ๐)) โ ๐ฆ <s ๐ง) |
84 | 83 | a1i 11 |
. . . . . . . . 9
โข (โค
โ (โ๐ โ
โs (๐ฆ =
0s โง ๐ง = (
1s /su ๐)) โ ๐ฆ <s ๐ง)) |
85 | 80, 84 | biimtrid 241 |
. . . . . . . 8
โข (โค
โ ((๐ฆ โ {
0s } โง ๐ง
โ {๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
1s /su ๐)}) โ ๐ฆ <s ๐ง)) |
86 | 85 | 3impib 1113 |
. . . . . . 7
โข
((โค โง ๐ฆ
โ { 0s } โง ๐ง โ {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)})
โ ๐ฆ <s ๐ง) |
87 | 36, 69, 44, 74, 86 | ssltd 27643 |
. . . . . 6
โข (โค
โ { 0s } <<s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)}) |
88 | 67, 87 | cuteq0 27684 |
. . . . 5
โข (โค
โ ({๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
-us โ( 1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)}) =
0s ) |
89 | 88 | mptru 1540 |
. . . 4
โข ({๐ฅ โฃ โ๐ โ โs
๐ฅ = ( -us
โ( 1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 1s
/su ๐)}) =
0s |
90 | 31, 89 | eqtr2i 2753 |
. . 3
โข
0s = ({๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
0s -s ( 1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 0s +s
( 1s /su ๐))}) |
91 | 16, 90 | pm3.2i 470 |
. 2
โข
(โ๐ โ
โs (( -us โ๐) <s 0s โง 0s
<s ๐) โง
0s = ({๐ฅ โฃ
โ๐ โ
โs ๐ฅ = (
0s -s ( 1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 0s +s
( 1s /su ๐))})) |
92 | | elreno 28142 |
. 2
โข (
0s โ โs โ ( 0s โ No โง (โ๐ โ โs (( -us
โ๐) <s
0s โง 0s <s ๐) โง 0s = ({๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 0s -s
( 1s /su ๐))} |s {๐ฅ โฃ โ๐ โ โs ๐ฅ = ( 0s +s
( 1s /su ๐))})))) |
93 | 1, 91, 92 | mpbir2an 708 |
1
โข
0s โ โs |