Metamath Proof Explorer


Theorem knoppcnlem9

Description: Lemma for knoppcn . (Contributed by Asger C. Ipsen, 4-Apr-2021) (Revised by Asger C. Ipsen, 5-Jul-2021)

Ref Expression
Hypotheses knoppcnlem9.t T=xx+12x
knoppcnlem9.f F=yn0CnT2 Nny
knoppcnlem9.w W=wi0Fwi
knoppcnlem9.n φN
knoppcnlem9.1 φC
knoppcnlem9.2 φC<1
Assertion knoppcnlem9 φseq0f+m0zFzmuW

Proof

Step Hyp Ref Expression
1 knoppcnlem9.t T=xx+12x
2 knoppcnlem9.f F=yn0CnT2 Nny
3 knoppcnlem9.w W=wi0Fwi
4 knoppcnlem9.n φN
5 knoppcnlem9.1 φC
6 knoppcnlem9.2 φC<1
7 1 2 4 5 6 knoppcnlem6 φseq0f+m0zFzmdomu
8 seqex seq0f+m0zFzmV
9 8 eldm seq0f+m0zFzmdomufseq0f+m0zFzmuf
10 7 9 sylib φfseq0f+m0zFzmuf
11 simpr φseq0f+m0zFzmufseq0f+m0zFzmuf
12 ulmcl seq0f+m0zFzmuff:
13 12 feqmptd seq0f+m0zFzmuff=wfw
14 13 adantl φseq0f+m0zFzmuff=wfw
15 nn0uz 0=0
16 0zd φseq0f+m0zFzmufw0
17 eqidd φseq0f+m0zFzmufwi0Fwi=Fwi
18 4 ad2antrr φwi0N
19 5 ad2antrr φwi0C
20 simplr φwi0w
21 simpr φwi0i0
22 1 2 18 19 20 21 knoppcnlem3 φwi0Fwi
23 22 adantllr φseq0f+m0zFzmufwi0Fwi
24 23 recnd φseq0f+m0zFzmufwi0Fwi
25 1 2 4 5 knoppcnlem8 φseq0f+m0zFzm:0
26 25 ad2antrr φseq0f+m0zFzmufwseq0f+m0zFzm:0
27 simpr φseq0f+m0zFzmufww
28 seqex seq0+FwV
29 28 a1i φseq0f+m0zFzmufwseq0+FwV
30 4 ad2antrr φwk0N
31 5 ad2antrr φwk0C
32 simpr φwk0k0
33 1 2 30 31 32 knoppcnlem7 φwk0seq0f+m0zFzmk=vseq0+Fvk
34 33 adantllr φseq0f+m0zFzmufwk0seq0f+m0zFzmk=vseq0+Fvk
35 34 fveq1d φseq0f+m0zFzmufwk0seq0f+m0zFzmkw=vseq0+Fvkw
36 eqid vseq0+Fvk=vseq0+Fvk
37 fveq2 v=wFv=Fw
38 37 seqeq3d v=wseq0+Fv=seq0+Fw
39 38 fveq1d v=wseq0+Fvk=seq0+Fwk
40 27 adantr φseq0f+m0zFzmufwk0w
41 fvexd φseq0f+m0zFzmufwk0seq0+FwkV
42 36 39 40 41 fvmptd3 φseq0f+m0zFzmufwk0vseq0+Fvkw=seq0+Fwk
43 35 42 eqtrd φseq0f+m0zFzmufwk0seq0f+m0zFzmkw=seq0+Fwk
44 simplr φseq0f+m0zFzmufwseq0f+m0zFzmuf
45 15 16 26 27 29 43 44 ulmclm φseq0f+m0zFzmufwseq0+Fwfw
46 15 16 17 24 45 isumclim φseq0f+m0zFzmufwi0Fwi=fw
47 46 eqcomd φseq0f+m0zFzmufwfw=i0Fwi
48 47 mpteq2dva φseq0f+m0zFzmufwfw=wi0Fwi
49 3 a1i φseq0f+m0zFzmufW=wi0Fwi
50 49 eqcomd φseq0f+m0zFzmufwi0Fwi=W
51 14 48 50 3eqtrd φseq0f+m0zFzmuff=W
52 11 51 breqtrd φseq0f+m0zFzmufseq0f+m0zFzmuW
53 52 ex φseq0f+m0zFzmufseq0f+m0zFzmuW
54 53 exlimdv φfseq0f+m0zFzmufseq0f+m0zFzmuW
55 10 54 mpd φseq0f+m0zFzmuW