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

Theorem rpvmasumlem 26050
Description: Lemma for rpvmasum 26089. 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 10606 . . . . . 6 ℝ ∈ V
2 rpssre 12375 . . . . . 6 + ⊆ ℝ
31, 2ssexi 5202 . . . . 5 + ∈ V
43a1i 11 . . . 4 (𝜑 → ℝ+ ∈ V)
5 fzfid 13325 . . . . . . 7 (𝜑 → (1...(⌊‘𝑥)) ∈ Fin)
6 elfznn 12920 . . . . . . . . . . 11 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
76adantl 484 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
8 vmacl 25682 . . . . . . . . . 10 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
97, 8syl 17 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
109, 7nndivred 11670 . . . . . . . 8 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
1110recnd 10647 . . . . . . 7 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℂ)
125, 11fsumcl 15070 . . . . . 6 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
1312adantr 483 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
14 relogcl 25146 . . . . . . 7 (𝑥 ∈ ℝ+ → (log‘𝑥) ∈ ℝ)
1514adantl 484 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (log‘𝑥) ∈ ℝ)
1615recnd 10647 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (log‘𝑥) ∈ ℂ)
1713, 16subcld 10975 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℂ)
18 1re 10619 . . . . . . . . 9 1 ∈ ℝ
19 rpvmasum.g . . . . . . . . . . . 12 𝐺 = (DChr‘𝑁)
20 rpvmasum.z . . . . . . . . . . . 12 𝑍 = (ℤ/nℤ‘𝑁)
21 rpvmasum.1 . . . . . . . . . . . 12 1 = (0g𝐺)
22 eqid 2820 . . . . . . . . . . . 12 (Base‘𝑍) = (Base‘𝑍)
23 rpvmasum.a . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℕ)
2419, 20, 21, 22, 23dchr1re 25826 . . . . . . . . . . 11 (𝜑1 :(Base‘𝑍)⟶ℝ)
2524adantr 483 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 1 :(Base‘𝑍)⟶ℝ)
2623nnnn0d 11934 . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℕ0)
27 rpvmasum.l . . . . . . . . . . . . 13 𝐿 = (ℤRHom‘𝑍)
2820, 22, 27znzrhfo 20670 . . . . . . . . . . . 12 (𝑁 ∈ ℕ0𝐿:ℤ–onto→(Base‘𝑍))
29 fof 6566 . . . . . . . . . . . 12 (𝐿:ℤ–onto→(Base‘𝑍) → 𝐿:ℤ⟶(Base‘𝑍))
3026, 28, 293syl 18 . . . . . . . . . . 11 (𝜑𝐿:ℤ⟶(Base‘𝑍))
31 elfzelz 12892 . . . . . . . . . . 11 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℤ)
32 ffvelrn 6825 . . . . . . . . . . 11 ((𝐿:ℤ⟶(Base‘𝑍) ∧ 𝑛 ∈ ℤ) → (𝐿𝑛) ∈ (Base‘𝑍))
3330, 31, 32syl2an 597 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (𝐿𝑛) ∈ (Base‘𝑍))
3425, 33ffvelrnd 6828 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
35 resubcl 10928 . . . . . . . . 9 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℝ) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
3618, 34, 35sylancr 589 . . . . . . . 8 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
3736, 10remulcld 10649 . . . . . . 7 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
3837recnd 10647 . . . . . 6 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
395, 38fsumcl 15070 . . . . 5 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
4039adantr 483 . . . 4 ((𝜑𝑥 ∈ ℝ+) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
41 eqidd 2821 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))))
42 eqidd 2821 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
434, 17, 40, 41, 42offval2 7404 . . 3 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))))
4413, 16, 40sub32d 11007 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)))
455, 11, 38fsumsub 15123 . . . . . . . 8 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
46 1cnd 10614 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
4736recnd 10647 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℂ)
4846, 47, 11subdird 11075 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − (1 − ( 1 ‘(𝐿𝑛)))) · ((Λ‘𝑛) / 𝑛)) = ((1 · ((Λ‘𝑛) / 𝑛)) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
49 ax-1cn 10573 . . . . . . . . . . . 12 1 ∈ ℂ
5034recnd 10647 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℂ)
51 nncan 10893 . . . . . . . . . . . 12 ((1 ∈ ℂ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℂ) → (1 − (1 − ( 1 ‘(𝐿𝑛)))) = ( 1 ‘(𝐿𝑛)))
5249, 50, 51sylancr 589 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − (1 − ( 1 ‘(𝐿𝑛)))) = ( 1 ‘(𝐿𝑛)))
5352oveq1d 7148 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − (1 − ( 1 ‘(𝐿𝑛)))) · ((Λ‘𝑛) / 𝑛)) = (( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5411mulid2d 10637 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 · ((Λ‘𝑛) / 𝑛)) = ((Λ‘𝑛) / 𝑛))
5554oveq1d 7148 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 · ((Λ‘𝑛) / 𝑛)) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
5648, 53, 553eqtr3rd 2864 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5756sumeq2dv 15040 . . . . . . . 8 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5845, 57eqtr3d 2857 . . . . . . 7 (𝜑 → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5958oveq1d 7148 . . . . . 6 (𝜑 → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6059adantr 483 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6144, 60eqtrd 2855 . . . 4 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6261mpteq2dva 5137 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))))
6343, 62eqtrd 2855 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))))
64 vmadivsum 26045 . . 3 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
652a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
66 1red 10620 . . . 4 (𝜑 → 1 ∈ ℝ)
67 prmdvdsfi 25671 . . . . . 6 (𝑁 ∈ ℕ → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
6823, 67syl 17 . . . . 5 (𝜑 → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
69 elrabi 3655 . . . . . 6 (𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} → 𝑝 ∈ ℙ)
70 prmnn 15996 . . . . . . . . . 10 (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
7170adantl 484 . . . . . . . . 9 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ ℕ)
7271nnrpd 12408 . . . . . . . 8 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ ℝ+)
7372relogcld 25193 . . . . . . 7 ((𝜑𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ)
74 prmuz2 16018 . . . . . . . . 9 (𝑝 ∈ ℙ → 𝑝 ∈ (ℤ‘2))
7574adantl 484 . . . . . . . 8 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ (ℤ‘2))
76 uz2m1nn 12302 . . . . . . . 8 (𝑝 ∈ (ℤ‘2) → (𝑝 − 1) ∈ ℕ)
7775, 76syl 17 . . . . . . 7 ((𝜑𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℕ)
7873, 77nndivred 11670 . . . . . 6 ((𝜑𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
7969, 78sylan2 594 . . . . 5 ((𝜑𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
8068, 79fsumrecl 15071 . . . 4 (𝜑 → Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
81 fzfid 13325 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (1...(⌊‘𝑥)) ∈ Fin)
82 simpr 487 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) = 0)
83 0re 10621 . . . . . . . . . . 11 0 ∈ ℝ
8482, 83eqeltrdi 2919 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
85 eqid 2820 . . . . . . . . . . . 12 (Unit‘𝑍) = (Unit‘𝑍)
8623ad3antrrr 728 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → 𝑁 ∈ ℕ)
87 rpvmasum.d . . . . . . . . . . . . . 14 𝐷 = (Base‘𝐺)
8819dchrabl 25817 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
89 ablgrp 18890 . . . . . . . . . . . . . . . 16 (𝐺 ∈ Abel → 𝐺 ∈ Grp)
9087, 21grpidcl 18110 . . . . . . . . . . . . . . . 16 (𝐺 ∈ Grp → 1𝐷)
9123, 88, 89, 904syl 19 . . . . . . . . . . . . . . 15 (𝜑1𝐷)
9291ad2antrr 724 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1𝐷)
9333adantlr 713 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐿𝑛) ∈ (Base‘𝑍))
9419, 20, 87, 22, 85, 92, 93dchrn0 25813 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (( 1 ‘(𝐿𝑛)) ≠ 0 ↔ (𝐿𝑛) ∈ (Unit‘𝑍)))
9594biimpa 479 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → (𝐿𝑛) ∈ (Unit‘𝑍))
9619, 20, 21, 85, 86, 95dchr1 25820 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) = 1)
9796, 18eqeltrdi 2919 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
9884, 97pm2.61dane 3093 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
9918, 98, 35sylancr 589 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
10010adantlr 713 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
10199, 100remulcld 10649 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
10281, 101fsumrecl 15071 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
103 0le1 11141 . . . . . . . . . . 11 0 ≤ 1
10482, 103eqbrtrdi 5081 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) ≤ 1)
10518leidi 11152 . . . . . . . . . . 11 1 ≤ 1
10696, 105eqbrtrdi 5081 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) ≤ 1)
107104, 106pm2.61dane 3093 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ≤ 1)
108 subge0 11131 . . . . . . . . . 10 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℝ) → (0 ≤ (1 − ( 1 ‘(𝐿𝑛))) ↔ ( 1 ‘(𝐿𝑛)) ≤ 1))
10918, 98, 108sylancr 589 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (0 ≤ (1 − ( 1 ‘(𝐿𝑛))) ↔ ( 1 ‘(𝐿𝑛)) ≤ 1))
110107, 109mpbird 259 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (1 − ( 1 ‘(𝐿𝑛))))
1119adantlr 713 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
1126adantl 484 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
113 vmage0 25685 . . . . . . . . . 10 (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
114112, 113syl 17 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (Λ‘𝑛))
115112nnred 11631 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
116112nngt0d 11665 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 < 𝑛)
117 divge0 11487 . . . . . . . . 9 ((((Λ‘𝑛) ∈ ℝ ∧ 0 ≤ (Λ‘𝑛)) ∧ (𝑛 ∈ ℝ ∧ 0 < 𝑛)) → 0 ≤ ((Λ‘𝑛) / 𝑛))
118111, 114, 115, 116, 117syl22anc 836 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((Λ‘𝑛) / 𝑛))
11999, 100, 110, 118mulge0d 11195 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
12081, 101, 119fsumge0 15130 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
121102, 120absidd 14762 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
12268adantr 483 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
123 inss2 4184 . . . . . . . . 9 ((0[,]𝑥) ∩ ℙ) ⊆ ℙ
124 rabss2 4033 . . . . . . . . 9 (((0[,]𝑥) ∩ ℙ) ⊆ ℙ → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ {𝑞 ∈ ℙ ∣ 𝑞𝑁})
125123, 124mp1i 13 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ {𝑞 ∈ ℙ ∣ 𝑞𝑁})
126122, 125ssfid 8719 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ∈ Fin)
127 ssrab2 4035 . . . . . . . . . 10 {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ((0[,]𝑥) ∩ ℙ)
128127, 123sstri 3955 . . . . . . . . 9 {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ℙ
129128sseli 3942 . . . . . . . 8 (𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} → 𝑝 ∈ ℙ)
13078adantlr 713 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
131129, 130sylan2 594 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
132126, 131fsumrecl 15071 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
13380adantr 483 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
134 2fveq3 6651 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → ( 1 ‘(𝐿𝑛)) = ( 1 ‘(𝐿‘(𝑝𝑘))))
135134oveq2d 7149 . . . . . . . . . 10 (𝑛 = (𝑝𝑘) → (1 − ( 1 ‘(𝐿𝑛))) = (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))))
136 fveq2 6646 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → (Λ‘𝑛) = (Λ‘(𝑝𝑘)))
137 id 22 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → 𝑛 = (𝑝𝑘))
138136, 137oveq12d 7151 . . . . . . . . . 10 (𝑛 = (𝑝𝑘) → ((Λ‘𝑛) / 𝑛) = ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
139135, 138oveq12d 7151 . . . . . . . . 9 (𝑛 = (𝑝𝑘) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
140 rpre 12376 . . . . . . . . . 10 (𝑥 ∈ ℝ+𝑥 ∈ ℝ)
141140ad2antrl 726 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
14238adantlr 713 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
143 simprr 771 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (Λ‘𝑛) = 0)
144143oveq1d 7148 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((Λ‘𝑛) / 𝑛) = (0 / 𝑛))
1456ad2antrl 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ∈ ℕ)
146145nncnd 11632 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ∈ ℂ)
147145nnne0d 11666 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ≠ 0)
148146, 147div0d 11393 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (0 / 𝑛) = 0)
149144, 148eqtrd 2855 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((Λ‘𝑛) / 𝑛) = 0)
150149oveq2d 7149 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = ((1 − ( 1 ‘(𝐿𝑛))) · 0))
15147ad2ant2r 745 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℂ)
152151mul01d 10817 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · 0) = 0)
153150, 152eqtrd 2855 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = 0)
154139, 141, 142, 153fsumvma2 25777 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = Σ𝑝 ∈ ((0[,]𝑥) ∩ ℙ)Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
155127a1i 11 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ((0[,]𝑥) ∩ ℙ))
156 fzfid 13325 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin)
15724ad2antrr 724 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1 :(Base‘𝑍)⟶ℝ)
15830ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝐿:ℤ⟶(Base‘𝑍))
15970ad2antrl 726 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℕ)
160 elfznn 12920 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) → 𝑘 ∈ ℕ)
161160ad2antll 727 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℕ)
162161nnnn0d 11934 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℕ0)
163159, 162nnexpcld 13591 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℕ)
164163nnzd 12065 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℤ)
165158, 164ffvelrnd 6828 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝐿‘(𝑝𝑘)) ∈ (Base‘𝑍))
166157, 165ffvelrnd 6828 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ)
167 resubcl 10928 . . . . . . . . . . . . . . 15 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ∈ ℝ)
16818, 166, 167sylancr 589 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ∈ ℝ)
169 vmacl 25682 . . . . . . . . . . . . . . . 16 ((𝑝𝑘) ∈ ℕ → (Λ‘(𝑝𝑘)) ∈ ℝ)
170163, 169syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) ∈ ℝ)
171170, 163nndivred 11670 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℝ)
172168, 171remulcld 10649 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
173172anassrs 470 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
174173recnd 10647 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
175156, 174fsumcl 15070 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
176129, 175sylan2 594 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
177 breq1 5045 . . . . . . . . . . . 12 (𝑞 = 𝑝 → (𝑞𝑁𝑝𝑁))
178177notbid 320 . . . . . . . . . . 11 (𝑞 = 𝑝 → (¬ 𝑞𝑁 ↔ ¬ 𝑝𝑁))
179 notrab 4258 . . . . . . . . . . 11 (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) = {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ ¬ 𝑞𝑁}
180178, 179elrab2 3663 . . . . . . . . . 10 (𝑝 ∈ (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) ↔ (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) ∧ ¬ 𝑝𝑁))
181123sseli 3942 . . . . . . . . . . 11 (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) → 𝑝 ∈ ℙ)
18223ad3antrrr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℕ)
183 simplrr 776 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ¬ 𝑝𝑁)
184 simplrl 775 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑝 ∈ ℙ)
185182nnzd 12065 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℤ)
186 coprm 16033 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑝 ∈ ℙ ∧ 𝑁 ∈ ℤ) → (¬ 𝑝𝑁 ↔ (𝑝 gcd 𝑁) = 1))
187184, 185, 186syl2anc 586 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (¬ 𝑝𝑁 ↔ (𝑝 gcd 𝑁) = 1))
188183, 187mpbid 234 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝 gcd 𝑁) = 1)
189 prmz 15997 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
190184, 189syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑝 ∈ ℤ)
191160adantl 484 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑘 ∈ ℕ)
192191nnnn0d 11934 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑘 ∈ ℕ0)
193 rpexp1i 16043 . . . . . . . . . . . . . . . . . . . . 21 ((𝑝 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑘 ∈ ℕ0) → ((𝑝 gcd 𝑁) = 1 → ((𝑝𝑘) gcd 𝑁) = 1))
194190, 185, 192, 193syl3anc 1367 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝑝 gcd 𝑁) = 1 → ((𝑝𝑘) gcd 𝑁) = 1))
195188, 194mpd 15 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝑝𝑘) gcd 𝑁) = 1)
196182nnnn0d 11934 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℕ0)
197164anassrs 470 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝𝑘) ∈ ℤ)
198197adantlrr 719 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝𝑘) ∈ ℤ)
19920, 85, 27znunit 20686 . . . . . . . . . . . . . . . . . . . 20 ((𝑁 ∈ ℕ0 ∧ (𝑝𝑘) ∈ ℤ) → ((𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍) ↔ ((𝑝𝑘) gcd 𝑁) = 1))
200196, 198, 199syl2anc 586 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍) ↔ ((𝑝𝑘) gcd 𝑁) = 1))
201195, 200mpbird 259 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍))
20219, 20, 21, 85, 182, 201dchr1 25820 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 1)
203202oveq2d 7149 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) = (1 − 1))
204 1m1e0 11688 . . . . . . . . . . . . . . . 16 (1 − 1) = 0
205203, 204syl6eq 2871 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) = 0)
206205oveq1d 7148 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = (0 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
207171recnd 10647 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
208207anassrs 470 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
209208adantlrr 719 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
210209mul02d 10816 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (0 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
211206, 210eqtrd 2855 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
212211sumeq2dv 15040 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))0)
213 fzfid 13325 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin)
214213olcd 870 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → ((1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ⊆ (ℤ‘1) ∨ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin))
215 sumz 15059 . . . . . . . . . . . . 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 2855 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
218181, 217sylanr1 680 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
219180, 218sylan2b 595 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁})) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
220 ppifi 25670 . . . . . . . . . 10 (𝑥 ∈ ℝ → ((0[,]𝑥) ∩ ℙ) ∈ Fin)
221141, 220syl 17 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((0[,]𝑥) ∩ ℙ) ∈ Fin)
222155, 176, 219, 221fsumss 15062 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = Σ𝑝 ∈ ((0[,]𝑥) ∩ ℙ)Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
223154, 222eqtr4d 2858 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
224156, 173fsumrecl 15071 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
225129, 224sylan2 594 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
22673adantlr 713 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ)
22770adantl 484 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℕ)
228227nnrecred 11667 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℝ)
229227nnrpd 12408 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ+)
230229rpreccld 12420 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℝ+)
231 simplrl 775 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑥 ∈ ℝ+)
232231relogcld 25193 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑥) ∈ ℝ)
233227nnred 11631 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ)
23474adantl 484 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ (ℤ‘2))
235 eluz2gt1 12299 . . . . . . . . . . . . . . . . . . . 20 (𝑝 ∈ (ℤ‘2) → 1 < 𝑝)
236234, 235syl 17 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 < 𝑝)
237233, 236rplogcld 25199 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ+)
238232, 237rerpdivcld 12441 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑥) / (log‘𝑝)) ∈ ℝ)
239238flcld 13152 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℤ)
240239peano2zd 12069 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℤ)
241230, 240rpexpcld 13593 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ∈ ℝ+)
242241rpred 12410 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ∈ ℝ)
243228, 242resubcld 11046 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ∈ ℝ)
244234, 76syl 17 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℕ)
245244nnrpd 12408 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℝ+)
246245, 229rpdivcld 12427 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) / 𝑝) ∈ ℝ+)
247243, 246rerpdivcld 12441 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ∈ ℝ)
248226, 247remulcld 10649 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ∈ ℝ)
249170recnd 10647 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) ∈ ℂ)
250163nncnd 11632 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℂ)
251163nnne0d 11666 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ≠ 0)
252249, 250, 251divrecd 11397 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) = ((Λ‘(𝑝𝑘)) · (1 / (𝑝𝑘))))
253 simprl 769 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℙ)
254 vmappw 25680 . . . . . . . . . . . . . . . . 17 ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) → (Λ‘(𝑝𝑘)) = (log‘𝑝))
255253, 161, 254syl2anc 586 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) = (log‘𝑝))
256159nncnd 11632 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℂ)
257159nnne0d 11666 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ≠ 0)
258 elfzelz 12892 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) → 𝑘 ∈ ℤ)
259258ad2antll 727 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℤ)
260256, 257, 259exprecd 13503 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) = (1 / (𝑝𝑘)))
261260eqcomd 2826 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 / (𝑝𝑘)) = ((1 / 𝑝)↑𝑘))
262255, 261oveq12d 7151 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) · (1 / (𝑝𝑘))) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
263252, 262eqtrd 2855 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
264263, 171eqeltrrd 2912 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((log‘𝑝) · ((1 / 𝑝)↑𝑘)) ∈ ℝ)
265264anassrs 470 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((log‘𝑝) · ((1 / 𝑝)↑𝑘)) ∈ ℝ)
266 1red 10620 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1 ∈ ℝ)
267 vmage0 25685 . . . . . . . . . . . . . . . . 17 ((𝑝𝑘) ∈ ℕ → 0 ≤ (Λ‘(𝑝𝑘)))
268163, 267syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ (Λ‘(𝑝𝑘)))
269163nnred 11631 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℝ)
270163nngt0d 11665 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 < (𝑝𝑘))
271 divge0 11487 . . . . . . . . . . . . . . . 16 ((((Λ‘(𝑝𝑘)) ∈ ℝ ∧ 0 ≤ (Λ‘(𝑝𝑘))) ∧ ((𝑝𝑘) ∈ ℝ ∧ 0 < (𝑝𝑘))) → 0 ≤ ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
272170, 268, 269, 270, 271syl22anc 836 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
27383leidi 11152 . . . . . . . . . . . . . . . . . 18 0 ≤ 0
274 simpr 487 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) = 0) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 0)
275273, 274breqtrrid 5080 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) = 0) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
27623ad3antrrr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → 𝑁 ∈ ℕ)
27791ad2antrr 724 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1𝐷)
27819, 20, 87, 22, 85, 277, 165dchrn0 25813 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0 ↔ (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍)))
279278biimpa 479 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍))
28019, 20, 21, 85, 276, 279dchr1 25820 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 1)
281103, 280breqtrrid 5080 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
282275, 281pm2.61dane 3093 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
283 subge02 11134 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ) → (0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))) ↔ (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1))
28418, 166, 283sylancr 589 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))) ↔ (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1))
285282, 284mpbid 234 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1)
286168, 266, 171, 272, 285lemul1ad 11557 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
287207mulid2d 10637 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
288287, 263eqtrd 2855 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
289286, 288breqtrd 5068 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
290289anassrs 470 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
291156, 173, 265, 290fsumle 15134 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
292226recnd 10647 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℂ)
293159nnrecred 11667 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 / 𝑝) ∈ ℝ)
294293, 162reexpcld 13512 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) ∈ ℝ)
295294recnd 10647 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) ∈ ℂ)
296295anassrs 470 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 / 𝑝)↑𝑘) ∈ ℂ)
297156, 292, 296fsummulc2 15119 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘)) = Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
298 fzval3 13090 . . . . . . . . . . . . . . . 16 ((⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℤ → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) = (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
299239, 298syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) = (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
300299sumeq1d 15038 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘) = Σ𝑘 ∈ (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))((1 / 𝑝)↑𝑘))
301228recnd 10647 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℂ)
302227nngt0d 11665 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 < 𝑝)
303 recgt1 11514 . . . . . . . . . . . . . . . . . 18 ((𝑝 ∈ ℝ ∧ 0 < 𝑝) → (1 < 𝑝 ↔ (1 / 𝑝) < 1))
304233, 302, 303syl2anc 586 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 < 𝑝 ↔ (1 / 𝑝) < 1))
305236, 304mpbid 234 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) < 1)
306228, 305ltned 10754 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ≠ 1)
307 1nn0 11892 . . . . . . . . . . . . . . . 16 1 ∈ ℕ0
308307a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 ∈ ℕ0)
309 log1 25156 . . . . . . . . . . . . . . . . . . . . 21 (log‘1) = 0
310 simprr 771 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
311 1rp 12372 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℝ+
312 simprl 769 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ+)
313 logleb 25173 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℝ+𝑥 ∈ ℝ+) → (1 ≤ 𝑥 ↔ (log‘1) ≤ (log‘𝑥)))
314311, 312, 313sylancr 589 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (1 ≤ 𝑥 ↔ (log‘1) ≤ (log‘𝑥)))
315310, 314mpbid 234 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (log‘1) ≤ (log‘𝑥))
316309, 315eqbrtrrid 5078 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 ≤ (log‘𝑥))
317316adantr 483 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ (log‘𝑥))
318232, 237, 317divge0d 12450 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((log‘𝑥) / (log‘𝑝)))
319 flge0nn0 13174 . . . . . . . . . . . . . . . . . 18 ((((log‘𝑥) / (log‘𝑝)) ∈ ℝ ∧ 0 ≤ ((log‘𝑥) / (log‘𝑝))) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0)
320238, 318, 319syl2anc 586 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0)
321 nn0p1nn 11915 . . . . . . . . . . . . . . . . 17 ((⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0 → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℕ)
322320, 321syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℕ)
323 nnuz 12260 . . . . . . . . . . . . . . . 16 ℕ = (ℤ‘1)
324322, 323eleqtrdi 2921 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ (ℤ‘1))
325301, 306, 308, 324geoserg 15201 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))((1 / 𝑝)↑𝑘) = ((((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / (1 − (1 / 𝑝))))
326301exp1d 13490 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑1) = (1 / 𝑝))
327326oveq1d 7148 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) = ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))))
328227nncnd 11632 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℂ)
329 1cnd 10614 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 ∈ ℂ)
330229rpcnne0d 12419 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0))
331 divsubdir 11312 . . . . . . . . . . . . . . . . 17 ((𝑝 ∈ ℂ ∧ 1 ∈ ℂ ∧ (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0)) → ((𝑝 − 1) / 𝑝) = ((𝑝 / 𝑝) − (1 / 𝑝)))
332328, 329, 330, 331syl3anc 1367 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) / 𝑝) = ((𝑝 / 𝑝) − (1 / 𝑝)))
333 divid 11305 . . . . . . . . . . . . . . . . . 18 ((𝑝 ∈ ℂ ∧ 𝑝 ≠ 0) → (𝑝 / 𝑝) = 1)
334330, 333syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 / 𝑝) = 1)
335334oveq1d 7148 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 / 𝑝) − (1 / 𝑝)) = (1 − (1 / 𝑝)))
336332, 335eqtr2d 2856 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 − (1 / 𝑝)) = ((𝑝 − 1) / 𝑝))
337327, 336oveq12d 7151 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / (1 − (1 / 𝑝))) = (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)))
338300, 325, 3373eqtrd 2859 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘) = (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)))
339338oveq2d 7149 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘)) = ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
340297, 339eqtr3d 2857 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)) = ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
341291, 340breqtrd 5068 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
342241rpge0d 12414 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
343228, 242subge02d 11210 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (0 ≤ ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ↔ ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (1 / 𝑝)))
344342, 343mpbid 234 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (1 / 𝑝))
345245rpcnne0d 12419 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) ∈ ℂ ∧ (𝑝 − 1) ≠ 0))
346 dmdcan 11328 . . . . . . . . . . . . . . 15 ((((𝑝 − 1) ∈ ℂ ∧ (𝑝 − 1) ≠ 0) ∧ (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0) ∧ 1 ∈ ℂ) → (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))) = (1 / 𝑝))
347345, 330, 329, 346syl3anc 1367 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))) = (1 / 𝑝))
348344, 347breqtrrd 5070 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))))
349244nnrecred 11667 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / (𝑝 − 1)) ∈ ℝ)
350243, 349, 246ledivmuld 12463 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)) ↔ ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1)))))
351348, 350mpbird 259 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)))
352247, 349, 237lemul2d 12454 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)) ↔ ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) · (1 / (𝑝 − 1)))))
353351, 352mpbid 234 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) · (1 / (𝑝 − 1))))
354244nncnd 11632 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℂ)
355244nnne0d 11666 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ≠ 0)
356292, 354, 355divrecd 11397 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) = ((log‘𝑝) · (1 / (𝑝 − 1))))
357353, 356breqtrrd 5070 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) / (𝑝 − 1)))
358224, 248, 130, 341, 357letrd 10775 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) / (𝑝 − 1)))
359129, 358sylan2 594 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) / (𝑝 − 1)))
360126, 225, 131, 359fsumle 15134 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
361223, 360eqbrtrd 5064 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ≤ Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
36279adantlr 713 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
363237, 245rpdivcld 12427 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ+)
364363rpge0d 12414 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((log‘𝑝) / (𝑝 − 1)))
36569, 364sylan2 594 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → 0 ≤ ((log‘𝑝) / (𝑝 − 1)))
366122, 362, 365, 125fsumless 15131 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
367102, 132, 133, 361, 366letrd 10775 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
368121, 367eqbrtrd 5064 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
36965, 40, 66, 80, 368elo1d 14873 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ∈ 𝑂(1))
370 o1sub 14952 . . 3 (((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1) ∧ (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ∈ 𝑂(1)) → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) ∈ 𝑂(1))
37164, 369, 370sylancr 589 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) ∈ 𝑂(1))
37263, 371eqeltrrd 2912 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wo 843   = wceq 1537  wcel 2114  wne 3006  {crab 3129  Vcvv 3473  cdif 3910  cin 3912  wss 3913   class class class wbr 5042  cmpt 5122  wf 6327  ontowfo 6329  cfv 6331  (class class class)co 7133  f cof 7385  Fincfn 8487  cc 10513  cr 10514  0cc0 10515  1c1 10516   + caddc 10518   · cmul 10520   < clt 10653  cle 10654  cmin 10848   / cdiv 11275  cn 11616  2c2 11671  0cn0 11876  cz 11960  cuz 12222  +crp 12368  [,]cicc 12720  ...cfz 12876  ..^cfzo 13017  cfl 13144  cexp 13414  abscabs 14573  𝑂(1)co1 14823  Σcsu 15022  cdvds 15587   gcd cgcd 15821  cprime 15993  Basecbs 16462  0gc0g 16692  Grpcgrp 18082  Abelcabl 18886  Unitcui 19368  ℤRHomczrh 20623  ℤ/nczn 20626  logclog 25125  Λcvma 25656  DChrcdchr 25795
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2792  ax-rep 5166  ax-sep 5179  ax-nul 5186  ax-pow 5242  ax-pr 5306  ax-un 7439  ax-inf2 9082  ax-cnex 10571  ax-resscn 10572  ax-1cn 10573  ax-icn 10574  ax-addcl 10575  ax-addrcl 10576  ax-mulcl 10577  ax-mulrcl 10578  ax-mulcom 10579  ax-addass 10580  ax-mulass 10581  ax-distr 10582  ax-i2m1 10583  ax-1ne0 10584  ax-1rid 10585  ax-rnegex 10586  ax-rrecex 10587  ax-cnre 10588  ax-pre-lttri 10589  ax-pre-lttrn 10590  ax-pre-ltadd 10591  ax-pre-mulgt0 10592  ax-pre-sup 10593  ax-addf 10594  ax-mulf 10595
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-fal 1550  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2653  df-clab 2799  df-cleq 2813  df-clel 2891  df-nfc 2959  df-ne 3007  df-nel 3111  df-ral 3130  df-rex 3131  df-reu 3132  df-rmo 3133  df-rab 3134  df-v 3475  df-sbc 3753  df-csb 3861  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3932  df-nul 4270  df-if 4444  df-pw 4517  df-sn 4544  df-pr 4546  df-tp 4548  df-op 4550  df-uni 4815  df-int 4853  df-iun 4897  df-iin 4898  df-br 5043  df-opab 5105  df-mpt 5123  df-tr 5149  df-id 5436  df-eprel 5441  df-po 5450  df-so 5451  df-fr 5490  df-se 5491  df-we 5492  df-xp 5537  df-rel 5538  df-cnv 5539  df-co 5540  df-dm 5541  df-rn 5542  df-res 5543  df-ima 5544  df-pred 6124  df-ord 6170  df-on 6171  df-lim 6172  df-suc 6173  df-iota 6290  df-fun 6333  df-fn 6334  df-f 6335  df-f1 6336  df-fo 6337  df-f1o 6338  df-fv 6339  df-isom 6340  df-riota 7091  df-ov 7136  df-oprab 7137  df-mpo 7138  df-of 7387  df-om 7559  df-1st 7667  df-2nd 7668  df-supp 7809  df-tpos 7870  df-wrecs 7925  df-recs 7986  df-rdg 8024  df-1o 8080  df-2o 8081  df-oadd 8084  df-er 8267  df-ec 8269  df-qs 8273  df-map 8386  df-pm 8387  df-ixp 8440  df-en 8488  df-dom 8489  df-sdom 8490  df-fin 8491  df-fsupp 8812  df-fi 8853  df-sup 8884  df-inf 8885  df-oi 8952  df-dju 9308  df-card 9346  df-pnf 10655  df-mnf 10656  df-xr 10657  df-ltxr 10658  df-le 10659  df-sub 10850  df-neg 10851  df-div 11276  df-nn 11617  df-2 11679  df-3 11680  df-4 11681  df-5 11682  df-6 11683  df-7 11684  df-8 11685  df-9 11686  df-n0 11877  df-xnn0 11947  df-z 11961  df-dec 12078  df-uz 12223  df-q 12328  df-rp 12369  df-xneg 12486  df-xadd 12487  df-xmul 12488  df-ioo 12721  df-ioc 12722  df-ico 12723  df-icc 12724  df-fz 12877  df-fzo 13018  df-fl 13146  df-mod 13222  df-seq 13354  df-exp 13415  df-fac 13619  df-bc 13648  df-hash 13676  df-shft 14406  df-cj 14438  df-re 14439  df-im 14440  df-sqrt 14574  df-abs 14575  df-limsup 14808  df-clim 14825  df-rlim 14826  df-o1 14827  df-lo1 14828  df-sum 15023  df-ef 15401  df-e 15402  df-sin 15403  df-cos 15404  df-pi 15406  df-dvds 15588  df-gcd 15822  df-prm 15994  df-pc 16152  df-struct 16464  df-ndx 16465  df-slot 16466  df-base 16468  df-sets 16469  df-ress 16470  df-plusg 16557  df-mulr 16558  df-starv 16559  df-sca 16560  df-vsca 16561  df-ip 16562  df-tset 16563  df-ple 16564  df-ds 16566  df-unif 16567  df-hom 16568  df-cco 16569  df-rest 16675  df-topn 16676  df-0g 16694  df-gsum 16695  df-topgen 16696  df-pt 16697  df-prds 16700  df-xrs 16754  df-qtop 16759  df-imas 16760  df-qus 16761  df-xps 16762  df-mre 16836  df-mrc 16837  df-acs 16839  df-mgm 17831  df-sgrp 17880  df-mnd 17891  df-mhm 17935  df-submnd 17936  df-grp 18085  df-minusg 18086  df-sbg 18087  df-mulg 18204  df-subg 18255  df-nsg 18256  df-eqg 18257  df-ghm 18335  df-cntz 18426  df-cmn 18887  df-abl 18888  df-mgp 19219  df-ur 19231  df-ring 19278  df-cring 19279  df-oppr 19352  df-dvdsr 19370  df-unit 19371  df-invr 19401  df-rnghom 19446  df-subrg 19509  df-lmod 19612  df-lss 19680  df-lsp 19720  df-sra 19920  df-rgmod 19921  df-lidl 19922  df-rsp 19923  df-2idl 19981  df-psmet 20513  df-xmet 20514  df-met 20515  df-bl 20516  df-mopn 20517  df-fbas 20518  df-fg 20519  df-cnfld 20522  df-zring 20594  df-zrh 20627  df-zn 20630  df-top 21478  df-topon 21495  df-topsp 21517  df-bases 21530  df-cld 21603  df-ntr 21604  df-cls 21605  df-nei 21682  df-lp 21720  df-perf 21721  df-cn 21811  df-cnp 21812  df-haus 21899  df-cmp 21971  df-tx 22146  df-hmeo 22339  df-fil 22430  df-fm 22522  df-flim 22523  df-flf 22524  df-xms 22906  df-ms 22907  df-tms 22908  df-cncf 23462  df-limc 24448  df-dv 24449  df-log 25127  df-cxp 25128  df-cht 25661  df-vma 25662  df-chp 25663  df-ppi 25664  df-dchr 25796
This theorem is referenced by:  rpvmasum2  26075
  Copyright terms: Public domain W3C validator