| Step | Hyp | Ref
| Expression |
| 1 | | nnq 10042 |
. . . . . . 7
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℚ) |
| 2 | | chtqval 16164 |
. . . . . . 7
⊢ (𝐴 ∈ ℚ →
(θ‘𝐴) =
Σ𝑘 ∈ ((0[,]𝐴) ∩ ℙ)(log‘𝑘)) |
| 3 | 1, 2 | syl 14 |
. . . . . 6
⊢ (𝐴 ∈ ℕ →
(θ‘𝐴) =
Σ𝑘 ∈ ((0[,]𝐴) ∩ ℙ)(log‘𝑘)) |
| 4 | | 2eluzge1 9985 |
. . . . . . . . . 10
⊢ 2 ∈
(ℤ≥‘1) |
| 5 | | ppiqsval2 16160 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℚ ∧ 2 ∈
(ℤ≥‘1)) → ((0[,]𝐴) ∩ ℙ) =
((1...(⌊‘𝐴))
∩ ℙ)) |
| 6 | 1, 4, 5 | sylancl 417 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℕ →
((0[,]𝐴) ∩ ℙ) =
((1...(⌊‘𝐴))
∩ ℙ)) |
| 7 | | nnz 9667 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℤ) |
| 8 | | flid 10732 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ ℤ →
(⌊‘𝐴) = 𝐴) |
| 9 | 7, 8 | syl 14 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℕ →
(⌊‘𝐴) = 𝐴) |
| 10 | 9 | oveq2d 6101 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℕ →
(1...(⌊‘𝐴)) =
(1...𝐴)) |
| 11 | 10 | ineq1d 3431 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℕ →
((1...(⌊‘𝐴))
∩ ℙ) = ((1...𝐴)
∩ ℙ)) |
| 12 | 6, 11 | eqtrd 2271 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ →
((0[,]𝐴) ∩ ℙ) =
((1...𝐴) ∩
ℙ)) |
| 13 | 12 | sumeq1d 12148 |
. . . . . . 7
⊢ (𝐴 ∈ ℕ →
Σ𝑘 ∈ ((0[,]𝐴) ∩ ℙ)(log‘𝑘) = Σ𝑘 ∈ ((1...𝐴) ∩ ℙ)(log‘𝑘)) |
| 14 | | inss1 3451 |
. . . . . . . . 9
⊢
((1...𝐴) ∩
ℙ) ⊆ (1...𝐴) |
| 15 | 14 | a1i 9 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ →
((1...𝐴) ∩ ℙ)
⊆ (1...𝐴)) |
| 16 | | animorrl 838 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝑗 ∈ (1...𝐴)) → (𝑗 ∈ (1...𝐴) ∨ ¬ 𝑗 ∈ (1...𝐴))) |
| 17 | | df-dc 847 |
. . . . . . . . . . . 12
⊢
(DECID 𝑗 ∈ (1...𝐴) ↔ (𝑗 ∈ (1...𝐴) ∨ ¬ 𝑗 ∈ (1...𝐴))) |
| 18 | 16, 17 | sylibr 134 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝑗 ∈ (1...𝐴)) → DECID 𝑗 ∈ (1...𝐴)) |
| 19 | | elfzelz 10438 |
. . . . . . . . . . . . 13
⊢ (𝑗 ∈ (1...𝐴) → 𝑗 ∈ ℤ) |
| 20 | 19 | adantl 277 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝑗 ∈ (1...𝐴)) → 𝑗 ∈ ℤ) |
| 21 | | prmdcz 12925 |
. . . . . . . . . . . 12
⊢ (𝑗 ∈ ℤ →
DECID 𝑗
∈ ℙ) |
| 22 | 20, 21 | syl 14 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝑗 ∈ (1...𝐴)) → DECID 𝑗 ∈
ℙ) |
| 23 | 18, 22 | dcand 945 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℕ ∧ 𝑗 ∈ (1...𝐴)) → DECID (𝑗 ∈ (1...𝐴) ∧ 𝑗 ∈ ℙ)) |
| 24 | | elin 3412 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ ((1...𝐴) ∩ ℙ) ↔ (𝑗 ∈ (1...𝐴) ∧ 𝑗 ∈ ℙ)) |
| 25 | 24 | dcbii 852 |
. . . . . . . . . 10
⊢
(DECID 𝑗 ∈ ((1...𝐴) ∩ ℙ) ↔ DECID
(𝑗 ∈ (1...𝐴) ∧ 𝑗 ∈ ℙ)) |
| 26 | 23, 25 | sylibr 134 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝑗 ∈ (1...𝐴)) → DECID 𝑗 ∈ ((1...𝐴) ∩ ℙ)) |
| 27 | 26 | ralrimiva 2623 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ →
∀𝑗 ∈ (1...𝐴)DECID 𝑗 ∈ ((1...𝐴) ∩ ℙ)) |
| 28 | | elinel1 3415 |
. . . . . . . . . 10
⊢ (𝑘 ∈ ((1...𝐴) ∩ ℙ) → 𝑘 ∈ (1...𝐴)) |
| 29 | | elfznn 10470 |
. . . . . . . . . . . . . 14
⊢ (𝑘 ∈ (1...𝐴) → 𝑘 ∈ ℕ) |
| 30 | 29 | adantl 277 |
. . . . . . . . . . . . 13
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ (1...𝐴)) → 𝑘 ∈ ℕ) |
| 31 | 30 | nnrpd 10105 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ (1...𝐴)) → 𝑘 ∈ ℝ+) |
| 32 | 31 | relogcld 16034 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ (1...𝐴)) → (log‘𝑘) ∈ ℝ) |
| 33 | 32 | recnd 8354 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ (1...𝐴)) → (log‘𝑘) ∈ ℂ) |
| 34 | 28, 33 | sylan2 286 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ((1...𝐴) ∩ ℙ)) → (log‘𝑘) ∈
ℂ) |
| 35 | 34 | ralrimiva 2623 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ →
∀𝑘 ∈
((1...𝐴) ∩
ℙ)(log‘𝑘)
∈ ℂ) |
| 36 | | 1zzd 9675 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℕ → 1 ∈
ℤ) |
| 37 | 36, 7 | fzfigd 10881 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℕ →
(1...𝐴) ∈
Fin) |
| 38 | 37 | olcd 746 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ → ((1
∈ ℤ ∧ (1...𝐴) ⊆ (ℤ≥‘1)
∧ ∀𝑗 ∈
(ℤ≥‘1)DECID 𝑗 ∈ (1...𝐴)) ∨ (1...𝐴) ∈ Fin)) |
| 39 | 15, 27, 35, 38 | isumss2 12176 |
. . . . . . 7
⊢ (𝐴 ∈ ℕ →
Σ𝑘 ∈ ((1...𝐴) ∩ ℙ)(log‘𝑘) = Σ𝑘 ∈ (1...𝐴)if(𝑘 ∈ ((1...𝐴) ∩ ℙ), (log‘𝑘), 0)) |
| 40 | 13, 39 | eqtrd 2271 |
. . . . . 6
⊢ (𝐴 ∈ ℕ →
Σ𝑘 ∈ ((0[,]𝐴) ∩ ℙ)(log‘𝑘) = Σ𝑘 ∈ (1...𝐴)if(𝑘 ∈ ((1...𝐴) ∩ ℙ), (log‘𝑘), 0)) |
| 41 | 3, 40 | eqtrd 2271 |
. . . . 5
⊢ (𝐴 ∈ ℕ →
(θ‘𝐴) =
Σ𝑘 ∈ (1...𝐴)if(𝑘 ∈ ((1...𝐴) ∩ ℙ), (log‘𝑘), 0)) |
| 42 | | elin 3412 |
. . . . . . . 8
⊢ (𝑘 ∈ ((1...𝐴) ∩ ℙ) ↔ (𝑘 ∈ (1...𝐴) ∧ 𝑘 ∈ ℙ)) |
| 43 | 42 | baibr 932 |
. . . . . . 7
⊢ (𝑘 ∈ (1...𝐴) → (𝑘 ∈ ℙ ↔ 𝑘 ∈ ((1...𝐴) ∩ ℙ))) |
| 44 | 43 | ifbid 3662 |
. . . . . 6
⊢ (𝑘 ∈ (1...𝐴) → if(𝑘 ∈ ℙ, (log‘𝑘), 0) = if(𝑘 ∈ ((1...𝐴) ∩ ℙ), (log‘𝑘), 0)) |
| 45 | 44 | sumeq2i 12146 |
. . . . 5
⊢
Σ𝑘 ∈
(1...𝐴)if(𝑘 ∈ ℙ,
(log‘𝑘), 0) =
Σ𝑘 ∈ (1...𝐴)if(𝑘 ∈ ((1...𝐴) ∩ ℙ), (log‘𝑘), 0) |
| 46 | 41, 45 | eqtr4di 2289 |
. . . 4
⊢ (𝐴 ∈ ℕ →
(θ‘𝐴) =
Σ𝑘 ∈ (1...𝐴)if(𝑘 ∈ ℙ, (log‘𝑘), 0)) |
| 47 | | eqid 2238 |
. . . . . 6
⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛), 0)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛),
0)) |
| 48 | | eleq1w 2299 |
. . . . . . 7
⊢ (𝑛 = 𝑘 → (𝑛 ∈ ℙ ↔ 𝑘 ∈ ℙ)) |
| 49 | | fveq2 5695 |
. . . . . . 7
⊢ (𝑛 = 𝑘 → (log‘𝑛) = (log‘𝑘)) |
| 50 | 48, 49 | ifbieq1d 3663 |
. . . . . 6
⊢ (𝑛 = 𝑘 → if(𝑛 ∈ ℙ, (log‘𝑛), 0) = if(𝑘 ∈ ℙ, (log‘𝑘), 0)) |
| 51 | | elnnuz 9968 |
. . . . . . 7
⊢ (𝑘 ∈ ℕ ↔ 𝑘 ∈
(ℤ≥‘1)) |
| 52 | 51 | bilanri 389 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → 𝑘 ∈ ℕ) |
| 53 | 52 | nnrpd 10105 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → 𝑘 ∈ ℝ+) |
| 54 | 53 | relogcld 16034 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → (log‘𝑘) ∈ ℝ) |
| 55 | 54 | recnd 8354 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → (log‘𝑘) ∈ ℂ) |
| 56 | | 0cnd 8319 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → 0 ∈ ℂ) |
| 57 | | eluzelz 9940 |
. . . . . . . . 9
⊢ (𝑘 ∈
(ℤ≥‘1) → 𝑘 ∈ ℤ) |
| 58 | 57 | adantl 277 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → 𝑘 ∈ ℤ) |
| 59 | | prmdcz 12925 |
. . . . . . . 8
⊢ (𝑘 ∈ ℤ →
DECID 𝑘
∈ ℙ) |
| 60 | 58, 59 | syl 14 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → DECID 𝑘 ∈
ℙ) |
| 61 | 55, 56, 60 | ifcldcd 3678 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → if(𝑘 ∈ ℙ, (log‘𝑘), 0) ∈
ℂ) |
| 62 | 47, 50, 52, 61 | fvmptd3 5799 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (log‘𝑛), 0))‘𝑘) = if(𝑘 ∈ ℙ, (log‘𝑘), 0)) |
| 63 | | elnnuz 9968 |
. . . . . 6
⊢ (𝐴 ∈ ℕ ↔ 𝐴 ∈
(ℤ≥‘1)) |
| 64 | 63 | biimpi 120 |
. . . . 5
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
(ℤ≥‘1)) |
| 65 | 62, 64, 61 | fsum3ser 12180 |
. . . 4
⊢ (𝐴 ∈ ℕ →
Σ𝑘 ∈ (1...𝐴)if(𝑘 ∈ ℙ, (log‘𝑘), 0) = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛),
0)))‘𝐴)) |
| 66 | 46, 65 | eqtrd 2271 |
. . 3
⊢ (𝐴 ∈ ℕ →
(θ‘𝐴) = (seq1(
+ , (𝑛 ∈ ℕ
↦ if(𝑛 ∈
ℙ, (log‘𝑛),
0)))‘𝐴)) |
| 67 | 66 | fveq2d 5699 |
. 2
⊢ (𝐴 ∈ ℕ →
(exp‘(θ‘𝐴)) = (exp‘(seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛),
0)))‘𝐴))) |
| 68 | | addcl 8304 |
. . . 4
⊢ ((𝑘 ∈ ℂ ∧ 𝑝 ∈ ℂ) → (𝑘 + 𝑝) ∈ ℂ) |
| 69 | 68 | adantl 277 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ (𝑘 ∈ ℂ ∧ 𝑝 ∈ ℂ)) → (𝑘 + 𝑝) ∈ ℂ) |
| 70 | 62, 61 | eqeltrd 2315 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (log‘𝑛), 0))‘𝑘) ∈ ℂ) |
| 71 | | efadd 12458 |
. . . 4
⊢ ((𝑘 ∈ ℂ ∧ 𝑝 ∈ ℂ) →
(exp‘(𝑘 + 𝑝)) = ((exp‘𝑘) · (exp‘𝑝))) |
| 72 | 71 | adantl 277 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ (𝑘 ∈ ℂ ∧ 𝑝 ∈ ℂ)) →
(exp‘(𝑘 + 𝑝)) = ((exp‘𝑘) · (exp‘𝑝))) |
| 73 | | simpr 110 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈
ℕ) |
| 74 | | 1nn 9317 |
. . . . . . . . 9
⊢ 1 ∈
ℕ |
| 75 | 74 | a1i 9 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → 1 ∈
ℕ) |
| 76 | 51, 60 | sylan2b 287 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) →
DECID 𝑘
∈ ℙ) |
| 77 | 73, 75, 76 | ifcldcd 3678 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → if(𝑘 ∈ ℙ, 𝑘, 1) ∈
ℕ) |
| 78 | 77 | nnrpd 10105 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → if(𝑘 ∈ ℙ, 𝑘, 1) ∈
ℝ+) |
| 79 | 78 | reeflogd 16035 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) →
(exp‘(log‘if(𝑘
∈ ℙ, 𝑘, 1))) =
if(𝑘 ∈ ℙ, 𝑘, 1)) |
| 80 | 51, 62 | sylan2b 287 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛),
0))‘𝑘) = if(𝑘 ∈ ℙ,
(log‘𝑘),
0)) |
| 81 | | prmdc 12924 |
. . . . . . . . . 10
⊢ (𝑘 ∈ ℕ →
DECID 𝑘
∈ ℙ) |
| 82 | | fvifdc 5717 |
. . . . . . . . . 10
⊢
(DECID 𝑘 ∈ ℙ → (log‘if(𝑘 ∈ ℙ, 𝑘, 1)) = if(𝑘 ∈ ℙ, (log‘𝑘),
(log‘1))) |
| 83 | 81, 82 | syl 14 |
. . . . . . . . 9
⊢ (𝑘 ∈ ℕ →
(log‘if(𝑘 ∈
ℙ, 𝑘, 1)) = if(𝑘 ∈ ℙ,
(log‘𝑘),
(log‘1))) |
| 84 | 83 | adantl 277 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) →
(log‘if(𝑘 ∈
ℙ, 𝑘, 1)) = if(𝑘 ∈ ℙ,
(log‘𝑘),
(log‘1))) |
| 85 | | log1 16017 |
. . . . . . . . 9
⊢
(log‘1) = 0 |
| 86 | | ifeq2 3644 |
. . . . . . . . 9
⊢
((log‘1) = 0 → if(𝑘 ∈ ℙ, (log‘𝑘), (log‘1)) = if(𝑘 ∈ ℙ,
(log‘𝑘),
0)) |
| 87 | 85, 86 | ax-mp 5 |
. . . . . . . 8
⊢ if(𝑘 ∈ ℙ,
(log‘𝑘),
(log‘1)) = if(𝑘
∈ ℙ, (log‘𝑘), 0) |
| 88 | 84, 87 | eqtrdi 2287 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) →
(log‘if(𝑘 ∈
ℙ, 𝑘, 1)) = if(𝑘 ∈ ℙ,
(log‘𝑘),
0)) |
| 89 | 80, 88 | eqtr4d 2274 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛),
0))‘𝑘) =
(log‘if(𝑘 ∈
ℙ, 𝑘,
1))) |
| 90 | 89 | fveq2d 5699 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) →
(exp‘((𝑛 ∈
ℕ ↦ if(𝑛 ∈
ℙ, (log‘𝑛),
0))‘𝑘)) =
(exp‘(log‘if(𝑘
∈ ℙ, 𝑘,
1)))) |
| 91 | | id 19 |
. . . . . . . 8
⊢ (𝑛 = 𝑘 → 𝑛 = 𝑘) |
| 92 | 48, 91 | ifbieq1d 3663 |
. . . . . . 7
⊢ (𝑛 = 𝑘 → if(𝑛 ∈ ℙ, 𝑛, 1) = if(𝑘 ∈ ℙ, 𝑘, 1)) |
| 93 | | prmorcht.1 |
. . . . . . 7
⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) |
| 94 | | vex 2824 |
. . . . . . . 8
⊢ 𝑘 ∈ V |
| 95 | | 1ex 8321 |
. . . . . . . 8
⊢ 1 ∈
V |
| 96 | 94, 95 | ifex 4632 |
. . . . . . 7
⊢ if(𝑘 ∈ ℙ, 𝑘, 1) ∈ V |
| 97 | 92, 93, 96 | fvmpt 5782 |
. . . . . 6
⊢ (𝑘 ∈ ℕ → (𝐹‘𝑘) = if(𝑘 ∈ ℙ, 𝑘, 1)) |
| 98 | 97 | adantl 277 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) = if(𝑘 ∈ ℙ, 𝑘, 1)) |
| 99 | 79, 90, 98 | 3eqtr4d 2281 |
. . . 4
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈ ℕ) →
(exp‘((𝑛 ∈
ℕ ↦ if(𝑛 ∈
ℙ, (log‘𝑛),
0))‘𝑘)) = (𝐹‘𝑘)) |
| 100 | 52, 99 | syldan 282 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → (exp‘((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (log‘𝑛), 0))‘𝑘)) = (𝐹‘𝑘)) |
| 101 | | efcl 12447 |
. . . . 5
⊢ (((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ,
(log‘𝑛),
0))‘𝑘) ∈ ℂ
→ (exp‘((𝑛
∈ ℕ ↦ if(𝑛
∈ ℙ, (log‘𝑛), 0))‘𝑘)) ∈ ℂ) |
| 102 | 70, 101 | syl 14 |
. . . 4
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → (exp‘((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (log‘𝑛), 0))‘𝑘)) ∈ ℂ) |
| 103 | 100, 102 | eqeltrrd 2316 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘1)) → (𝐹‘𝑘) ∈ ℂ) |
| 104 | | mulcl 8306 |
. . . 4
⊢ ((𝑘 ∈ ℂ ∧ 𝑝 ∈ ℂ) → (𝑘 · 𝑝) ∈ ℂ) |
| 105 | 104 | adantl 277 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ (𝑘 ∈ ℂ ∧ 𝑝 ∈ ℂ)) → (𝑘 · 𝑝) ∈ ℂ) |
| 106 | 69, 70, 64, 72, 100, 103, 105 | seq3homo 10977 |
. 2
⊢ (𝐴 ∈ ℕ →
(exp‘(seq1( + , (𝑛
∈ ℕ ↦ if(𝑛
∈ ℙ, (log‘𝑛), 0)))‘𝐴)) = (seq1( · , 𝐹)‘𝐴)) |
| 107 | 67, 106 | eqtrd 2271 |
1
⊢ (𝐴 ∈ ℕ →
(exp‘(θ‘𝐴)) = (seq1( · , 𝐹)‘𝐴)) |