Step | Hyp | Ref
| Expression |
1 | | cvgrat.2 |
. . 3
โข ๐ =
(โคโฅโ๐) |
2 | | cvgrat.5 |
. . . . . . 7
โข (๐ โ ๐ โ ๐) |
3 | | cvgrat.1 |
. . . . . . 7
โข ๐ =
(โคโฅโ๐) |
4 | 2, 3 | eleqtrdi 2844 |
. . . . . 6
โข (๐ โ ๐ โ (โคโฅโ๐)) |
5 | | eluzelz 12828 |
. . . . . 6
โข (๐ โ
(โคโฅโ๐) โ ๐ โ โค) |
6 | 4, 5 | syl 17 |
. . . . 5
โข (๐ โ ๐ โ โค) |
7 | | uzid 12833 |
. . . . 5
โข (๐ โ โค โ ๐ โ
(โคโฅโ๐)) |
8 | 6, 7 | syl 17 |
. . . 4
โข (๐ โ ๐ โ (โคโฅโ๐)) |
9 | 8, 1 | eleqtrrdi 2845 |
. . 3
โข (๐ โ ๐ โ ๐) |
10 | | oveq1 7411 |
. . . . . . 7
โข (๐ = ๐ โ (๐ โ ๐) = (๐ โ ๐)) |
11 | 10 | oveq2d 7420 |
. . . . . 6
โข (๐ = ๐ โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
12 | | eqid 2733 |
. . . . . 6
โข (๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = (๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
13 | | ovex 7437 |
. . . . . 6
โข (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) โ V |
14 | 11, 12, 13 | fvmpt 6994 |
. . . . 5
โข (๐ โ ๐ โ ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
15 | 14 | adantl 483 |
. . . 4
โข ((๐ โง ๐ โ ๐) โ ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
16 | | 0re 11212 |
. . . . . . 7
โข 0 โ
โ |
17 | | cvgrat.3 |
. . . . . . 7
โข (๐ โ ๐ด โ โ) |
18 | | ifcl 4572 |
. . . . . . 7
โข ((0
โ โ โง ๐ด
โ โ) โ if(๐ด
โค 0, 0, ๐ด) โ
โ) |
19 | 16, 17, 18 | sylancr 588 |
. . . . . 6
โข (๐ โ if(๐ด โค 0, 0, ๐ด) โ โ) |
20 | 19 | adantr 482 |
. . . . 5
โข ((๐ โง ๐ โ ๐) โ if(๐ด โค 0, 0, ๐ด) โ โ) |
21 | | simpr 486 |
. . . . . . 7
โข ((๐ โง ๐ โ ๐) โ ๐ โ ๐) |
22 | 21, 1 | eleqtrdi 2844 |
. . . . . 6
โข ((๐ โง ๐ โ ๐) โ ๐ โ (โคโฅโ๐)) |
23 | | uznn0sub 12857 |
. . . . . 6
โข (๐ โ
(โคโฅโ๐) โ (๐ โ ๐) โ
โ0) |
24 | 22, 23 | syl 17 |
. . . . 5
โข ((๐ โง ๐ โ ๐) โ (๐ โ ๐) โ
โ0) |
25 | 20, 24 | reexpcld 14124 |
. . . 4
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) โ โ) |
26 | 15, 25 | eqeltrd 2834 |
. . 3
โข ((๐ โง ๐ โ ๐) โ ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐) โ โ) |
27 | | uzss 12841 |
. . . . . . 7
โข (๐ โ
(โคโฅโ๐) โ (โคโฅโ๐) โ
(โคโฅโ๐)) |
28 | 4, 27 | syl 17 |
. . . . . 6
โข (๐ โ
(โคโฅโ๐) โ
(โคโฅโ๐)) |
29 | 28, 1, 3 | 3sstr4g 4026 |
. . . . 5
โข (๐ โ ๐ โ ๐) |
30 | 29 | sselda 3981 |
. . . 4
โข ((๐ โง ๐ โ ๐) โ ๐ โ ๐) |
31 | | cvgrat.6 |
. . . 4
โข ((๐ โง ๐ โ ๐) โ (๐นโ๐) โ โ) |
32 | 30, 31 | syldan 592 |
. . 3
โข ((๐ โง ๐ โ ๐) โ (๐นโ๐) โ โ) |
33 | 23 | adantl 483 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ (๐ โ ๐) โ
โ0) |
34 | | oveq2 7412 |
. . . . . . . . 9
โข (๐ = (๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด)โ๐) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
35 | | eqid 2733 |
. . . . . . . . 9
โข (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐)) = (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)) |
36 | 34, 35, 13 | fvmpt 6994 |
. . . . . . . 8
โข ((๐ โ ๐) โ โ0 โ ((๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))โ(๐ โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
37 | 33, 36 | syl 17 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))โ(๐ โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
38 | 6 | zcnd 12663 |
. . . . . . . 8
โข (๐ โ ๐ โ โ) |
39 | | eluzelz 12828 |
. . . . . . . . 9
โข (๐ โ
(โคโฅโ๐) โ ๐ โ โค) |
40 | 39 | zcnd 12663 |
. . . . . . . 8
โข (๐ โ
(โคโฅโ๐) โ ๐ โ โ) |
41 | | nn0ex 12474 |
. . . . . . . . . 10
โข
โ0 โ V |
42 | 41 | mptex 7220 |
. . . . . . . . 9
โข (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐)) โ V |
43 | 42 | shftval 15017 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ (((๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐)) shift ๐)โ๐) = ((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))โ(๐ โ ๐))) |
44 | 38, 40, 43 | syl2an 597 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ (((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)) shift ๐)โ๐) = ((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))โ(๐ โ ๐))) |
45 | | simpr 486 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ๐ โ (โคโฅโ๐)) |
46 | 45, 1 | eleqtrrdi 2845 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ๐ โ ๐) |
47 | 46, 14 | syl 17 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
48 | 37, 44, 47 | 3eqtr4rd 2784 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐) = (((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)) shift ๐)โ๐)) |
49 | 6, 48 | seqfeq 13989 |
. . . . 5
โข (๐ โ seq๐( + , (๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) = seq๐( + , ((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)) shift ๐))) |
50 | 42 | seqshft 15028 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โค) โ seq๐( + , ((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)) shift ๐)) = (seq(๐ โ ๐)( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐)) |
51 | 6, 6, 50 | syl2anc 585 |
. . . . 5
โข (๐ โ seq๐( + , ((๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)) shift ๐)) = (seq(๐ โ ๐)( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐)) |
52 | 38 | subidd 11555 |
. . . . . . 7
โข (๐ โ (๐ โ ๐) = 0) |
53 | 52 | seqeq1d 13968 |
. . . . . 6
โข (๐ โ seq(๐ โ ๐)( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) = seq0( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐)))) |
54 | 53 | oveq1d 7419 |
. . . . 5
โข (๐ โ (seq(๐ โ ๐)( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐) = (seq0( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐)) |
55 | 49, 51, 54 | 3eqtrd 2777 |
. . . 4
โข (๐ โ seq๐( + , (๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) = (seq0( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐)) |
56 | 19 | recnd 11238 |
. . . . . . 7
โข (๐ โ if(๐ด โค 0, 0, ๐ด) โ โ) |
57 | | max2 13162 |
. . . . . . . . . 10
โข ((๐ด โ โ โง 0 โ
โ) โ 0 โค if(๐ด
โค 0, 0, ๐ด)) |
58 | 17, 16, 57 | sylancl 587 |
. . . . . . . . 9
โข (๐ โ 0 โค if(๐ด โค 0, 0, ๐ด)) |
59 | 19, 58 | absidd 15365 |
. . . . . . . 8
โข (๐ โ (absโif(๐ด โค 0, 0, ๐ด)) = if(๐ด โค 0, 0, ๐ด)) |
60 | | 0lt1 11732 |
. . . . . . . . 9
โข 0 <
1 |
61 | | cvgrat.4 |
. . . . . . . . 9
โข (๐ โ ๐ด < 1) |
62 | | breq1 5150 |
. . . . . . . . . 10
โข (0 =
if(๐ด โค 0, 0, ๐ด) โ (0 < 1 โ
if(๐ด โค 0, 0, ๐ด) < 1)) |
63 | | breq1 5150 |
. . . . . . . . . 10
โข (๐ด = if(๐ด โค 0, 0, ๐ด) โ (๐ด < 1 โ if(๐ด โค 0, 0, ๐ด) < 1)) |
64 | 62, 63 | ifboth 4566 |
. . . . . . . . 9
โข ((0 <
1 โง ๐ด < 1) โ
if(๐ด โค 0, 0, ๐ด) < 1) |
65 | 60, 61, 64 | sylancr 588 |
. . . . . . . 8
โข (๐ โ if(๐ด โค 0, 0, ๐ด) < 1) |
66 | 59, 65 | eqbrtrd 5169 |
. . . . . . 7
โข (๐ โ (absโif(๐ด โค 0, 0, ๐ด)) < 1) |
67 | | oveq2 7412 |
. . . . . . . . 9
โข (๐ = ๐ โ (if(๐ด โค 0, 0, ๐ด)โ๐) = (if(๐ด โค 0, 0, ๐ด)โ๐)) |
68 | | ovex 7437 |
. . . . . . . . 9
โข (if(๐ด โค 0, 0, ๐ด)โ๐) โ V |
69 | 67, 35, 68 | fvmpt 6994 |
. . . . . . . 8
โข (๐ โ โ0
โ ((๐ โ
โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))โ๐) = (if(๐ด โค 0, 0, ๐ด)โ๐)) |
70 | 69 | adantl 483 |
. . . . . . 7
โข ((๐ โง ๐ โ โ0) โ ((๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))โ๐) = (if(๐ด โค 0, 0, ๐ด)โ๐)) |
71 | 56, 66, 70 | geolim 15812 |
. . . . . 6
โข (๐ โ seq0( + , (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด)))) |
72 | | seqex 13964 |
. . . . . . 7
โข seq0( + ,
(๐ โ
โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) โ V |
73 | | climshft 15516 |
. . . . . . 7
โข ((๐ โ โค โง seq0( + ,
(๐ โ
โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) โ V) โ ((seq0( + , (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))) shift ๐) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด))) โ seq0( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด))))) |
74 | 6, 72, 73 | sylancl 587 |
. . . . . 6
โข (๐ โ ((seq0( + , (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))) shift ๐) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด))) โ seq0( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด))))) |
75 | 71, 74 | mpbird 257 |
. . . . 5
โข (๐ โ (seq0( + , (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))) shift ๐) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด)))) |
76 | | ovex 7437 |
. . . . . 6
โข (seq0( +
, (๐ โ
โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐) โ V |
77 | | ovex 7437 |
. . . . . 6
โข (1 / (1
โ if(๐ด โค 0, 0,
๐ด))) โ
V |
78 | 76, 77 | breldm 5906 |
. . . . 5
โข ((seq0( +
, (๐ โ
โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐) โ (1 / (1 โ if(๐ด โค 0, 0, ๐ด))) โ (seq0( + , (๐ โ โ0 โฆ (if(๐ด โค 0, 0, ๐ด)โ๐))) shift ๐) โ dom โ ) |
79 | 75, 78 | syl 17 |
. . . 4
โข (๐ โ (seq0( + , (๐ โ โ0
โฆ (if(๐ด โค 0, 0,
๐ด)โ๐))) shift ๐) โ dom โ ) |
80 | 55, 79 | eqeltrd 2834 |
. . 3
โข (๐ โ seq๐( + , (๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ dom โ ) |
81 | | fveq2 6888 |
. . . . . 6
โข (๐ = ๐ โ (๐นโ๐) = (๐นโ๐)) |
82 | 81 | eleq1d 2819 |
. . . . 5
โข (๐ = ๐ โ ((๐นโ๐) โ โ โ (๐นโ๐) โ โ)) |
83 | 31 | ralrimiva 3147 |
. . . . 5
โข (๐ โ โ๐ โ ๐ (๐นโ๐) โ โ) |
84 | 82, 83, 2 | rspcdva 3613 |
. . . 4
โข (๐ โ (๐นโ๐) โ โ) |
85 | 84 | abscld 15379 |
. . 3
โข (๐ โ (absโ(๐นโ๐)) โ โ) |
86 | | 2fveq3 6893 |
. . . . . . . 8
โข (๐ = ๐ โ (absโ(๐นโ๐)) = (absโ(๐นโ๐))) |
87 | | oveq1 7411 |
. . . . . . . . . 10
โข (๐ = ๐ โ (๐ โ ๐) = (๐ โ ๐)) |
88 | 87 | oveq2d 7420 |
. . . . . . . . 9
โข (๐ = ๐ โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) |
89 | 88 | oveq2d 7420 |
. . . . . . . 8
โข (๐ = ๐ โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) |
90 | 86, 89 | breq12d 5160 |
. . . . . . 7
โข (๐ = ๐ โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))))) |
91 | 90 | imbi2d 341 |
. . . . . 6
โข (๐ = ๐ โ ((๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ (๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))))) |
92 | | 2fveq3 6893 |
. . . . . . . 8
โข (๐ = ๐ โ (absโ(๐นโ๐)) = (absโ(๐นโ๐))) |
93 | 11 | oveq2d 7420 |
. . . . . . . 8
โข (๐ = ๐ โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) |
94 | 92, 93 | breq12d 5160 |
. . . . . . 7
โข (๐ = ๐ โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))))) |
95 | 94 | imbi2d 341 |
. . . . . 6
โข (๐ = ๐ โ ((๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ (๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))))) |
96 | | 2fveq3 6893 |
. . . . . . . 8
โข (๐ = (๐ + 1) โ (absโ(๐นโ๐)) = (absโ(๐นโ(๐ + 1)))) |
97 | | oveq1 7411 |
. . . . . . . . . 10
โข (๐ = (๐ + 1) โ (๐ โ ๐) = ((๐ + 1) โ ๐)) |
98 | 97 | oveq2d 7420 |
. . . . . . . . 9
โข (๐ = (๐ + 1) โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))) |
99 | 98 | oveq2d 7420 |
. . . . . . . 8
โข (๐ = (๐ + 1) โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))) |
100 | 96, 99 | breq12d 5160 |
. . . . . . 7
โข (๐ = (๐ + 1) โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
101 | 100 | imbi2d 341 |
. . . . . 6
โข (๐ = (๐ + 1) โ ((๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ (๐ โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))))) |
102 | 85 | leidd 11776 |
. . . . . . 7
โข (๐ โ (absโ(๐นโ๐)) โค (absโ(๐นโ๐))) |
103 | 52 | oveq2d 7420 |
. . . . . . . . . 10
โข (๐ โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ0)) |
104 | 56 | exp0d 14101 |
. . . . . . . . . 10
โข (๐ โ (if(๐ด โค 0, 0, ๐ด)โ0) = 1) |
105 | 103, 104 | eqtrd 2773 |
. . . . . . . . 9
โข (๐ โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) = 1) |
106 | 105 | oveq2d 7420 |
. . . . . . . 8
โข (๐ โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = ((absโ(๐นโ๐)) ยท 1)) |
107 | 85 | recnd 11238 |
. . . . . . . . 9
โข (๐ โ (absโ(๐นโ๐)) โ โ) |
108 | 107 | mulridd 11227 |
. . . . . . . 8
โข (๐ โ ((absโ(๐นโ๐)) ยท 1) = (absโ(๐นโ๐))) |
109 | 106, 108 | eqtrd 2773 |
. . . . . . 7
โข (๐ โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = (absโ(๐นโ๐))) |
110 | 102, 109 | breqtrrd 5175 |
. . . . . 6
โข (๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) |
111 | 32 | abscld 15379 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (absโ(๐นโ๐)) โ โ) |
112 | 85 | adantr 482 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ (absโ(๐นโ๐)) โ โ) |
113 | 112, 25 | remulcld 11240 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ โ) |
114 | 58 | adantr 482 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ 0 โค if(๐ด โค 0, 0, ๐ด)) |
115 | | lemul2a 12065 |
. . . . . . . . . . . . 13
โข
((((absโ(๐นโ๐)) โ โ โง ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ โ โง (if(๐ด โค 0, 0, ๐ด) โ โ โง 0 โค if(๐ด โค 0, 0, ๐ด))) โง (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค (if(๐ด โค 0, 0, ๐ด) ยท ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))))) |
116 | 115 | ex 414 |
. . . . . . . . . . . 12
โข
(((absโ(๐นโ๐)) โ โ โง ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ โ โง (if(๐ด โค 0, 0, ๐ด) โ โ โง 0 โค if(๐ด โค 0, 0, ๐ด))) โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค (if(๐ด โค 0, 0, ๐ด) ยท ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))))) |
117 | 111, 113,
20, 114, 116 | syl112anc 1375 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ ๐) โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค (if(๐ด โค 0, 0, ๐ด) ยท ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))))) |
118 | 56 | adantr 482 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ if(๐ด โค 0, 0, ๐ด) โ โ) |
119 | 107 | adantr 482 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ (absโ(๐นโ๐)) โ โ) |
120 | 25 | recnd 11238 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) โ โ) |
121 | 118, 119,
120 | mul12d 11419 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด) ยท ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))))) |
122 | 118, 24 | expp1d 14108 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด)โ((๐ โ ๐) + 1)) = ((if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) ยท if(๐ด โค 0, 0, ๐ด))) |
123 | 40, 1 | eleq2s 2852 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ ๐ โ ๐ โ โ) |
124 | | ax-1cn 11164 |
. . . . . . . . . . . . . . . . . 18
โข 1 โ
โ |
125 | | addsub 11467 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โ โ โง 1 โ
โ โง ๐ โ
โ) โ ((๐ + 1)
โ ๐) = ((๐ โ ๐) + 1)) |
126 | 124, 125 | mp3an2 1450 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ + 1) โ ๐) = ((๐ โ ๐) + 1)) |
127 | 123, 38, 126 | syl2anr 598 |
. . . . . . . . . . . . . . . 16
โข ((๐ โง ๐ โ ๐) โ ((๐ + 1) โ ๐) = ((๐ โ ๐) + 1)) |
128 | 127 | oveq2d 7420 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)) = (if(๐ด โค 0, 0, ๐ด)โ((๐ โ ๐) + 1))) |
129 | 118, 120 | mulcomd 11231 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = ((if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)) ยท if(๐ด โค 0, 0, ๐ด))) |
130 | 122, 128,
129 | 3eqtr4rd 2784 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) = (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))) |
131 | 130 | oveq2d 7420 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))) |
132 | 121, 131 | eqtrd 2773 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด) ยท ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))) |
133 | 132 | breq2d 5159 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ ๐) โ ((if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค (if(๐ด โค 0, 0, ๐ด) ยท ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
134 | 117, 133 | sylibd 238 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ ๐) โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
135 | | fveq2 6888 |
. . . . . . . . . . . . . . 15
โข (๐ = (๐ + 1) โ (๐นโ๐) = (๐นโ(๐ + 1))) |
136 | 135 | eleq1d 2819 |
. . . . . . . . . . . . . 14
โข (๐ = (๐ + 1) โ ((๐นโ๐) โ โ โ (๐นโ(๐ + 1)) โ โ)) |
137 | | fveq2 6888 |
. . . . . . . . . . . . . . . . . 18
โข (๐ = ๐ โ (๐นโ๐) = (๐นโ๐)) |
138 | 137 | eleq1d 2819 |
. . . . . . . . . . . . . . . . 17
โข (๐ = ๐ โ ((๐นโ๐) โ โ โ (๐นโ๐) โ โ)) |
139 | 138 | cbvralvw 3235 |
. . . . . . . . . . . . . . . 16
โข
(โ๐ โ
๐ (๐นโ๐) โ โ โ โ๐ โ ๐ (๐นโ๐) โ โ) |
140 | 83, 139 | sylib 217 |
. . . . . . . . . . . . . . 15
โข (๐ โ โ๐ โ ๐ (๐นโ๐) โ โ) |
141 | 140 | adantr 482 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ โ๐ โ ๐ (๐นโ๐) โ โ) |
142 | 1 | peano2uzs 12882 |
. . . . . . . . . . . . . . 15
โข (๐ โ ๐ โ (๐ + 1) โ ๐) |
143 | 29 | sselda 3981 |
. . . . . . . . . . . . . . 15
โข ((๐ โง (๐ + 1) โ ๐) โ (๐ + 1) โ ๐) |
144 | 142, 143 | sylan2 594 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ (๐ + 1) โ ๐) |
145 | 136, 141,
144 | rspcdva 3613 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ (๐นโ(๐ + 1)) โ โ) |
146 | 145 | abscld 15379 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (absโ(๐นโ(๐ + 1))) โ โ) |
147 | 17 | adantr 482 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ ๐ด โ โ) |
148 | 147, 111 | remulcld 11240 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (๐ด ยท (absโ(๐นโ๐))) โ โ) |
149 | 20, 111 | remulcld 11240 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โ โ) |
150 | | cvgrat.7 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (absโ(๐นโ(๐ + 1))) โค (๐ด ยท (absโ(๐นโ๐)))) |
151 | 32 | absge0d 15387 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ 0 โค (absโ(๐นโ๐))) |
152 | | max1 13160 |
. . . . . . . . . . . . . . 15
โข ((๐ด โ โ โง 0 โ
โ) โ ๐ด โค
if(๐ด โค 0, 0, ๐ด)) |
153 | 17, 16, 152 | sylancl 587 |
. . . . . . . . . . . . . 14
โข (๐ โ ๐ด โค if(๐ด โค 0, 0, ๐ด)) |
154 | 153 | adantr 482 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ ๐ด โค if(๐ด โค 0, 0, ๐ด)) |
155 | 147, 20, 111, 151, 154 | lemul1ad 12149 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ (๐ด ยท (absโ(๐นโ๐))) โค (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐)))) |
156 | 146, 148,
149, 150, 155 | letrd 11367 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ ๐) โ (absโ(๐นโ(๐ + 1))) โค (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐)))) |
157 | | peano2uz 12881 |
. . . . . . . . . . . . . . . 16
โข (๐ โ
(โคโฅโ๐) โ (๐ + 1) โ
(โคโฅโ๐)) |
158 | 22, 157 | syl 17 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ ๐) โ (๐ + 1) โ
(โคโฅโ๐)) |
159 | | uznn0sub 12857 |
. . . . . . . . . . . . . . 15
โข ((๐ + 1) โ
(โคโฅโ๐) โ ((๐ + 1) โ ๐) โ
โ0) |
160 | 158, 159 | syl 17 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ ๐) โ ((๐ + 1) โ ๐) โ
โ0) |
161 | 20, 160 | reexpcld 14124 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ ๐) โ (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)) โ โ) |
162 | 112, 161 | remulcld 11240 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ ๐) โ ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))) โ โ) |
163 | | letr 11304 |
. . . . . . . . . . . 12
โข
(((absโ(๐นโ(๐ + 1))) โ โ โง (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โ โ โง ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))) โ โ) โ
(((absโ(๐นโ(๐ + 1))) โค (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โง (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
164 | 146, 149,
162, 163 | syl3anc 1372 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ ๐) โ (((absโ(๐นโ(๐ + 1))) โค (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โง (if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
165 | 156, 164 | mpand 694 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ ๐) โ ((if(๐ด โค 0, 0, ๐ด) ยท (absโ(๐นโ๐))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
166 | 134, 165 | syld 47 |
. . . . . . . . 9
โข ((๐ โง ๐ โ ๐) โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
167 | 46, 166 | syldan 592 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐))))) |
168 | 167 | expcom 415 |
. . . . . . 7
โข (๐ โ
(โคโฅโ๐) โ (๐ โ ((absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))) โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))))) |
169 | 168 | a2d 29 |
. . . . . 6
โข (๐ โ
(โคโฅโ๐) โ ((๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) โ (๐ โ (absโ(๐นโ(๐ + 1))) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ((๐ + 1) โ ๐)))))) |
170 | 91, 95, 101, 95, 110, 169 | uzind4i 12890 |
. . . . 5
โข (๐ โ
(โคโฅโ๐) โ (๐ โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐))))) |
171 | 170 | impcom 409 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) |
172 | 47 | oveq2d 7420 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ ((absโ(๐นโ๐)) ยท ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐)) = ((absโ(๐นโ๐)) ยท (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))) |
173 | 171, 172 | breqtrrd 5175 |
. . 3
โข ((๐ โง ๐ โ (โคโฅโ๐)) โ (absโ(๐นโ๐)) โค ((absโ(๐นโ๐)) ยท ((๐ โ ๐ โฆ (if(๐ด โค 0, 0, ๐ด)โ(๐ โ ๐)))โ๐))) |
174 | 1, 9, 26, 32, 80, 85, 173 | cvgcmpce 15760 |
. 2
โข (๐ โ seq๐( + , ๐น) โ dom โ ) |
175 | 3, 2, 31 | iserex 15599 |
. 2
โข (๐ โ (seq๐( + , ๐น) โ dom โ โ seq๐( + , ๐น) โ dom โ )) |
176 | 174, 175 | mpbird 257 |
1
โข (๐ โ seq๐( + , ๐น) โ dom โ ) |