Step | Hyp | Ref
| Expression |
1 | | knoppcnlem8.t |
. . . . 5
β’ π = (π₯ β β β¦
(absβ((ββ(π₯ + (1 / 2))) β π₯))) |
2 | | knoppcnlem8.f |
. . . . 5
β’ πΉ = (π¦ β β β¦ (π β β0 β¦ ((πΆβπ) Β· (πβ(((2 Β· π)βπ) Β· π¦))))) |
3 | | knoppcnlem8.n |
. . . . . 6
β’ (π β π β β) |
4 | 3 | adantr 482 |
. . . . 5
β’ ((π β§ π β β0) β π β
β) |
5 | | knoppcnlem8.1 |
. . . . . 6
β’ (π β πΆ β β) |
6 | 5 | adantr 482 |
. . . . 5
β’ ((π β§ π β β0) β πΆ β
β) |
7 | | simpr 486 |
. . . . 5
β’ ((π β§ π β β0) β π β
β0) |
8 | 1, 2, 4, 6, 7 | knoppcnlem7 35364 |
. . . 4
β’ ((π β§ π β β0) β (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ))))βπ) = (π€ β β β¦ (seq0( + , (πΉβπ€))βπ))) |
9 | | simplr 768 |
. . . . . . . 8
β’ (((π β§ π β β0) β§ π€ β β) β π β
β0) |
10 | | nn0uz 12861 |
. . . . . . . 8
β’
β0 = (β€β₯β0) |
11 | 9, 10 | eleqtrdi 2844 |
. . . . . . 7
β’ (((π β§ π β β0) β§ π€ β β) β π β
(β€β₯β0)) |
12 | 4 | ad2antrr 725 |
. . . . . . . . 9
β’ ((((π β§ π β β0) β§ π€ β β) β§ π β (0...π)) β π β β) |
13 | 6 | ad2antrr 725 |
. . . . . . . . 9
β’ ((((π β§ π β β0) β§ π€ β β) β§ π β (0...π)) β πΆ β β) |
14 | | simplr 768 |
. . . . . . . . 9
β’ ((((π β§ π β β0) β§ π€ β β) β§ π β (0...π)) β π€ β β) |
15 | | elfznn0 13591 |
. . . . . . . . . 10
β’ (π β (0...π) β π β β0) |
16 | 15 | adantl 483 |
. . . . . . . . 9
β’ ((((π β§ π β β0) β§ π€ β β) β§ π β (0...π)) β π β β0) |
17 | 1, 2, 12, 13, 14, 16 | knoppcnlem3 35360 |
. . . . . . . 8
β’ ((((π β§ π β β0) β§ π€ β β) β§ π β (0...π)) β ((πΉβπ€)βπ) β β) |
18 | 17 | recnd 11239 |
. . . . . . 7
β’ ((((π β§ π β β0) β§ π€ β β) β§ π β (0...π)) β ((πΉβπ€)βπ) β β) |
19 | | addcl 11189 |
. . . . . . . 8
β’ ((π β β β§ π β β) β (π + π) β β) |
20 | 19 | adantl 483 |
. . . . . . 7
β’ ((((π β§ π β β0) β§ π€ β β) β§ (π β β β§ π β β)) β (π + π) β β) |
21 | 11, 18, 20 | seqcl 13985 |
. . . . . 6
β’ (((π β§ π β β0) β§ π€ β β) β (seq0( +
, (πΉβπ€))βπ) β β) |
22 | 21 | fmpttd 7112 |
. . . . 5
β’ ((π β§ π β β0) β (π€ β β β¦ (seq0( +
, (πΉβπ€))βπ)):ββΆβ) |
23 | | cnex 11188 |
. . . . . . 7
β’ β
β V |
24 | | reex 11198 |
. . . . . . 7
β’ β
β V |
25 | 23, 24 | pm3.2i 472 |
. . . . . 6
β’ (β
β V β§ β β V) |
26 | | elmapg 8830 |
. . . . . 6
β’ ((β
β V β§ β β V) β ((π€ β β β¦ (seq0( + , (πΉβπ€))βπ)) β (β βm
β) β (π€ β
β β¦ (seq0( + , (πΉβπ€))βπ)):ββΆβ)) |
27 | 25, 26 | ax-mp 5 |
. . . . 5
β’ ((π€ β β β¦ (seq0( +
, (πΉβπ€))βπ)) β (β βm
β) β (π€ β
β β¦ (seq0( + , (πΉβπ€))βπ)):ββΆβ) |
28 | 22, 27 | sylibr 233 |
. . . 4
β’ ((π β§ π β β0) β (π€ β β β¦ (seq0( +
, (πΉβπ€))βπ)) β (β βm
β)) |
29 | 8, 28 | eqeltrd 2834 |
. . 3
β’ ((π β§ π β β0) β (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ))))βπ) β (β βm
β)) |
30 | 29 | fmpttd 7112 |
. 2
β’ (π β (π β β0 β¦ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ))))βπ)):β0βΆ(β
βm β)) |
31 | | 0z 12566 |
. . . . . 6
β’ 0 β
β€ |
32 | | seqfn 13975 |
. . . . . 6
β’ (0 β
β€ β seq0( βf + , (π β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) Fn
(β€β₯β0)) |
33 | 31, 32 | ax-mp 5 |
. . . . 5
β’ seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) Fn
(β€β₯β0) |
34 | 10 | fneq2i 6645 |
. . . . 5
β’ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) Fn β0 β seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) Fn
(β€β₯β0)) |
35 | 33, 34 | mpbir 230 |
. . . 4
β’ seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) Fn β0 |
36 | | dffn5 6948 |
. . . 4
β’ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) Fn β0 β seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) = (π β β0 β¦ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ))))βπ))) |
37 | 35, 36 | mpbi 229 |
. . 3
β’ seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))) = (π β β0 β¦ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ))))βπ)) |
38 | 37 | feq1i 6706 |
. 2
β’ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))):β0βΆ(β
βm β) β (π β β0 β¦ (seq0(
βf + , (π
β β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ))))βπ)):β0βΆ(β
βm β)) |
39 | 30, 38 | sylibr 233 |
1
β’ (π β seq0( βf
+ , (π β
β0 β¦ (π§ β β β¦ ((πΉβπ§)βπ)))):β0βΆ(β
βm β)) |