MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  rpvmasumlem Structured version   Visualization version   GIF version

Theorem rpvmasumlem 27531
Description: Lemma for rpvmasum 27570. Calculate the "trivial case" estimate Σ𝑛𝑥( 1 (𝑛)Λ(𝑛) / 𝑛) = log𝑥 + 𝑂(1), where 1 (𝑥) is the principal Dirichlet character. Equation 9.4.7 of [Shapiro], p. 376. (Contributed by Mario Carneiro, 2-May-2016.)
Hypotheses
Ref Expression
rpvmasum.z 𝑍 = (ℤ/nℤ‘𝑁)
rpvmasum.l 𝐿 = (ℤRHom‘𝑍)
rpvmasum.a (𝜑𝑁 ∈ ℕ)
rpvmasum.g 𝐺 = (DChr‘𝑁)
rpvmasum.d 𝐷 = (Base‘𝐺)
rpvmasum.1 1 = (0g𝐺)
Assertion
Ref Expression
rpvmasumlem (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))) ∈ 𝑂(1))
Distinct variable groups:   𝑥,𝑛, 1   𝑛,𝑁,𝑥   𝜑,𝑛,𝑥   𝑛,𝑍,𝑥   𝐷,𝑛,𝑥   𝑛,𝐿,𝑥
Allowed substitution hints:   𝐺(𝑥,𝑛)

Proof of Theorem rpvmasumlem
Dummy variables 𝑘 𝑝 𝑞 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 reex 11246 . . . . . 6 ℝ ∈ V
2 rpssre 13042 . . . . . 6 + ⊆ ℝ
31, 2ssexi 5322 . . . . 5 + ∈ V
43a1i 11 . . . 4 (𝜑 → ℝ+ ∈ V)
5 fzfid 14014 . . . . . . 7 (𝜑 → (1...(⌊‘𝑥)) ∈ Fin)
6 elfznn 13593 . . . . . . . . . . 11 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
76adantl 481 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
8 vmacl 27161 . . . . . . . . . 10 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
97, 8syl 17 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
109, 7nndivred 12320 . . . . . . . 8 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
1110recnd 11289 . . . . . . 7 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℂ)
125, 11fsumcl 15769 . . . . . 6 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
1312adantr 480 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
14 relogcl 26617 . . . . . . 7 (𝑥 ∈ ℝ+ → (log‘𝑥) ∈ ℝ)
1514adantl 481 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (log‘𝑥) ∈ ℝ)
1615recnd 11289 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (log‘𝑥) ∈ ℂ)
1713, 16subcld 11620 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℂ)
18 1re 11261 . . . . . . . . 9 1 ∈ ℝ
19 rpvmasum.g . . . . . . . . . . . 12 𝐺 = (DChr‘𝑁)
20 rpvmasum.z . . . . . . . . . . . 12 𝑍 = (ℤ/nℤ‘𝑁)
21 rpvmasum.1 . . . . . . . . . . . 12 1 = (0g𝐺)
22 eqid 2737 . . . . . . . . . . . 12 (Base‘𝑍) = (Base‘𝑍)
23 rpvmasum.a . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℕ)
2419, 20, 21, 22, 23dchr1re 27307 . . . . . . . . . . 11 (𝜑1 :(Base‘𝑍)⟶ℝ)
2524adantr 480 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 1 :(Base‘𝑍)⟶ℝ)
2623nnnn0d 12587 . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℕ0)
27 rpvmasum.l . . . . . . . . . . . . 13 𝐿 = (ℤRHom‘𝑍)
2820, 22, 27znzrhfo 21566 . . . . . . . . . . . 12 (𝑁 ∈ ℕ0𝐿:ℤ–onto→(Base‘𝑍))
29 fof 6820 . . . . . . . . . . . 12 (𝐿:ℤ–onto→(Base‘𝑍) → 𝐿:ℤ⟶(Base‘𝑍))
3026, 28, 293syl 18 . . . . . . . . . . 11 (𝜑𝐿:ℤ⟶(Base‘𝑍))
31 elfzelz 13564 . . . . . . . . . . 11 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℤ)
32 ffvelcdm 7101 . . . . . . . . . . 11 ((𝐿:ℤ⟶(Base‘𝑍) ∧ 𝑛 ∈ ℤ) → (𝐿𝑛) ∈ (Base‘𝑍))
3330, 31, 32syl2an 596 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (𝐿𝑛) ∈ (Base‘𝑍))
3425, 33ffvelcdmd 7105 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
35 resubcl 11573 . . . . . . . . 9 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℝ) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
3618, 34, 35sylancr 587 . . . . . . . 8 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
3736, 10remulcld 11291 . . . . . . 7 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
3837recnd 11289 . . . . . 6 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
395, 38fsumcl 15769 . . . . 5 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
4039adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ+) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
41 eqidd 2738 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))))
42 eqidd 2738 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
434, 17, 40, 41, 42offval2 7717 . . 3 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))))
4413, 16, 40sub32d 11652 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)))
455, 11, 38fsumsub 15824 . . . . . . . 8 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
46 1cnd 11256 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
4736recnd 11289 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℂ)
4846, 47, 11subdird 11720 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − (1 − ( 1 ‘(𝐿𝑛)))) · ((Λ‘𝑛) / 𝑛)) = ((1 · ((Λ‘𝑛) / 𝑛)) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
49 ax-1cn 11213 . . . . . . . . . . . 12 1 ∈ ℂ
5034recnd 11289 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℂ)
51 nncan 11538 . . . . . . . . . . . 12 ((1 ∈ ℂ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℂ) → (1 − (1 − ( 1 ‘(𝐿𝑛)))) = ( 1 ‘(𝐿𝑛)))
5249, 50, 51sylancr 587 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − (1 − ( 1 ‘(𝐿𝑛)))) = ( 1 ‘(𝐿𝑛)))
5352oveq1d 7446 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − (1 − ( 1 ‘(𝐿𝑛)))) · ((Λ‘𝑛) / 𝑛)) = (( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5411mullidd 11279 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 · ((Λ‘𝑛) / 𝑛)) = ((Λ‘𝑛) / 𝑛))
5554oveq1d 7446 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 · ((Λ‘𝑛) / 𝑛)) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
5648, 53, 553eqtr3rd 2786 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5756sumeq2dv 15738 . . . . . . . 8 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5845, 57eqtr3d 2779 . . . . . . 7 (𝜑 → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5958oveq1d 7446 . . . . . 6 (𝜑 → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6059adantr 480 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6144, 60eqtrd 2777 . . . 4 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6261mpteq2dva 5242 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))))
6343, 62eqtrd 2777 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))))
64 vmadivsum 27526 . . 3 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
652a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
66 1red 11262 . . . 4 (𝜑 → 1 ∈ ℝ)
67 prmdvdsfi 27150 . . . . . 6 (𝑁 ∈ ℕ → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
6823, 67syl 17 . . . . 5 (𝜑 → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
69 elrabi 3687 . . . . . 6 (𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} → 𝑝 ∈ ℙ)
70 prmnn 16711 . . . . . . . . . 10 (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
7170adantl 481 . . . . . . . . 9 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ ℕ)
7271nnrpd 13075 . . . . . . . 8 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ ℝ+)
7372relogcld 26665 . . . . . . 7 ((𝜑𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ)
74 prmuz2 16733 . . . . . . . . 9 (𝑝 ∈ ℙ → 𝑝 ∈ (ℤ‘2))
7574adantl 481 . . . . . . . 8 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ (ℤ‘2))
76 uz2m1nn 12965 . . . . . . . 8 (𝑝 ∈ (ℤ‘2) → (𝑝 − 1) ∈ ℕ)
7775, 76syl 17 . . . . . . 7 ((𝜑𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℕ)
7873, 77nndivred 12320 . . . . . 6 ((𝜑𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
7969, 78sylan2 593 . . . . 5 ((𝜑𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
8068, 79fsumrecl 15770 . . . 4 (𝜑 → Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
81 fzfid 14014 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (1...(⌊‘𝑥)) ∈ Fin)
82 simpr 484 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) = 0)
83 0re 11263 . . . . . . . . . . 11 0 ∈ ℝ
8482, 83eqeltrdi 2849 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
85 eqid 2737 . . . . . . . . . . . 12 (Unit‘𝑍) = (Unit‘𝑍)
8623ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → 𝑁 ∈ ℕ)
87 rpvmasum.d . . . . . . . . . . . . . 14 𝐷 = (Base‘𝐺)
8819dchrabl 27298 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
89 ablgrp 19803 . . . . . . . . . . . . . . . 16 (𝐺 ∈ Abel → 𝐺 ∈ Grp)
9087, 21grpidcl 18983 . . . . . . . . . . . . . . . 16 (𝐺 ∈ Grp → 1𝐷)
9123, 88, 89, 904syl 19 . . . . . . . . . . . . . . 15 (𝜑1𝐷)
9291ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1𝐷)
9333adantlr 715 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐿𝑛) ∈ (Base‘𝑍))
9419, 20, 87, 22, 85, 92, 93dchrn0 27294 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (( 1 ‘(𝐿𝑛)) ≠ 0 ↔ (𝐿𝑛) ∈ (Unit‘𝑍)))
9594biimpa 476 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → (𝐿𝑛) ∈ (Unit‘𝑍))
9619, 20, 21, 85, 86, 95dchr1 27301 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) = 1)
9796, 18eqeltrdi 2849 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
9884, 97pm2.61dane 3029 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
9918, 98, 35sylancr 587 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
10010adantlr 715 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
10199, 100remulcld 11291 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
10281, 101fsumrecl 15770 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
103 0le1 11786 . . . . . . . . . . 11 0 ≤ 1
10482, 103eqbrtrdi 5182 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) ≤ 1)
10518leidi 11797 . . . . . . . . . . 11 1 ≤ 1
10696, 105eqbrtrdi 5182 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) ≤ 1)
107104, 106pm2.61dane 3029 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ≤ 1)
108 subge0 11776 . . . . . . . . . 10 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℝ) → (0 ≤ (1 − ( 1 ‘(𝐿𝑛))) ↔ ( 1 ‘(𝐿𝑛)) ≤ 1))
10918, 98, 108sylancr 587 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (0 ≤ (1 − ( 1 ‘(𝐿𝑛))) ↔ ( 1 ‘(𝐿𝑛)) ≤ 1))
110107, 109mpbird 257 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (1 − ( 1 ‘(𝐿𝑛))))
1119adantlr 715 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
1126adantl 481 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
113 vmage0 27164 . . . . . . . . . 10 (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
114112, 113syl 17 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (Λ‘𝑛))
115112nnred 12281 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
116112nngt0d 12315 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 < 𝑛)
117 divge0 12137 . . . . . . . . 9 ((((Λ‘𝑛) ∈ ℝ ∧ 0 ≤ (Λ‘𝑛)) ∧ (𝑛 ∈ ℝ ∧ 0 < 𝑛)) → 0 ≤ ((Λ‘𝑛) / 𝑛))
118111, 114, 115, 116, 117syl22anc 839 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((Λ‘𝑛) / 𝑛))
11999, 100, 110, 118mulge0d 11840 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
12081, 101, 119fsumge0 15831 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
121102, 120absidd 15461 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
12268adantr 480 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
123 inss2 4238 . . . . . . . . 9 ((0[,]𝑥) ∩ ℙ) ⊆ ℙ
124 rabss2 4078 . . . . . . . . 9 (((0[,]𝑥) ∩ ℙ) ⊆ ℙ → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ {𝑞 ∈ ℙ ∣ 𝑞𝑁})
125123, 124mp1i 13 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ {𝑞 ∈ ℙ ∣ 𝑞𝑁})
126122, 125ssfid 9301 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ∈ Fin)
127 ssrab2 4080 . . . . . . . . . 10 {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ((0[,]𝑥) ∩ ℙ)
128127, 123sstri 3993 . . . . . . . . 9 {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ℙ
129128sseli 3979 . . . . . . . 8 (𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} → 𝑝 ∈ ℙ)
13078adantlr 715 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
131129, 130sylan2 593 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
132126, 131fsumrecl 15770 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
13380adantr 480 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
134 2fveq3 6911 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → ( 1 ‘(𝐿𝑛)) = ( 1 ‘(𝐿‘(𝑝𝑘))))
135134oveq2d 7447 . . . . . . . . . 10 (𝑛 = (𝑝𝑘) → (1 − ( 1 ‘(𝐿𝑛))) = (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))))
136 fveq2 6906 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → (Λ‘𝑛) = (Λ‘(𝑝𝑘)))
137 id 22 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → 𝑛 = (𝑝𝑘))
138136, 137oveq12d 7449 . . . . . . . . . 10 (𝑛 = (𝑝𝑘) → ((Λ‘𝑛) / 𝑛) = ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
139135, 138oveq12d 7449 . . . . . . . . 9 (𝑛 = (𝑝𝑘) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
140 rpre 13043 . . . . . . . . . 10 (𝑥 ∈ ℝ+𝑥 ∈ ℝ)
141140ad2antrl 728 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
14238adantlr 715 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
143 simprr 773 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (Λ‘𝑛) = 0)
144143oveq1d 7446 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((Λ‘𝑛) / 𝑛) = (0 / 𝑛))
1456ad2antrl 728 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ∈ ℕ)
146145nncnd 12282 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ∈ ℂ)
147145nnne0d 12316 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ≠ 0)
148146, 147div0d 12042 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (0 / 𝑛) = 0)
149144, 148eqtrd 2777 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((Λ‘𝑛) / 𝑛) = 0)
150149oveq2d 7447 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = ((1 − ( 1 ‘(𝐿𝑛))) · 0))
15147ad2ant2r 747 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℂ)
152151mul01d 11460 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · 0) = 0)
153150, 152eqtrd 2777 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = 0)
154139, 141, 142, 153fsumvma2 27258 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = Σ𝑝 ∈ ((0[,]𝑥) ∩ ℙ)Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
155127a1i 11 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ((0[,]𝑥) ∩ ℙ))
156 fzfid 14014 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin)
15724ad2antrr 726 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1 :(Base‘𝑍)⟶ℝ)
15830ad2antrr 726 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝐿:ℤ⟶(Base‘𝑍))
15970ad2antrl 728 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℕ)
160 elfznn 13593 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) → 𝑘 ∈ ℕ)
161160ad2antll 729 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℕ)
162161nnnn0d 12587 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℕ0)
163159, 162nnexpcld 14284 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℕ)
164163nnzd 12640 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℤ)
165158, 164ffvelcdmd 7105 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝐿‘(𝑝𝑘)) ∈ (Base‘𝑍))
166157, 165ffvelcdmd 7105 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ)
167 resubcl 11573 . . . . . . . . . . . . . . 15 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ∈ ℝ)
16818, 166, 167sylancr 587 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ∈ ℝ)
169 vmacl 27161 . . . . . . . . . . . . . . . 16 ((𝑝𝑘) ∈ ℕ → (Λ‘(𝑝𝑘)) ∈ ℝ)
170163, 169syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) ∈ ℝ)
171170, 163nndivred 12320 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℝ)
172168, 171remulcld 11291 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
173172anassrs 467 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
174173recnd 11289 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
175156, 174fsumcl 15769 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
176129, 175sylan2 593 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
177 breq1 5146 . . . . . . . . . . . 12 (𝑞 = 𝑝 → (𝑞𝑁𝑝𝑁))
178177notbid 318 . . . . . . . . . . 11 (𝑞 = 𝑝 → (¬ 𝑞𝑁 ↔ ¬ 𝑝𝑁))
179 notrab 4322 . . . . . . . . . . 11 (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) = {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ ¬ 𝑞𝑁}
180178, 179elrab2 3695 . . . . . . . . . 10 (𝑝 ∈ (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) ↔ (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) ∧ ¬ 𝑝𝑁))
181123sseli 3979 . . . . . . . . . . 11 (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) → 𝑝 ∈ ℙ)
18223ad3antrrr 730 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℕ)
183 simplrr 778 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ¬ 𝑝𝑁)
184 simplrl 777 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑝 ∈ ℙ)
185182nnzd 12640 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℤ)
186 coprm 16748 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑝 ∈ ℙ ∧ 𝑁 ∈ ℤ) → (¬ 𝑝𝑁 ↔ (𝑝 gcd 𝑁) = 1))
187184, 185, 186syl2anc 584 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (¬ 𝑝𝑁 ↔ (𝑝 gcd 𝑁) = 1))
188183, 187mpbid 232 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝 gcd 𝑁) = 1)
189 prmz 16712 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
190184, 189syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑝 ∈ ℤ)
191160adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑘 ∈ ℕ)
192191nnnn0d 12587 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑘 ∈ ℕ0)
193 rpexp1i 16760 . . . . . . . . . . . . . . . . . . . . 21 ((𝑝 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑘 ∈ ℕ0) → ((𝑝 gcd 𝑁) = 1 → ((𝑝𝑘) gcd 𝑁) = 1))
194190, 185, 192, 193syl3anc 1373 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝑝 gcd 𝑁) = 1 → ((𝑝𝑘) gcd 𝑁) = 1))
195188, 194mpd 15 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝑝𝑘) gcd 𝑁) = 1)
196182nnnn0d 12587 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℕ0)
197164anassrs 467 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝𝑘) ∈ ℤ)
198197adantlrr 721 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝𝑘) ∈ ℤ)
19920, 85, 27znunit 21582 . . . . . . . . . . . . . . . . . . . 20 ((𝑁 ∈ ℕ0 ∧ (𝑝𝑘) ∈ ℤ) → ((𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍) ↔ ((𝑝𝑘) gcd 𝑁) = 1))
200196, 198, 199syl2anc 584 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍) ↔ ((𝑝𝑘) gcd 𝑁) = 1))
201195, 200mpbird 257 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍))
20219, 20, 21, 85, 182, 201dchr1 27301 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 1)
203202oveq2d 7447 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) = (1 − 1))
204 1m1e0 12338 . . . . . . . . . . . . . . . 16 (1 − 1) = 0
205203, 204eqtrdi 2793 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) = 0)
206205oveq1d 7446 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = (0 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
207171recnd 11289 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
208207anassrs 467 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
209208adantlrr 721 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
210209mul02d 11459 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (0 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
211206, 210eqtrd 2777 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
212211sumeq2dv 15738 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))0)
213 fzfid 14014 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin)
214213olcd 875 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → ((1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ⊆ (ℤ‘1) ∨ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin))
215 sumz 15758 . . . . . . . . . . . . 13 (((1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ⊆ (ℤ‘1) ∨ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))0 = 0)
216214, 215syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))0 = 0)
217212, 216eqtrd 2777 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
218181, 217sylanr1 682 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
219180, 218sylan2b 594 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁})) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
220 ppifi 27149 . . . . . . . . . 10 (𝑥 ∈ ℝ → ((0[,]𝑥) ∩ ℙ) ∈ Fin)
221141, 220syl 17 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((0[,]𝑥) ∩ ℙ) ∈ Fin)
222155, 176, 219, 221fsumss 15761 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = Σ𝑝 ∈ ((0[,]𝑥) ∩ ℙ)Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
223154, 222eqtr4d 2780 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
224156, 173fsumrecl 15770 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
225129, 224sylan2 593 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
22673adantlr 715 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ)
22770adantl 481 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℕ)
228227nnrecred 12317 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℝ)
229227nnrpd 13075 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ+)
230229rpreccld 13087 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℝ+)
231 simplrl 777 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑥 ∈ ℝ+)
232231relogcld 26665 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑥) ∈ ℝ)
233227nnred 12281 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ)
23474adantl 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ (ℤ‘2))
235 eluz2gt1 12962 . . . . . . . . . . . . . . . . . . . 20 (𝑝 ∈ (ℤ‘2) → 1 < 𝑝)
236234, 235syl 17 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 < 𝑝)
237233, 236rplogcld 26671 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ+)
238232, 237rerpdivcld 13108 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑥) / (log‘𝑝)) ∈ ℝ)
239238flcld 13838 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℤ)
240239peano2zd 12725 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℤ)
241230, 240rpexpcld 14286 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ∈ ℝ+)
242241rpred 13077 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ∈ ℝ)
243228, 242resubcld 11691 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ∈ ℝ)
244234, 76syl 17 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℕ)
245244nnrpd 13075 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℝ+)
246245, 229rpdivcld 13094 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) / 𝑝) ∈ ℝ+)
247243, 246rerpdivcld 13108 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ∈ ℝ)
248226, 247remulcld 11291 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ∈ ℝ)
249170recnd 11289 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) ∈ ℂ)
250163nncnd 12282 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℂ)
251163nnne0d 12316 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ≠ 0)
252249, 250, 251divrecd 12046 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) = ((Λ‘(𝑝𝑘)) · (1 / (𝑝𝑘))))
253 simprl 771 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℙ)
254 vmappw 27159 . . . . . . . . . . . . . . . . 17 ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) → (Λ‘(𝑝𝑘)) = (log‘𝑝))
255253, 161, 254syl2anc 584 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) = (log‘𝑝))
256159nncnd 12282 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℂ)
257159nnne0d 12316 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ≠ 0)
258 elfzelz 13564 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) → 𝑘 ∈ ℤ)
259258ad2antll 729 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℤ)
260256, 257, 259exprecd 14194 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) = (1 / (𝑝𝑘)))
261260eqcomd 2743 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 / (𝑝𝑘)) = ((1 / 𝑝)↑𝑘))
262255, 261oveq12d 7449 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) · (1 / (𝑝𝑘))) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
263252, 262eqtrd 2777 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
264263, 171eqeltrrd 2842 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((log‘𝑝) · ((1 / 𝑝)↑𝑘)) ∈ ℝ)
265264anassrs 467 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((log‘𝑝) · ((1 / 𝑝)↑𝑘)) ∈ ℝ)
266 1red 11262 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1 ∈ ℝ)
267 vmage0 27164 . . . . . . . . . . . . . . . . 17 ((𝑝𝑘) ∈ ℕ → 0 ≤ (Λ‘(𝑝𝑘)))
268163, 267syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ (Λ‘(𝑝𝑘)))
269163nnred 12281 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℝ)
270163nngt0d 12315 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 < (𝑝𝑘))
271 divge0 12137 . . . . . . . . . . . . . . . 16 ((((Λ‘(𝑝𝑘)) ∈ ℝ ∧ 0 ≤ (Λ‘(𝑝𝑘))) ∧ ((𝑝𝑘) ∈ ℝ ∧ 0 < (𝑝𝑘))) → 0 ≤ ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
272170, 268, 269, 270, 271syl22anc 839 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
27383leidi 11797 . . . . . . . . . . . . . . . . . 18 0 ≤ 0
274 simpr 484 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) = 0) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 0)
275273, 274breqtrrid 5181 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) = 0) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
27623ad3antrrr 730 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → 𝑁 ∈ ℕ)
27791ad2antrr 726 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1𝐷)
27819, 20, 87, 22, 85, 277, 165dchrn0 27294 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0 ↔ (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍)))
279278biimpa 476 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍))
28019, 20, 21, 85, 276, 279dchr1 27301 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 1)
281103, 280breqtrrid 5181 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
282275, 281pm2.61dane 3029 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
283 subge02 11779 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ) → (0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))) ↔ (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1))
28418, 166, 283sylancr 587 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))) ↔ (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1))
285282, 284mpbid 232 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1)
286168, 266, 171, 272, 285lemul1ad 12207 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
287207mullidd 11279 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
288287, 263eqtrd 2777 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
289286, 288breqtrd 5169 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
290289anassrs 467 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
291156, 173, 265, 290fsumle 15835 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
292226recnd 11289 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℂ)
293159nnrecred 12317 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 / 𝑝) ∈ ℝ)
294293, 162reexpcld 14203 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) ∈ ℝ)
295294recnd 11289 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) ∈ ℂ)
296295anassrs 467 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 / 𝑝)↑𝑘) ∈ ℂ)
297156, 292, 296fsummulc2 15820 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘)) = Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
298 fzval3 13773 . . . . . . . . . . . . . . . 16 ((⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℤ → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) = (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
299239, 298syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) = (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
300299sumeq1d 15736 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘) = Σ𝑘 ∈ (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))((1 / 𝑝)↑𝑘))
301228recnd 11289 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℂ)
302227nngt0d 12315 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 < 𝑝)
303 recgt1 12164 . . . . . . . . . . . . . . . . . 18 ((𝑝 ∈ ℝ ∧ 0 < 𝑝) → (1 < 𝑝 ↔ (1 / 𝑝) < 1))
304233, 302, 303syl2anc 584 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 < 𝑝 ↔ (1 / 𝑝) < 1))
305236, 304mpbid 232 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) < 1)
306228, 305ltned 11397 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ≠ 1)
307 1nn0 12542 . . . . . . . . . . . . . . . 16 1 ∈ ℕ0
308307a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 ∈ ℕ0)
309 log1 26627 . . . . . . . . . . . . . . . . . . . . 21 (log‘1) = 0
310 simprr 773 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
311 1rp 13038 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℝ+
312 simprl 771 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ+)
313 logleb 26645 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℝ+𝑥 ∈ ℝ+) → (1 ≤ 𝑥 ↔ (log‘1) ≤ (log‘𝑥)))
314311, 312, 313sylancr 587 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (1 ≤ 𝑥 ↔ (log‘1) ≤ (log‘𝑥)))
315310, 314mpbid 232 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (log‘1) ≤ (log‘𝑥))
316309, 315eqbrtrrid 5179 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 ≤ (log‘𝑥))
317316adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ (log‘𝑥))
318232, 237, 317divge0d 13117 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((log‘𝑥) / (log‘𝑝)))
319 flge0nn0 13860 . . . . . . . . . . . . . . . . . 18 ((((log‘𝑥) / (log‘𝑝)) ∈ ℝ ∧ 0 ≤ ((log‘𝑥) / (log‘𝑝))) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0)
320238, 318, 319syl2anc 584 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0)
321 nn0p1nn 12565 . . . . . . . . . . . . . . . . 17 ((⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0 → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℕ)
322320, 321syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℕ)
323 nnuz 12921 . . . . . . . . . . . . . . . 16 ℕ = (ℤ‘1)
324322, 323eleqtrdi 2851 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ (ℤ‘1))
325301, 306, 308, 324geoserg 15902 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))((1 / 𝑝)↑𝑘) = ((((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / (1 − (1 / 𝑝))))
326301exp1d 14181 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑1) = (1 / 𝑝))
327326oveq1d 7446 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) = ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))))
328227nncnd 12282 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℂ)
329 1cnd 11256 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 ∈ ℂ)
330229rpcnne0d 13086 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0))
331 divsubdir 11961 . . . . . . . . . . . . . . . . 17 ((𝑝 ∈ ℂ ∧ 1 ∈ ℂ ∧ (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0)) → ((𝑝 − 1) / 𝑝) = ((𝑝 / 𝑝) − (1 / 𝑝)))
332328, 329, 330, 331syl3anc 1373 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) / 𝑝) = ((𝑝 / 𝑝) − (1 / 𝑝)))
333 divid 11953 . . . . . . . . . . . . . . . . . 18 ((𝑝 ∈ ℂ ∧ 𝑝 ≠ 0) → (𝑝 / 𝑝) = 1)
334330, 333syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 / 𝑝) = 1)
335334oveq1d 7446 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 / 𝑝) − (1 / 𝑝)) = (1 − (1 / 𝑝)))
336332, 335eqtr2d 2778 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 − (1 / 𝑝)) = ((𝑝 − 1) / 𝑝))
337327, 336oveq12d 7449 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / (1 − (1 / 𝑝))) = (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)))
338300, 325, 3373eqtrd 2781 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘) = (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)))
339338oveq2d 7447 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘)) = ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
340297, 339eqtr3d 2779 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)) = ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
341291, 340breqtrd 5169 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
342241rpge0d 13081 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
343228, 242subge02d 11855 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (0 ≤ ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ↔ ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (1 / 𝑝)))
344342, 343mpbid 232 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (1 / 𝑝))
345245rpcnne0d 13086 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) ∈ ℂ ∧ (𝑝 − 1) ≠ 0))
346 dmdcan 11977 . . . . . . . . . . . . . . 15 ((((𝑝 − 1) ∈ ℂ ∧ (𝑝 − 1) ≠ 0) ∧ (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0) ∧ 1 ∈ ℂ) → (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))) = (1 / 𝑝))
347345, 330, 329, 346syl3anc 1373 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))) = (1 / 𝑝))
348344, 347breqtrrd 5171 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))))
349244nnrecred 12317 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / (𝑝 − 1)) ∈ ℝ)
350243, 349, 246ledivmuld 13130 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)) ↔ ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1)))))
351348, 350mpbird 257 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)))
352247, 349, 237lemul2d 13121 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)) ↔ ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) · (1 / (𝑝 − 1)))))
353351, 352mpbid 232 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) · (1 / (𝑝 − 1))))
354244nncnd 12282 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℂ)
355244nnne0d 12316 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ≠ 0)
356292, 354, 355divrecd 12046 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) = ((log‘𝑝) · (1 / (𝑝 − 1))))
357353, 356breqtrrd 5171 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) / (𝑝 − 1)))
358224, 248, 130, 341, 357letrd 11418 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) / (𝑝 − 1)))
359129, 358sylan2 593 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) / (𝑝 − 1)))
360126, 225, 131, 359fsumle 15835 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
361223, 360eqbrtrd 5165 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ≤ Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
36279adantlr 715 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
363237, 245rpdivcld 13094 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ+)
364363rpge0d 13081 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((log‘𝑝) / (𝑝 − 1)))
36569, 364sylan2 593 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → 0 ≤ ((log‘𝑝) / (𝑝 − 1)))
366122, 362, 365, 125fsumless 15832 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
367102, 132, 133, 361, 366letrd 11418 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
368121, 367eqbrtrd 5165 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
36965, 40, 66, 80, 368elo1d 15572 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ∈ 𝑂(1))
370 o1sub 15652 . . 3 (((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1) ∧ (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ∈ 𝑂(1)) → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) ∈ 𝑂(1))
37164, 369, 370sylancr 587 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) ∈ 𝑂(1))
37263, 371eqeltrrd 2842 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 848   = wceq 1540  wcel 2108  wne 2940  {crab 3436  Vcvv 3480  cdif 3948  cin 3950  wss 3951   class class class wbr 5143  cmpt 5225  wf 6557  ontowfo 6559  cfv 6561  (class class class)co 7431  f cof 7695  Fincfn 8985  cc 11153  cr 11154  0cc0 11155  1c1 11156   + caddc 11158   · cmul 11160   < clt 11295  cle 11296  cmin 11492   / cdiv 11920  cn 12266  2c2 12321  0cn0 12526  cz 12613  cuz 12878  +crp 13034  [,]cicc 13390  ...cfz 13547  ..^cfzo 13694  cfl 13830  cexp 14102  abscabs 15273  𝑂(1)co1 15522  Σcsu 15722  cdvds 16290   gcd cgcd 16531  cprime 16708  Basecbs 17247  0gc0g 17484  Grpcgrp 18951  Abelcabl 19799  Unitcui 20355  ℤRHomczrh 21510  ℤ/nczn 21513  logclog 26596  Λcvma 27135  DChrcdchr 27276
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5279  ax-sep 5296  ax-nul 5306  ax-pow 5365  ax-pr 5432  ax-un 7755  ax-inf2 9681  ax-cnex 11211  ax-resscn 11212  ax-1cn 11213  ax-icn 11214  ax-addcl 11215  ax-addrcl 11216  ax-mulcl 11217  ax-mulrcl 11218  ax-mulcom 11219  ax-addass 11220  ax-mulass 11221  ax-distr 11222  ax-i2m1 11223  ax-1ne0 11224  ax-1rid 11225  ax-rnegex 11226  ax-rrecex 11227  ax-cnre 11228  ax-pre-lttri 11229  ax-pre-lttrn 11230  ax-pre-ltadd 11231  ax-pre-mulgt0 11232  ax-pre-sup 11233  ax-addf 11234  ax-mulf 11235
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3380  df-reu 3381  df-rab 3437  df-v 3482  df-sbc 3789  df-csb 3900  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-pss 3971  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-tp 4631  df-op 4633  df-uni 4908  df-int 4947  df-iun 4993  df-iin 4994  df-br 5144  df-opab 5206  df-mpt 5226  df-tr 5260  df-id 5578  df-eprel 5584  df-po 5592  df-so 5593  df-fr 5637  df-se 5638  df-we 5639  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-pred 6321  df-ord 6387  df-on 6388  df-lim 6389  df-suc 6390  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-isom 6570  df-riota 7388  df-ov 7434  df-oprab 7435  df-mpo 7436  df-of 7697  df-om 7888  df-1st 8014  df-2nd 8015  df-supp 8186  df-tpos 8251  df-frecs 8306  df-wrecs 8337  df-recs 8411  df-rdg 8450  df-1o 8506  df-2o 8507  df-oadd 8510  df-er 8745  df-ec 8747  df-qs 8751  df-map 8868  df-pm 8869  df-ixp 8938  df-en 8986  df-dom 8987  df-sdom 8988  df-fin 8989  df-fsupp 9402  df-fi 9451  df-sup 9482  df-inf 9483  df-oi 9550  df-dju 9941  df-card 9979  df-pnf 11297  df-mnf 11298  df-xr 11299  df-ltxr 11300  df-le 11301  df-sub 11494  df-neg 11495  df-div 11921  df-nn 12267  df-2 12329  df-3 12330  df-4 12331  df-5 12332  df-6 12333  df-7 12334  df-8 12335  df-9 12336  df-n0 12527  df-xnn0 12600  df-z 12614  df-dec 12734  df-uz 12879  df-q 12991  df-rp 13035  df-xneg 13154  df-xadd 13155  df-xmul 13156  df-ioo 13391  df-ioc 13392  df-ico 13393  df-icc 13394  df-fz 13548  df-fzo 13695  df-fl 13832  df-mod 13910  df-seq 14043  df-exp 14103  df-fac 14313  df-bc 14342  df-hash 14370  df-shft 15106  df-cj 15138  df-re 15139  df-im 15140  df-sqrt 15274  df-abs 15275  df-limsup 15507  df-clim 15524  df-rlim 15525  df-o1 15526  df-lo1 15527  df-sum 15723  df-ef 16103  df-e 16104  df-sin 16105  df-cos 16106  df-pi 16108  df-dvds 16291  df-gcd 16532  df-prm 16709  df-pc 16875  df-struct 17184  df-sets 17201  df-slot 17219  df-ndx 17231  df-base 17248  df-ress 17275  df-plusg 17310  df-mulr 17311  df-starv 17312  df-sca 17313  df-vsca 17314  df-ip 17315  df-tset 17316  df-ple 17317  df-ds 17319  df-unif 17320  df-hom 17321  df-cco 17322  df-rest 17467  df-topn 17468  df-0g 17486  df-gsum 17487  df-topgen 17488  df-pt 17489  df-prds 17492  df-xrs 17547  df-qtop 17552  df-imas 17553  df-qus 17554  df-xps 17555  df-mre 17629  df-mrc 17630  df-acs 17632  df-mgm 18653  df-sgrp 18732  df-mnd 18748  df-mhm 18796  df-submnd 18797  df-grp 18954  df-minusg 18955  df-sbg 18956  df-mulg 19086  df-subg 19141  df-nsg 19142  df-eqg 19143  df-ghm 19231  df-cntz 19335  df-cmn 19800  df-abl 19801  df-mgp 20138  df-rng 20150  df-ur 20179  df-ring 20232  df-cring 20233  df-oppr 20334  df-dvdsr 20357  df-unit 20358  df-invr 20388  df-rhm 20472  df-subrng 20546  df-subrg 20570  df-lmod 20860  df-lss 20930  df-lsp 20970  df-sra 21172  df-rgmod 21173  df-lidl 21218  df-rsp 21219  df-2idl 21260  df-psmet 21356  df-xmet 21357  df-met 21358  df-bl 21359  df-mopn 21360  df-fbas 21361  df-fg 21362  df-cnfld 21365  df-zring 21458  df-zrh 21514  df-zn 21517  df-top 22900  df-topon 22917  df-topsp 22939  df-bases 22953  df-cld 23027  df-ntr 23028  df-cls 23029  df-nei 23106  df-lp 23144  df-perf 23145  df-cn 23235  df-cnp 23236  df-haus 23323  df-cmp 23395  df-tx 23570  df-hmeo 23763  df-fil 23854  df-fm 23946  df-flim 23947  df-flf 23948  df-xms 24330  df-ms 24331  df-tms 24332  df-cncf 24904  df-limc 25901  df-dv 25902  df-log 26598  df-cxp 26599  df-cht 27140  df-vma 27141  df-chp 27142  df-ppi 27143  df-dchr 27277
This theorem is referenced by:  rpvmasum2  27556
  Copyright terms: Public domain W3C validator