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

Theorem mertenslem2 15858
Description: Lemma for mertens 15859. (Contributed by Mario Carneiro, 28-Apr-2014.)
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))))
Assertion
Ref Expression
mertenslem2 (𝜑 → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
Distinct variable groups:   𝑗,𝑚,𝑛,𝑠,𝑦,𝑧,𝐵   𝑗,𝑘,𝐺,𝑚,𝑛,𝑠,𝑦,𝑧   𝜑,𝑗,𝑘,𝑚,𝑦,𝑧   𝐴,𝑘,𝑚,𝑛,𝑠,𝑦   𝑗,𝐸,𝑘,𝑚,𝑛,𝑠,𝑦,𝑧   𝑗,𝐾,𝑘,𝑚,𝑛,𝑠,𝑦,𝑧   𝑗,𝐹,𝑚,𝑛,𝑦   𝜓,𝑗,𝑘,𝑚,𝑛,𝑦,𝑧   𝑇,𝑗,𝑘,𝑚,𝑛,𝑦,𝑧   𝑘,𝐻,𝑚,𝑦   𝜑,𝑛,𝑠
Allowed substitution hints:   𝜓(𝑠)   𝐴(𝑧,𝑗)   𝐵(𝑘)   𝑇(𝑠)   𝐹(𝑧,𝑘,𝑠)   𝐻(𝑧,𝑗,𝑛,𝑠)

Proof of Theorem mertenslem2
Dummy variables 𝑡 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nnuz 12843 . . 3 ℕ = (ℤ‘1)
2 1zzd 12571 . . 3 (𝜑 → 1 ∈ ℤ)
3 mertens.9 . . . . 5 (𝜑𝐸 ∈ ℝ+)
43rphalfcld 13014 . . . 4 (𝜑 → (𝐸 / 2) ∈ ℝ+)
5 nn0uz 12842 . . . . . 6 0 = (ℤ‘0)
6 0zd 12548 . . . . . 6 (𝜑 → 0 ∈ ℤ)
7 eqidd 2731 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) = (𝐾𝑗))
8 mertens.2 . . . . . . 7 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) = (abs‘𝐴))
9 mertens.3 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ0) → 𝐴 ∈ ℂ)
109abscld 15412 . . . . . . 7 ((𝜑𝑗 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ)
118, 10eqeltrd 2829 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → (𝐾𝑗) ∈ ℝ)
12 mertens.7 . . . . . 6 (𝜑 → seq0( + , 𝐾) ∈ dom ⇝ )
135, 6, 7, 11, 12isumrecl 15738 . . . . 5 (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾𝑗) ∈ ℝ)
149absge0d 15420 . . . . . . 7 ((𝜑𝑗 ∈ ℕ0) → 0 ≤ (abs‘𝐴))
1514, 8breqtrrd 5138 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → 0 ≤ (𝐾𝑗))
165, 6, 7, 11, 12, 15isumge0 15739 . . . . 5 (𝜑 → 0 ≤ Σ𝑗 ∈ ℕ0 (𝐾𝑗))
1713, 16ge0p1rpd 13032 . . . 4 (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1) ∈ ℝ+)
184, 17rpdivcld 13019 . . 3 (𝜑 → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ∈ ℝ+)
19 eqidd 2731 . . 3 ((𝜑𝑚 ∈ ℕ) → (seq0( + , 𝐺)‘𝑚) = (seq0( + , 𝐺)‘𝑚))
20 mertens.4 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = 𝐵)
21 mertens.5 . . . 4 ((𝜑𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
22 mertens.8 . . . 4 (𝜑 → seq0( + , 𝐺) ∈ dom ⇝ )
235, 6, 20, 21, 22isumclim2 15731 . . 3 (𝜑 → seq0( + , 𝐺) ⇝ Σ𝑘 ∈ ℕ0 𝐵)
241, 2, 18, 19, 23climi2 15484 . 2 (𝜑 → ∃𝑠 ∈ ℕ ∀𝑚 ∈ (ℤ𝑠)(abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
25 eluznn 12884 . . . . . . . 8 ((𝑠 ∈ ℕ ∧ 𝑚 ∈ (ℤ𝑠)) → 𝑚 ∈ ℕ)
2620, 21eqeltrd 2829 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) ∈ ℂ)
275, 6, 26serf 14002 . . . . . . . . . . . 12 (𝜑 → seq0( + , 𝐺):ℕ0⟶ℂ)
28 nnnn0 12456 . . . . . . . . . . . 12 (𝑚 ∈ ℕ → 𝑚 ∈ ℕ0)
29 ffvelcdm 7056 . . . . . . . . . . . 12 ((seq0( + , 𝐺):ℕ0⟶ℂ ∧ 𝑚 ∈ ℕ0) → (seq0( + , 𝐺)‘𝑚) ∈ ℂ)
3027, 28, 29syl2an 596 . . . . . . . . . . 11 ((𝜑𝑚 ∈ ℕ) → (seq0( + , 𝐺)‘𝑚) ∈ ℂ)
315, 6, 20, 21, 22isumcl 15734 . . . . . . . . . . . 12 (𝜑 → Σ𝑘 ∈ ℕ0 𝐵 ∈ ℂ)
3231adantr 480 . . . . . . . . . . 11 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ ℕ0 𝐵 ∈ ℂ)
3330, 32abssubd 15429 . . . . . . . . . 10 ((𝜑𝑚 ∈ ℕ) → (abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) = (abs‘(Σ𝑘 ∈ ℕ0 𝐵 − (seq0( + , 𝐺)‘𝑚))))
34 eqid 2730 . . . . . . . . . . . . . 14 (ℤ‘(𝑚 + 1)) = (ℤ‘(𝑚 + 1))
3528adantl 481 . . . . . . . . . . . . . . . 16 ((𝜑𝑚 ∈ ℕ) → 𝑚 ∈ ℕ0)
36 peano2nn0 12489 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ0)
3735, 36syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ ℕ) → (𝑚 + 1) ∈ ℕ0)
3837nn0zd 12562 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℕ) → (𝑚 + 1) ∈ ℤ)
39 simpll 766 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ (ℤ‘(𝑚 + 1))) → 𝜑)
40 eluznn0 12883 . . . . . . . . . . . . . . . 16 (((𝑚 + 1) ∈ ℕ0𝑘 ∈ (ℤ‘(𝑚 + 1))) → 𝑘 ∈ ℕ0)
4137, 40sylan 580 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ (ℤ‘(𝑚 + 1))) → 𝑘 ∈ ℕ0)
4239, 41, 20syl2anc 584 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ (ℤ‘(𝑚 + 1))) → (𝐺𝑘) = 𝐵)
4339, 41, 21syl2anc 584 . . . . . . . . . . . . . 14 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ (ℤ‘(𝑚 + 1))) → 𝐵 ∈ ℂ)
4422adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ ℕ) → seq0( + , 𝐺) ∈ dom ⇝ )
4526adantlr 715 . . . . . . . . . . . . . . . 16 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) ∈ ℂ)
465, 37, 45iserex 15630 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ ℕ) → (seq0( + , 𝐺) ∈ dom ⇝ ↔ seq(𝑚 + 1)( + , 𝐺) ∈ dom ⇝ ))
4744, 46mpbid 232 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℕ) → seq(𝑚 + 1)( + , 𝐺) ∈ dom ⇝ )
4834, 38, 42, 43, 47isumcl 15734 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵 ∈ ℂ)
4930, 48pncan2d 11542 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ ℕ) → (((seq0( + , 𝐺)‘𝑚) + Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵) − (seq0( + , 𝐺)‘𝑚)) = Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵)
5020adantlr 715 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) = 𝐵)
5121adantlr 715 . . . . . . . . . . . . . . 15 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
525, 34, 37, 50, 51, 44isumsplit 15813 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ ℕ0 𝐵 = (Σ𝑘 ∈ (0...((𝑚 + 1) − 1))𝐵 + Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵))
53 nncn 12201 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ → 𝑚 ∈ ℂ)
5453adantl 481 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑚 ∈ ℕ) → 𝑚 ∈ ℂ)
55 ax-1cn 11133 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
56 pncan 11434 . . . . . . . . . . . . . . . . . . 19 ((𝑚 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑚 + 1) − 1) = 𝑚)
5754, 55, 56sylancl 586 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑚 ∈ ℕ) → ((𝑚 + 1) − 1) = 𝑚)
5857oveq2d 7406 . . . . . . . . . . . . . . . . 17 ((𝜑𝑚 ∈ ℕ) → (0...((𝑚 + 1) − 1)) = (0...𝑚))
5958sumeq1d 15673 . . . . . . . . . . . . . . . 16 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ (0...((𝑚 + 1) − 1))𝐵 = Σ𝑘 ∈ (0...𝑚)𝐵)
60 simpl 482 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑚 ∈ ℕ) → 𝜑)
61 elfznn0 13588 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (0...𝑚) → 𝑘 ∈ ℕ0)
6260, 61, 20syl2an 596 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ (0...𝑚)) → (𝐺𝑘) = 𝐵)
6335, 5eleqtrdi 2839 . . . . . . . . . . . . . . . . 17 ((𝜑𝑚 ∈ ℕ) → 𝑚 ∈ (ℤ‘0))
6460, 61, 21syl2an 596 . . . . . . . . . . . . . . . . 17 (((𝜑𝑚 ∈ ℕ) ∧ 𝑘 ∈ (0...𝑚)) → 𝐵 ∈ ℂ)
6562, 63, 64fsumser 15703 . . . . . . . . . . . . . . . 16 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ (0...𝑚)𝐵 = (seq0( + , 𝐺)‘𝑚))
6659, 65eqtrd 2765 . . . . . . . . . . . . . . 15 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ (0...((𝑚 + 1) − 1))𝐵 = (seq0( + , 𝐺)‘𝑚))
6766oveq1d 7405 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℕ) → (Σ𝑘 ∈ (0...((𝑚 + 1) − 1))𝐵 + Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵) = ((seq0( + , 𝐺)‘𝑚) + Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵))
6852, 67eqtrd 2765 . . . . . . . . . . . . 13 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ ℕ0 𝐵 = ((seq0( + , 𝐺)‘𝑚) + Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵))
6968oveq1d 7405 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ ℕ) → (Σ𝑘 ∈ ℕ0 𝐵 − (seq0( + , 𝐺)‘𝑚)) = (((seq0( + , 𝐺)‘𝑚) + Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵) − (seq0( + , 𝐺)‘𝑚)))
7042sumeq2dv 15675 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ ℕ) → Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘) = Σ𝑘 ∈ (ℤ‘(𝑚 + 1))𝐵)
7149, 69, 703eqtr4d 2775 . . . . . . . . . . 11 ((𝜑𝑚 ∈ ℕ) → (Σ𝑘 ∈ ℕ0 𝐵 − (seq0( + , 𝐺)‘𝑚)) = Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘))
7271fveq2d 6865 . . . . . . . . . 10 ((𝜑𝑚 ∈ ℕ) → (abs‘(Σ𝑘 ∈ ℕ0 𝐵 − (seq0( + , 𝐺)‘𝑚))) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)))
7333, 72eqtrd 2765 . . . . . . . . 9 ((𝜑𝑚 ∈ ℕ) → (abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)))
7473breq1d 5120 . . . . . . . 8 ((𝜑𝑚 ∈ ℕ) → ((abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ (abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
7525, 74sylan2 593 . . . . . . 7 ((𝜑 ∧ (𝑠 ∈ ℕ ∧ 𝑚 ∈ (ℤ𝑠))) → ((abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ (abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
7675anassrs 467 . . . . . 6 (((𝜑𝑠 ∈ ℕ) ∧ 𝑚 ∈ (ℤ𝑠)) → ((abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ (abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
7776ralbidva 3155 . . . . 5 ((𝜑𝑠 ∈ ℕ) → (∀𝑚 ∈ (ℤ𝑠)(abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ ∀𝑚 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
78 fvoveq1 7413 . . . . . . . . 9 (𝑚 = 𝑛 → (ℤ‘(𝑚 + 1)) = (ℤ‘(𝑛 + 1)))
7978sumeq1d 15673 . . . . . . . 8 (𝑚 = 𝑛 → Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘) = Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))
8079fveq2d 6865 . . . . . . 7 (𝑚 = 𝑛 → (abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)))
8180breq1d 5120 . . . . . 6 (𝑚 = 𝑛 → ((abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
8281cbvralvw 3216 . . . . 5 (∀𝑚 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑚 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)))
8377, 82bitrdi 287 . . . 4 ((𝜑𝑠 ∈ ℕ) → (∀𝑚 ∈ (ℤ𝑠)(abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) ↔ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
84 mertens.11 . . . . . 6 (𝜓 ↔ (𝑠 ∈ ℕ ∧ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))))
85 0zd 12548 . . . . . . . . 9 ((𝜑𝜓) → 0 ∈ ℤ)
864adantr 480 . . . . . . . . . . 11 ((𝜑𝜓) → (𝐸 / 2) ∈ ℝ+)
8784simplbi 497 . . . . . . . . . . . . 13 (𝜓𝑠 ∈ ℕ)
8887adantl 481 . . . . . . . . . . . 12 ((𝜑𝜓) → 𝑠 ∈ ℕ)
8988nnrpd 13000 . . . . . . . . . . 11 ((𝜑𝜓) → 𝑠 ∈ ℝ+)
9086, 89rpdivcld 13019 . . . . . . . . . 10 ((𝜑𝜓) → ((𝐸 / 2) / 𝑠) ∈ ℝ+)
91 mertens.10 . . . . . . . . . . . . 13 𝑇 = {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))}
92 eqid 2730 . . . . . . . . . . . . . . . . . 18 (ℤ‘(𝑛 + 1)) = (ℤ‘(𝑛 + 1))
93 elfznn0 13588 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ (0...(𝑠 − 1)) → 𝑛 ∈ ℕ0)
9493adantl 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → 𝑛 ∈ ℕ0)
95 peano2nn0 12489 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ0 → (𝑛 + 1) ∈ ℕ0)
9694, 95syl 17 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → (𝑛 + 1) ∈ ℕ0)
9796nn0zd 12562 . . . . . . . . . . . . . . . . . 18 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → (𝑛 + 1) ∈ ℤ)
98 eqidd 2731 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) ∧ 𝑘 ∈ (ℤ‘(𝑛 + 1))) → (𝐺𝑘) = (𝐺𝑘))
99 simplll 774 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) ∧ 𝑘 ∈ (ℤ‘(𝑛 + 1))) → 𝜑)
100 eluznn0 12883 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 + 1) ∈ ℕ0𝑘 ∈ (ℤ‘(𝑛 + 1))) → 𝑘 ∈ ℕ0)
10196, 100sylan 580 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) ∧ 𝑘 ∈ (ℤ‘(𝑛 + 1))) → 𝑘 ∈ ℕ0)
10299, 101, 26syl2anc 584 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) ∧ 𝑘 ∈ (ℤ‘(𝑛 + 1))) → (𝐺𝑘) ∈ ℂ)
10322ad2antrr 726 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → seq0( + , 𝐺) ∈ dom ⇝ )
10426ad4ant14 752 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) ∈ ℂ)
1055, 96, 104iserex 15630 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → (seq0( + , 𝐺) ∈ dom ⇝ ↔ seq(𝑛 + 1)( + , 𝐺) ∈ dom ⇝ ))
106103, 105mpbid 232 . . . . . . . . . . . . . . . . . 18 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → seq(𝑛 + 1)( + , 𝐺) ∈ dom ⇝ )
10792, 97, 98, 102, 106isumcl 15734 . . . . . . . . . . . . . . . . 17 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘) ∈ ℂ)
108107abscld 15412 . . . . . . . . . . . . . . . 16 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) ∈ ℝ)
109 eleq1a 2824 . . . . . . . . . . . . . . . 16 ((abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) ∈ ℝ → (𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) → 𝑧 ∈ ℝ))
110108, 109syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝜓) ∧ 𝑛 ∈ (0...(𝑠 − 1))) → (𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) → 𝑧 ∈ ℝ))
111110rexlimdva 3135 . . . . . . . . . . . . . 14 ((𝜑𝜓) → (∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) → 𝑧 ∈ ℝ))
112111abssdv 4034 . . . . . . . . . . . . 13 ((𝜑𝜓) → {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))} ⊆ ℝ)
11391, 112eqsstrid 3988 . . . . . . . . . . . 12 ((𝜑𝜓) → 𝑇 ⊆ ℝ)
114 fzfid 13945 . . . . . . . . . . . . . . 15 ((𝜑𝜓) → (0...(𝑠 − 1)) ∈ Fin)
115 abrexfi 9310 . . . . . . . . . . . . . . 15 ((0...(𝑠 − 1)) ∈ Fin → {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))} ∈ Fin)
116114, 115syl 17 . . . . . . . . . . . . . 14 ((𝜑𝜓) → {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))} ∈ Fin)
11791, 116eqeltrid 2833 . . . . . . . . . . . . 13 ((𝜑𝜓) → 𝑇 ∈ Fin)
118 nnm1nn0 12490 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ ℕ → (𝑠 − 1) ∈ ℕ0)
11988, 118syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝜓) → (𝑠 − 1) ∈ ℕ0)
120119, 5eleqtrdi 2839 . . . . . . . . . . . . . . . . 17 ((𝜑𝜓) → (𝑠 − 1) ∈ (ℤ‘0))
121 eluzfz1 13499 . . . . . . . . . . . . . . . . 17 ((𝑠 − 1) ∈ (ℤ‘0) → 0 ∈ (0...(𝑠 − 1)))
122120, 121syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝜓) → 0 ∈ (0...(𝑠 − 1)))
123 nnnn0 12456 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
124123, 20sylan2 593 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → (𝐺𝑘) = 𝐵)
125124sumeq2dv 15675 . . . . . . . . . . . . . . . . . . 19 (𝜑 → Σ𝑘 ∈ ℕ (𝐺𝑘) = Σ𝑘 ∈ ℕ 𝐵)
126125adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑𝜓) → Σ𝑘 ∈ ℕ (𝐺𝑘) = Σ𝑘 ∈ ℕ 𝐵)
127126fveq2d 6865 . . . . . . . . . . . . . . . . 17 ((𝜑𝜓) → (abs‘Σ𝑘 ∈ ℕ (𝐺𝑘)) = (abs‘Σ𝑘 ∈ ℕ 𝐵))
128127eqcomd 2736 . . . . . . . . . . . . . . . 16 ((𝜑𝜓) → (abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ ℕ (𝐺𝑘)))
129 fv0p1e1 12311 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 0 → (ℤ‘(𝑛 + 1)) = (ℤ‘1))
130129, 1eqtr4di 2783 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 0 → (ℤ‘(𝑛 + 1)) = ℕ)
131130sumeq1d 15673 . . . . . . . . . . . . . . . . . 18 (𝑛 = 0 → Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘) = Σ𝑘 ∈ ℕ (𝐺𝑘))
132131fveq2d 6865 . . . . . . . . . . . . . . . . 17 (𝑛 = 0 → (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) = (abs‘Σ𝑘 ∈ ℕ (𝐺𝑘)))
133132rspceeqv 3614 . . . . . . . . . . . . . . . 16 ((0 ∈ (0...(𝑠 − 1)) ∧ (abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ ℕ (𝐺𝑘))) → ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)))
134122, 128, 133syl2anc 584 . . . . . . . . . . . . . . 15 ((𝜑𝜓) → ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)))
135 fvex 6874 . . . . . . . . . . . . . . . 16 (abs‘Σ𝑘 ∈ ℕ 𝐵) ∈ V
136 eqeq1 2734 . . . . . . . . . . . . . . . . 17 (𝑧 = (abs‘Σ𝑘 ∈ ℕ 𝐵) → (𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) ↔ (abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))))
137136rexbidv 3158 . . . . . . . . . . . . . . . 16 (𝑧 = (abs‘Σ𝑘 ∈ ℕ 𝐵) → (∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘))))
138135, 137, 91elab2 3652 . . . . . . . . . . . . . . 15 ((abs‘Σ𝑘 ∈ ℕ 𝐵) ∈ 𝑇 ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈ ℕ 𝐵) = (abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)))
139134, 138sylibr 234 . . . . . . . . . . . . . 14 ((𝜑𝜓) → (abs‘Σ𝑘 ∈ ℕ 𝐵) ∈ 𝑇)
140139ne0d 4308 . . . . . . . . . . . . 13 ((𝜑𝜓) → 𝑇 ≠ ∅)
141 ltso 11261 . . . . . . . . . . . . . 14 < Or ℝ
142 fisupcl 9428 . . . . . . . . . . . . . 14 (( < Or ℝ ∧ (𝑇 ∈ Fin ∧ 𝑇 ≠ ∅ ∧ 𝑇 ⊆ ℝ)) → sup(𝑇, ℝ, < ) ∈ 𝑇)
143141, 142mpan 690 . . . . . . . . . . . . 13 ((𝑇 ∈ Fin ∧ 𝑇 ≠ ∅ ∧ 𝑇 ⊆ ℝ) → sup(𝑇, ℝ, < ) ∈ 𝑇)
144117, 140, 113, 143syl3anc 1373 . . . . . . . . . . . 12 ((𝜑𝜓) → sup(𝑇, ℝ, < ) ∈ 𝑇)
145113, 144sseldd 3950 . . . . . . . . . . 11 ((𝜑𝜓) → sup(𝑇, ℝ, < ) ∈ ℝ)
146 0red 11184 . . . . . . . . . . . 12 ((𝜑𝜓) → 0 ∈ ℝ)
147123, 21sylan2 593 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝐵 ∈ ℂ)
148 1nn0 12465 . . . . . . . . . . . . . . . . . 18 1 ∈ ℕ0
149148a1i 11 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℕ0)
1505, 149, 26iserex 15630 . . . . . . . . . . . . . . . 16 (𝜑 → (seq0( + , 𝐺) ∈ dom ⇝ ↔ seq1( + , 𝐺) ∈ dom ⇝ ))
15122, 150mpbid 232 . . . . . . . . . . . . . . 15 (𝜑 → seq1( + , 𝐺) ∈ dom ⇝ )
1521, 2, 124, 147, 151isumcl 15734 . . . . . . . . . . . . . 14 (𝜑 → Σ𝑘 ∈ ℕ 𝐵 ∈ ℂ)
153152adantr 480 . . . . . . . . . . . . 13 ((𝜑𝜓) → Σ𝑘 ∈ ℕ 𝐵 ∈ ℂ)
154153abscld 15412 . . . . . . . . . . . 12 ((𝜑𝜓) → (abs‘Σ𝑘 ∈ ℕ 𝐵) ∈ ℝ)
155153absge0d 15420 . . . . . . . . . . . 12 ((𝜑𝜓) → 0 ≤ (abs‘Σ𝑘 ∈ ℕ 𝐵))
156 fimaxre2 12135 . . . . . . . . . . . . . 14 ((𝑇 ⊆ ℝ ∧ 𝑇 ∈ Fin) → ∃𝑧 ∈ ℝ ∀𝑤𝑇 𝑤𝑧)
157113, 117, 156syl2anc 584 . . . . . . . . . . . . 13 ((𝜑𝜓) → ∃𝑧 ∈ ℝ ∀𝑤𝑇 𝑤𝑧)
158113, 140, 157, 139suprubd 12152 . . . . . . . . . . . 12 ((𝜑𝜓) → (abs‘Σ𝑘 ∈ ℕ 𝐵) ≤ sup(𝑇, ℝ, < ))
159146, 154, 145, 155, 158letrd 11338 . . . . . . . . . . 11 ((𝜑𝜓) → 0 ≤ sup(𝑇, ℝ, < ))
160145, 159ge0p1rpd 13032 . . . . . . . . . 10 ((𝜑𝜓) → (sup(𝑇, ℝ, < ) + 1) ∈ ℝ+)
16190, 160rpdivcld 13019 . . . . . . . . 9 ((𝜑𝜓) → (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) ∈ ℝ+)
162 fveq2 6861 . . . . . . . . . . 11 (𝑛 = 𝑚 → (𝐾𝑛) = (𝐾𝑚))
163 eqid 2730 . . . . . . . . . . 11 (𝑛 ∈ ℕ0 ↦ (𝐾𝑛)) = (𝑛 ∈ ℕ0 ↦ (𝐾𝑛))
164 fvex 6874 . . . . . . . . . . 11 (𝐾𝑚) ∈ V
165162, 163, 164fvmpt 6971 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑚) = (𝐾𝑚))
166165adantl 481 . . . . . . . . 9 (((𝜑𝜓) ∧ 𝑚 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑚) = (𝐾𝑚))
167 nn0ex 12455 . . . . . . . . . . . . 13 0 ∈ V
168167mptex 7200 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 ↦ (𝐾𝑛)) ∈ V
169168a1i 11 . . . . . . . . . . 11 (𝜑 → (𝑛 ∈ ℕ0 ↦ (𝐾𝑛)) ∈ V)
170 elnn0uz 12845 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ0𝑗 ∈ (ℤ‘0))
171 fveq2 6861 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑗 → (𝐾𝑛) = (𝐾𝑗))
172 fvex 6874 . . . . . . . . . . . . . . . 16 (𝐾𝑗) ∈ V
173171, 163, 172fvmpt 6971 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑗) = (𝐾𝑗))
174173adantl 481 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑗) = (𝐾𝑗))
175170, 174sylan2br 595 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ (ℤ‘0)) → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑗) = (𝐾𝑗))
1766, 175seqfeq 13999 . . . . . . . . . . . 12 (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (𝐾𝑛))) = seq0( + , 𝐾))
177176, 12eqeltrd 2829 . . . . . . . . . . 11 (𝜑 → seq0( + , (𝑛 ∈ ℕ0 ↦ (𝐾𝑛))) ∈ dom ⇝ )
178174, 8eqtrd 2765 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑗) = (abs‘𝐴))
179178, 10eqeltrd 2829 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑗) ∈ ℝ)
180179recnd 11209 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (𝐾𝑛))‘𝑗) ∈ ℂ)
1815, 6, 169, 177, 180serf0 15654 . . . . . . . . . 10 (𝜑 → (𝑛 ∈ ℕ0 ↦ (𝐾𝑛)) ⇝ 0)
182181adantr 480 . . . . . . . . 9 ((𝜑𝜓) → (𝑛 ∈ ℕ0 ↦ (𝐾𝑛)) ⇝ 0)
1835, 85, 161, 166, 182climi0 15485 . . . . . . . 8 ((𝜑𝜓) → ∃𝑡 ∈ ℕ0𝑚 ∈ (ℤ𝑡)(abs‘(𝐾𝑚)) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))
184 simplll 774 . . . . . . . . . . . . . 14 ((((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) ∧ 𝑚 ∈ (ℤ𝑡)) → 𝜑)
185 eluznn0 12883 . . . . . . . . . . . . . . 15 ((𝑡 ∈ ℕ0𝑚 ∈ (ℤ𝑡)) → 𝑚 ∈ ℕ0)
186185adantll 714 . . . . . . . . . . . . . 14 ((((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) ∧ 𝑚 ∈ (ℤ𝑡)) → 𝑚 ∈ ℕ0)
18711, 15absidd 15396 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ0) → (abs‘(𝐾𝑗)) = (𝐾𝑗))
188187ralrimiva 3126 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑗 ∈ ℕ0 (abs‘(𝐾𝑗)) = (𝐾𝑗))
189 fveq2 6861 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑚 → (𝐾𝑗) = (𝐾𝑚))
190189fveq2d 6865 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑚 → (abs‘(𝐾𝑗)) = (abs‘(𝐾𝑚)))
191190, 189eqeq12d 2746 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑚 → ((abs‘(𝐾𝑗)) = (𝐾𝑗) ↔ (abs‘(𝐾𝑚)) = (𝐾𝑚)))
192191rspccva 3590 . . . . . . . . . . . . . . 15 ((∀𝑗 ∈ ℕ0 (abs‘(𝐾𝑗)) = (𝐾𝑗) ∧ 𝑚 ∈ ℕ0) → (abs‘(𝐾𝑚)) = (𝐾𝑚))
193188, 192sylan 580 . . . . . . . . . . . . . 14 ((𝜑𝑚 ∈ ℕ0) → (abs‘(𝐾𝑚)) = (𝐾𝑚))
194184, 186, 193syl2anc 584 . . . . . . . . . . . . 13 ((((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) ∧ 𝑚 ∈ (ℤ𝑡)) → (abs‘(𝐾𝑚)) = (𝐾𝑚))
195194breq1d 5120 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) ∧ 𝑚 ∈ (ℤ𝑡)) → ((abs‘(𝐾𝑚)) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) ↔ (𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1))))
196195ralbidva 3155 . . . . . . . . . . 11 (((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) → (∀𝑚 ∈ (ℤ𝑡)(abs‘(𝐾𝑚)) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) ↔ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1))))
197162breq1d 5120 . . . . . . . . . . . 12 (𝑛 = 𝑚 → ((𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) ↔ (𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1))))
198197cbvralvw 3216 . . . . . . . . . . 11 (∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) ↔ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))
199196, 198bitr4di 289 . . . . . . . . . 10 (((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) → (∀𝑚 ∈ (ℤ𝑡)(abs‘(𝐾𝑚)) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) ↔ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1))))
200 mertens.1 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ0) → (𝐹𝑗) = 𝐴)
201200ad4ant14 752 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ∧ 𝑗 ∈ ℕ0) → (𝐹𝑗) = 𝐴)
2028ad4ant14 752 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ∧ 𝑗 ∈ ℕ0) → (𝐾𝑗) = (abs‘𝐴))
2039ad4ant14 752 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ∧ 𝑗 ∈ ℕ0) → 𝐴 ∈ ℂ)
20420ad4ant14 752 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ∧ 𝑘 ∈ ℕ0) → (𝐺𝑘) = 𝐵)
20521ad4ant14 752 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ∧ 𝑘 ∈ ℕ0) → 𝐵 ∈ ℂ)
206 mertens.6 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = Σ𝑗 ∈ (0...𝑘)(𝐴 · (𝐺‘(𝑘𝑗))))
207206ad4ant14 752 . . . . . . . . . . . 12 ((((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ∧ 𝑘 ∈ ℕ0) → (𝐻𝑘) = Σ𝑗 ∈ (0...𝑘)(𝐴 · (𝐺‘(𝑘𝑗))))
20812ad2antrr 726 . . . . . . . . . . . 12 (((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → seq0( + , 𝐾) ∈ dom ⇝ )
20922ad2antrr 726 . . . . . . . . . . . 12 (((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → seq0( + , 𝐺) ∈ dom ⇝ )
2103ad2antrr 726 . . . . . . . . . . . 12 (((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → 𝐸 ∈ ℝ+)
211198anbi2i 623 . . . . . . . . . . . . . . 15 ((𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1))) ↔ (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1))))
212211anbi2i 623 . . . . . . . . . . . . . 14 ((𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) ↔ (𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))))
213212biimpi 216 . . . . . . . . . . . . 13 ((𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → (𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))))
214213adantll 714 . . . . . . . . . . . 12 (((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → (𝜓 ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑚 ∈ (ℤ𝑡)(𝐾𝑚) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))))
215113, 140, 1573jca 1128 . . . . . . . . . . . . . 14 ((𝜑𝜓) → (𝑇 ⊆ ℝ ∧ 𝑇 ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤𝑇 𝑤𝑧))
216159, 215jca 511 . . . . . . . . . . . . 13 ((𝜑𝜓) → (0 ≤ sup(𝑇, ℝ, < ) ∧ (𝑇 ⊆ ℝ ∧ 𝑇 ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤𝑇 𝑤𝑧)))
217216adantr 480 . . . . . . . . . . . 12 (((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → (0 ≤ sup(𝑇, ℝ, < ) ∧ (𝑇 ⊆ ℝ ∧ 𝑇 ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤𝑇 𝑤𝑧)))
218201, 202, 203, 204, 205, 207, 208, 209, 210, 91, 84, 214, 217mertenslem1 15857 . . . . . . . . . . 11 (((𝜑𝜓) ∧ (𝑡 ∈ ℕ0 ∧ ∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)))) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
219218expr 456 . . . . . . . . . 10 (((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) → (∀𝑛 ∈ (ℤ𝑡)(𝐾𝑛) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
220199, 219sylbid 240 . . . . . . . . 9 (((𝜑𝜓) ∧ 𝑡 ∈ ℕ0) → (∀𝑚 ∈ (ℤ𝑡)(abs‘(𝐾𝑚)) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
221220rexlimdva 3135 . . . . . . . 8 ((𝜑𝜓) → (∃𝑡 ∈ ℕ0𝑚 ∈ (ℤ𝑡)(abs‘(𝐾𝑚)) < (((𝐸 / 2) / 𝑠) / (sup(𝑇, ℝ, < ) + 1)) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
222183, 221mpd 15 . . . . . . 7 ((𝜑𝜓) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
223222ex 412 . . . . . 6 (𝜑 → (𝜓 → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
22484, 223biimtrrid 243 . . . . 5 (𝜑 → ((𝑠 ∈ ℕ ∧ ∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1))) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
225224expdimp 452 . . . 4 ((𝜑𝑠 ∈ ℕ) → (∀𝑛 ∈ (ℤ𝑠)(abs‘Σ𝑘 ∈ (ℤ‘(𝑛 + 1))(𝐺𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
22683, 225sylbid 240 . . 3 ((𝜑𝑠 ∈ ℕ) → (∀𝑚 ∈ (ℤ𝑠)(abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
227226rexlimdva 3135 . 2 (𝜑 → (∃𝑠 ∈ ℕ ∀𝑚 ∈ (ℤ𝑠)(abs‘((seq0( + , 𝐺)‘𝑚) − Σ𝑘 ∈ ℕ0 𝐵)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾𝑗) + 1)) → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸))
22824, 227mpd 15 1 (𝜑 → ∃𝑦 ∈ ℕ0𝑚 ∈ (ℤ𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ‘((𝑚𝑗) + 1))𝐵)) < 𝐸)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2109  {cab 2708  wne 2926  wral 3045  wrex 3054  Vcvv 3450  wss 3917  c0 4299   class class class wbr 5110  cmpt 5191   Or wor 5548  dom cdm 5641  wf 6510  cfv 6514  (class class class)co 7390  Fincfn 8921  supcsup 9398  cc 11073  cr 11074  0cc0 11075  1c1 11076   + caddc 11078   · cmul 11080   < clt 11215  cle 11216  cmin 11412   / cdiv 11842  cn 12193  2c2 12248  0cn0 12449  cuz 12800  +crp 12958  ...cfz 13475  seqcseq 13973  abscabs 15207  cli 15457  Σcsu 15659
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714  ax-inf2 9601  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152  ax-pre-sup 11153
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-nel 3031  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-se 5595  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-isom 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-om 7846  df-1st 7971  df-2nd 7972  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-er 8674  df-pm 8805  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-sup 9400  df-inf 9401  df-oi 9470  df-card 9899  df-pnf 11217  df-mnf 11218  df-xr 11219  df-ltxr 11220  df-le 11221  df-sub 11414  df-neg 11415  df-div 11843  df-nn 12194  df-2 12256  df-3 12257  df-n0 12450  df-z 12537  df-uz 12801  df-rp 12959  df-ico 13319  df-fz 13476  df-fzo 13623  df-fl 13761  df-seq 13974  df-exp 14034  df-hash 14303  df-cj 15072  df-re 15073  df-im 15074  df-sqrt 15208  df-abs 15209  df-limsup 15444  df-clim 15461  df-rlim 15462  df-sum 15660
This theorem is referenced by:  mertens  15859
  Copyright terms: Public domain W3C validator