Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  sumnnodd Structured version   Visualization version   GIF version

Theorem sumnnodd 44797
Description: A series indexed by β„• with only odd terms. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
sumnnodd.1 (πœ‘ β†’ 𝐹:β„•βŸΆβ„‚)
sumnnodd.even0 ((πœ‘ ∧ π‘˜ ∈ β„• ∧ (π‘˜ / 2) ∈ β„•) β†’ (πΉβ€˜π‘˜) = 0)
sumnnodd.sc (πœ‘ β†’ seq1( + , 𝐹) ⇝ 𝐡)
Assertion
Ref Expression
sumnnodd (πœ‘ β†’ (seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ 𝐡 ∧ Ξ£π‘˜ ∈ β„• (πΉβ€˜π‘˜) = Ξ£π‘˜ ∈ β„• (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))
Distinct variable groups:   π‘˜,𝐹   πœ‘,π‘˜
Allowed substitution hint:   𝐡(π‘˜)

Proof of Theorem sumnnodd
Dummy variables 𝐢 𝑗 𝑖 𝑛 π‘š π‘₯ 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfv 1909 . . 3 β„²π‘˜πœ‘
2 nfcv 2895 . . 3 β„²π‘˜seq1( + , 𝐹)
3 nfcv 2895 . . . 4 β„²π‘˜1
4 nfcv 2895 . . . 4 β„²π‘˜ +
5 nfmpt1 5246 . . . 4 β„²π‘˜(π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
63, 4, 5nfseq 13972 . . 3 β„²π‘˜seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))
7 nfmpt1 5246 . . 3 β„²π‘˜(π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))
8 nnuz 12861 . . 3 β„• = (β„€β‰₯β€˜1)
9 1zzd 12589 . . 3 (πœ‘ β†’ 1 ∈ β„€)
10 seqex 13964 . . . 4 seq1( + , 𝐹) ∈ V
1110a1i 11 . . 3 (πœ‘ β†’ seq1( + , 𝐹) ∈ V)
12 sumnnodd.1 . . . . . 6 (πœ‘ β†’ 𝐹:β„•βŸΆβ„‚)
1312ffvelcdmda 7076 . . . . 5 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (πΉβ€˜π‘˜) ∈ β„‚)
148, 9, 13serf 13992 . . . 4 (πœ‘ β†’ seq1( + , 𝐹):β„•βŸΆβ„‚)
1514ffvelcdmda 7076 . . 3 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (seq1( + , 𝐹)β€˜π‘˜) ∈ β„‚)
16 sumnnodd.sc . . 3 (πœ‘ β†’ seq1( + , 𝐹) ⇝ 𝐡)
17 1nn 12219 . . . . . . 7 1 ∈ β„•
18 oveq2 7409 . . . . . . . . 9 (π‘˜ = 1 β†’ (2 Β· π‘˜) = (2 Β· 1))
1918oveq1d 7416 . . . . . . . 8 (π‘˜ = 1 β†’ ((2 Β· π‘˜) βˆ’ 1) = ((2 Β· 1) βˆ’ 1))
20 eqid 2724 . . . . . . . 8 (π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1)) = (π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))
21 ovex 7434 . . . . . . . 8 ((2 Β· 1) βˆ’ 1) ∈ V
2219, 20, 21fvmpt 6988 . . . . . . 7 (1 ∈ β„• β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜1) = ((2 Β· 1) βˆ’ 1))
2317, 22ax-mp 5 . . . . . 6 ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜1) = ((2 Β· 1) βˆ’ 1)
24 2t1e2 12371 . . . . . . 7 (2 Β· 1) = 2
2524oveq1i 7411 . . . . . 6 ((2 Β· 1) βˆ’ 1) = (2 βˆ’ 1)
26 2m1e1 12334 . . . . . 6 (2 βˆ’ 1) = 1
2723, 25, 263eqtri 2756 . . . . 5 ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜1) = 1
2827, 17eqeltri 2821 . . . 4 ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜1) ∈ β„•
2928a1i 11 . . 3 (πœ‘ β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜1) ∈ β„•)
30 2z 12590 . . . . . . . 8 2 ∈ β„€
3130a1i 11 . . . . . . 7 (π‘˜ ∈ β„• β†’ 2 ∈ β„€)
32 nnz 12575 . . . . . . 7 (π‘˜ ∈ β„• β†’ π‘˜ ∈ β„€)
3331, 32zmulcld 12668 . . . . . 6 (π‘˜ ∈ β„• β†’ (2 Β· π‘˜) ∈ β„€)
3432peano2zd 12665 . . . . . . . 8 (π‘˜ ∈ β„• β†’ (π‘˜ + 1) ∈ β„€)
3531, 34zmulcld 12668 . . . . . . 7 (π‘˜ ∈ β„• β†’ (2 Β· (π‘˜ + 1)) ∈ β„€)
36 1zzd 12589 . . . . . . 7 (π‘˜ ∈ β„• β†’ 1 ∈ β„€)
3735, 36zsubcld 12667 . . . . . 6 (π‘˜ ∈ β„• β†’ ((2 Β· (π‘˜ + 1)) βˆ’ 1) ∈ β„€)
38 2re 12282 . . . . . . . . . 10 2 ∈ ℝ
3938a1i 11 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ 2 ∈ ℝ)
40 nnre 12215 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ π‘˜ ∈ ℝ)
4139, 40remulcld 11240 . . . . . . . 8 (π‘˜ ∈ β„• β†’ (2 Β· π‘˜) ∈ ℝ)
4241lep1d 12141 . . . . . . 7 (π‘˜ ∈ β„• β†’ (2 Β· π‘˜) ≀ ((2 Β· π‘˜) + 1))
43 2cnd 12286 . . . . . . . . . . 11 (π‘˜ ∈ β„• β†’ 2 ∈ β„‚)
44 nncn 12216 . . . . . . . . . . 11 (π‘˜ ∈ β„• β†’ π‘˜ ∈ β„‚)
45 1cnd 11205 . . . . . . . . . . 11 (π‘˜ ∈ β„• β†’ 1 ∈ β„‚)
4643, 44, 45adddid 11234 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ (2 Β· (π‘˜ + 1)) = ((2 Β· π‘˜) + (2 Β· 1)))
4724oveq2i 7412 . . . . . . . . . 10 ((2 Β· π‘˜) + (2 Β· 1)) = ((2 Β· π‘˜) + 2)
4846, 47eqtrdi 2780 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ (2 Β· (π‘˜ + 1)) = ((2 Β· π‘˜) + 2))
4948oveq1d 7416 . . . . . . . 8 (π‘˜ ∈ β„• β†’ ((2 Β· (π‘˜ + 1)) βˆ’ 1) = (((2 Β· π‘˜) + 2) βˆ’ 1))
5043, 44mulcld 11230 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ (2 Β· π‘˜) ∈ β„‚)
5150, 43, 45addsubassd 11587 . . . . . . . 8 (π‘˜ ∈ β„• β†’ (((2 Β· π‘˜) + 2) βˆ’ 1) = ((2 Β· π‘˜) + (2 βˆ’ 1)))
5226oveq2i 7412 . . . . . . . . 9 ((2 Β· π‘˜) + (2 βˆ’ 1)) = ((2 Β· π‘˜) + 1)
5352a1i 11 . . . . . . . 8 (π‘˜ ∈ β„• β†’ ((2 Β· π‘˜) + (2 βˆ’ 1)) = ((2 Β· π‘˜) + 1))
5449, 51, 533eqtrrd 2769 . . . . . . 7 (π‘˜ ∈ β„• β†’ ((2 Β· π‘˜) + 1) = ((2 Β· (π‘˜ + 1)) βˆ’ 1))
5542, 54breqtrd 5164 . . . . . 6 (π‘˜ ∈ β„• β†’ (2 Β· π‘˜) ≀ ((2 Β· (π‘˜ + 1)) βˆ’ 1))
56 eluz2 12824 . . . . . 6 (((2 Β· (π‘˜ + 1)) βˆ’ 1) ∈ (β„€β‰₯β€˜(2 Β· π‘˜)) ↔ ((2 Β· π‘˜) ∈ β„€ ∧ ((2 Β· (π‘˜ + 1)) βˆ’ 1) ∈ β„€ ∧ (2 Β· π‘˜) ≀ ((2 Β· (π‘˜ + 1)) βˆ’ 1)))
5733, 37, 55, 56syl3anbrc 1340 . . . . 5 (π‘˜ ∈ β„• β†’ ((2 Β· (π‘˜ + 1)) βˆ’ 1) ∈ (β„€β‰₯β€˜(2 Β· π‘˜)))
58 oveq2 7409 . . . . . . . 8 (π‘˜ = 𝑗 β†’ (2 Β· π‘˜) = (2 Β· 𝑗))
5958oveq1d 7416 . . . . . . 7 (π‘˜ = 𝑗 β†’ ((2 Β· π‘˜) βˆ’ 1) = ((2 Β· 𝑗) βˆ’ 1))
6059cbvmptv 5251 . . . . . 6 (π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1)) = (𝑗 ∈ β„• ↦ ((2 Β· 𝑗) βˆ’ 1))
61 oveq2 7409 . . . . . . 7 (𝑗 = (π‘˜ + 1) β†’ (2 Β· 𝑗) = (2 Β· (π‘˜ + 1)))
6261oveq1d 7416 . . . . . 6 (𝑗 = (π‘˜ + 1) β†’ ((2 Β· 𝑗) βˆ’ 1) = ((2 Β· (π‘˜ + 1)) βˆ’ 1))
63 peano2nn 12220 . . . . . 6 (π‘˜ ∈ β„• β†’ (π‘˜ + 1) ∈ β„•)
6460, 62, 63, 37fvmptd3 7011 . . . . 5 (π‘˜ ∈ β„• β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜(π‘˜ + 1)) = ((2 Β· (π‘˜ + 1)) βˆ’ 1))
6533, 36zsubcld 12667 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ β„€)
6620fvmpt2 6999 . . . . . . . . 9 ((π‘˜ ∈ β„• ∧ ((2 Β· π‘˜) βˆ’ 1) ∈ β„€) β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) = ((2 Β· π‘˜) βˆ’ 1))
6765, 66mpdan 684 . . . . . . . 8 (π‘˜ ∈ β„• β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) = ((2 Β· π‘˜) βˆ’ 1))
6867oveq1d 7416 . . . . . . 7 (π‘˜ ∈ β„• β†’ (((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) + 1) = (((2 Β· π‘˜) βˆ’ 1) + 1))
6950, 45npcand 11571 . . . . . . 7 (π‘˜ ∈ β„• β†’ (((2 Β· π‘˜) βˆ’ 1) + 1) = (2 Β· π‘˜))
7068, 69eqtrd 2764 . . . . . 6 (π‘˜ ∈ β„• β†’ (((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) + 1) = (2 Β· π‘˜))
7170fveq2d 6885 . . . . 5 (π‘˜ ∈ β„• β†’ (β„€β‰₯β€˜(((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) + 1)) = (β„€β‰₯β€˜(2 Β· π‘˜)))
7257, 64, 713eltr4d 2840 . . . 4 (π‘˜ ∈ β„• β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜(π‘˜ + 1)) ∈ (β„€β‰₯β€˜(((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) + 1)))
7372adantl 481 . . 3 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜(π‘˜ + 1)) ∈ (β„€β‰₯β€˜(((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) + 1)))
74 seqex 13964 . . . 4 seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ∈ V
7574a1i 11 . . 3 (πœ‘ β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ∈ V)
76 incom 4193 . . . . . . . . . 10 (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) = (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
77 inss2 4221 . . . . . . . . . . 11 ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}
78 ssrin 4225 . . . . . . . . . . 11 (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} β†’ (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) βŠ† ({𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})))
7977, 78ax-mp 5 . . . . . . . . . 10 (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) βŠ† ({𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
8076, 79eqsstri 4008 . . . . . . . . 9 (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) βŠ† ({𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
81 disjdif 4463 . . . . . . . . 9 ({𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) = βˆ…
8280, 81sseqtri 4010 . . . . . . . 8 (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) βŠ† βˆ…
83 ss0 4390 . . . . . . . 8 ((((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) βŠ† βˆ… β†’ (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) = βˆ…)
8482, 83mp1i 13 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∩ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) = βˆ…)
85 uncom 4145 . . . . . . . . 9 (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βˆͺ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) = (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βˆͺ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
86 inundif 4470 . . . . . . . . 9 (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βˆͺ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) = (1...((2 Β· π‘˜) βˆ’ 1))
8785, 86eqtr2i 2753 . . . . . . . 8 (1...((2 Β· π‘˜) βˆ’ 1)) = (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βˆͺ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
8887a1i 11 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (1...((2 Β· π‘˜) βˆ’ 1)) = (((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βˆͺ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})))
89 fzfid 13934 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (1...((2 Β· π‘˜) βˆ’ 1)) ∈ Fin)
9012adantr 480 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ 𝐹:β„•βŸΆβ„‚)
91 elfznn 13526 . . . . . . . . . 10 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 𝑗 ∈ β„•)
9291adantl 481 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ 𝑗 ∈ β„•)
9390, 92ffvelcdmd 7077 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ (πΉβ€˜π‘—) ∈ β„‚)
9493adantlr 712 . . . . . . 7 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ (πΉβ€˜π‘—) ∈ β„‚)
9584, 88, 89, 94fsumsplit 15683 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))(πΉβ€˜π‘—) = (Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) + Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—)))
96 simpl 482 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ πœ‘)
97 ssrab2 4069 . . . . . . . . . . . . . 14 {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} βŠ† β„•
9877sseli 3970 . . . . . . . . . . . . . 14 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})
9997, 98sselid 3972 . . . . . . . . . . . . 13 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 ∈ β„•)
10099adantl 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ 𝑗 ∈ β„•)
101 oveq1 7408 . . . . . . . . . . . . . . . 16 (π‘˜ = 𝑗 β†’ (π‘˜ / 2) = (𝑗 / 2))
102101eleq1d 2810 . . . . . . . . . . . . . . 15 (π‘˜ = 𝑗 β†’ ((π‘˜ / 2) ∈ β„• ↔ (𝑗 / 2) ∈ β„•))
103 oveq1 7408 . . . . . . . . . . . . . . . . . 18 (𝑛 = π‘˜ β†’ (𝑛 / 2) = (π‘˜ / 2))
104103eleq1d 2810 . . . . . . . . . . . . . . . . 17 (𝑛 = π‘˜ β†’ ((𝑛 / 2) ∈ β„• ↔ (π‘˜ / 2) ∈ β„•))
105104elrab 3675 . . . . . . . . . . . . . . . 16 (π‘˜ ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ↔ (π‘˜ ∈ β„• ∧ (π‘˜ / 2) ∈ β„•))
106105simprbi 496 . . . . . . . . . . . . . . 15 (π‘˜ ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} β†’ (π‘˜ / 2) ∈ β„•)
107102, 106vtoclga 3558 . . . . . . . . . . . . . 14 (𝑗 ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} β†’ (𝑗 / 2) ∈ β„•)
10898, 107syl 17 . . . . . . . . . . . . 13 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ (𝑗 / 2) ∈ β„•)
109108adantl 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (𝑗 / 2) ∈ β„•)
110 eleq1w 2808 . . . . . . . . . . . . . . 15 (π‘˜ = 𝑗 β†’ (π‘˜ ∈ β„• ↔ 𝑗 ∈ β„•))
111110, 1023anbi23d 1435 . . . . . . . . . . . . . 14 (π‘˜ = 𝑗 β†’ ((πœ‘ ∧ π‘˜ ∈ β„• ∧ (π‘˜ / 2) ∈ β„•) ↔ (πœ‘ ∧ 𝑗 ∈ β„• ∧ (𝑗 / 2) ∈ β„•)))
112 fveqeq2 6890 . . . . . . . . . . . . . 14 (π‘˜ = 𝑗 β†’ ((πΉβ€˜π‘˜) = 0 ↔ (πΉβ€˜π‘—) = 0))
113111, 112imbi12d 344 . . . . . . . . . . . . 13 (π‘˜ = 𝑗 β†’ (((πœ‘ ∧ π‘˜ ∈ β„• ∧ (π‘˜ / 2) ∈ β„•) β†’ (πΉβ€˜π‘˜) = 0) ↔ ((πœ‘ ∧ 𝑗 ∈ β„• ∧ (𝑗 / 2) ∈ β„•) β†’ (πΉβ€˜π‘—) = 0)))
114 sumnnodd.even0 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘˜ ∈ β„• ∧ (π‘˜ / 2) ∈ β„•) β†’ (πΉβ€˜π‘˜) = 0)
115113, 114chvarvv 1994 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ β„• ∧ (𝑗 / 2) ∈ β„•) β†’ (πΉβ€˜π‘—) = 0)
11696, 100, 109, 115syl3anc 1368 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (πΉβ€˜π‘—) = 0)
117116sumeq2dv 15645 . . . . . . . . . 10 (πœ‘ β†’ Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) = Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})0)
118 fzfid 13934 . . . . . . . . . . . . 13 (πœ‘ β†’ (1...((2 Β· π‘˜) βˆ’ 1)) ∈ Fin)
119 inss1 4220 . . . . . . . . . . . . . 14 ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (1...((2 Β· π‘˜) βˆ’ 1))
120119a1i 11 . . . . . . . . . . . . 13 (πœ‘ β†’ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (1...((2 Β· π‘˜) βˆ’ 1)))
121 ssfi 9168 . . . . . . . . . . . . 13 (((1...((2 Β· π‘˜) βˆ’ 1)) ∈ Fin ∧ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin)
122118, 120, 121syl2anc 583 . . . . . . . . . . . 12 (πœ‘ β†’ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin)
123122olcd 871 . . . . . . . . . . 11 (πœ‘ β†’ (((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (β„€β‰₯β€˜πΆ) ∨ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin))
124 sumz 15664 . . . . . . . . . . 11 ((((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (β„€β‰₯β€˜πΆ) ∨ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin) β†’ Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})0 = 0)
125123, 124syl 17 . . . . . . . . . 10 (πœ‘ β†’ Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})0 = 0)
126117, 125eqtrd 2764 . . . . . . . . 9 (πœ‘ β†’ Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) = 0)
127126adantr 480 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) = 0)
128127oveq2d 7417 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) + Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—)) = (Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) + 0))
129 fzfi 13933 . . . . . . . . . . . 12 (1...((2 Β· π‘˜) βˆ’ 1)) ∈ Fin
130 difss 4123 . . . . . . . . . . . 12 ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (1...((2 Β· π‘˜) βˆ’ 1))
131 ssfi 9168 . . . . . . . . . . . 12 (((1...((2 Β· π‘˜) βˆ’ 1)) ∈ Fin ∧ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) βŠ† (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin)
132129, 130, 131mp2an 689 . . . . . . . . . . 11 ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin
133132a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∈ Fin)
134130sseli 3970 . . . . . . . . . . . 12 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)))
135134, 93sylan2 592 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (πΉβ€˜π‘—) ∈ β„‚)
136135adantlr 712 . . . . . . . . . 10 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (πΉβ€˜π‘—) ∈ β„‚)
137133, 136fsumcl 15675 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) ∈ β„‚)
138137addridd 11410 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) + 0) = Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—))
139 fveq2 6881 . . . . . . . . 9 (𝑗 = 𝑖 β†’ (πΉβ€˜π‘—) = (πΉβ€˜π‘–))
140139cbvsumv 15638 . . . . . . . 8 Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) = Σ𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘–)
141138, 140eqtrdi 2780 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) + 0) = Σ𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘–))
142128, 141eqtrd 2764 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—) + Σ𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) ∩ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘—)) = Σ𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘–))
143 fveq2 6881 . . . . . . 7 (𝑖 = ((2 Β· 𝑗) βˆ’ 1) β†’ (πΉβ€˜π‘–) = (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))
144 fzfid 13934 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (1...π‘˜) ∈ Fin)
145 1zzd 12589 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 1 ∈ β„€)
14665adantr 480 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ β„€)
14730a1i 11 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ 2 ∈ β„€)
148 elfzelz 13497 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ 𝑖 ∈ β„€)
149147, 148zmulcld 12668 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...π‘˜) β†’ (2 Β· 𝑖) ∈ β„€)
150 1zzd 12589 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...π‘˜) β†’ 1 ∈ β„€)
151149, 150zsubcld 12667 . . . . . . . . . . . . . 14 (𝑖 ∈ (1...π‘˜) β†’ ((2 Β· 𝑖) βˆ’ 1) ∈ β„€)
152151adantl 481 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ ((2 Β· 𝑖) βˆ’ 1) ∈ β„€)
15325, 26eqtr2i 2753 . . . . . . . . . . . . . . 15 1 = ((2 Β· 1) βˆ’ 1)
154 1re 11210 . . . . . . . . . . . . . . . . . 18 1 ∈ ℝ
15538, 154remulcli 11226 . . . . . . . . . . . . . . . . 17 (2 Β· 1) ∈ ℝ
156155a1i 11 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ (2 Β· 1) ∈ ℝ)
157149zred 12662 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ (2 Β· 𝑖) ∈ ℝ)
158 1red 11211 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ 1 ∈ ℝ)
159148zred 12662 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ 𝑖 ∈ ℝ)
16038a1i 11 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ 2 ∈ ℝ)
161 0le2 12310 . . . . . . . . . . . . . . . . . 18 0 ≀ 2
162161a1i 11 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ 0 ≀ 2)
163 elfzle1 13500 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ 1 ≀ 𝑖)
164158, 159, 160, 162, 163lemul2ad 12150 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ (2 Β· 1) ≀ (2 Β· 𝑖))
165156, 157, 158, 164lesub1dd 11826 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...π‘˜) β†’ ((2 Β· 1) βˆ’ 1) ≀ ((2 Β· 𝑖) βˆ’ 1))
166153, 165eqbrtrid 5173 . . . . . . . . . . . . . 14 (𝑖 ∈ (1...π‘˜) β†’ 1 ≀ ((2 Β· 𝑖) βˆ’ 1))
167166adantl 481 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 1 ≀ ((2 Β· 𝑖) βˆ’ 1))
168157adantl 481 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ (2 Β· 𝑖) ∈ ℝ)
16941adantr 480 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ (2 Β· π‘˜) ∈ ℝ)
170 1red 11211 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 1 ∈ ℝ)
171159adantl 481 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 𝑖 ∈ ℝ)
17240adantr 480 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ π‘˜ ∈ ℝ)
17338a1i 11 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 2 ∈ ℝ)
174161a1i 11 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 0 ≀ 2)
175 elfzle2 13501 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ 𝑖 ≀ π‘˜)
176175adantl 481 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ 𝑖 ≀ π‘˜)
177171, 172, 173, 174, 176lemul2ad 12150 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ (2 Β· 𝑖) ≀ (2 Β· π‘˜))
178168, 169, 170, 177lesub1dd 11826 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ ((2 Β· 𝑖) βˆ’ 1) ≀ ((2 Β· π‘˜) βˆ’ 1))
179145, 146, 152, 167, 178elfzd 13488 . . . . . . . . . . . 12 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ ((2 Β· 𝑖) βˆ’ 1) ∈ (1...((2 Β· π‘˜) βˆ’ 1)))
180149zcnd 12663 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ (2 Β· 𝑖) ∈ β„‚)
181 1cnd 11205 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ 1 ∈ β„‚)
182 2cnd 12286 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ 2 ∈ β„‚)
183 2ne0 12312 . . . . . . . . . . . . . . . . . . 19 2 β‰  0
184183a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ 2 β‰  0)
185180, 181, 182, 184divsubdird 12025 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ (((2 Β· 𝑖) βˆ’ 1) / 2) = (((2 Β· 𝑖) / 2) βˆ’ (1 / 2)))
186148zcnd 12663 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...π‘˜) β†’ 𝑖 ∈ β„‚)
187186, 182, 184divcan3d 11991 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ ((2 Β· 𝑖) / 2) = 𝑖)
188187oveq1d 7416 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ (((2 Β· 𝑖) / 2) βˆ’ (1 / 2)) = (𝑖 βˆ’ (1 / 2)))
189185, 188eqtrd 2764 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ (((2 Β· 𝑖) βˆ’ 1) / 2) = (𝑖 βˆ’ (1 / 2)))
190148, 150zsubcld 12667 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ (𝑖 βˆ’ 1) ∈ β„€)
191160, 184rereccld 12037 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...π‘˜) β†’ (1 / 2) ∈ ℝ)
192 halflt1 12426 . . . . . . . . . . . . . . . . . . . 20 (1 / 2) < 1
193192a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...π‘˜) β†’ (1 / 2) < 1)
194191, 158, 159, 193ltsub2dd 11823 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ (𝑖 βˆ’ 1) < (𝑖 βˆ’ (1 / 2)))
195 2rp 12975 . . . . . . . . . . . . . . . . . . . . 21 2 ∈ ℝ+
196 rpreccl 12996 . . . . . . . . . . . . . . . . . . . . 21 (2 ∈ ℝ+ β†’ (1 / 2) ∈ ℝ+)
197195, 196mp1i 13 . . . . . . . . . . . . . . . . . . . 20 (𝑖 ∈ (1...π‘˜) β†’ (1 / 2) ∈ ℝ+)
198159, 197ltsubrpd 13044 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...π‘˜) β†’ (𝑖 βˆ’ (1 / 2)) < 𝑖)
199186, 181npcand 11571 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...π‘˜) β†’ ((𝑖 βˆ’ 1) + 1) = 𝑖)
200198, 199breqtrrd 5166 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...π‘˜) β†’ (𝑖 βˆ’ (1 / 2)) < ((𝑖 βˆ’ 1) + 1))
201 btwnnz 12634 . . . . . . . . . . . . . . . . . 18 (((𝑖 βˆ’ 1) ∈ β„€ ∧ (𝑖 βˆ’ 1) < (𝑖 βˆ’ (1 / 2)) ∧ (𝑖 βˆ’ (1 / 2)) < ((𝑖 βˆ’ 1) + 1)) β†’ Β¬ (𝑖 βˆ’ (1 / 2)) ∈ β„€)
202190, 194, 200, 201syl3anc 1368 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...π‘˜) β†’ Β¬ (𝑖 βˆ’ (1 / 2)) ∈ β„€)
203 nnz 12575 . . . . . . . . . . . . . . . . 17 ((𝑖 βˆ’ (1 / 2)) ∈ β„• β†’ (𝑖 βˆ’ (1 / 2)) ∈ β„€)
204202, 203nsyl 140 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (1...π‘˜) β†’ Β¬ (𝑖 βˆ’ (1 / 2)) ∈ β„•)
205189, 204eqneltrd 2845 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...π‘˜) β†’ Β¬ (((2 Β· 𝑖) βˆ’ 1) / 2) ∈ β„•)
206205intnand 488 . . . . . . . . . . . . . 14 (𝑖 ∈ (1...π‘˜) β†’ Β¬ (((2 Β· 𝑖) βˆ’ 1) ∈ β„• ∧ (((2 Β· 𝑖) βˆ’ 1) / 2) ∈ β„•))
207 oveq1 7408 . . . . . . . . . . . . . . . 16 (𝑛 = ((2 Β· 𝑖) βˆ’ 1) β†’ (𝑛 / 2) = (((2 Β· 𝑖) βˆ’ 1) / 2))
208207eleq1d 2810 . . . . . . . . . . . . . . 15 (𝑛 = ((2 Β· 𝑖) βˆ’ 1) β†’ ((𝑛 / 2) ∈ β„• ↔ (((2 Β· 𝑖) βˆ’ 1) / 2) ∈ β„•))
209208elrab 3675 . . . . . . . . . . . . . 14 (((2 Β· 𝑖) βˆ’ 1) ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ↔ (((2 Β· 𝑖) βˆ’ 1) ∈ β„• ∧ (((2 Β· 𝑖) βˆ’ 1) / 2) ∈ β„•))
210206, 209sylnibr 329 . . . . . . . . . . . . 13 (𝑖 ∈ (1...π‘˜) β†’ Β¬ ((2 Β· 𝑖) βˆ’ 1) ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})
211210adantl 481 . . . . . . . . . . . 12 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ Β¬ ((2 Β· 𝑖) βˆ’ 1) ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})
212179, 211eldifd 3951 . . . . . . . . . . 11 ((π‘˜ ∈ β„• ∧ 𝑖 ∈ (1...π‘˜)) β†’ ((2 Β· 𝑖) βˆ’ 1) ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
213212fmpttd 7106 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)⟢((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
214 eqidd 2725 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1...π‘˜) β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)) = (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)))
215 oveq2 7409 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = π‘₯ β†’ (2 Β· 𝑖) = (2 Β· π‘₯))
216215oveq1d 7416 . . . . . . . . . . . . . . . . . . 19 (𝑖 = π‘₯ β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· π‘₯) βˆ’ 1))
217216adantl 481 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ (1...π‘˜) ∧ 𝑖 = π‘₯) β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· π‘₯) βˆ’ 1))
218 id 22 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1...π‘˜) β†’ π‘₯ ∈ (1...π‘˜))
219 ovexd 7436 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1...π‘˜) β†’ ((2 Β· π‘₯) βˆ’ 1) ∈ V)
220214, 217, 218, 219fvmptd 6995 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (1...π‘˜) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((2 Β· π‘₯) βˆ’ 1))
221220eqcomd 2730 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1...π‘˜) β†’ ((2 Β· π‘₯) βˆ’ 1) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯))
222221ad2antrr 723 . . . . . . . . . . . . . . 15 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦)) β†’ ((2 Β· π‘₯) βˆ’ 1) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯))
223 simpr 484 . . . . . . . . . . . . . . 15 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦)) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦))
224 eqidd 2725 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (1...π‘˜) β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)) = (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)))
225 oveq2 7409 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑦 β†’ (2 Β· 𝑖) = (2 Β· 𝑦))
226225oveq1d 7416 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑦 β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1))
227226adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ (1...π‘˜) ∧ 𝑖 = 𝑦) β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1))
228 id 22 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (1...π‘˜) β†’ 𝑦 ∈ (1...π‘˜))
229 ovexd 7436 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (1...π‘˜) β†’ ((2 Β· 𝑦) βˆ’ 1) ∈ V)
230224, 227, 228, 229fvmptd 6995 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (1...π‘˜) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦) = ((2 Β· 𝑦) βˆ’ 1))
231230ad2antlr 724 . . . . . . . . . . . . . . 15 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦)) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦) = ((2 Β· 𝑦) βˆ’ 1))
232222, 223, 2313eqtrd 2768 . . . . . . . . . . . . . 14 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦)) β†’ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1))
233 2cnd 12286 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1...π‘˜) β†’ 2 ∈ β„‚)
234 elfzelz 13497 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ (1...π‘˜) β†’ π‘₯ ∈ β„€)
235234zcnd 12663 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ (1...π‘˜) β†’ π‘₯ ∈ β„‚)
236233, 235mulcld 11230 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ (1...π‘˜) β†’ (2 Β· π‘₯) ∈ β„‚)
237236ad2antrr 723 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1)) β†’ (2 Β· π‘₯) ∈ β„‚)
238 2cnd 12286 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ (1...π‘˜) β†’ 2 ∈ β„‚)
239 elfzelz 13497 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ (1...π‘˜) β†’ 𝑦 ∈ β„€)
240239zcnd 12663 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ (1...π‘˜) β†’ 𝑦 ∈ β„‚)
241238, 240mulcld 11230 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (1...π‘˜) β†’ (2 Β· 𝑦) ∈ β„‚)
242241ad2antlr 724 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1)) β†’ (2 Β· 𝑦) ∈ β„‚)
243 1cnd 11205 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1)) β†’ 1 ∈ β„‚)
244 simpr 484 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1)) β†’ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1))
245237, 242, 243, 244subcan2d 11609 . . . . . . . . . . . . . . 15 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1)) β†’ (2 Β· π‘₯) = (2 Β· 𝑦))
246235ad2antrr 723 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ (2 Β· π‘₯) = (2 Β· 𝑦)) β†’ π‘₯ ∈ β„‚)
247240ad2antlr 724 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ (2 Β· π‘₯) = (2 Β· 𝑦)) β†’ 𝑦 ∈ β„‚)
248 2cnd 12286 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ (2 Β· π‘₯) = (2 Β· 𝑦)) β†’ 2 ∈ β„‚)
249183a1i 11 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ (2 Β· π‘₯) = (2 Β· 𝑦)) β†’ 2 β‰  0)
250 simpr 484 . . . . . . . . . . . . . . . 16 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ (2 Β· π‘₯) = (2 Β· 𝑦)) β†’ (2 Β· π‘₯) = (2 Β· 𝑦))
251246, 247, 248, 249, 250mulcanad 11845 . . . . . . . . . . . . . . 15 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ (2 Β· π‘₯) = (2 Β· 𝑦)) β†’ π‘₯ = 𝑦)
252245, 251syldan 590 . . . . . . . . . . . . . 14 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((2 Β· π‘₯) βˆ’ 1) = ((2 Β· 𝑦) βˆ’ 1)) β†’ π‘₯ = 𝑦)
253232, 252syldan 590 . . . . . . . . . . . . 13 (((π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜)) ∧ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦)) β†’ π‘₯ = 𝑦)
254253adantll 711 . . . . . . . . . . . 12 (((π‘˜ ∈ β„• ∧ (π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜))) ∧ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦)) β†’ π‘₯ = 𝑦)
255254ex 412 . . . . . . . . . . 11 ((π‘˜ ∈ β„• ∧ (π‘₯ ∈ (1...π‘˜) ∧ 𝑦 ∈ (1...π‘˜))) β†’ (((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦) β†’ π‘₯ = 𝑦))
256255ralrimivva 3192 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ βˆ€π‘₯ ∈ (1...π‘˜)βˆ€π‘¦ ∈ (1...π‘˜)(((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦) β†’ π‘₯ = 𝑦))
257 dff13 7246 . . . . . . . . . 10 ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–1-1β†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ↔ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)⟢((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ βˆ€π‘₯ ∈ (1...π‘˜)βˆ€π‘¦ ∈ (1...π‘˜)(((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘₯) = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘¦) β†’ π‘₯ = 𝑦)))
258213, 256, 257sylanbrc 582 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–1-1β†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
259 1zzd 12589 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ 1 ∈ β„€)
26032adantr 480 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ π‘˜ ∈ β„€)
261134elfzelzd 13498 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 ∈ β„€)
262 zeo 12644 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ β„€ β†’ ((𝑗 / 2) ∈ β„€ ∨ ((𝑗 + 1) / 2) ∈ β„€))
263261, 262syl 17 . . . . . . . . . . . . . . . 16 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ ((𝑗 / 2) ∈ β„€ ∨ ((𝑗 + 1) / 2) ∈ β„€))
264263adantl 481 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ ((𝑗 / 2) ∈ β„€ ∨ ((𝑗 + 1) / 2) ∈ β„€))
265 eldifn 4119 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ Β¬ 𝑗 ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})
266134, 91syl 17 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 ∈ β„•)
267266adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 𝑗 ∈ β„•)
268 simpr 484 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ (𝑗 / 2) ∈ β„€)
269267nnred 12223 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 𝑗 ∈ ℝ)
27038a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 2 ∈ ℝ)
271267nngt0d 12257 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 0 < 𝑗)
272 2pos 12311 . . . . . . . . . . . . . . . . . . . . 21 0 < 2
273272a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 0 < 2)
274269, 270, 271, 273divgt0d 12145 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 0 < (𝑗 / 2))
275 elnnz 12564 . . . . . . . . . . . . . . . . . . 19 ((𝑗 / 2) ∈ β„• ↔ ((𝑗 / 2) ∈ β„€ ∧ 0 < (𝑗 / 2)))
276268, 274, 275sylanbrc 582 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ (𝑗 / 2) ∈ β„•)
277 oveq1 7408 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑗 β†’ (𝑛 / 2) = (𝑗 / 2))
278277eleq1d 2810 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑗 β†’ ((𝑛 / 2) ∈ β„• ↔ (𝑗 / 2) ∈ β„•))
279278elrab 3675 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•} ↔ (𝑗 ∈ β„• ∧ (𝑗 / 2) ∈ β„•))
280267, 276, 279sylanbrc 582 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑗 / 2) ∈ β„€) β†’ 𝑗 ∈ {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})
281265, 280mtand 813 . . . . . . . . . . . . . . . 16 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ Β¬ (𝑗 / 2) ∈ β„€)
282281adantl 481 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ Β¬ (𝑗 / 2) ∈ β„€)
283 pm2.53 848 . . . . . . . . . . . . . . 15 (((𝑗 / 2) ∈ β„€ ∨ ((𝑗 + 1) / 2) ∈ β„€) β†’ (Β¬ (𝑗 / 2) ∈ β„€ β†’ ((𝑗 + 1) / 2) ∈ β„€))
284264, 282, 283sylc 65 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ ((𝑗 + 1) / 2) ∈ β„€)
285 1p1e2 12333 . . . . . . . . . . . . . . . . . . 19 (1 + 1) = 2
286285oveq1i 7411 . . . . . . . . . . . . . . . . . 18 ((1 + 1) / 2) = (2 / 2)
287 2div2e1 12349 . . . . . . . . . . . . . . . . . 18 (2 / 2) = 1
288286, 287eqtr2i 2753 . . . . . . . . . . . . . . . . 17 1 = ((1 + 1) / 2)
289 1red 11211 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 1 ∈ ℝ)
290289, 289readdcld 11239 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ (1 + 1) ∈ ℝ)
29191nnred 12223 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 𝑗 ∈ ℝ)
292291, 289readdcld 11239 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ (𝑗 + 1) ∈ ℝ)
293195a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 2 ∈ ℝ+)
294 elfzle1 13500 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 1 ≀ 𝑗)
295289, 291, 289, 294leadd1dd 11824 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ (1 + 1) ≀ (𝑗 + 1))
296290, 292, 293, 295lediv1dd 13070 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ ((1 + 1) / 2) ≀ ((𝑗 + 1) / 2))
297288, 296eqbrtrid 5173 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 1 ≀ ((𝑗 + 1) / 2))
298134, 297syl 17 . . . . . . . . . . . . . . 15 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 1 ≀ ((𝑗 + 1) / 2))
299298adantl 481 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ 1 ≀ ((𝑗 + 1) / 2))
300 elfzel2 13495 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ β„€)
301300zred 12662 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ ℝ)
302301, 289readdcld 11239 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ (((2 Β· π‘˜) βˆ’ 1) + 1) ∈ ℝ)
303 elfzle2 13501 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ 𝑗 ≀ ((2 Β· π‘˜) βˆ’ 1))
304291, 301, 289, 303leadd1dd 11824 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ (𝑗 + 1) ≀ (((2 Β· π‘˜) βˆ’ 1) + 1))
305292, 302, 293, 304lediv1dd 13070 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)) β†’ ((𝑗 + 1) / 2) ≀ ((((2 Β· π‘˜) βˆ’ 1) + 1) / 2))
306305adantl 481 . . . . . . . . . . . . . . . 16 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((𝑗 + 1) / 2) ≀ ((((2 Β· π‘˜) βˆ’ 1) + 1) / 2))
30750adantr 480 . . . . . . . . . . . . . . . . . . 19 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ (2 Β· π‘˜) ∈ β„‚)
308 1cnd 11205 . . . . . . . . . . . . . . . . . . 19 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ 1 ∈ β„‚)
309307, 308npcand 11571 . . . . . . . . . . . . . . . . . 18 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ (((2 Β· π‘˜) βˆ’ 1) + 1) = (2 Β· π‘˜))
310309oveq1d 7416 . . . . . . . . . . . . . . . . 17 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((((2 Β· π‘˜) βˆ’ 1) + 1) / 2) = ((2 Β· π‘˜) / 2))
311183a1i 11 . . . . . . . . . . . . . . . . . . 19 (π‘˜ ∈ β„• β†’ 2 β‰  0)
31244, 43, 311divcan3d 11991 . . . . . . . . . . . . . . . . . 18 (π‘˜ ∈ β„• β†’ ((2 Β· π‘˜) / 2) = π‘˜)
313312adantr 480 . . . . . . . . . . . . . . . . 17 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((2 Β· π‘˜) / 2) = π‘˜)
314310, 313eqtrd 2764 . . . . . . . . . . . . . . . 16 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((((2 Β· π‘˜) βˆ’ 1) + 1) / 2) = π‘˜)
315306, 314breqtrd 5164 . . . . . . . . . . . . . . 15 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))) β†’ ((𝑗 + 1) / 2) ≀ π‘˜)
316134, 315sylan2 592 . . . . . . . . . . . . . 14 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ ((𝑗 + 1) / 2) ≀ π‘˜)
317259, 260, 284, 299, 316elfzd 13488 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ ((𝑗 + 1) / 2) ∈ (1...π‘˜))
318266nncnd 12224 . . . . . . . . . . . . . . 15 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 ∈ β„‚)
319 peano2cn 11382 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ β„‚ β†’ (𝑗 + 1) ∈ β„‚)
320 2cnd 12286 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ β„‚ β†’ 2 ∈ β„‚)
321183a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ β„‚ β†’ 2 β‰  0)
322319, 320, 321divcan2d 11988 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ β„‚ β†’ (2 Β· ((𝑗 + 1) / 2)) = (𝑗 + 1))
323322oveq1d 7416 . . . . . . . . . . . . . . . 16 (𝑗 ∈ β„‚ β†’ ((2 Β· ((𝑗 + 1) / 2)) βˆ’ 1) = ((𝑗 + 1) βˆ’ 1))
324 pncan1 11634 . . . . . . . . . . . . . . . 16 (𝑗 ∈ β„‚ β†’ ((𝑗 + 1) βˆ’ 1) = 𝑗)
325323, 324eqtr2d 2765 . . . . . . . . . . . . . . 15 (𝑗 ∈ β„‚ β†’ 𝑗 = ((2 Β· ((𝑗 + 1) / 2)) βˆ’ 1))
326318, 325syl 17 . . . . . . . . . . . . . 14 (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) β†’ 𝑗 = ((2 Β· ((𝑗 + 1) / 2)) βˆ’ 1))
327326adantl 481 . . . . . . . . . . . . 13 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ 𝑗 = ((2 Β· ((𝑗 + 1) / 2)) βˆ’ 1))
328 oveq2 7409 . . . . . . . . . . . . . . 15 (π‘š = ((𝑗 + 1) / 2) β†’ (2 Β· π‘š) = (2 Β· ((𝑗 + 1) / 2)))
329328oveq1d 7416 . . . . . . . . . . . . . 14 (π‘š = ((𝑗 + 1) / 2) β†’ ((2 Β· π‘š) βˆ’ 1) = ((2 Β· ((𝑗 + 1) / 2)) βˆ’ 1))
330329rspceeqv 3625 . . . . . . . . . . . . 13 ((((𝑗 + 1) / 2) ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· ((𝑗 + 1) / 2)) βˆ’ 1)) β†’ βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((2 Β· π‘š) βˆ’ 1))
331317, 327, 330syl2anc 583 . . . . . . . . . . . 12 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((2 Β· π‘š) βˆ’ 1))
332 eqidd 2725 . . . . . . . . . . . . . . . . 17 ((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)) = (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)))
333 oveq2 7409 . . . . . . . . . . . . . . . . . . 19 (𝑖 = π‘š β†’ (2 Β· 𝑖) = (2 Β· π‘š))
334333oveq1d 7416 . . . . . . . . . . . . . . . . . 18 (𝑖 = π‘š β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· π‘š) βˆ’ 1))
335334adantl 481 . . . . . . . . . . . . . . . . 17 (((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) ∧ 𝑖 = π‘š) β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· π‘š) βˆ’ 1))
336 simpl 482 . . . . . . . . . . . . . . . . 17 ((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) β†’ π‘š ∈ (1...π‘˜))
337 ovexd 7436 . . . . . . . . . . . . . . . . 17 ((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) β†’ ((2 Β· π‘š) βˆ’ 1) ∈ V)
338332, 335, 336, 337fvmptd 6995 . . . . . . . . . . . . . . . 16 ((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š) = ((2 Β· π‘š) βˆ’ 1))
339 id 22 . . . . . . . . . . . . . . . . . 18 (𝑗 = ((2 Β· π‘š) βˆ’ 1) β†’ 𝑗 = ((2 Β· π‘š) βˆ’ 1))
340339eqcomd 2730 . . . . . . . . . . . . . . . . 17 (𝑗 = ((2 Β· π‘š) βˆ’ 1) β†’ ((2 Β· π‘š) βˆ’ 1) = 𝑗)
341340adantl 481 . . . . . . . . . . . . . . . 16 ((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) β†’ ((2 Β· π‘š) βˆ’ 1) = 𝑗)
342338, 341eqtr2d 2765 . . . . . . . . . . . . . . 15 ((π‘š ∈ (1...π‘˜) ∧ 𝑗 = ((2 Β· π‘š) βˆ’ 1)) β†’ 𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š))
343342ex 412 . . . . . . . . . . . . . 14 (π‘š ∈ (1...π‘˜) β†’ (𝑗 = ((2 Β· π‘š) βˆ’ 1) β†’ 𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š)))
344343adantl 481 . . . . . . . . . . . . 13 (((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) ∧ π‘š ∈ (1...π‘˜)) β†’ (𝑗 = ((2 Β· π‘š) βˆ’ 1) β†’ 𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š)))
345344reximdva 3160 . . . . . . . . . . . 12 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((2 Β· π‘š) βˆ’ 1) β†’ βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š)))
346331, 345mpd 15 . . . . . . . . . . 11 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š))
347346ralrimiva 3138 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ βˆ€π‘— ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š))
348 dffo3 7093 . . . . . . . . . 10 ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–ontoβ†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ↔ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)⟢((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ βˆ€π‘— ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})βˆƒπ‘š ∈ (1...π‘˜)𝑗 = ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘š)))
349213, 347, 348sylanbrc 582 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–ontoβ†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
350 df-f1o 6540 . . . . . . . . 9 ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–1-1-ontoβ†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ↔ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–1-1β†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ∧ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–ontoβ†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})))
351258, 349, 350sylanbrc 582 . . . . . . . 8 (π‘˜ ∈ β„• β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–1-1-ontoβ†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
352351adantl 481 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)):(1...π‘˜)–1-1-ontoβ†’((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))
353 eqidd 2725 . . . . . . . . 9 (𝑗 ∈ (1...π‘˜) β†’ (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)) = (𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1)))
354 oveq2 7409 . . . . . . . . . . 11 (𝑖 = 𝑗 β†’ (2 Β· 𝑖) = (2 Β· 𝑗))
355354oveq1d 7416 . . . . . . . . . 10 (𝑖 = 𝑗 β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· 𝑗) βˆ’ 1))
356355adantl 481 . . . . . . . . 9 ((𝑗 ∈ (1...π‘˜) ∧ 𝑖 = 𝑗) β†’ ((2 Β· 𝑖) βˆ’ 1) = ((2 Β· 𝑗) βˆ’ 1))
357 id 22 . . . . . . . . 9 (𝑗 ∈ (1...π‘˜) β†’ 𝑗 ∈ (1...π‘˜))
358 ovexd 7436 . . . . . . . . 9 (𝑗 ∈ (1...π‘˜) β†’ ((2 Β· 𝑗) βˆ’ 1) ∈ V)
359353, 356, 357, 358fvmptd 6995 . . . . . . . 8 (𝑗 ∈ (1...π‘˜) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘—) = ((2 Β· 𝑗) βˆ’ 1))
360359adantl 481 . . . . . . 7 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...π‘˜)) β†’ ((𝑖 ∈ (1...π‘˜) ↦ ((2 Β· 𝑖) βˆ’ 1))β€˜π‘—) = ((2 Β· 𝑗) βˆ’ 1))
361 eleq1w 2808 . . . . . . . . . 10 (𝑗 = 𝑖 β†’ (𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}) ↔ 𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})))
362361anbi2d 628 . . . . . . . . 9 (𝑗 = 𝑖 β†’ (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) ↔ ((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•}))))
363139eleq1d 2810 . . . . . . . . 9 (𝑗 = 𝑖 β†’ ((πΉβ€˜π‘—) ∈ β„‚ ↔ (πΉβ€˜π‘–) ∈ β„‚))
364362, 363imbi12d 344 . . . . . . . 8 (𝑗 = 𝑖 β†’ ((((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (πΉβ€˜π‘—) ∈ β„‚) ↔ (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (πΉβ€˜π‘–) ∈ β„‚)))
365364, 136chvarvv 1994 . . . . . . 7 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})) β†’ (πΉβ€˜π‘–) ∈ β„‚)
366143, 144, 352, 360, 365fsumf1o 15665 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑖 ∈ ((1...((2 Β· π‘˜) βˆ’ 1)) βˆ– {𝑛 ∈ β„• ∣ (𝑛 / 2) ∈ β„•})(πΉβ€˜π‘–) = Σ𝑗 ∈ (1...π‘˜)(πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))
36795, 142, 3663eqtrrd 2769 . . . . 5 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ (1...π‘˜)(πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) = Σ𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))(πΉβ€˜π‘—))
368 ovex 7434 . . . . . . . . . 10 ((2 Β· π‘˜) βˆ’ 1) ∈ V
36920fvmpt2 6999 . . . . . . . . . 10 ((π‘˜ ∈ β„• ∧ ((2 Β· π‘˜) βˆ’ 1) ∈ V) β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) = ((2 Β· π‘˜) βˆ’ 1))
370368, 369mpan2 688 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) = ((2 Β· π‘˜) βˆ’ 1))
371370oveq2d 7417 . . . . . . . 8 (π‘˜ ∈ β„• β†’ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜)) = (1...((2 Β· π‘˜) βˆ’ 1)))
372371eqcomd 2730 . . . . . . 7 (π‘˜ ∈ β„• β†’ (1...((2 Β· π‘˜) βˆ’ 1)) = (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜)))
373372sumeq1d 15643 . . . . . 6 (π‘˜ ∈ β„• β†’ Σ𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))(πΉβ€˜π‘—) = Σ𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))(πΉβ€˜π‘—))
374373adantl 481 . . . . 5 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1))(πΉβ€˜π‘—) = Σ𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))(πΉβ€˜π‘—))
375367, 374eqtrd 2764 . . . 4 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ (1...π‘˜)(πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) = Σ𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))(πΉβ€˜π‘—))
376 elfznn 13526 . . . . . . 7 (𝑗 ∈ (1...π‘˜) β†’ 𝑗 ∈ β„•)
377376adantl 481 . . . . . 6 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...π‘˜)) β†’ 𝑗 ∈ β„•)
37812adantr 480 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (1...π‘˜)) β†’ 𝐹:β„•βŸΆβ„‚)
37930a1i 11 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ 2 ∈ β„€)
380 elfzelz 13497 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ 𝑗 ∈ β„€)
381379, 380zmulcld 12668 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ (2 Β· 𝑗) ∈ β„€)
382 1zzd 12589 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ 1 ∈ β„€)
383381, 382zsubcld 12667 . . . . . . . . . 10 (𝑗 ∈ (1...π‘˜) β†’ ((2 Β· 𝑗) βˆ’ 1) ∈ β„€)
384 0red 11213 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ 0 ∈ ℝ)
38538a1i 11 . . . . . . . . . . . . 13 (𝑗 ∈ (1...π‘˜) β†’ 2 ∈ ℝ)
38624, 385eqeltrid 2829 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ (2 Β· 1) ∈ ℝ)
387 1red 11211 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ 1 ∈ ℝ)
388386, 387resubcld 11638 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ ((2 Β· 1) βˆ’ 1) ∈ ℝ)
389383zred 12662 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ ((2 Β· 𝑗) βˆ’ 1) ∈ ℝ)
390 0lt1 11732 . . . . . . . . . . . 12 0 < 1
391153a1i 11 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ 1 = ((2 Β· 1) βˆ’ 1))
392390, 391breqtrid 5175 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ 0 < ((2 Β· 1) βˆ’ 1))
393381zred 12662 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ (2 Β· 𝑗) ∈ ℝ)
394376nnred 12223 . . . . . . . . . . . . 13 (𝑗 ∈ (1...π‘˜) β†’ 𝑗 ∈ ℝ)
395161a1i 11 . . . . . . . . . . . . 13 (𝑗 ∈ (1...π‘˜) β†’ 0 ≀ 2)
396 elfzle1 13500 . . . . . . . . . . . . 13 (𝑗 ∈ (1...π‘˜) β†’ 1 ≀ 𝑗)
397387, 394, 385, 395, 396lemul2ad 12150 . . . . . . . . . . . 12 (𝑗 ∈ (1...π‘˜) β†’ (2 Β· 1) ≀ (2 Β· 𝑗))
398386, 393, 387, 397lesub1dd 11826 . . . . . . . . . . 11 (𝑗 ∈ (1...π‘˜) β†’ ((2 Β· 1) βˆ’ 1) ≀ ((2 Β· 𝑗) βˆ’ 1))
399384, 388, 389, 392, 398ltletrd 11370 . . . . . . . . . 10 (𝑗 ∈ (1...π‘˜) β†’ 0 < ((2 Β· 𝑗) βˆ’ 1))
400 elnnz 12564 . . . . . . . . . 10 (((2 Β· 𝑗) βˆ’ 1) ∈ β„• ↔ (((2 Β· 𝑗) βˆ’ 1) ∈ β„€ ∧ 0 < ((2 Β· 𝑗) βˆ’ 1)))
401383, 399, 400sylanbrc 582 . . . . . . . . 9 (𝑗 ∈ (1...π‘˜) β†’ ((2 Β· 𝑗) βˆ’ 1) ∈ β„•)
402401adantl 481 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (1...π‘˜)) β†’ ((2 Β· 𝑗) βˆ’ 1) ∈ β„•)
403378, 402ffvelcdmd 7077 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (1...π‘˜)) β†’ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) ∈ β„‚)
404403adantlr 712 . . . . . 6 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...π‘˜)) β†’ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) ∈ β„‚)
40559fveq2d 6885 . . . . . . . 8 (π‘˜ = 𝑗 β†’ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)) = (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))
406405cbvmptv 5251 . . . . . . 7 (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))) = (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))
407406fvmpt2 6999 . . . . . 6 ((𝑗 ∈ β„• ∧ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) ∈ β„‚) β†’ ((π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))β€˜π‘—) = (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))
408377, 404, 407syl2anc 583 . . . . 5 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...π‘˜)) β†’ ((π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))β€˜π‘—) = (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))
409 simpr 484 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ π‘˜ ∈ β„•)
410409, 8eleqtrdi 2835 . . . . 5 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ π‘˜ ∈ (β„€β‰₯β€˜1))
411408, 410, 404fsumser 15672 . . . 4 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ (1...π‘˜)(πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) = (seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))β€˜π‘˜))
412 eqidd 2725 . . . . 5 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ (πΉβ€˜π‘—) = (πΉβ€˜π‘—))
413155a1i 11 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ (2 Β· 1) ∈ ℝ)
414 1red 11211 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ 1 ∈ ℝ)
415161a1i 11 . . . . . . . . . . 11 (π‘˜ ∈ β„• β†’ 0 ≀ 2)
416 nnge1 12236 . . . . . . . . . . 11 (π‘˜ ∈ β„• β†’ 1 ≀ π‘˜)
417414, 40, 39, 415, 416lemul2ad 12150 . . . . . . . . . 10 (π‘˜ ∈ β„• β†’ (2 Β· 1) ≀ (2 Β· π‘˜))
418413, 41, 414, 417lesub1dd 11826 . . . . . . . . 9 (π‘˜ ∈ β„• β†’ ((2 Β· 1) βˆ’ 1) ≀ ((2 Β· π‘˜) βˆ’ 1))
419153, 418eqbrtrid 5173 . . . . . . . 8 (π‘˜ ∈ β„• β†’ 1 ≀ ((2 Β· π‘˜) βˆ’ 1))
420 eluz2 12824 . . . . . . . 8 (((2 Β· π‘˜) βˆ’ 1) ∈ (β„€β‰₯β€˜1) ↔ (1 ∈ β„€ ∧ ((2 Β· π‘˜) βˆ’ 1) ∈ β„€ ∧ 1 ≀ ((2 Β· π‘˜) βˆ’ 1)))
42136, 65, 419, 420syl3anbrc 1340 . . . . . . 7 (π‘˜ ∈ β„• β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ (β„€β‰₯β€˜1))
42267, 421eqeltrd 2825 . . . . . 6 (π‘˜ ∈ β„• β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) ∈ (β„€β‰₯β€˜1))
423422adantl 481 . . . . 5 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ ((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜) ∈ (β„€β‰₯β€˜1))
424 simpll 764 . . . . . 6 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ πœ‘)
425 simpr 484 . . . . . . . 8 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜)))
426371adantr 480 . . . . . . . 8 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜)) = (1...((2 Β· π‘˜) βˆ’ 1)))
427425, 426eleqtrd 2827 . . . . . . 7 ((π‘˜ ∈ β„• ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)))
428427adantll 711 . . . . . 6 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ 𝑗 ∈ (1...((2 Β· π‘˜) βˆ’ 1)))
429424, 428, 93syl2anc 583 . . . . 5 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))) β†’ (πΉβ€˜π‘—) ∈ β„‚)
430412, 423, 429fsumser 15672 . . . 4 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ Σ𝑗 ∈ (1...((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜))(πΉβ€˜π‘—) = (seq1( + , 𝐹)β€˜((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜)))
431375, 411, 4303eqtr3d 2772 . . 3 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))β€˜π‘˜) = (seq1( + , 𝐹)β€˜((π‘˜ ∈ β„• ↦ ((2 Β· π‘˜) βˆ’ 1))β€˜π‘˜)))
4321, 2, 6, 7, 8, 9, 11, 15, 16, 29, 73, 75, 431climsuse 44775 . 2 (πœ‘ β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ 𝐡)
433 eqidd 2725 . . . 4 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (πΉβ€˜π‘˜) = (πΉβ€˜π‘˜))
4348, 9, 433, 13isum 15661 . . 3 (πœ‘ β†’ Ξ£π‘˜ ∈ β„• (πΉβ€˜π‘˜) = ( ⇝ β€˜seq1( + , 𝐹)))
435 climrel 15432 . . . . . . 7 Rel ⇝
436435releldmi 5937 . . . . . 6 (seq1( + , 𝐹) ⇝ 𝐡 β†’ seq1( + , 𝐹) ∈ dom ⇝ )
43716, 436syl 17 . . . . 5 (πœ‘ β†’ seq1( + , 𝐹) ∈ dom ⇝ )
438 climdm 15494 . . . . 5 (seq1( + , 𝐹) ∈ dom ⇝ ↔ seq1( + , 𝐹) ⇝ ( ⇝ β€˜seq1( + , 𝐹)))
439437, 438sylib 217 . . . 4 (πœ‘ β†’ seq1( + , 𝐹) ⇝ ( ⇝ β€˜seq1( + , 𝐹)))
440 climuni 15492 . . . 4 ((seq1( + , 𝐹) ⇝ ( ⇝ β€˜seq1( + , 𝐹)) ∧ seq1( + , 𝐹) ⇝ 𝐡) β†’ ( ⇝ β€˜seq1( + , 𝐹)) = 𝐡)
441439, 16, 440syl2anc 583 . . 3 (πœ‘ β†’ ( ⇝ β€˜seq1( + , 𝐹)) = 𝐡)
442435a1i 11 . . . . . . . 8 (πœ‘ β†’ Rel ⇝ )
443 releldm 5933 . . . . . . . 8 ((Rel ⇝ ∧ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ 𝐡) β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ∈ dom ⇝ )
444442, 432, 443syl2anc 583 . . . . . . 7 (πœ‘ β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ∈ dom ⇝ )
445 climdm 15494 . . . . . . 7 (seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ∈ dom ⇝ ↔ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ ( ⇝ β€˜seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))))
446444, 445sylib 217 . . . . . 6 (πœ‘ β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ ( ⇝ β€˜seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))))
447406a1i 11 . . . . . . . 8 (πœ‘ β†’ (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))) = (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))
448447seqeq3d 13970 . . . . . . 7 (πœ‘ β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) = seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))))
449448fveq2d 6885 . . . . . 6 (πœ‘ β†’ ( ⇝ β€˜seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))) = ( ⇝ β€˜seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))))
450446, 449breqtrd 5164 . . . . 5 (πœ‘ β†’ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ ( ⇝ β€˜seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))))
451 climuni 15492 . . . . 5 ((seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ 𝐡 ∧ seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ ( ⇝ β€˜seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))))) β†’ 𝐡 = ( ⇝ β€˜seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))))
452432, 450, 451syl2anc 583 . . . 4 (πœ‘ β†’ 𝐡 = ( ⇝ β€˜seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))))
453 eqidd 2725 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))) = (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))
454 eqcom 2731 . . . . . . . 8 (π‘˜ = 𝑗 ↔ 𝑗 = π‘˜)
455 eqcom 2731 . . . . . . . 8 ((πΉβ€˜((2 Β· π‘˜) βˆ’ 1)) = (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) ↔ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) = (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
456405, 454, 4553imtr3i 291 . . . . . . 7 (𝑗 = π‘˜ β†’ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) = (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
457456adantl 481 . . . . . 6 (((πœ‘ ∧ π‘˜ ∈ β„•) ∧ 𝑗 = π‘˜) β†’ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)) = (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
45812adantr 480 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ 𝐹:β„•βŸΆβ„‚)
459421, 8eleqtrrdi 2836 . . . . . . . 8 (π‘˜ ∈ β„• β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ β„•)
460459adantl 481 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ ((2 Β· π‘˜) βˆ’ 1) ∈ β„•)
461458, 460ffvelcdmd 7077 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)) ∈ β„‚)
462453, 457, 409, 461fvmptd 6995 . . . . 5 ((πœ‘ ∧ π‘˜ ∈ β„•) β†’ ((𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1)))β€˜π‘˜) = (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
4638, 9, 462, 461isum 15661 . . . 4 (πœ‘ β†’ Ξ£π‘˜ ∈ β„• (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)) = ( ⇝ β€˜seq1( + , (𝑗 ∈ β„• ↦ (πΉβ€˜((2 Β· 𝑗) βˆ’ 1))))))
464452, 463eqtr4d 2767 . . 3 (πœ‘ β†’ 𝐡 = Ξ£π‘˜ ∈ β„• (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
465434, 441, 4643eqtrd 2768 . 2 (πœ‘ β†’ Ξ£π‘˜ ∈ β„• (πΉβ€˜π‘˜) = Ξ£π‘˜ ∈ β„• (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))
466432, 465jca 511 1 (πœ‘ β†’ (seq1( + , (π‘˜ ∈ β„• ↦ (πΉβ€˜((2 Β· π‘˜) βˆ’ 1)))) ⇝ 𝐡 ∧ Ξ£π‘˜ ∈ β„• (πΉβ€˜π‘˜) = Ξ£π‘˜ ∈ β„• (πΉβ€˜((2 Β· π‘˜) βˆ’ 1))))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ∧ wa 395   ∨ wo 844   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098   β‰  wne 2932  βˆ€wral 3053  βˆƒwrex 3062  {crab 3424  Vcvv 3466   βˆ– cdif 3937   βˆͺ cun 3938   ∩ cin 3939   βŠ† wss 3940  βˆ…c0 4314   class class class wbr 5138   ↦ cmpt 5221  dom cdm 5666  Rel wrel 5671  βŸΆwf 6529  β€“1-1β†’wf1 6530  β€“ontoβ†’wfo 6531  β€“1-1-ontoβ†’wf1o 6532  β€˜cfv 6533  (class class class)co 7401  Fincfn 8934  β„‚cc 11103  β„cr 11104  0cc0 11105  1c1 11106   + caddc 11108   Β· cmul 11110   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440   / cdiv 11867  β„•cn 12208  2c2 12263  β„€cz 12554  β„€β‰₯cuz 12818  β„+crp 12970  ...cfz 13480  seqcseq 13962   ⇝ cli 15424  Ξ£csu 15628
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9631  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182  ax-pre-sup 11183
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-om 7849  df-1st 7968  df-2nd 7969  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-er 8698  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-sup 9432  df-oi 9500  df-card 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-z 12555  df-uz 12819  df-rp 12971  df-fz 13481  df-fzo 13624  df-seq 13963  df-exp 14024  df-hash 14287  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-clim 15428  df-sum 15629
This theorem is referenced by:  fouriersw  45398
  Copyright terms: Public domain W3C validator