ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  mertenslemi1 GIF version

Theorem mertenslemi1 12280
Description: Lemma for mertensabs 12282. (Contributed by Mario Carneiro, 29-Apr-2014.) (Revised by Jim Kingdon, 2-Dec-2022.)
Hypotheses
Ref Expression
mertens.1 ((𝜑𝑗 ∈ ℕ0) → (𝐹𝑗) = 𝐴)
mertens.2 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) = (abs‘𝐴))
mertens.3 ((𝜑𝑗 ∈ ℕ0) → 𝐴 ∈ ℂ)
mertens.4 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = 𝐵)
mertens.5 ((𝜑𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
mertens.6 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = Σ𝑗 ∈ (0...𝑘)(𝐴 · (𝐺‘(𝑘𝑗))))
mertens.7 (𝜑 → seq0( + , 𝐾) ∈ dom ⇝ )
mertens.8 (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
mertens.9 (𝜑𝐸 ∈ ℝ+)
mertens.10 𝑇 = {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))}
mertens.11 (𝜓 ↔ (𝑠 ∈ ℕ ∧ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
mertens.p (𝜑𝑃 ∈ ℝ)
mertens.i12 (𝜑 → (𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))))
mertens.pge0 (𝜑 → 0 ≤ 𝑃)
mertens.pub (𝜑 → ∀𝑤𝑇 𝑤𝑃)
Assertion
Ref Expression
mertenslemi1 (𝜑 → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
Distinct variable groups:   𝑗,𝑚,𝑛,𝑠,𝑡,𝑦,𝑧,𝐵   𝑗,𝑘,𝐺,𝑚,𝑛,𝑠,𝑦,𝑧   𝜑,𝑗,𝑘,𝑚,𝑦,𝑧   𝑡,𝑘,𝐴,𝑚,𝑛,𝑠,𝑦   𝑗,𝐸,𝑘,𝑚,𝑛,𝑠,𝑡,𝑦,𝑧   𝑗,𝐾,𝑘,𝑚,𝑛,𝑠,𝑡,𝑦,𝑧   𝑗,𝐹,𝑚,𝑛,𝑦   𝜓,𝑗,𝑘,𝑚,𝑛,𝑡,𝑦,𝑧   𝑤,𝑗,𝑇,𝑘,𝑚,𝑛,𝑡,𝑦,𝑧   𝑘,𝐻,𝑚,𝑦   𝑤,𝐵   𝑃,𝑗,𝑚,𝑤
Allowed substitution hints:   𝜑(𝑤,𝑡,𝑛,𝑠)   𝜓(𝑤,𝑠)   𝐴(𝑧,𝑤,𝑗)   𝐵(𝑘)   𝑃(𝑦,𝑧,𝑡,𝑘,𝑛,𝑠)   𝑇(𝑠)   𝐸(𝑤)   𝐹(𝑧,𝑤,𝑡,𝑘,𝑠)   𝐺(𝑤,𝑡)   𝐻(𝑧,𝑤,𝑡,𝑗,𝑛,𝑠)   𝐾(𝑤)

Proof of Theorem mertenslemi1
StepHypRef Expression
1 mertens.i12 . . . . . . 7 (𝜑 → (𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))))
21simpld 112 . . . . . 6 (𝜑𝜓)
3 mertens.11 . . . . . 6 (𝜓 ↔ (𝑠 ∈ ℕ ∧ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
42, 3sylib 122 . . . . 5 (𝜑 → (𝑠 ∈ ℕ ∧ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
54simpld 112 . . . 4 (𝜑𝑠 ∈ ℕ)
65nnnn0d 9599 . . 3 (𝜑𝑠 ∈ ℕ0)
71simprd 114 . . . 4 (𝜑 → (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))))
87simpld 112 . . 3 (𝜑𝑡 ∈ ℕ0)
96, 8nn0addcld 9603 . 2 (𝜑 → (𝑠 + 𝑡) ∈ ℕ0)
10 0zd 9635 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 0 ∈ ℤ)
11 eluzelz 9910 . . . . . . . 8 (𝑚 ∈ (ℤ‘(𝑠 + 𝑡)) → 𝑚 ∈ ℤ)
1211adantl 277 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑚 ∈ ℤ)
1310, 12fzfigd 10846 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (0...𝑚) ∈ Fin)
14 simpl 109 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝜑)
15 elfznn0 10499 . . . . . . . 8 (𝑗 ∈ (0...𝑚) → 𝑗 ∈ ℕ0)
16 mertens.3 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ0) → 𝐴 ∈ ℂ)
1714, 15, 16syl2an 289 . . . . . . 7 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → 𝐴 ∈ ℂ)
18 eqid 2238 . . . . . . . 8 (ℤ‘((𝑚𝑗) + 1)) = (ℤ‘((𝑚𝑗) + 1))
19 fznn0sub 10441 . . . . . . . . . . 11 (𝑗 ∈ (0...𝑚) → (𝑚𝑗) ∈ ℕ0)
2019adantl 277 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (𝑚𝑗) ∈ ℕ0)
21 peano2nn0 9582 . . . . . . . . . 10 ((𝑚𝑗) ∈ ℕ0 → ((𝑚𝑗) + 1) ∈ ℕ0)
2220, 21syl 14 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((𝑚𝑗) + 1) ∈ ℕ0)
2322nn0zd 9745 . . . . . . . 8 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((𝑚𝑗) + 1) ∈ ℤ)
24 simplll 539 . . . . . . . . 9 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝜑)
25 eluznn0 9978 . . . . . . . . . 10 ((((𝑚𝑗) + 1) ∈ ℕ0𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝑘 ∈ ℕ0)
2622, 25sylan 283 . . . . . . . . 9 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝑘 ∈ ℕ0)
27 mertens.4 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = 𝐵)
2824, 26, 27syl2anc 415 . . . . . . . 8 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → (𝐺𝑘) = 𝐵)
29 mertens.5 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
3024, 26, 29syl2anc 415 . . . . . . . 8 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝐵 ∈ ℂ)
31 mertens.8 . . . . . . . . . 10 (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
3231ad2antrr 492 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → seq0( + , 𝐺) ∈ dom ⇝ )
33 nn0uz 9936 . . . . . . . . . 10 0 = (ℤ‘0)
34 simpll 531 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → 𝜑)
3527, 29eqeltrd 2315 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) ∈ ℂ)
3634, 35sylan 283 . . . . . . . . . 10 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) ∈ ℂ)
3733, 22, 36iserex 12083 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (seq0( + , 𝐺) ∈ dom ⇝ ↔ seq((𝑚𝑗) + 1)( + , 𝐺) ∈ dom ⇝ ))
3832, 37mpbid 147 . . . . . . . 8 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → seq((𝑚𝑗) + 1)( + , 𝐺) ∈ dom ⇝ )
3918, 23, 28, 30, 38isumcl 12170 . . . . . . 7 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵 ∈ ℂ)
4017, 39mulcld 8336 . . . . . 6 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℂ)
4113, 40fsumcl 12145 . . . . 5 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℂ)
4241abscld 11925 . . . 4 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
4340abscld 11925 . . . . 5 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
4413, 43fsumrecl 12146 . . . 4 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
45 mertens.9 . . . . . 6 (𝜑𝐸 ∈ ℝ+)
4645rpred 10076 . . . . 5 (𝜑𝐸 ∈ ℝ)
4746adantr 276 . . . 4 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝐸 ∈ ℝ)
4813, 40fsumabs 12210 . . . 4 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)))
495nnzd 9746 . . . . . . . . . 10 (𝜑𝑠 ∈ ℤ)
5049adantr 276 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑠 ∈ ℤ)
5112, 50zsubcld 9752 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ ℤ)
5210, 51fzfigd 10846 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (0...(𝑚𝑠)) ∈ Fin)
536adantr 276 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑠 ∈ ℕ0)
5453nn0ge0d 9602 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 0 ≤ 𝑠)
5512zred 9747 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑚 ∈ ℝ)
5653nn0red 9600 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑠 ∈ ℝ)
5755, 56subge02d 8855 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (0 ≤ 𝑠 ↔ (𝑚𝑠) ≤ 𝑚))
5854, 57mpbid 147 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ≤ 𝑚)
5953, 33eleqtrdi 2331 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑠 ∈ (ℤ‘0))
60 uzid 9915 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ ℤ → 𝑠 ∈ (ℤ𝑠))
6149, 60syl 14 . . . . . . . . . . . . . . . . 17 (𝜑𝑠 ∈ (ℤ𝑠))
62 uzaddcl 9965 . . . . . . . . . . . . . . . . 17 ((𝑠 ∈ (ℤ𝑠) ∧ 𝑡 ∈ ℕ0) → (𝑠 + 𝑡) ∈ (ℤ𝑠))
6361, 8, 62syl2anc 415 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑠 + 𝑡) ∈ (ℤ𝑠))
64 eqid 2238 . . . . . . . . . . . . . . . . 17 (ℤ𝑠) = (ℤ𝑠)
6564uztrn2 9919 . . . . . . . . . . . . . . . 16 (((𝑠 + 𝑡) ∈ (ℤ𝑠) ∧ 𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑚 ∈ (ℤ𝑠))
6663, 65sylan 283 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑚 ∈ (ℤ𝑠))
67 elfzuzb 10401 . . . . . . . . . . . . . . 15 (𝑠 ∈ (0...𝑚) ↔ (𝑠 ∈ (ℤ‘0) ∧ 𝑚 ∈ (ℤ𝑠)))
6859, 66, 67sylanbrc 421 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑠 ∈ (0...𝑚))
69 fznn0sub2 10513 . . . . . . . . . . . . . 14 (𝑠 ∈ (0...𝑚) → (𝑚𝑠) ∈ (0...𝑚))
7068, 69syl 14 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ (0...𝑚))
71 elfzelz 10407 . . . . . . . . . . . . 13 ((𝑚𝑠) ∈ (0...𝑚) → (𝑚𝑠) ∈ ℤ)
7270, 71syl 14 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ ℤ)
73 eluz 9914 . . . . . . . . . . . 12 (((𝑚𝑠) ∈ ℤ ∧ 𝑚 ∈ ℤ) → (𝑚 ∈ (ℤ‘(𝑚𝑠)) ↔ (𝑚𝑠) ≤ 𝑚))
7472, 12, 73syl2anc 415 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚 ∈ (ℤ‘(𝑚𝑠)) ↔ (𝑚𝑠) ≤ 𝑚))
7558, 74mpbird 167 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑚 ∈ (ℤ‘(𝑚𝑠)))
76 fzss2 10448 . . . . . . . . . 10 (𝑚 ∈ (ℤ‘(𝑚𝑠)) → (0...(𝑚𝑠)) ⊆ (0...𝑚))
7775, 76syl 14 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (0...(𝑚𝑠)) ⊆ (0...𝑚))
7877sselda 3248 . . . . . . . 8 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑗 ∈ (0...𝑚))
7916abscld 11925 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ)
8014, 15, 79syl2an 289 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘𝐴) ∈ ℝ)
8139abscld 11925 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ)
8280, 81remulcld 8346 . . . . . . . 8 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
8378, 82syldan 282 . . . . . . 7 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
8452, 83fsumrecl 12146 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
8551peano2zd 9750 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝑚𝑠) + 1) ∈ ℤ)
8685, 12fzfigd 10846 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (((𝑚𝑠) + 1)...𝑚) ∈ Fin)
87 elfznn0 10499 . . . . . . . . . . . . 13 ((𝑚𝑠) ∈ (0...𝑚) → (𝑚𝑠) ∈ ℕ0)
8870, 87syl 14 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ ℕ0)
89 peano2nn0 9582 . . . . . . . . . . . 12 ((𝑚𝑠) ∈ ℕ0 → ((𝑚𝑠) + 1) ∈ ℕ0)
9088, 89syl 14 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝑚𝑠) + 1) ∈ ℕ0)
9190, 33eleqtrdi 2331 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝑚𝑠) + 1) ∈ (ℤ‘0))
92 fzss1 10447 . . . . . . . . . 10 (((𝑚𝑠) + 1) ∈ (ℤ‘0) → (((𝑚𝑠) + 1)...𝑚) ⊆ (0...𝑚))
9391, 92syl 14 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (((𝑚𝑠) + 1)...𝑚) ⊆ (0...𝑚))
9493sselda 3248 . . . . . . . 8 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝑗 ∈ (0...𝑚))
9594, 82syldan 282 . . . . . . 7 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
9686, 95fsumrecl 12146 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℝ)
9745rphalfcld 10089 . . . . . . . 8 (𝜑 → (𝐸 / 2) ∈ ℝ+)
9897rpred 10076 . . . . . . 7 (𝜑 → (𝐸 / 2) ∈ ℝ)
9998adantr 276 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝐸 / 2) ∈ ℝ)
100 elfznn0 10499 . . . . . . . . . . 11 (𝑗 ∈ (0...(𝑚𝑠)) → 𝑗 ∈ ℕ0)
10114, 100, 79syl2an 289 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘𝐴) ∈ ℝ)
10252, 101fsumrecl 12146 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) ∈ ℝ)
103102, 99remulcld 8346 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) ∈ ℝ)
104 0zd 9635 . . . . . . . . . . 11 (𝜑 → 0 ∈ ℤ)
105 eqidd 2239 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) = (𝐾𝑗))
106 mertens.2 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) = (abs‘𝐴))
107106, 79eqeltrd 2315 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) ∈ ℝ)
108 mertens.7 . . . . . . . . . . 11 (𝜑 → seq0( + , 𝐾) ∈ dom ⇝ )
10933, 104, 105, 107, 108isumrecl 12174 . . . . . . . . . 10 (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾𝑗) ∈ ℝ)
11016absge0d 11928 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ0) → 0 ≤ (abs‘𝐴))
111110, 106breqtrrd 4153 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ0) → 0 ≤ (𝐾𝑗))
11233, 104, 105, 107, 108, 111isumge0 12175 . . . . . . . . . 10 (𝜑 → 0 ≤ Σ𝑗 ∈ ℕ0 (𝐾𝑗))
113109, 112ge0p1rpd 10107 . . . . . . . . 9 (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ+)
114113adantr 276 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ+)
115103, 114rerpdivcld 10108 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ∈ ℝ)
11697, 113rpdivcld 10094 . . . . . . . . . . . 12 (𝜑 → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ∈ ℝ+)
117116rpred 10076 . . . . . . . . . . 11 (𝜑 → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ∈ ℝ)
118117ad2antrr 492 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ∈ ℝ)
119101, 118remulcld 8346 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))) ∈ ℝ)
12078, 23syldan 282 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((𝑚𝑗) + 1) ∈ ℤ)
121 simplll 539 . . . . . . . . . . . . 13 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝜑)
12278, 22syldan 282 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((𝑚𝑗) + 1) ∈ ℕ0)
123122, 25sylan 283 . . . . . . . . . . . . 13 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝑘 ∈ ℕ0)
124121, 123, 27syl2anc 415 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → (𝐺𝑘) = 𝐵)
125121, 123, 29syl2anc 415 . . . . . . . . . . . 12 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝐵 ∈ ℂ)
12678, 38syldan 282 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → seq((𝑚𝑗) + 1)( + , 𝐺) ∈ dom ⇝ )
12718, 120, 124, 125, 126isumcl 12170 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵 ∈ ℂ)
128127abscld 11925 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ)
12979, 110jca 306 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ0) → ((abs‘𝐴) ∈ ℝ ∧ 0 ≤ (abs‘𝐴)))
13014, 100, 129syl2an 289 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((abs‘𝐴) ∈ ℝ ∧ 0 ≤ (abs‘𝐴)))
131124sumeq2dv 12112 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘) = Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)
132131fveq2d 5694 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘)) = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵))
133 fvoveq1 6098 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑚𝑗) → (ℤ‘(𝑛 + 1)) = (ℤ‘((𝑚𝑗) + 1)))
134133sumeq1d 12110 . . . . . . . . . . . . . . 15 (𝑛 = (𝑚𝑗) → Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘) = Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘))
135134fveq2d 5694 . . . . . . . . . . . . . 14 (𝑛 = (𝑚𝑗) → (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘)))
136135breq1d 4135 . . . . . . . . . . . . 13 (𝑛 = (𝑚𝑗) → ((abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
1374simprd 114 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
138137ad2antrr 492 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
139 elfzelz 10407 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (0...(𝑚𝑠)) → 𝑗 ∈ ℤ)
140139adantl 277 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑗 ∈ ℤ)
141140zred 9747 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑗 ∈ ℝ)
14211ad2antlr 493 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑚 ∈ ℤ)
143142zred 9747 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑚 ∈ ℝ)
14449ad2antrr 492 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑠 ∈ ℤ)
145144zred 9747 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑠 ∈ ℝ)
146 elfzle2 10411 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...(𝑚𝑠)) → 𝑗 ≤ (𝑚𝑠))
147146adantl 277 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑗 ≤ (𝑚𝑠))
148141, 143, 145, 147lesubd 8867 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → 𝑠 ≤ (𝑚𝑗))
149142, 140zsubcld 9752 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (𝑚𝑗) ∈ ℤ)
150 eluz 9914 . . . . . . . . . . . . . . 15 ((𝑠 ∈ ℤ ∧ (𝑚𝑗) ∈ ℤ) → ((𝑚𝑗) ∈ (ℤ𝑠) ↔ 𝑠 ≤ (𝑚𝑗)))
151144, 149, 150syl2anc 415 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((𝑚𝑗) ∈ (ℤ𝑠) ↔ 𝑠 ≤ (𝑚𝑗)))
152148, 151mpbird 167 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (𝑚𝑗) ∈ (ℤ𝑠))
153136, 138, 152rspcdva 2934 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
154132, 153eqbrtrrd 4149 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
155128, 118, 154ltled 8435 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ≤ ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
156 lemul2a 9179 . . . . . . . . . 10 ((((abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ ∧ ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ∈ ℝ ∧ ((abs‘𝐴) ∈ ℝ ∧ 0 ≤ (abs‘𝐴))) ∧ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ≤ ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
157128, 118, 130, 155, 156syl31anc 1281 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
15852, 83, 119, 157fsumle 12208 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
159102recnd 8344 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) ∈ ℂ)
16097rpcnd 10078 . . . . . . . . . . 11 (𝜑 → (𝐸 / 2) ∈ ℂ)
161160adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝐸 / 2) ∈ ℂ)
162 peano2re 8452 . . . . . . . . . . . . 13 𝑗 ∈ ℕ0 (𝐾𝑗) ∈ ℝ → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ)
163109, 162syl 14 . . . . . . . . . . . 12 (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ)
164163recnd 8344 . . . . . . . . . . 11 (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℂ)
165164adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℂ)
166114rpap0d 10082 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) # 0)
167159, 161, 165, 166divassapd 9146 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) = (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
168 fveq2 5690 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑗 → (𝐾𝑛) = (𝐾𝑗))
169168cbvsumv 12105 . . . . . . . . . . . . . . . 16 Σ𝑛 ∈ ℕ0 (𝐾𝑛) = Σ𝑗 ∈ ℕ0 (𝐾𝑗)
170169oveq1i 6085 . . . . . . . . . . . . . . 15 𝑛 ∈ ℕ0 (𝐾𝑛) + 1) = (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)
171170oveq2i 6086 . . . . . . . . . . . . . 14 ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1)) = ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))
172171, 116eqeltrid 2325 . . . . . . . . . . . . 13 (𝜑 → ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1)) ∈ ℝ+)
173172rpcnd 10078 . . . . . . . . . . . 12 (𝜑 → ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1)) ∈ ℂ)
174173adantr 276 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1)) ∈ ℂ)
17579recnd 8344 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ0) → (abs‘𝐴) ∈ ℂ)
17614, 100, 175syl2an 289 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚𝑠))) → (abs‘𝐴) ∈ ℂ)
17752, 174, 176fsummulc1 12194 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1))) = Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1))))
178171oveq2i 6086 . . . . . . . . . 10 𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1))) = (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
179171oveq2i 6086 . . . . . . . . . . . 12 ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1))) = ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
180179a1i 9 . . . . . . . . . . 11 (𝑗 ∈ (0...(𝑚𝑠)) → ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1))) = ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
181180sumeq2i 12108 . . . . . . . . . 10 Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾𝑛) + 1))) = Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
182177, 178, 1813eqtr3g 2294 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))) = Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
183167, 182eqtrd 2271 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) = Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
184158, 183breqtrrd 4153 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ ((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
185109adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ ℕ0 (𝐾𝑗) ∈ ℝ)
186163adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ)
187 fz0ssnn0 10501 . . . . . . . . . . . . 13 (0...(𝑚𝑠)) ⊆ ℕ0
188187a1i 9 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (0...(𝑚𝑠)) ⊆ ℕ0)
189106adantlr 481 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → (𝐾𝑗) = (abs‘𝐴))
190 nn0z 9643 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ0𝑗 ∈ ℤ)
191190adantl 277 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℤ)
192 0zd 9635 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → 0 ∈ ℤ)
19351adantr 276 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → (𝑚𝑠) ∈ ℤ)
194 fzdcel 10423 . . . . . . . . . . . . . 14 ((𝑗 ∈ ℤ ∧ 0 ∈ ℤ ∧ (𝑚𝑠) ∈ ℤ) → DECID 𝑗 ∈ (0...(𝑚𝑠)))
195191, 192, 193, 194syl3anc 1278 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → DECID 𝑗 ∈ (0...(𝑚𝑠)))
196195ralrimiva 2623 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ∀𝑗 ∈ ℕ0 DECID 𝑗 ∈ (0...(𝑚𝑠)))
19779adantlr 481 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ)
198110adantlr 481 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → 0 ≤ (abs‘𝐴))
199108adantr 276 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → seq0( + , 𝐾) ∈ dom ⇝ )
20033, 10, 52, 188, 189, 196, 197, 198, 199isumlessdc 12241 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) ≤ Σ𝑗 ∈ ℕ0 (abs‘𝐴))
201106sumeq2dv 12112 . . . . . . . . . . . 12 (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾𝑗) = Σ𝑗 ∈ ℕ0 (abs‘𝐴))
202201adantr 276 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ ℕ0 (𝐾𝑗) = Σ𝑗 ∈ ℕ0 (abs‘𝐴))
203200, 202breqtrrd 4153 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) ≤ Σ𝑗 ∈ ℕ0 (𝐾𝑗))
204109ltp1d 9250 . . . . . . . . . . 11 (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾𝑗) < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))
205204adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ ℕ0 (𝐾𝑗) < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))
206102, 185, 186, 203, 205lelttrd 8441 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))
20797rpregt0d 10083 . . . . . . . . . . 11 (𝜑 → ((𝐸 / 2) ∈ ℝ ∧ 0 < (𝐸 / 2)))
208207adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝐸 / 2) ∈ ℝ ∧ 0 < (𝐸 / 2)))
209 ltmul1 8910 . . . . . . . . . 10 ((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) ∈ ℝ ∧ (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ ∧ ((𝐸 / 2) ∈ ℝ ∧ 0 < (𝐸 / 2))) → (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ↔ (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) · (𝐸 / 2))))
210102, 186, 208, 209syl3anc 1278 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ↔ (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) · (𝐸 / 2))))
211206, 210mpbid 147 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) · (𝐸 / 2)))
212113rpregt0d 10083 . . . . . . . . . 10 (𝜑 → ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ ∧ 0 < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
213212adantr 276 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ ∧ 0 < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
214 ltdivmul 9196 . . . . . . . . 9 (((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) ∈ ℝ ∧ (𝐸 / 2) ∈ ℝ ∧ ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ ∧ 0 < (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))) → (((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) < (𝐸 / 2) ↔ (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) · (𝐸 / 2))))
215103, 99, 213, 214syl3anc 1278 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) < (𝐸 / 2) ↔ (Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) · (𝐸 / 2))))
216211, 215mpbird 167 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) < (𝐸 / 2))
21784, 115, 99, 184, 216lelttrd 8441 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < (𝐸 / 2))
218 mertens.p . . . . . . . . . 10 (𝜑𝑃 ∈ ℝ)
21998, 218remulcld 8346 . . . . . . . . 9 (𝜑 → ((𝐸 / 2) · 𝑃) ∈ ℝ)
220 mertens.pge0 . . . . . . . . . 10 (𝜑 → 0 ≤ 𝑃)
221218, 220ge0p1rpd 10107 . . . . . . . . 9 (𝜑 → (𝑃 + 1) ∈ ℝ+)
222219, 221rerpdivcld 10108 . . . . . . . 8 (𝜑 → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) ∈ ℝ)
223222adantr 276 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) ∈ ℝ)
2245nnrpd 10074 . . . . . . . . . . . . . 14 (𝜑𝑠 ∈ ℝ+)
22597, 224rpdivcld 10094 . . . . . . . . . . . . 13 (𝜑 → ((𝐸 / 2) / 𝑠) ∈ ℝ+)
226225, 221rpdivcld 10094 . . . . . . . . . . . 12 (𝜑 → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ+)
227226rpred 10076 . . . . . . . . . . 11 (𝜑 → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ)
228227, 218remulcld 8346 . . . . . . . . . 10 (𝜑 → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℝ)
229228ad2antrr 492 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℝ)
230 simpll 531 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝜑)
23194, 15syl 14 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝑗 ∈ ℕ0)
232230, 231, 79syl2anc 415 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘𝐴) ∈ ℝ)
233227ad2antrr 492 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ)
234230, 231, 106syl2anc 415 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝐾𝑗) = (abs‘𝐴))
235 fveq2 5690 . . . . . . . . . . . . . 14 (𝑚 = 𝑗 → (𝐾𝑚) = (𝐾𝑗))
236235breq1d 4135 . . . . . . . . . . . . 13 (𝑚 = 𝑗 → ((𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ↔ (𝐾𝑗) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))))
2377simprd 114 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))
238237ad2antrr 492 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))
239 elfzuz 10403 . . . . . . . . . . . . . 14 (𝑗 ∈ (((𝑚𝑠) + 1)...𝑚) → 𝑗 ∈ (ℤ‘((𝑚𝑠) + 1)))
240 eluzle 9913 . . . . . . . . . . . . . . . . . 18 (𝑚 ∈ (ℤ‘(𝑠 + 𝑡)) → (𝑠 + 𝑡) ≤ 𝑚)
241240adantl 277 . . . . . . . . . . . . . . . . 17 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑠 + 𝑡) ≤ 𝑚)
2428nn0zd 9745 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑡 ∈ ℤ)
243242adantr 276 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑡 ∈ ℤ)
244243zred 9747 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑡 ∈ ℝ)
24556, 244, 55leaddsub2d 8865 . . . . . . . . . . . . . . . . 17 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝑠 + 𝑡) ≤ 𝑚𝑡 ≤ (𝑚𝑠)))
246241, 245mpbid 147 . . . . . . . . . . . . . . . 16 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑡 ≤ (𝑚𝑠))
247 eluz 9914 . . . . . . . . . . . . . . . . 17 ((𝑡 ∈ ℤ ∧ (𝑚𝑠) ∈ ℤ) → ((𝑚𝑠) ∈ (ℤ𝑡) ↔ 𝑡 ≤ (𝑚𝑠)))
248243, 72, 247syl2anc 415 . . . . . . . . . . . . . . . 16 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝑚𝑠) ∈ (ℤ𝑡) ↔ 𝑡 ≤ (𝑚𝑠)))
249246, 248mpbird 167 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ (ℤ𝑡))
250 peano2uz 9962 . . . . . . . . . . . . . . 15 ((𝑚𝑠) ∈ (ℤ𝑡) → ((𝑚𝑠) + 1) ∈ (ℤ𝑡))
251249, 250syl 14 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝑚𝑠) + 1) ∈ (ℤ𝑡))
252 uztrn 9918 . . . . . . . . . . . . . 14 ((𝑗 ∈ (ℤ‘((𝑚𝑠) + 1)) ∧ ((𝑚𝑠) + 1) ∈ (ℤ𝑡)) → 𝑗 ∈ (ℤ𝑡))
253239, 251, 252syl2anr 290 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝑗 ∈ (ℤ𝑡))
254236, 238, 253rspcdva 2934 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝐾𝑗) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))
255234, 254eqbrtrrd 4149 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘𝐴) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))
256232, 233, 255ltled 8435 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘𝐴) ≤ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))
257 breq1 4128 . . . . . . . . . . 11 (𝑤 = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) → (𝑤𝑃 ↔ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ≤ 𝑃))
258 mertens.pub . . . . . . . . . . . 12 (𝜑 → ∀𝑤𝑇 𝑤𝑃)
259258ad2antrr 492 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ∀𝑤𝑇 𝑤𝑃)
26055adantr 276 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝑚 ∈ ℝ)
261 peano2zm 9661 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ ℤ → (𝑠 − 1) ∈ ℤ)
26249, 261syl 14 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑠 − 1) ∈ ℤ)
263262zred 9747 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑠 − 1) ∈ ℝ)
264263ad2antrr 492 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑠 − 1) ∈ ℝ)
265231nn0red 9600 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝑗 ∈ ℝ)
26612zcnd 9748 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑚 ∈ ℂ)
26756recnd 8344 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝑠 ∈ ℂ)
268 1cnd 8332 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 1 ∈ ℂ)
269266, 267, 268subsubd 8655 . . . . . . . . . . . . . . . . 17 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚 − (𝑠 − 1)) = ((𝑚𝑠) + 1))
270269adantr 276 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑚 − (𝑠 − 1)) = ((𝑚𝑠) + 1))
271 elfzle1 10410 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ (((𝑚𝑠) + 1)...𝑚) → ((𝑚𝑠) + 1) ≤ 𝑗)
272271adantl 277 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((𝑚𝑠) + 1) ≤ 𝑗)
273270, 272eqbrtrd 4147 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑚 − (𝑠 − 1)) ≤ 𝑗)
274260, 264, 265, 273subled 8866 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑚𝑗) ≤ (𝑠 − 1))
27594, 19syl 14 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑚𝑗) ∈ ℕ0)
276275, 33eleqtrdi 2331 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑚𝑗) ∈ (ℤ‘0))
277262ad2antrr 492 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑠 − 1) ∈ ℤ)
278 elfz5 10399 . . . . . . . . . . . . . . 15 (((𝑚𝑗) ∈ (ℤ‘0) ∧ (𝑠 − 1) ∈ ℤ) → ((𝑚𝑗) ∈ (0...(𝑠 − 1)) ↔ (𝑚𝑗) ≤ (𝑠 − 1)))
279276, 277, 278syl2anc 415 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((𝑚𝑗) ∈ (0...(𝑠 − 1)) ↔ (𝑚𝑗) ≤ (𝑠 − 1)))
280274, 279mpbird 167 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (𝑚𝑗) ∈ (0...(𝑠 − 1)))
281 simplll 539 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝜑)
28294, 22syldan 282 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((𝑚𝑗) + 1) ∈ ℕ0)
283282, 25sylan 283 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → 𝑘 ∈ ℕ0)
284281, 283, 27syl2anc 415 . . . . . . . . . . . . . . . 16 ((((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) ∧ 𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))) → (𝐺𝑘) = 𝐵)
285284sumeq2dv 12112 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘) = Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)
286285eqcomd 2244 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵 = Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘))
287286fveq2d 5694 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘)))
288135rspceeqv 2948 . . . . . . . . . . . . 13 (((𝑚𝑗) ∈ (0...(𝑠 − 1)) ∧ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))(𝐺𝑘))) → ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)))
289280, 287, 288syl2anc 415 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)))
29094, 39syldan 282 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵 ∈ ℂ)
291290abscld 11925 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ)
292 eqeq1 2245 . . . . . . . . . . . . . . 15 (𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) → (𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) ↔ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))))
293292rexbidv 2551 . . . . . . . . . . . . . 14 (𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) → (∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))))
294 mertens.10 . . . . . . . . . . . . . 14 𝑇 = {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))}
295293, 294elab2g 2973 . . . . . . . . . . . . 13 ((abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ → ((abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ 𝑇 ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))))
296291, 295syl 14 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ 𝑇 ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))))
297289, 296mpbird 167 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ 𝑇)
298257, 259, 297rspcdva 2934 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ≤ 𝑃)
299230, 231, 129syl2anc 415 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((abs‘𝐴) ∈ ℝ ∧ 0 ≤ (abs‘𝐴)))
30094, 81syldan 282 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ)
30139absge0d 11928 . . . . . . . . . . . . 13 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → 0 ≤ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵))
30294, 301syldan 282 . . . . . . . . . . . 12 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 0 ≤ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵))
303300, 302jca 306 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ ∧ 0 ≤ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)))
304218ad2antrr 492 . . . . . . . . . . 11 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → 𝑃 ∈ ℝ)
305 lemul12a 9182 . . . . . . . . . . 11 (((((abs‘𝐴) ∈ ℝ ∧ 0 ≤ (abs‘𝐴)) ∧ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ) ∧ (((abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ∈ ℝ ∧ 0 ≤ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∧ 𝑃 ∈ ℝ)) → (((abs‘𝐴) ≤ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∧ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ≤ 𝑃) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)))
306299, 233, 303, 304, 305syl22anc 1279 . . . . . . . . . 10 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → (((abs‘𝐴) ≤ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∧ (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵) ≤ 𝑃) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)))
307256, 298, 306mp2and 437 . . . . . . . . 9 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))
30886, 95, 229, 307fsumle 12208 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))
309228recnd 8344 . . . . . . . . . . 11 (𝜑 → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℂ)
310309adantr 276 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℂ)
311 fsumconst 12199 . . . . . . . . . 10 (((((𝑚𝑠) + 1)...𝑚) ∈ Fin ∧ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℂ) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) = ((♯‘(((𝑚𝑠) + 1)...𝑚)) · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)))
31286, 310, 311syl2anc 415 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) = ((♯‘(((𝑚𝑠) + 1)...𝑚)) · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)))
313 1zzd 9650 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 1 ∈ ℤ)
314 fzen 10426 . . . . . . . . . . . . . 14 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ (𝑚𝑠) ∈ ℤ) → (1...𝑠) ≈ ((1 + (𝑚𝑠))...(𝑠 + (𝑚𝑠))))
315313, 50, 72, 314syl3anc 1278 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (1...𝑠) ≈ ((1 + (𝑚𝑠))...(𝑠 + (𝑚𝑠))))
316 ax-1cn 8262 . . . . . . . . . . . . . . 15 1 ∈ ℂ
31772zcnd 9748 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ ℂ)
318 addcom 8453 . . . . . . . . . . . . . . 15 ((1 ∈ ℂ ∧ (𝑚𝑠) ∈ ℂ) → (1 + (𝑚𝑠)) = ((𝑚𝑠) + 1))
319316, 317, 318sylancr 418 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (1 + (𝑚𝑠)) = ((𝑚𝑠) + 1))
320267, 266pncan3d 8630 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑠 + (𝑚𝑠)) = 𝑚)
321319, 320oveq12d 6093 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((1 + (𝑚𝑠))...(𝑠 + (𝑚𝑠))) = (((𝑚𝑠) + 1)...𝑚))
322315, 321breqtrd 4151 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (1...𝑠) ≈ (((𝑚𝑠) + 1)...𝑚))
323313, 50fzfigd 10846 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (1...𝑠) ∈ Fin)
324 hashen 11201 . . . . . . . . . . . . 13 (((1...𝑠) ∈ Fin ∧ (((𝑚𝑠) + 1)...𝑚) ∈ Fin) → ((♯‘(1...𝑠)) = (♯‘(((𝑚𝑠) + 1)...𝑚)) ↔ (1...𝑠) ≈ (((𝑚𝑠) + 1)...𝑚)))
325323, 86, 324syl2anc 415 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((♯‘(1...𝑠)) = (♯‘(((𝑚𝑠) + 1)...𝑚)) ↔ (1...𝑠) ≈ (((𝑚𝑠) + 1)...𝑚)))
326322, 325mpbird 167 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (♯‘(1...𝑠)) = (♯‘(((𝑚𝑠) + 1)...𝑚)))
327 hashfz1 11200 . . . . . . . . . . . 12 (𝑠 ∈ ℕ0 → (♯‘(1...𝑠)) = 𝑠)
32853, 327syl 14 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (♯‘(1...𝑠)) = 𝑠)
329326, 328eqtr3d 2273 . . . . . . . . . 10 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (♯‘(((𝑚𝑠) + 1)...𝑚)) = 𝑠)
330329oveq1d 6090 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((♯‘(((𝑚𝑠) + 1)...𝑚)) · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) = (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)))
331218recnd 8344 . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℂ)
332221rpcnd 10078 . . . . . . . . . . . 12 (𝜑 → (𝑃 + 1) ∈ ℂ)
333221rpap0d 10082 . . . . . . . . . . . 12 (𝜑 → (𝑃 + 1) # 0)
334160, 331, 332, 333div23apd 9148 . . . . . . . . . . 11 (𝜑 → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) = (((𝐸 / 2) / (𝑃 + 1)) · 𝑃))
33549zcnd 9748 . . . . . . . . . . . . . 14 (𝜑𝑠 ∈ ℂ)
336225rpcnd 10078 . . . . . . . . . . . . . 14 (𝜑 → ((𝐸 / 2) / 𝑠) ∈ ℂ)
337335, 336, 332, 333divassapd 9146 . . . . . . . . . . . . 13 (𝜑 → ((𝑠 · ((𝐸 / 2) / 𝑠)) / (𝑃 + 1)) = (𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))))
3385nnap0d 9329 . . . . . . . . . . . . . . 15 (𝜑𝑠 # 0)
339160, 335, 338divcanap2d 9112 . . . . . . . . . . . . . 14 (𝜑 → (𝑠 · ((𝐸 / 2) / 𝑠)) = (𝐸 / 2))
340339oveq1d 6090 . . . . . . . . . . . . 13 (𝜑 → ((𝑠 · ((𝐸 / 2) / 𝑠)) / (𝑃 + 1)) = ((𝐸 / 2) / (𝑃 + 1)))
341337, 340eqtr3d 2273 . . . . . . . . . . . 12 (𝜑 → (𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) = ((𝐸 / 2) / (𝑃 + 1)))
342341oveq1d 6090 . . . . . . . . . . 11 (𝜑 → ((𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) · 𝑃) = (((𝐸 / 2) / (𝑃 + 1)) · 𝑃))
343226rpcnd 10078 . . . . . . . . . . . 12 (𝜑 → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℂ)
344335, 343, 331mulassd 8339 . . . . . . . . . . 11 (𝜑 → ((𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) · 𝑃) = (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)))
345334, 342, 3443eqtr2rd 2278 . . . . . . . . . 10 (𝜑 → (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) = (((𝐸 / 2) · 𝑃) / (𝑃 + 1)))
346345adantr 276 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) = (((𝐸 / 2) · 𝑃) / (𝑃 + 1)))
347312, 330, 3463eqtrd 2275 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) = (((𝐸 / 2) · 𝑃) / (𝑃 + 1)))
348308, 347breqtrd 4151 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ≤ (((𝐸 / 2) · 𝑃) / (𝑃 + 1)))
349 peano2re 8452 . . . . . . . . . . 11 (𝑃 ∈ ℝ → (𝑃 + 1) ∈ ℝ)
350218, 349syl 14 . . . . . . . . . 10 (𝜑 → (𝑃 + 1) ∈ ℝ)
351218ltp1d 9250 . . . . . . . . . 10 (𝜑𝑃 < (𝑃 + 1))
352218, 350, 97, 351ltmul2dd 10133 . . . . . . . . 9 (𝜑 → ((𝐸 / 2) · 𝑃) < ((𝐸 / 2) · (𝑃 + 1)))
353219, 98, 221ltdivmul2d 10129 . . . . . . . . 9 (𝜑 → ((((𝐸 / 2) · 𝑃) / (𝑃 + 1)) < (𝐸 / 2) ↔ ((𝐸 / 2) · 𝑃) < ((𝐸 / 2) · (𝑃 + 1))))
354352, 353mpbird 167 . . . . . . . 8 (𝜑 → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) < (𝐸 / 2))
355354adantr 276 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) < (𝐸 / 2))
35696, 223, 99, 348, 355lelttrd 8441 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < (𝐸 / 2))
35784, 96, 99, 99, 217, 356lt2addd 8885 . . . . 5 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) + Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵))) < ((𝐸 / 2) + (𝐸 / 2)))
35817, 39absmuld 11938 . . . . . . 7 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) = ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)))
359358sumeq2dv 12112 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) = Σ𝑗 ∈ (0...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)))
36072zred 9747 . . . . . . . . 9 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) ∈ ℝ)
361360ltp1d 9250 . . . . . . . 8 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (𝑚𝑠) < ((𝑚𝑠) + 1))
362 fzdisj 10435 . . . . . . . 8 ((𝑚𝑠) < ((𝑚𝑠) + 1) → ((0...(𝑚𝑠)) ∩ (((𝑚𝑠) + 1)...𝑚)) = ∅)
363361, 362syl 14 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((0...(𝑚𝑠)) ∩ (((𝑚𝑠) + 1)...𝑚)) = ∅)
364 fzsplit 10434 . . . . . . . 8 ((𝑚𝑠) ∈ (0...𝑚) → (0...𝑚) = ((0...(𝑚𝑠)) ∪ (((𝑚𝑠) + 1)...𝑚)))
36570, 364syl 14 . . . . . . 7 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (0...𝑚) = ((0...(𝑚𝑠)) ∪ (((𝑚𝑠) + 1)...𝑚)))
36682recnd 8344 . . . . . . 7 (((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) ∈ ℂ)
367363, 365, 13, 366fsumsplit 12152 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) = (Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) + Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵))))
368359, 367eqtr2d 2272 . . . . 5 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) + Σ𝑗 ∈ (((𝑚𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵))) = Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)))
36945rpcnd 10078 . . . . . . 7 (𝜑𝐸 ∈ ℂ)
370369adantr 276 . . . . . 6 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → 𝐸 ∈ ℂ)
3713702halvesd 9530 . . . . 5 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → ((𝐸 / 2) + (𝐸 / 2)) = 𝐸)
372357, 368, 3713brtr3d 4156 . . . 4 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
37342, 44, 47, 48, 372lelttrd 8441 . . 3 ((𝜑𝑚 ∈ (ℤ‘(𝑠 + 𝑡))) → (abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
374373ralrimiva 2623 . 2 (𝜑 → ∀𝑚 ∈ (ℤ‘(𝑠 + 𝑡))(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
375 fveq2 5690 . . . 4 (𝑦 = (𝑠 + 𝑡) → (ℤ𝑦) = (ℤ‘(𝑠 + 𝑡)))
376375raleqdv 2755 . . 3 (𝑦 = (𝑠 + 𝑡) → (∀𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸 ↔ ∀𝑚 ∈ (ℤ‘(𝑠 + 𝑡))(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
377376rspcev 2929 . 2 (((𝑠 + 𝑡) ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ‘(𝑠 + 𝑡))(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
3789, 374, 377syl2anc 415 1 (𝜑 → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  DECID wdc 846   = wceq 1402  wcel 2209  {cab 2224  wral 2528  wrex 2529  cun 3218  cin 3219  wss 3220  c0 3520   class class class wbr 4125  dom cdm 4769  cfv 5372  (class class class)co 6075  cen 7010  Fincfn 7012  cc 8167  cr 8168  0cc0 8169  1c1 8170   + caddc 8172   · cmul 8174   < clt 8350  cle 8351  cmin 8487   / cdiv 8992  cn 9283  2c2 9334  0cn0 9542  cz 9623  cuz 9900  +crp 10033  ...cfz 10390  seqcseq 10862  chash 11192  abscabs 11741  cli 12022  Σcsu 12097
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4241  ax-sep 4244  ax-nul 4254  ax-pow 4306  ax-pr 4341  ax-un 4573  ax-setind 4679  ax-iinf 4730  ax-cnex 8260  ax-resscn 8261  ax-1cn 8262  ax-1re 8263  ax-icn 8264  ax-addcl 8265  ax-addrcl 8266  ax-mulcl 8267  ax-mulrcl 8268  ax-addcom 8269  ax-mulcom 8270  ax-addass 8271  ax-mulass 8272  ax-distr 8273  ax-i2m1 8274  ax-0lt1 8275  ax-1rid 8276  ax-0id 8277  ax-rnegex 8278  ax-precex 8279  ax-cnre 8280  ax-pre-ltirr 8281  ax-pre-ltwlin 8282  ax-pre-lttrn 8283  ax-pre-apti 8284  ax-pre-ltadd 8285  ax-pre-mulgt0 8286  ax-pre-mulext 8287  ax-arch 8288  ax-caucvg 8289
This theorem depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3636  df-pw 3687  df-sn 3711  df-pr 3712  df-op 3714  df-uni 3931  df-int 3966  df-iun 4009  df-br 4126  df-opab 4188  df-mpt 4189  df-tr 4225  df-id 4433  df-po 4436  df-iso 4437  df-iord 4506  df-on 4508  df-ilim 4509  df-suc 4511  df-iom 4733  df-xp 4775  df-rel 4776  df-cnv 4777  df-co 4778  df-dm 4779  df-rn 4780  df-res 4781  df-ima 4782  df-iota 5332  df-fun 5374  df-fn 5375  df-f 5376  df-f1 5377  df-fo 5378  df-f1o 5379  df-fv 5380  df-isom 5381  df-riota 6028  df-ov 6078  df-oprab 6079  df-mpo 6080  df-1st 6364  df-2nd 6365  df-recs 6566  df-irdg 6631  df-frec 6652  df-1o 6677  df-oadd 6681  df-er 6797  df-en 7013  df-dom 7014  df-fin 7015  df-sup 7314  df-pnf 8352  df-mnf 8353  df-xr 8354  df-ltxr 8355  df-le 8356  df-sub 8489  df-neg 8490  df-reap 8893  df-ap 8900  df-div 8993  df-inn 9284  df-2 9342  df-3 9343  df-4 9344  df-n0 9543  df-z 9624  df-uz 9901  df-q 9999  df-rp 10034  df-ico 10275  df-fz 10391  df-fzo 10528  df-seqfrec 10863  df-exp 10954  df-ihash 11193  df-cj 11585  df-re 11586  df-im 11587  df-rsqrt 11742  df-abs 11743  df-clim 12023  df-sumdc 12098
This theorem is referenced by:  mertenslem2  12281
  Copyright terms: Public domain W3C validator