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

Theorem rpvmasumlem 27335
Description: Lemma for rpvmasum 27374. 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 11196 . . . . . 6 ℝ ∈ V
2 rpssre 12977 . . . . . 6 + ⊆ ℝ
31, 2ssexi 5312 . . . . 5 + ∈ V
43a1i 11 . . . 4 (𝜑 → ℝ+ ∈ V)
5 fzfid 13934 . . . . . . 7 (𝜑 → (1...(⌊‘𝑥)) ∈ Fin)
6 elfznn 13526 . . . . . . . . . . 11 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
76adantl 481 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
8 vmacl 26965 . . . . . . . . . 10 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
97, 8syl 17 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
109, 7nndivred 12262 . . . . . . . 8 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
1110recnd 11238 . . . . . . 7 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℂ)
125, 11fsumcl 15675 . . . . . 6 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
1312adantr 480 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
14 relogcl 26425 . . . . . . 7 (𝑥 ∈ ℝ+ → (log‘𝑥) ∈ ℝ)
1514adantl 481 . . . . . 6 ((𝜑𝑥 ∈ ℝ+) → (log‘𝑥) ∈ ℝ)
1615recnd 11238 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → (log‘𝑥) ∈ ℂ)
1713, 16subcld 11567 . . . 4 ((𝜑𝑥 ∈ ℝ+) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℂ)
18 1re 11210 . . . . . . . . 9 1 ∈ ℝ
19 rpvmasum.g . . . . . . . . . . . 12 𝐺 = (DChr‘𝑁)
20 rpvmasum.z . . . . . . . . . . . 12 𝑍 = (ℤ/nℤ‘𝑁)
21 rpvmasum.1 . . . . . . . . . . . 12 1 = (0g𝐺)
22 eqid 2724 . . . . . . . . . . . 12 (Base‘𝑍) = (Base‘𝑍)
23 rpvmasum.a . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℕ)
2419, 20, 21, 22, 23dchr1re 27111 . . . . . . . . . . 11 (𝜑1 :(Base‘𝑍)⟶ℝ)
2524adantr 480 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 1 :(Base‘𝑍)⟶ℝ)
2623nnnn0d 12528 . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℕ0)
27 rpvmasum.l . . . . . . . . . . . . 13 𝐿 = (ℤRHom‘𝑍)
2820, 22, 27znzrhfo 21409 . . . . . . . . . . . 12 (𝑁 ∈ ℕ0𝐿:ℤ–onto→(Base‘𝑍))
29 fof 6795 . . . . . . . . . . . 12 (𝐿:ℤ–onto→(Base‘𝑍) → 𝐿:ℤ⟶(Base‘𝑍))
3026, 28, 293syl 18 . . . . . . . . . . 11 (𝜑𝐿:ℤ⟶(Base‘𝑍))
31 elfzelz 13497 . . . . . . . . . . 11 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℤ)
32 ffvelcdm 7073 . . . . . . . . . . 11 ((𝐿:ℤ⟶(Base‘𝑍) ∧ 𝑛 ∈ ℤ) → (𝐿𝑛) ∈ (Base‘𝑍))
3330, 31, 32syl2an 595 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (𝐿𝑛) ∈ (Base‘𝑍))
3425, 33ffvelcdmd 7077 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
35 resubcl 11520 . . . . . . . . 9 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℝ) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
3618, 34, 35sylancr 586 . . . . . . . 8 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
3736, 10remulcld 11240 . . . . . . 7 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
3837recnd 11238 . . . . . 6 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
395, 38fsumcl 15675 . . . . 5 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
4039adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ+) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
41 eqidd 2725 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))))
42 eqidd 2725 . . . 4 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
434, 17, 40, 41, 42offval2 7683 . . 3 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))))
4413, 16, 40sub32d 11599 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)))
455, 11, 38fsumsub 15730 . . . . . . . 8 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
46 1cnd 11205 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
4736recnd 11238 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℂ)
4846, 47, 11subdird 11667 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − (1 − ( 1 ‘(𝐿𝑛)))) · ((Λ‘𝑛) / 𝑛)) = ((1 · ((Λ‘𝑛) / 𝑛)) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
49 ax-1cn 11163 . . . . . . . . . . . 12 1 ∈ ℂ
5034recnd 11238 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℂ)
51 nncan 11485 . . . . . . . . . . . 12 ((1 ∈ ℂ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℂ) → (1 − (1 − ( 1 ‘(𝐿𝑛)))) = ( 1 ‘(𝐿𝑛)))
5249, 50, 51sylancr 586 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 − (1 − ( 1 ‘(𝐿𝑛)))) = ( 1 ‘(𝐿𝑛)))
5352oveq1d 7416 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − (1 − ( 1 ‘(𝐿𝑛)))) · ((Λ‘𝑛) / 𝑛)) = (( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5411mullidd 11228 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (1 · ((Λ‘𝑛) / 𝑛)) = ((Λ‘𝑛) / 𝑛))
5554oveq1d 7416 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → ((1 · ((Λ‘𝑛) / 𝑛)) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))))
5648, 53, 553eqtr3rd 2773 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5756sumeq2dv 15645 . . . . . . . 8 (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) − ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5845, 57eqtr3d 2766 . . . . . . 7 (𝜑 → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)))
5958oveq1d 7416 . . . . . 6 (𝜑 → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6059adantr 480 . . . . 5 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) − (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6144, 60eqtrd 2764 . . . 4 ((𝜑𝑥 ∈ ℝ+) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥)))
6261mpteq2dva 5238 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) − Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))))
6343, 62eqtrd 2764 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))))
64 vmadivsum 27330 . . 3 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
652a1i 11 . . . 4 (𝜑 → ℝ+ ⊆ ℝ)
66 1red 11211 . . . 4 (𝜑 → 1 ∈ ℝ)
67 prmdvdsfi 26954 . . . . . 6 (𝑁 ∈ ℕ → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
6823, 67syl 17 . . . . 5 (𝜑 → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
69 elrabi 3669 . . . . . 6 (𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} → 𝑝 ∈ ℙ)
70 prmnn 16607 . . . . . . . . . 10 (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
7170adantl 481 . . . . . . . . 9 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ ℕ)
7271nnrpd 13010 . . . . . . . 8 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ ℝ+)
7372relogcld 26472 . . . . . . 7 ((𝜑𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ)
74 prmuz2 16629 . . . . . . . . 9 (𝑝 ∈ ℙ → 𝑝 ∈ (ℤ‘2))
7574adantl 481 . . . . . . . 8 ((𝜑𝑝 ∈ ℙ) → 𝑝 ∈ (ℤ‘2))
76 uz2m1nn 12903 . . . . . . . 8 (𝑝 ∈ (ℤ‘2) → (𝑝 − 1) ∈ ℕ)
7775, 76syl 17 . . . . . . 7 ((𝜑𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℕ)
7873, 77nndivred 12262 . . . . . 6 ((𝜑𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
7969, 78sylan2 592 . . . . 5 ((𝜑𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
8068, 79fsumrecl 15676 . . . 4 (𝜑 → Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
81 fzfid 13934 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (1...(⌊‘𝑥)) ∈ Fin)
82 simpr 484 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) = 0)
83 0re 11212 . . . . . . . . . . 11 0 ∈ ℝ
8482, 83eqeltrdi 2833 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
85 eqid 2724 . . . . . . . . . . . 12 (Unit‘𝑍) = (Unit‘𝑍)
8623ad3antrrr 727 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → 𝑁 ∈ ℕ)
87 rpvmasum.d . . . . . . . . . . . . . 14 𝐷 = (Base‘𝐺)
8819dchrabl 27102 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
89 ablgrp 19694 . . . . . . . . . . . . . . . 16 (𝐺 ∈ Abel → 𝐺 ∈ Grp)
9087, 21grpidcl 18884 . . . . . . . . . . . . . . . 16 (𝐺 ∈ Grp → 1𝐷)
9123, 88, 89, 904syl 19 . . . . . . . . . . . . . . 15 (𝜑1𝐷)
9291ad2antrr 723 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1𝐷)
9333adantlr 712 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐿𝑛) ∈ (Base‘𝑍))
9419, 20, 87, 22, 85, 92, 93dchrn0 27098 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (( 1 ‘(𝐿𝑛)) ≠ 0 ↔ (𝐿𝑛) ∈ (Unit‘𝑍)))
9594biimpa 476 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → (𝐿𝑛) ∈ (Unit‘𝑍))
9619, 20, 21, 85, 86, 95dchr1 27105 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) = 1)
9796, 18eqeltrdi 2833 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
9884, 97pm2.61dane 3021 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ∈ ℝ)
9918, 98, 35sylancr 586 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℝ)
10010adantlr 712 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
10199, 100remulcld 11240 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
10281, 101fsumrecl 15676 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
103 0le1 11733 . . . . . . . . . . 11 0 ≤ 1
10482, 103eqbrtrdi 5177 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) = 0) → ( 1 ‘(𝐿𝑛)) ≤ 1)
10518leidi 11744 . . . . . . . . . . 11 1 ≤ 1
10696, 105eqbrtrdi 5177 . . . . . . . . . 10 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ ( 1 ‘(𝐿𝑛)) ≠ 0) → ( 1 ‘(𝐿𝑛)) ≤ 1)
107104, 106pm2.61dane 3021 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ( 1 ‘(𝐿𝑛)) ≤ 1)
108 subge0 11723 . . . . . . . . . 10 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿𝑛)) ∈ ℝ) → (0 ≤ (1 − ( 1 ‘(𝐿𝑛))) ↔ ( 1 ‘(𝐿𝑛)) ≤ 1))
10918, 98, 108sylancr 586 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (0 ≤ (1 − ( 1 ‘(𝐿𝑛))) ↔ ( 1 ‘(𝐿𝑛)) ≤ 1))
110107, 109mpbird 257 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (1 − ( 1 ‘(𝐿𝑛))))
1119adantlr 712 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
1126adantl 481 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
113 vmage0 26968 . . . . . . . . . 10 (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
114112, 113syl 17 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (Λ‘𝑛))
115112nnred 12223 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
116112nngt0d 12257 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 < 𝑛)
117 divge0 12079 . . . . . . . . 9 ((((Λ‘𝑛) ∈ ℝ ∧ 0 ≤ (Λ‘𝑛)) ∧ (𝑛 ∈ ℝ ∧ 0 < 𝑛)) → 0 ≤ ((Λ‘𝑛) / 𝑛))
118111, 114, 115, 116, 117syl22anc 836 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((Λ‘𝑛) / 𝑛))
11999, 100, 110, 118mulge0d 11787 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
12081, 101, 119fsumge0 15737 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
121102, 120absidd 15365 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))
12268adantr 480 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ℙ ∣ 𝑞𝑁} ∈ Fin)
123 inss2 4221 . . . . . . . . 9 ((0[,]𝑥) ∩ ℙ) ⊆ ℙ
124 rabss2 4067 . . . . . . . . 9 (((0[,]𝑥) ∩ ℙ) ⊆ ℙ → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ {𝑞 ∈ ℙ ∣ 𝑞𝑁})
125123, 124mp1i 13 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ {𝑞 ∈ ℙ ∣ 𝑞𝑁})
126122, 125ssfid 9262 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ∈ Fin)
127 ssrab2 4069 . . . . . . . . . 10 {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ((0[,]𝑥) ∩ ℙ)
128127, 123sstri 3983 . . . . . . . . 9 {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ℙ
129128sseli 3970 . . . . . . . 8 (𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} → 𝑝 ∈ ℙ)
13078adantlr 712 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
131129, 130sylan2 592 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
132126, 131fsumrecl 15676 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
13380adantr 480 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
134 2fveq3 6886 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → ( 1 ‘(𝐿𝑛)) = ( 1 ‘(𝐿‘(𝑝𝑘))))
135134oveq2d 7417 . . . . . . . . . 10 (𝑛 = (𝑝𝑘) → (1 − ( 1 ‘(𝐿𝑛))) = (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))))
136 fveq2 6881 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → (Λ‘𝑛) = (Λ‘(𝑝𝑘)))
137 id 22 . . . . . . . . . . 11 (𝑛 = (𝑝𝑘) → 𝑛 = (𝑝𝑘))
138136, 137oveq12d 7419 . . . . . . . . . 10 (𝑛 = (𝑝𝑘) → ((Λ‘𝑛) / 𝑛) = ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
139135, 138oveq12d 7419 . . . . . . . . 9 (𝑛 = (𝑝𝑘) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
140 rpre 12978 . . . . . . . . . 10 (𝑥 ∈ ℝ+𝑥 ∈ ℝ)
141140ad2antrl 725 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ)
14238adantlr 712 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ∈ ℂ)
143 simprr 770 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (Λ‘𝑛) = 0)
144143oveq1d 7416 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((Λ‘𝑛) / 𝑛) = (0 / 𝑛))
1456ad2antrl 725 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ∈ ℕ)
146145nncnd 12224 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ∈ ℂ)
147145nnne0d 12258 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → 𝑛 ≠ 0)
148146, 147div0d 11985 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (0 / 𝑛) = 0)
149144, 148eqtrd 2764 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((Λ‘𝑛) / 𝑛) = 0)
150149oveq2d 7417 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = ((1 − ( 1 ‘(𝐿𝑛))) · 0))
15147ad2ant2r 744 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → (1 − ( 1 ‘(𝐿𝑛))) ∈ ℂ)
152151mul01d 11409 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · 0) = 0)
153150, 152eqtrd 2764 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ (Λ‘𝑛) = 0)) → ((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = 0)
154139, 141, 142, 153fsumvma2 27062 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = Σ𝑝 ∈ ((0[,]𝑥) ∩ ℙ)Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
155127a1i 11 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ⊆ ((0[,]𝑥) ∩ ℙ))
156 fzfid 13934 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin)
15724ad2antrr 723 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1 :(Base‘𝑍)⟶ℝ)
15830ad2antrr 723 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝐿:ℤ⟶(Base‘𝑍))
15970ad2antrl 725 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℕ)
160 elfznn 13526 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) → 𝑘 ∈ ℕ)
161160ad2antll 726 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℕ)
162161nnnn0d 12528 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℕ0)
163159, 162nnexpcld 14204 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℕ)
164163nnzd 12581 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℤ)
165158, 164ffvelcdmd 7077 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝐿‘(𝑝𝑘)) ∈ (Base‘𝑍))
166157, 165ffvelcdmd 7077 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ)
167 resubcl 11520 . . . . . . . . . . . . . . 15 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ∈ ℝ)
16818, 166, 167sylancr 586 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ∈ ℝ)
169 vmacl 26965 . . . . . . . . . . . . . . . 16 ((𝑝𝑘) ∈ ℕ → (Λ‘(𝑝𝑘)) ∈ ℝ)
170163, 169syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) ∈ ℝ)
171170, 163nndivred 12262 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℝ)
172168, 171remulcld 11240 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
173172anassrs 467 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
174173recnd 11238 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
175156, 174fsumcl 15675 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
176129, 175sylan2 592 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℂ)
177 breq1 5141 . . . . . . . . . . . 12 (𝑞 = 𝑝 → (𝑞𝑁𝑝𝑁))
178177notbid 318 . . . . . . . . . . 11 (𝑞 = 𝑝 → (¬ 𝑞𝑁 ↔ ¬ 𝑝𝑁))
179 notrab 4303 . . . . . . . . . . 11 (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) = {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ ¬ 𝑞𝑁}
180178, 179elrab2 3678 . . . . . . . . . 10 (𝑝 ∈ (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) ↔ (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) ∧ ¬ 𝑝𝑁))
181123sseli 3970 . . . . . . . . . . 11 (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) → 𝑝 ∈ ℙ)
18223ad3antrrr 727 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℕ)
183 simplrr 775 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ¬ 𝑝𝑁)
184 simplrl 774 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑝 ∈ ℙ)
185182nnzd 12581 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℤ)
186 coprm 16644 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑝 ∈ ℙ ∧ 𝑁 ∈ ℤ) → (¬ 𝑝𝑁 ↔ (𝑝 gcd 𝑁) = 1))
187184, 185, 186syl2anc 583 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (¬ 𝑝𝑁 ↔ (𝑝 gcd 𝑁) = 1))
188183, 187mpbid 231 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝 gcd 𝑁) = 1)
189 prmz 16608 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
190184, 189syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑝 ∈ ℤ)
191160adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑘 ∈ ℕ)
192191nnnn0d 12528 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑘 ∈ ℕ0)
193 rpexp1i 16657 . . . . . . . . . . . . . . . . . . . . 21 ((𝑝 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑘 ∈ ℕ0) → ((𝑝 gcd 𝑁) = 1 → ((𝑝𝑘) gcd 𝑁) = 1))
194190, 185, 192, 193syl3anc 1368 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝑝 gcd 𝑁) = 1 → ((𝑝𝑘) gcd 𝑁) = 1))
195188, 194mpd 15 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝑝𝑘) gcd 𝑁) = 1)
196182nnnn0d 12528 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → 𝑁 ∈ ℕ0)
197164anassrs 467 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝𝑘) ∈ ℤ)
198197adantlrr 718 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝑝𝑘) ∈ ℤ)
19920, 85, 27znunit 21425 . . . . . . . . . . . . . . . . . . . 20 ((𝑁 ∈ ℕ0 ∧ (𝑝𝑘) ∈ ℤ) → ((𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍) ↔ ((𝑝𝑘) gcd 𝑁) = 1))
200196, 198, 199syl2anc 583 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍) ↔ ((𝑝𝑘) gcd 𝑁) = 1))
201195, 200mpbird 257 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍))
20219, 20, 21, 85, 182, 201dchr1 27105 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 1)
203202oveq2d 7417 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) = (1 − 1))
204 1m1e0 12280 . . . . . . . . . . . . . . . 16 (1 − 1) = 0
205203, 204eqtrdi 2780 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) = 0)
206205oveq1d 7416 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = (0 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
207171recnd 11238 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
208207anassrs 467 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
209208adantlrr 718 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) ∈ ℂ)
210209mul02d 11408 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → (0 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
211206, 210eqtrd 2764 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
212211sumeq2dv 15645 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))0)
213 fzfid 13934 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin)
214213olcd 871 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → ((1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ⊆ (ℤ‘1) ∨ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) ∈ Fin))
215 sumz 15664 . . . . . . . . . . . . 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 2764 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
218181, 217sylanr1 679 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ((0[,]𝑥) ∩ ℙ) ∧ ¬ 𝑝𝑁)) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
219180, 218sylan2b 593 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ (((0[,]𝑥) ∩ ℙ) ∖ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁})) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = 0)
220 ppifi 26953 . . . . . . . . . 10 (𝑥 ∈ ℝ → ((0[,]𝑥) ∩ ℙ) ∈ Fin)
221141, 220syl 17 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → ((0[,]𝑥) ∩ ℙ) ∈ Fin)
222155, 176, 219, 221fsumss 15667 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = Σ𝑝 ∈ ((0[,]𝑥) ∩ ℙ)Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
223154, 222eqtr4d 2767 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) = Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
224156, 173fsumrecl 15676 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
225129, 224sylan2 592 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ∈ ℝ)
22673adantlr 712 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ)
22770adantl 481 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℕ)
228227nnrecred 12259 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℝ)
229227nnrpd 13010 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ+)
230229rpreccld 13022 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℝ+)
231 simplrl 774 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑥 ∈ ℝ+)
232231relogcld 26472 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑥) ∈ ℝ)
233227nnred 12223 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ)
23474adantl 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ (ℤ‘2))
235 eluz2gt1 12900 . . . . . . . . . . . . . . . . . . . 20 (𝑝 ∈ (ℤ‘2) → 1 < 𝑝)
236234, 235syl 17 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 < 𝑝)
237233, 236rplogcld 26478 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℝ+)
238232, 237rerpdivcld 13043 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑥) / (log‘𝑝)) ∈ ℝ)
239238flcld 13759 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℤ)
240239peano2zd 12665 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℤ)
241230, 240rpexpcld 14206 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ∈ ℝ+)
242241rpred 13012 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ∈ ℝ)
243228, 242resubcld 11638 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ∈ ℝ)
244234, 76syl 17 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℕ)
245244nnrpd 13010 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℝ+)
246245, 229rpdivcld 13029 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) / 𝑝) ∈ ℝ+)
247243, 246rerpdivcld 13043 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ∈ ℝ)
248226, 247remulcld 11240 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ∈ ℝ)
249170recnd 11238 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) ∈ ℂ)
250163nncnd 12224 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℂ)
251163nnne0d 12258 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ≠ 0)
252249, 250, 251divrecd 11989 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) = ((Λ‘(𝑝𝑘)) · (1 / (𝑝𝑘))))
253 simprl 768 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℙ)
254 vmappw 26963 . . . . . . . . . . . . . . . . 17 ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) → (Λ‘(𝑝𝑘)) = (log‘𝑝))
255253, 161, 254syl2anc 583 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (Λ‘(𝑝𝑘)) = (log‘𝑝))
256159nncnd 12224 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ∈ ℂ)
257159nnne0d 12258 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑝 ≠ 0)
258 elfzelz 13497 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) → 𝑘 ∈ ℤ)
259258ad2antll 726 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 𝑘 ∈ ℤ)
260256, 257, 259exprecd 14115 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) = (1 / (𝑝𝑘)))
261260eqcomd 2730 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 / (𝑝𝑘)) = ((1 / 𝑝)↑𝑘))
262255, 261oveq12d 7419 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) · (1 / (𝑝𝑘))) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
263252, 262eqtrd 2764 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((Λ‘(𝑝𝑘)) / (𝑝𝑘)) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
264263, 171eqeltrrd 2826 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((log‘𝑝) · ((1 / 𝑝)↑𝑘)) ∈ ℝ)
265264anassrs 467 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((log‘𝑝) · ((1 / 𝑝)↑𝑘)) ∈ ℝ)
266 1red 11211 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1 ∈ ℝ)
267 vmage0 26968 . . . . . . . . . . . . . . . . 17 ((𝑝𝑘) ∈ ℕ → 0 ≤ (Λ‘(𝑝𝑘)))
268163, 267syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ (Λ‘(𝑝𝑘)))
269163nnred 12223 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (𝑝𝑘) ∈ ℝ)
270163nngt0d 12257 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 < (𝑝𝑘))
271 divge0 12079 . . . . . . . . . . . . . . . 16 ((((Λ‘(𝑝𝑘)) ∈ ℝ ∧ 0 ≤ (Λ‘(𝑝𝑘))) ∧ ((𝑝𝑘) ∈ ℝ ∧ 0 < (𝑝𝑘))) → 0 ≤ ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
272170, 268, 269, 270, 271syl22anc 836 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
27383leidi 11744 . . . . . . . . . . . . . . . . . 18 0 ≤ 0
274 simpr 484 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) = 0) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 0)
275273, 274breqtrrid 5176 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) = 0) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
27623ad3antrrr 727 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → 𝑁 ∈ ℕ)
27791ad2antrr 723 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 1𝐷)
27819, 20, 87, 22, 85, 277, 165dchrn0 27098 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0 ↔ (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍)))
279278biimpa 476 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → (𝐿‘(𝑝𝑘)) ∈ (Unit‘𝑍))
28019, 20, 21, 85, 276, 279dchr1 27105 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → ( 1 ‘(𝐿‘(𝑝𝑘))) = 1)
281103, 280breqtrrid 5176 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ≠ 0) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
282275, 281pm2.61dane 3021 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → 0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))))
283 subge02 11726 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ ∧ ( 1 ‘(𝐿‘(𝑝𝑘))) ∈ ℝ) → (0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))) ↔ (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1))
28418, 166, 283sylancr 586 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (0 ≤ ( 1 ‘(𝐿‘(𝑝𝑘))) ↔ (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1))
285282, 284mpbid 231 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) ≤ 1)
286168, 266, 171, 272, 285lemul1ad 12149 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))))
287207mullidd 11228 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = ((Λ‘(𝑝𝑘)) / (𝑝𝑘)))
288287, 263eqtrd 2764 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) = ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
289286, 288breqtrd 5164 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
290289anassrs 467 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
291156, 173, 265, 290fsumle 15741 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
292226recnd 11238 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (log‘𝑝) ∈ ℂ)
293159nnrecred 12259 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → (1 / 𝑝) ∈ ℝ)
294293, 162reexpcld 14124 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) ∈ ℝ)
295294recnd 11238 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝)))))) → ((1 / 𝑝)↑𝑘) ∈ ℂ)
296295anassrs 467 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) ∧ 𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))) → ((1 / 𝑝)↑𝑘) ∈ ℂ)
297156, 292, 296fsummulc2 15726 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘)) = Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)))
298 fzval3 13697 . . . . . . . . . . . . . . . 16 ((⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℤ → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) = (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
299239, 298syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1...(⌊‘((log‘𝑥) / (log‘𝑝)))) = (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
300299sumeq1d 15643 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘) = Σ𝑘 ∈ (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))((1 / 𝑝)↑𝑘))
301228recnd 11238 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ∈ ℂ)
302227nngt0d 12257 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 < 𝑝)
303 recgt1 12106 . . . . . . . . . . . . . . . . . 18 ((𝑝 ∈ ℝ ∧ 0 < 𝑝) → (1 < 𝑝 ↔ (1 / 𝑝) < 1))
304233, 302, 303syl2anc 583 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 < 𝑝 ↔ (1 / 𝑝) < 1))
305236, 304mpbid 231 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) < 1)
306228, 305ltned 11346 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / 𝑝) ≠ 1)
307 1nn0 12484 . . . . . . . . . . . . . . . 16 1 ∈ ℕ0
308307a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 ∈ ℕ0)
309 log1 26435 . . . . . . . . . . . . . . . . . . . . 21 (log‘1) = 0
310 simprr 770 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 1 ≤ 𝑥)
311 1rp 12974 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℝ+
312 simprl 768 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 𝑥 ∈ ℝ+)
313 logleb 26452 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℝ+𝑥 ∈ ℝ+) → (1 ≤ 𝑥 ↔ (log‘1) ≤ (log‘𝑥)))
314311, 312, 313sylancr 586 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (1 ≤ 𝑥 ↔ (log‘1) ≤ (log‘𝑥)))
315310, 314mpbid 231 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (log‘1) ≤ (log‘𝑥))
316309, 315eqbrtrrid 5174 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → 0 ≤ (log‘𝑥))
317316adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ (log‘𝑥))
318232, 237, 317divge0d 13052 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((log‘𝑥) / (log‘𝑝)))
319 flge0nn0 13781 . . . . . . . . . . . . . . . . . 18 ((((log‘𝑥) / (log‘𝑝)) ∈ ℝ ∧ 0 ≤ ((log‘𝑥) / (log‘𝑝))) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0)
320238, 318, 319syl2anc 583 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0)
321 nn0p1nn 12507 . . . . . . . . . . . . . . . . 17 ((⌊‘((log‘𝑥) / (log‘𝑝))) ∈ ℕ0 → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℕ)
322320, 321syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ ℕ)
323 nnuz 12861 . . . . . . . . . . . . . . . 16 ℕ = (ℤ‘1)
324322, 323eleqtrdi 2835 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((⌊‘((log‘𝑥) / (log‘𝑝))) + 1) ∈ (ℤ‘1))
325301, 306, 308, 324geoserg 15808 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1..^((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))((1 / 𝑝)↑𝑘) = ((((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / (1 − (1 / 𝑝))))
326301exp1d 14102 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝)↑1) = (1 / 𝑝))
327326oveq1d 7416 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) = ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))))
328227nncnd 12224 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℂ)
329 1cnd 11205 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 1 ∈ ℂ)
330229rpcnne0d 13021 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0))
331 divsubdir 11904 . . . . . . . . . . . . . . . . 17 ((𝑝 ∈ ℂ ∧ 1 ∈ ℂ ∧ (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0)) → ((𝑝 − 1) / 𝑝) = ((𝑝 / 𝑝) − (1 / 𝑝)))
332328, 329, 330, 331syl3anc 1368 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) / 𝑝) = ((𝑝 / 𝑝) − (1 / 𝑝)))
333 divid 11897 . . . . . . . . . . . . . . . . . 18 ((𝑝 ∈ ℂ ∧ 𝑝 ≠ 0) → (𝑝 / 𝑝) = 1)
334330, 333syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 / 𝑝) = 1)
335334oveq1d 7416 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 / 𝑝) − (1 / 𝑝)) = (1 − (1 / 𝑝)))
336332, 335eqtr2d 2765 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 − (1 / 𝑝)) = ((𝑝 − 1) / 𝑝))
337327, 336oveq12d 7419 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝)↑1) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / (1 − (1 / 𝑝))) = (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)))
338300, 325, 3373eqtrd 2768 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘) = (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)))
339338oveq2d 7417 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 / 𝑝)↑𝑘)) = ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
340297, 339eqtr3d 2766 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((log‘𝑝) · ((1 / 𝑝)↑𝑘)) = ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
341291, 340breqtrd 5164 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))))
342241rpge0d 13016 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)))
343228, 242subge02d 11802 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (0 ≤ ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1)) ↔ ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (1 / 𝑝)))
344342, 343mpbid 231 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (1 / 𝑝))
345245rpcnne0d 13021 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((𝑝 − 1) ∈ ℂ ∧ (𝑝 − 1) ≠ 0))
346 dmdcan 11920 . . . . . . . . . . . . . . 15 ((((𝑝 − 1) ∈ ℂ ∧ (𝑝 − 1) ≠ 0) ∧ (𝑝 ∈ ℂ ∧ 𝑝 ≠ 0) ∧ 1 ∈ ℂ) → (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))) = (1 / 𝑝))
347345, 330, 329, 346syl3anc 1368 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))) = (1 / 𝑝))
348344, 347breqtrrd 5166 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) ≤ (((𝑝 − 1) / 𝑝) · (1 / (𝑝 − 1))))
349244nnrecred 12259 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (1 / (𝑝 − 1)) ∈ ℝ)
350243, 349, 246ledivmuld 13065 . . . . . . . . . . . . 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 13056 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝)) ≤ (1 / (𝑝 − 1)) ↔ ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) · (1 / (𝑝 − 1)))))
353351, 352mpbid 231 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) · (1 / (𝑝 − 1))))
354244nncnd 12224 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ∈ ℂ)
355244nnne0d 12258 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → (𝑝 − 1) ≠ 0)
356292, 354, 355divrecd 11989 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) = ((log‘𝑝) · (1 / (𝑝 − 1))))
357353, 356breqtrrd 5166 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) · (((1 / 𝑝) − ((1 / 𝑝)↑((⌊‘((log‘𝑥) / (log‘𝑝))) + 1))) / ((𝑝 − 1) / 𝑝))) ≤ ((log‘𝑝) / (𝑝 − 1)))
358224, 248, 130, 341, 357letrd 11367 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) / (𝑝 − 1)))
359129, 358sylan2 592 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁}) → Σ𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ ((log‘𝑝) / (𝑝 − 1)))
360126, 225, 131, 359fsumle 15741 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁𝑘 ∈ (1...(⌊‘((log‘𝑥) / (log‘𝑝))))((1 − ( 1 ‘(𝐿‘(𝑝𝑘)))) · ((Λ‘(𝑝𝑘)) / (𝑝𝑘))) ≤ Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
361223, 360eqbrtrd 5160 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ≤ Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
36279adantlr 712 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ)
363237, 245rpdivcld 13029 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → ((log‘𝑝) / (𝑝 − 1)) ∈ ℝ+)
364363rpge0d 13016 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ ℙ) → 0 ≤ ((log‘𝑝) / (𝑝 − 1)))
36569, 364sylan2 592 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) ∧ 𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁}) → 0 ≤ ((log‘𝑝) / (𝑝 − 1)))
366122, 362, 365, 125fsumless 15738 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑝 ∈ {𝑞 ∈ ((0[,]𝑥) ∩ ℙ) ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
367102, 132, 133, 361, 366letrd 11367 . . . . 5 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
368121, 367eqbrtrd 5160 . . . 4 ((𝜑 ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ≤ Σ𝑝 ∈ {𝑞 ∈ ℙ ∣ 𝑞𝑁} ((log‘𝑝) / (𝑝 − 1)))
36965, 40, 66, 80, 368elo1d 15476 . . 3 (𝜑 → (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ∈ 𝑂(1))
370 o1sub 15556 . . 3 (((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1) ∧ (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛))) ∈ 𝑂(1)) → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) ∈ 𝑂(1))
37164, 369, 370sylancr 586 . 2 (𝜑 → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 − ( 1 ‘(𝐿𝑛))) · ((Λ‘𝑛) / 𝑛)))) ∈ 𝑂(1))
37263, 371eqeltrrd 2826 1 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))(( 1 ‘(𝐿𝑛)) · ((Λ‘𝑛) / 𝑛)) − (log‘𝑥))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  wo 844   = wceq 1533  wcel 2098  wne 2932  {crab 3424  Vcvv 3466  cdif 3937  cin 3939  wss 3940   class class class wbr 5138  cmpt 5221  wf 6529  ontowfo 6531  cfv 6533  (class class class)co 7401  f cof 7661  Fincfn 8934  cc 11103  cr 11104  0cc0 11105  1c1 11106   + caddc 11108   · cmul 11110   < clt 11244  cle 11245  cmin 11440   / cdiv 11867  cn 12208  2c2 12263  0cn0 12468  cz 12554  cuz 12818  +crp 12970  [,]cicc 13323  ...cfz 13480  ..^cfzo 13623  cfl 13751  cexp 14023  abscabs 15177  𝑂(1)co1 15426  Σcsu 15628  cdvds 16193   gcd cgcd 16431  cprime 16604  Basecbs 17142  0gc0g 17383  Grpcgrp 18852  Abelcabl 19690  Unitcui 20246  ℤRHomczrh 21353  ℤ/nczn 21356  logclog 26404  Λcvma 26939  DChrcdchr 27080
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9631  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182  ax-pre-sup 11183  ax-addf 11184  ax-mulf 11185
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  df-tpos 8206  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-er 8698  df-ec 8700  df-qs 8704  df-map 8817  df-pm 8818  df-ixp 8887  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-fsupp 9357  df-fi 9401  df-sup 9432  df-inf 9433  df-oi 9500  df-dju 9891  df-card 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-xnn0 12541  df-z 12555  df-dec 12674  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-fac 14230  df-bc 14259  df-hash 14287  df-shft 15010  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-limsup 15411  df-clim 15428  df-rlim 15429  df-o1 15430  df-lo1 15431  df-sum 15629  df-ef 16007  df-e 16008  df-sin 16009  df-cos 16010  df-pi 16012  df-dvds 16194  df-gcd 16432  df-prm 16605  df-pc 16768  df-struct 17078  df-sets 17095  df-slot 17113  df-ndx 17125  df-base 17143  df-ress 17172  df-plusg 17208  df-mulr 17209  df-starv 17210  df-sca 17211  df-vsca 17212  df-ip 17213  df-tset 17214  df-ple 17215  df-ds 17217  df-unif 17218  df-hom 17219  df-cco 17220  df-rest 17366  df-topn 17367  df-0g 17385  df-gsum 17386  df-topgen 17387  df-pt 17388  df-prds 17391  df-xrs 17446  df-qtop 17451  df-imas 17452  df-qus 17453  df-xps 17454  df-mre 17528  df-mrc 17529  df-acs 17531  df-mgm 18562  df-sgrp 18641  df-mnd 18657  df-mhm 18702  df-submnd 18703  df-grp 18855  df-minusg 18856  df-sbg 18857  df-mulg 18985  df-subg 19039  df-nsg 19040  df-eqg 19041  df-ghm 19128  df-cntz 19222  df-cmn 19691  df-abl 19692  df-mgp 20029  df-rng 20047  df-ur 20076  df-ring 20129  df-cring 20130  df-oppr 20225  df-dvdsr 20248  df-unit 20249  df-invr 20279  df-rhm 20363  df-subrng 20435  df-subrg 20460  df-lmod 20697  df-lss 20768  df-lsp 20808  df-sra 21010  df-rgmod 21011  df-lidl 21056  df-rsp 21057  df-2idl 21096  df-psmet 21219  df-xmet 21220  df-met 21221  df-bl 21222  df-mopn 21223  df-fbas 21224  df-fg 21225  df-cnfld 21228  df-zring 21301  df-zrh 21357  df-zn 21360  df-top 22717  df-topon 22734  df-topsp 22756  df-bases 22770  df-cld 22844  df-ntr 22845  df-cls 22846  df-nei 22923  df-lp 22961  df-perf 22962  df-cn 23052  df-cnp 23053  df-haus 23140  df-cmp 23212  df-tx 23387  df-hmeo 23580  df-fil 23671  df-fm 23763  df-flim 23764  df-flf 23765  df-xms 24147  df-ms 24148  df-tms 24149  df-cncf 24719  df-limc 25716  df-dv 25717  df-log 26406  df-cxp 26407  df-cht 26944  df-vma 26945  df-chp 26946  df-ppi 26947  df-dchr 27081
This theorem is referenced by:  rpvmasum2  27360
  Copyright terms: Public domain W3C validator