Step | Hyp | Ref
| Expression |
1 | | reccn2.t |
. . 3
โข ๐ = (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) ยท ((absโ๐ด) / 2)) |
2 | | 1rp 12974 |
. . . . 5
โข 1 โ
โ+ |
3 | | simpl 483 |
. . . . . . . 8
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ ๐ด โ (โ โ
{0})) |
4 | | eldifsn 4789 |
. . . . . . . 8
โข (๐ด โ (โ โ {0})
โ (๐ด โ โ
โง ๐ด โ
0)) |
5 | 3, 4 | sylib 217 |
. . . . . . 7
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ (๐ด โ โ โง ๐ด โ 0)) |
6 | | absrpcl 15231 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ด โ 0) โ (absโ๐ด) โ
โ+) |
7 | 5, 6 | syl 17 |
. . . . . 6
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ (absโ๐ด) โ
โ+) |
8 | | rpmulcl 12993 |
. . . . . 6
โข
(((absโ๐ด)
โ โ+ โง ๐ต โ โ+) โ
((absโ๐ด) ยท
๐ต) โ
โ+) |
9 | 7, 8 | sylancom 588 |
. . . . 5
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ ((absโ๐ด) ยท ๐ต) โ
โ+) |
10 | | ifcl 4572 |
. . . . 5
โข ((1
โ โ+ โง ((absโ๐ด) ยท ๐ต) โ โ+) โ if(1
โค ((absโ๐ด)
ยท ๐ต), 1,
((absโ๐ด) ยท
๐ต)) โ
โ+) |
11 | 2, 9, 10 | sylancr 587 |
. . . 4
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โ
โ+) |
12 | 7 | rphalfcld 13024 |
. . . 4
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ ((absโ๐ด) / 2) โ
โ+) |
13 | 11, 12 | rpmulcld 13028 |
. . 3
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) ยท ((absโ๐ด) / 2)) โ
โ+) |
14 | 1, 13 | eqeltrid 2837 |
. 2
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ ๐ โ
โ+) |
15 | 5 | adantr 481 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ด โ โ โง ๐ด โ 0)) |
16 | 15 | simpld 495 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ด โ โ) |
17 | | simprl 769 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ง โ (โ โ
{0})) |
18 | | eldifsn 4789 |
. . . . . . . . . . 11
โข (๐ง โ (โ โ {0})
โ (๐ง โ โ
โง ๐ง โ
0)) |
19 | 17, 18 | sylib 217 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ง โ โ โง ๐ง โ 0)) |
20 | 19 | simpld 495 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ง โ โ) |
21 | 16, 20 | mulcld 11230 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ด ยท ๐ง) โ โ) |
22 | | mulne0 11852 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ด โ 0) โง (๐ง โ โ โง ๐ง โ 0)) โ (๐ด ยท ๐ง) โ 0) |
23 | 15, 19, 22 | syl2anc 584 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ด ยท ๐ง) โ 0) |
24 | 16, 20, 21, 23 | divsubdird 12025 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ด โ ๐ง) / (๐ด ยท ๐ง)) = ((๐ด / (๐ด ยท ๐ง)) โ (๐ง / (๐ด ยท ๐ง)))) |
25 | 16 | mulridd 11227 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ด ยท 1) = ๐ด) |
26 | 25 | oveq1d 7420 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ด ยท 1) / (๐ด ยท ๐ง)) = (๐ด / (๐ด ยท ๐ง))) |
27 | | 1cnd 11205 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ 1 โ โ) |
28 | | divcan5 11912 |
. . . . . . . . . . 11
โข ((1
โ โ โง (๐ง
โ โ โง ๐ง โ
0) โง (๐ด โ โ
โง ๐ด โ 0)) โ
((๐ด ยท 1) / (๐ด ยท ๐ง)) = (1 / ๐ง)) |
29 | 27, 19, 15, 28 | syl3anc 1371 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ด ยท 1) / (๐ด ยท ๐ง)) = (1 / ๐ง)) |
30 | 26, 29 | eqtr3d 2774 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ด / (๐ด ยท ๐ง)) = (1 / ๐ง)) |
31 | 20 | mulridd 11227 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ง ยท 1) = ๐ง) |
32 | 20, 16 | mulcomd 11231 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ง ยท ๐ด) = (๐ด ยท ๐ง)) |
33 | 31, 32 | oveq12d 7423 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ง ยท 1) / (๐ง ยท ๐ด)) = (๐ง / (๐ด ยท ๐ง))) |
34 | | divcan5 11912 |
. . . . . . . . . . 11
โข ((1
โ โ โง (๐ด
โ โ โง ๐ด โ
0) โง (๐ง โ โ
โง ๐ง โ 0)) โ
((๐ง ยท 1) / (๐ง ยท ๐ด)) = (1 / ๐ด)) |
35 | 27, 15, 19, 34 | syl3anc 1371 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ง ยท 1) / (๐ง ยท ๐ด)) = (1 / ๐ด)) |
36 | 33, 35 | eqtr3d 2774 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ง / (๐ด ยท ๐ง)) = (1 / ๐ด)) |
37 | 30, 36 | oveq12d 7423 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ด / (๐ด ยท ๐ง)) โ (๐ง / (๐ด ยท ๐ง))) = ((1 / ๐ง) โ (1 / ๐ด))) |
38 | 24, 37 | eqtrd 2772 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((๐ด โ ๐ง) / (๐ด ยท ๐ง)) = ((1 / ๐ง) โ (1 / ๐ด))) |
39 | 38 | fveq2d 6892 |
. . . . . 6
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ((๐ด โ ๐ง) / (๐ด ยท ๐ง))) = (absโ((1 / ๐ง) โ (1 / ๐ด)))) |
40 | 16, 20 | subcld 11567 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ด โ ๐ง) โ โ) |
41 | 40, 21, 23 | absdivd 15398 |
. . . . . 6
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ((๐ด โ ๐ง) / (๐ด ยท ๐ง))) = ((absโ(๐ด โ ๐ง)) / (absโ(๐ด ยท ๐ง)))) |
42 | 39, 41 | eqtr3d 2774 |
. . . . 5
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ((1 / ๐ง) โ (1 / ๐ด))) = ((absโ(๐ด โ ๐ง)) / (absโ(๐ด ยท ๐ง)))) |
43 | 16, 20 | abssubd 15396 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด โ ๐ง)) = (absโ(๐ง โ ๐ด))) |
44 | 20, 16 | subcld 11567 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (๐ง โ ๐ด) โ โ) |
45 | 44 | abscld 15379 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ง โ ๐ด)) โ โ) |
46 | 43, 45 | eqeltrd 2833 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด โ ๐ง)) โ โ) |
47 | 14 | adantr 481 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ โ
โ+) |
48 | 47 | rpred 13012 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ โ โ) |
49 | 21 | abscld 15379 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด ยท ๐ง)) โ โ) |
50 | | rpre 12978 |
. . . . . . . . 9
โข (๐ต โ โ+
โ ๐ต โ
โ) |
51 | 50 | ad2antlr 725 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ต โ โ) |
52 | 49, 51 | remulcld 11240 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ(๐ด ยท ๐ง)) ยท ๐ต) โ โ) |
53 | | simprr 771 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ง โ ๐ด)) < ๐) |
54 | 43, 53 | eqbrtrd 5169 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด โ ๐ง)) < ๐) |
55 | 9 | adantr 481 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) ยท ๐ต) โ
โ+) |
56 | 55 | rpred 13012 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) ยท ๐ต) โ โ) |
57 | 12 | adantr 481 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) / 2) โ
โ+) |
58 | 57 | rpred 13012 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) / 2) โ โ) |
59 | 56, 58 | remulcld 11240 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) ยท ๐ต) ยท ((absโ๐ด) / 2)) โ โ) |
60 | | 1re 11210 |
. . . . . . . . . . 11
โข 1 โ
โ |
61 | | min2 13165 |
. . . . . . . . . . 11
โข ((1
โ โ โง ((absโ๐ด) ยท ๐ต) โ โ) โ if(1 โค
((absโ๐ด) ยท
๐ต), 1, ((absโ๐ด) ยท ๐ต)) โค ((absโ๐ด) ยท ๐ต)) |
62 | 60, 56, 61 | sylancr 587 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โค ((absโ๐ด) ยท ๐ต)) |
63 | 11 | adantr 481 |
. . . . . . . . . . . 12
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โ
โ+) |
64 | 63 | rpred 13012 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โ โ) |
65 | 64, 56, 57 | lemul1d 13055 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โค ((absโ๐ด) ยท ๐ต) โ (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) ยท ((absโ๐ด) / 2)) โค (((absโ๐ด) ยท ๐ต) ยท ((absโ๐ด) / 2)))) |
66 | 62, 65 | mpbid 231 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) ยท ((absโ๐ด) / 2)) โค (((absโ๐ด) ยท ๐ต) ยท ((absโ๐ด) / 2))) |
67 | 1, 66 | eqbrtrid 5182 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ โค (((absโ๐ด) ยท ๐ต) ยท ((absโ๐ด) / 2))) |
68 | 20 | abscld 15379 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ๐ง) โ โ) |
69 | 16 | abscld 15379 |
. . . . . . . . . . . . . 14
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ๐ด) โ โ) |
70 | 69 | recnd 11238 |
. . . . . . . . . . . . 13
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ๐ด) โ โ) |
71 | 70 | 2halvesd 12454 |
. . . . . . . . . . . 12
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) / 2) + ((absโ๐ด) / 2)) = (absโ๐ด)) |
72 | 69, 68 | resubcld 11638 |
. . . . . . . . . . . . . 14
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) โ (absโ๐ง)) โ โ) |
73 | 16, 20 | abs2difd 15400 |
. . . . . . . . . . . . . 14
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) โ (absโ๐ง)) โค (absโ(๐ด โ ๐ง))) |
74 | | min1 13164 |
. . . . . . . . . . . . . . . . . . 19
โข ((1
โ โ โง ((absโ๐ด) ยท ๐ต) โ โ) โ if(1 โค
((absโ๐ด) ยท
๐ต), 1, ((absโ๐ด) ยท ๐ต)) โค 1) |
75 | 60, 56, 74 | sylancr 587 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โค 1) |
76 | | 1red 11211 |
. . . . . . . . . . . . . . . . . . 19
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ 1 โ โ) |
77 | 64, 76, 57 | lemul1d 13055 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) โค 1 โ (if(1 โค
((absโ๐ด) ยท
๐ต), 1, ((absโ๐ด) ยท ๐ต)) ยท ((absโ๐ด) / 2)) โค (1 ยท ((absโ๐ด) / 2)))) |
78 | 75, 77 | mpbid 231 |
. . . . . . . . . . . . . . . . 17
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (if(1 โค ((absโ๐ด) ยท ๐ต), 1, ((absโ๐ด) ยท ๐ต)) ยท ((absโ๐ด) / 2)) โค (1 ยท ((absโ๐ด) / 2))) |
79 | 1, 78 | eqbrtrid 5182 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ โค (1 ยท ((absโ๐ด) / 2))) |
80 | 58 | recnd 11238 |
. . . . . . . . . . . . . . . . 17
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) / 2) โ โ) |
81 | 80 | mullidd 11228 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (1 ยท ((absโ๐ด) / 2)) = ((absโ๐ด) / 2)) |
82 | 79, 81 | breqtrd 5173 |
. . . . . . . . . . . . . . 15
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ โค ((absโ๐ด) / 2)) |
83 | 46, 48, 58, 54, 82 | ltletrd 11370 |
. . . . . . . . . . . . . 14
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด โ ๐ง)) < ((absโ๐ด) / 2)) |
84 | 72, 46, 58, 73, 83 | lelttrd 11368 |
. . . . . . . . . . . . 13
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) โ (absโ๐ง)) < ((absโ๐ด) / 2)) |
85 | 69, 68, 58 | ltsubadd2d 11808 |
. . . . . . . . . . . . 13
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) โ (absโ๐ง)) < ((absโ๐ด) / 2) โ (absโ๐ด) < ((absโ๐ง) + ((absโ๐ด) / 2)))) |
86 | 84, 85 | mpbid 231 |
. . . . . . . . . . . 12
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ๐ด) < ((absโ๐ง) + ((absโ๐ด) / 2))) |
87 | 71, 86 | eqbrtrd 5169 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) / 2) + ((absโ๐ด) / 2)) < ((absโ๐ง) + ((absโ๐ด) / 2))) |
88 | 58, 68, 58 | ltadd1d 11803 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) / 2) < (absโ๐ง) โ (((absโ๐ด) / 2) + ((absโ๐ด) / 2)) < ((absโ๐ง) + ((absโ๐ด) / 2)))) |
89 | 87, 88 | mpbird 256 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ๐ด) / 2) < (absโ๐ง)) |
90 | 58, 68, 55, 89 | ltmul2dd 13068 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) ยท ๐ต) ยท ((absโ๐ด) / 2)) < (((absโ๐ด) ยท ๐ต) ยท (absโ๐ง))) |
91 | 16, 20 | absmuld 15397 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด ยท ๐ง)) = ((absโ๐ด) ยท (absโ๐ง))) |
92 | 91 | oveq1d 7420 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ(๐ด ยท ๐ง)) ยท ๐ต) = (((absโ๐ด) ยท (absโ๐ง)) ยท ๐ต)) |
93 | 68 | recnd 11238 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ๐ง) โ โ) |
94 | 51 | recnd 11238 |
. . . . . . . . . . 11
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ต โ โ) |
95 | 70, 93, 94 | mul32d 11420 |
. . . . . . . . . 10
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) ยท (absโ๐ง)) ยท ๐ต) = (((absโ๐ด) ยท ๐ต) ยท (absโ๐ง))) |
96 | 92, 95 | eqtrd 2772 |
. . . . . . . . 9
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ(๐ด ยท ๐ง)) ยท ๐ต) = (((absโ๐ด) ยท ๐ต) ยท (absโ๐ง))) |
97 | 90, 96 | breqtrrd 5175 |
. . . . . . . 8
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ๐ด) ยท ๐ต) ยท ((absโ๐ด) / 2)) < ((absโ(๐ด ยท ๐ง)) ยท ๐ต)) |
98 | 48, 59, 52, 67, 97 | lelttrd 11368 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ๐ < ((absโ(๐ด ยท ๐ง)) ยท ๐ต)) |
99 | 46, 48, 52, 54, 98 | lttrd 11371 |
. . . . . 6
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด โ ๐ง)) < ((absโ(๐ด ยท ๐ง)) ยท ๐ต)) |
100 | 21, 23 | absrpcld 15391 |
. . . . . . 7
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ(๐ด ยท ๐ง)) โ
โ+) |
101 | 46, 51, 100 | ltdivmuld 13063 |
. . . . . 6
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (((absโ(๐ด โ ๐ง)) / (absโ(๐ด ยท ๐ง))) < ๐ต โ (absโ(๐ด โ ๐ง)) < ((absโ(๐ด ยท ๐ง)) ยท ๐ต))) |
102 | 99, 101 | mpbird 256 |
. . . . 5
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ ((absโ(๐ด โ ๐ง)) / (absโ(๐ด ยท ๐ง))) < ๐ต) |
103 | 42, 102 | eqbrtrd 5169 |
. . . 4
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง (๐ง โ (โ โ {0}) โง
(absโ(๐ง โ ๐ด)) < ๐)) โ (absโ((1 / ๐ง) โ (1 / ๐ด))) < ๐ต) |
104 | 103 | expr 457 |
. . 3
โข (((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โง ๐ง โ (โ โ {0})) โ
((absโ(๐ง โ
๐ด)) < ๐ โ (absโ((1 / ๐ง) โ (1 / ๐ด))) < ๐ต)) |
105 | 104 | ralrimiva 3146 |
. 2
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ โ๐ง โ (โ โ
{0})((absโ(๐ง โ
๐ด)) < ๐ โ (absโ((1 / ๐ง) โ (1 / ๐ด))) < ๐ต)) |
106 | | breq2 5151 |
. . 3
โข (๐ฆ = ๐ โ ((absโ(๐ง โ ๐ด)) < ๐ฆ โ (absโ(๐ง โ ๐ด)) < ๐)) |
107 | 106 | rspceaimv 3616 |
. 2
โข ((๐ โ โ+
โง โ๐ง โ
(โ โ {0})((absโ(๐ง โ ๐ด)) < ๐ โ (absโ((1 / ๐ง) โ (1 / ๐ด))) < ๐ต)) โ โ๐ฆ โ โ+ โ๐ง โ (โ โ
{0})((absโ(๐ง โ
๐ด)) < ๐ฆ โ (absโ((1 / ๐ง) โ (1 / ๐ด))) < ๐ต)) |
108 | 14, 105, 107 | syl2anc 584 |
1
โข ((๐ด โ (โ โ {0})
โง ๐ต โ
โ+) โ โ๐ฆ โ โ+ โ๐ง โ (โ โ
{0})((absโ(๐ง โ
๐ด)) < ๐ฆ โ (absโ((1 / ๐ง) โ (1 / ๐ด))) < ๐ต)) |