Theorem fsumabs 15855

Description: Generalized triangle inequality: the absolute value of a finite sum is less than or equal to the sum of absolute values. (Contributed by NM, 9-Nov-2005.) (Revised by Mario Carneiro, 24-Apr-2014.)

Hypotheses

Ref	Expression
fsumabs.1	⊢ (𝜑 → 𝐴 ∈ Fin)
fsumabs.2	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)

Assertion

Ref	Expression
fsumabs	⊢ (𝜑 → (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵))

Distinct variable groups:   𝐴,𝑘   𝜑,𝑘

Allowed substitution hint:   𝐵(𝑘)

Proof of Theorem fsumabs

Dummy variables 𝑤 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ssid 3960	. 2 ⊢ 𝐴 ⊆ 𝐴
2		fsumabs.1	. . 3 ⊢ (𝜑 → 𝐴 ∈ Fin)
3		sseq1 3963	. . . . . 6 ⊢ (𝑤 = ∅ → (𝑤 ⊆ 𝐴 ↔ ∅ ⊆ 𝐴))
4		sumeq1 15742	. . . . . . . 8 ⊢ (𝑤 = ∅ → Σ𝑘 ∈ 𝑤 𝐵 = Σ𝑘 ∈ ∅ 𝐵)
5	4	fveq2d 6887	. . . . . . 7 ⊢ (𝑤 = ∅ → (abs‘Σ𝑘 ∈ 𝑤 𝐵) = (abs‘Σ𝑘 ∈ ∅ 𝐵))
6		sumeq1 15742	. . . . . . 7 ⊢ (𝑤 = ∅ → Σ𝑘 ∈ 𝑤 (abs‘𝐵) = Σ𝑘 ∈ ∅ (abs‘𝐵))
7	5, 6	breq12d 5123	. . . . . 6 ⊢ (𝑤 = ∅ → ((abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵) ↔ (abs‘Σ𝑘 ∈ ∅ 𝐵) ≤ Σ𝑘 ∈ ∅ (abs‘𝐵)))
8	3, 7	imbi12d 347	. . . . 5 ⊢ (𝑤 = ∅ → ((𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵)) ↔ (∅ ⊆ 𝐴 → (abs‘Σ𝑘 ∈ ∅ 𝐵) ≤ Σ𝑘 ∈ ∅ (abs‘𝐵))))
9	8	imbi2d 343	. . . 4 ⊢ (𝑤 = ∅ → ((𝜑 → (𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵))) ↔ (𝜑 → (∅ ⊆ 𝐴 → (abs‘Σ𝑘 ∈ ∅ 𝐵) ≤ Σ𝑘 ∈ ∅ (abs‘𝐵)))))
10		sseq1 3963	. . . . . 6 ⊢ (𝑤 = 𝑥 → (𝑤 ⊆ 𝐴 ↔ 𝑥 ⊆ 𝐴))
11		sumeq1 15742	. . . . . . . 8 ⊢ (𝑤 = 𝑥 → Σ𝑘 ∈ 𝑤 𝐵 = Σ𝑘 ∈ 𝑥 𝐵)
12	11	fveq2d 6887	. . . . . . 7 ⊢ (𝑤 = 𝑥 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) = (abs‘Σ𝑘 ∈ 𝑥 𝐵))
13		sumeq1 15742	. . . . . . 7 ⊢ (𝑤 = 𝑥 → Σ𝑘 ∈ 𝑤 (abs‘𝐵) = Σ𝑘 ∈ 𝑥 (abs‘𝐵))
14	12, 13	breq12d 5123	. . . . . 6 ⊢ (𝑤 = 𝑥 → ((abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵) ↔ (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)))
15	10, 14	imbi12d 347	. . . . 5 ⊢ (𝑤 = 𝑥 → ((𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵)) ↔ (𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵))))
16	15	imbi2d 343	. . . 4 ⊢ (𝑤 = 𝑥 → ((𝜑 → (𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵))) ↔ (𝜑 → (𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)))))
17		sseq1 3963	. . . . . 6 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → (𝑤 ⊆ 𝐴 ↔ (𝑥 ∪ {𝑦}) ⊆ 𝐴))
18		sumeq1 15742	. . . . . . . 8 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → Σ𝑘 ∈ 𝑤 𝐵 = Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵)
19	18	fveq2d 6887	. . . . . . 7 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → (abs‘Σ𝑘 ∈ 𝑤 𝐵) = (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵))
20		sumeq1 15742	. . . . . . 7 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → Σ𝑘 ∈ 𝑤 (abs‘𝐵) = Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵))
21	19, 20	breq12d 5123	. . . . . 6 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → ((abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵) ↔ (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))
22	17, 21	imbi12d 347	. . . . 5 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → ((𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵)) ↔ ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵))))
23	22	imbi2d 343	. . . 4 ⊢ (𝑤 = (𝑥 ∪ {𝑦}) → ((𝜑 → (𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵))) ↔ (𝜑 → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))))
24		sseq1 3963	. . . . . 6 ⊢ (𝑤 = 𝐴 → (𝑤 ⊆ 𝐴 ↔ 𝐴 ⊆ 𝐴))
25		sumeq1 15742	. . . . . . . 8 ⊢ (𝑤 = 𝐴 → Σ𝑘 ∈ 𝑤 𝐵 = Σ𝑘 ∈ 𝐴 𝐵)
26	25	fveq2d 6887	. . . . . . 7 ⊢ (𝑤 = 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) = (abs‘Σ𝑘 ∈ 𝐴 𝐵))
27		sumeq1 15742	. . . . . . 7 ⊢ (𝑤 = 𝐴 → Σ𝑘 ∈ 𝑤 (abs‘𝐵) = Σ𝑘 ∈ 𝐴 (abs‘𝐵))
28	26, 27	breq12d 5123	. . . . . 6 ⊢ (𝑤 = 𝐴 → ((abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵) ↔ (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵)))
29	24, 28	imbi12d 347	. . . . 5 ⊢ (𝑤 = 𝐴 → ((𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵)) ↔ (𝐴 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵))))
30	29	imbi2d 343	. . . 4 ⊢ (𝑤 = 𝐴 → ((𝜑 → (𝑤 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑤 𝐵) ≤ Σ𝑘 ∈ 𝑤 (abs‘𝐵))) ↔ (𝜑 → (𝐴 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵)))))
31		0le0 12343	. . . . . 6 ⊢ 0 ≤ 0
32		sum0 15774	. . . . . . . 8 ⊢ Σ𝑘 ∈ ∅ 𝐵 = 0
33	32	fveq2i 6886	. . . . . . 7 ⊢ (abs‘Σ𝑘 ∈ ∅ 𝐵) = (abs‘0)
34		abs0 15338	. . . . . . 7 ⊢ (abs‘0) = 0
35	33, 34	eqtri 2786	. . . . . 6 ⊢ (abs‘Σ𝑘 ∈ ∅ 𝐵) = 0
36		sum0 15774	. . . . . 6 ⊢ Σ𝑘 ∈ ∅ (abs‘𝐵) = 0
37	31, 35, 36	3brtr4i 5142	. . . . 5 ⊢ (abs‘Σ𝑘 ∈ ∅ 𝐵) ≤ Σ𝑘 ∈ ∅ (abs‘𝐵)
38	37	2a1i 12	. . . 4 ⊢ (𝜑 → (∅ ⊆ 𝐴 → (abs‘Σ𝑘 ∈ ∅ 𝐵) ≤ Σ𝑘 ∈ ∅ (abs‘𝐵)))
39		ssun1 4132	. . . . . . . . . 10 ⊢ 𝑥 ⊆ (𝑥 ∪ {𝑦})
40		sstr 3946	. . . . . . . . . 10 ⊢ ((𝑥 ⊆ (𝑥 ∪ {𝑦}) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → 𝑥 ⊆ 𝐴)
41	39, 40	mpan 702	. . . . . . . . 9 ⊢ ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → 𝑥 ⊆ 𝐴)
42	41	imim1i 64	. . . . . . . 8 ⊢ ((𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)) → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)))
43		simpll 778	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → 𝜑)
44	43, 2	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → 𝐴 ∈ Fin)
45		simpr 489	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (𝑥 ∪ {𝑦}) ⊆ 𝐴)
46	45	unssad 4147	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → 𝑥 ⊆ 𝐴)
47	44, 46	ssfid 9230	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → 𝑥 ∈ Fin)
48	46	sselda 3938	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ 𝑥) → 𝑘 ∈ 𝐴)
49		fsumabs.2	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)
50	43, 48, 49	syl2an2r 697	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ 𝑥) → 𝐵 ∈ ℂ)
51	47, 50	fsumcl 15786	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ 𝑥 𝐵 ∈ ℂ)
52	51	abscld 15492	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ∈ ℝ)
53	50	abscld 15492	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ 𝑥) → (abs‘𝐵) ∈ ℝ)
54	47, 53	fsumrecl 15787	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ 𝑥 (abs‘𝐵) ∈ ℝ)
55	45	unssbd 4148	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → {𝑦} ⊆ 𝐴)
56		vex 3459	. . . . . . . . . . . . . . . . 17 ⊢ 𝑦 ∈ V
57	56	snss 4751	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝐴 ↔ {𝑦} ⊆ 𝐴)
58	55, 57	sylibr 237	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → 𝑦 ∈ 𝐴)
59	49	ralrimiva 3157	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ)
60	43, 59	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ)
61		nfcsb1v 3878	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘⦋𝑦 / 𝑘⦌𝐵
62	61	nfel1 2941	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘⦋𝑦 / 𝑘⦌𝐵 ∈ ℂ
63		csbeq1a 3868	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → 𝐵 = ⦋𝑦 / 𝑘⦌𝐵)
64	63	eleq1d 2848	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑦 → (𝐵 ∈ ℂ ↔ ⦋𝑦 / 𝑘⦌𝐵 ∈ ℂ))
65	62, 64	rspc 3570	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ 𝐴 → (∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ → ⦋𝑦 / 𝑘⦌𝐵 ∈ ℂ))
66	58, 60, 65	sylc 66	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ⦋𝑦 / 𝑘⦌𝐵 ∈ ℂ)
67	66	abscld 15492	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘⦋𝑦 / 𝑘⦌𝐵) ∈ ℝ)
68	52, 54, 67	leadd1d 11809	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ((abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵) ↔ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ (Σ𝑘 ∈ 𝑥 (abs‘𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵))))
69		simplr 780	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ¬ 𝑦 ∈ 𝑥)
70		disjsn 4678	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∩ {𝑦}) = ∅ ↔ ¬ 𝑦 ∈ 𝑥)
71	69, 70	sylibr 237	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (𝑥 ∩ {𝑦}) = ∅)
72		eqidd 2764	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (𝑥 ∪ {𝑦}) = (𝑥 ∪ {𝑦}))
73	44, 45	ssfid 9230	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (𝑥 ∪ {𝑦}) ∈ Fin)
74	45	sselda 3938	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ (𝑥 ∪ {𝑦})) → 𝑘 ∈ 𝐴)
75	43, 74, 49	syl2an2r 697	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ (𝑥 ∪ {𝑦})) → 𝐵 ∈ ℂ)
76	75	abscld 15492	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ (𝑥 ∪ {𝑦})) → (abs‘𝐵) ∈ ℝ)
77	76	recnd 11238	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑘 ∈ (𝑥 ∪ {𝑦})) → (abs‘𝐵) ∈ ℂ)
78	71, 72, 73, 77	fsumsplit 15794	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵) = (Σ𝑘 ∈ 𝑥 (abs‘𝐵) + Σ𝑘 ∈ {𝑦} (abs‘𝐵)))
79		csbfv2g 6929	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ V → ⦋𝑦 / 𝑘⦌(abs‘𝐵) = (abs‘⦋𝑦 / 𝑘⦌𝐵))
80	79	elv 3460	. . . . . . . . . . . . . . . . . 18 ⊢ ⦋𝑦 / 𝑘⦌(abs‘𝐵) = (abs‘⦋𝑦 / 𝑘⦌𝐵)
81	67	recnd 11238	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘⦋𝑦 / 𝑘⦌𝐵) ∈ ℂ)
82	80, 81	eqeltrid 2867	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ⦋𝑦 / 𝑘⦌(abs‘𝐵) ∈ ℂ)
83		sumsns 15803	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ V ∧ ⦋𝑦 / 𝑘⦌(abs‘𝐵) ∈ ℂ) → Σ𝑘 ∈ {𝑦} (abs‘𝐵) = ⦋𝑦 / 𝑘⦌(abs‘𝐵))
84	56, 82, 83	sylancr 598	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ {𝑦} (abs‘𝐵) = ⦋𝑦 / 𝑘⦌(abs‘𝐵))
85	84, 80	eqtrdi 2814	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ {𝑦} (abs‘𝐵) = (abs‘⦋𝑦 / 𝑘⦌𝐵))
86	85	oveq2d 7428	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (Σ𝑘 ∈ 𝑥 (abs‘𝐵) + Σ𝑘 ∈ {𝑦} (abs‘𝐵)) = (Σ𝑘 ∈ 𝑥 (abs‘𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)))
87	78, 86	eqtrd 2798	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵) = (Σ𝑘 ∈ 𝑥 (abs‘𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)))
88	87	breq2d 5122	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵) ↔ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ (Σ𝑘 ∈ 𝑥 (abs‘𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵))))
89	68, 88	bitr4d 285	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ((abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵) ↔ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))
90	71, 72, 73, 75	fsumsplit 15794	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵 = (Σ𝑘 ∈ 𝑥 𝐵 + Σ𝑘 ∈ {𝑦}𝐵))
91		sumsns 15803	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ 𝐴 ∧ ⦋𝑦 / 𝑘⦌𝐵 ∈ ℂ) → Σ𝑘 ∈ {𝑦}𝐵 = ⦋𝑦 / 𝑘⦌𝐵)
92	58, 66, 91	syl2anc 595	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ {𝑦}𝐵 = ⦋𝑦 / 𝑘⦌𝐵)
93	92	oveq2d 7428	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (Σ𝑘 ∈ 𝑥 𝐵 + Σ𝑘 ∈ {𝑦}𝐵) = (Σ𝑘 ∈ 𝑥 𝐵 + ⦋𝑦 / 𝑘⦌𝐵))
94	90, 93	eqtrd 2798	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵 = (Σ𝑘 ∈ 𝑥 𝐵 + ⦋𝑦 / 𝑘⦌𝐵))
95	94	fveq2d 6887	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) = (abs‘(Σ𝑘 ∈ 𝑥 𝐵 + ⦋𝑦 / 𝑘⦌𝐵)))
96	51, 66	abstrid 15512	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘(Σ𝑘 ∈ 𝑥 𝐵 + ⦋𝑦 / 𝑘⦌𝐵)) ≤ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)))
97	95, 96	eqbrtrd 5134	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)))
98	73, 75	fsumcl 15786	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵 ∈ ℂ)
99	98	abscld 15492	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ∈ ℝ)
100	52, 67	readdcld 11239	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ∈ ℝ)
101	73, 76	fsumrecl 15787	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵) ∈ ℝ)
102		letr 11305	. . . . . . . . . . . . 13 ⊢ (((abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ∈ ℝ ∧ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ∈ ℝ ∧ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵) ∈ ℝ) → (((abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ∧ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))
103	99, 100, 101, 102	syl3anc 1398	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (((abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ∧ ((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))
104	97, 103	mpand 707	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → (((abs‘Σ𝑘 ∈ 𝑥 𝐵) + (abs‘⦋𝑦 / 𝑘⦌𝐵)) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))
105	89, 104	sylbid 243	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) ∧ (𝑥 ∪ {𝑦}) ⊆ 𝐴) → ((abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))
106	105	ex 417	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → ((abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵) → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵))))
107	106	a2d 30	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) → (((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)) → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵))))
108	42, 107	syl5 35	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ 𝑦 ∈ 𝑥) → ((𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)) → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵))))
109	108	expcom 418	. . . . . 6 ⊢ (¬ 𝑦 ∈ 𝑥 → (𝜑 → ((𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵)) → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))))
110	109	a2d 30	. . . . 5 ⊢ (¬ 𝑦 ∈ 𝑥 → ((𝜑 → (𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵))) → (𝜑 → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))))
111	110	adantl 486	. . . 4 ⊢ ((𝑥 ∈ Fin ∧ ¬ 𝑦 ∈ 𝑥) → ((𝜑 → (𝑥 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝑥 𝐵) ≤ Σ𝑘 ∈ 𝑥 (abs‘𝐵))) → (𝜑 → ((𝑥 ∪ {𝑦}) ⊆ 𝐴 → (abs‘Σ𝑘 ∈ (𝑥 ∪ {𝑦})𝐵) ≤ Σ𝑘 ∈ (𝑥 ∪ {𝑦})(abs‘𝐵)))))
112	9, 16, 23, 30, 38, 111	findcard2s 9151	. . 3 ⊢ (𝐴 ∈ Fin → (𝜑 → (𝐴 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵))))
113	2, 112	mpcom 39	. 2 ⊢ (𝜑 → (𝐴 ⊆ 𝐴 → (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵)))
114	1, 113	mpi 21	1 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ 𝐴 𝐵) ≤ Σ𝑘 ∈ 𝐴 (abs‘𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 400   = wceq 1570   ∈ wcel 2143  ∀wral 3079  Vcvv 3455  ⦋csb 3854   ∪ cun 3904   ∩ cin 3905   ⊆ wss 3906  ∅c0 4287  {csn 4590   class class class wbr 5110  ‘cfv 6538  (class class class)co 7412  Fincfn 8944  ℂcc 11099  ℝcr 11100  0cc0 11101   + caddc 11104   ≤ cle 11245  abscabs 15287  Σcsu 15739

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-inf2 9611  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178  ax-pre-sup 11179

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-er 8695  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-sup 9403  df-oi 9473  df-card 9926  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-div 11873  df-nn 12235  df-2 12304  df-3 12305  df-n0 12506  df-z 12593  df-uz 12864  df-rp 13018  df-fz 13537  df-fzo 13685  df-seq 14040  df-exp 14100  df-hash 14369  df-cj 15152  df-re 15153  df-im 15154  df-sqrt 15288  df-abs 15289  df-clim 15541  df-sum 15740

This theorem is referenced by:  o1fsum  15867  seqabs  15868  cvgcmpce  15872  mertenslem1  15940  dvfsumabs  26163  mtest  26545  mtestbdd  26546  abelthlem7  26579  fsumharmonic  27154  ftalem1  27215  ftalem5  27219  dchrisumlem2  27632  dchrmusum2  27636  dchrvmasumlem3  27641  dchrvmasumiflem1  27643  dchrisum0lem1  27658  dchrisum0lem2a  27659  mudivsum  27672  mulogsumlem  27673  2vmadivsumlem  27682  selberglem2  27688  selberg3lem1  27699  selberg4lem1  27702  pntrsumbnd  27708  pntrlog2bndlem1  27719  pntrlog2bndlem3  27721  knoppndvlem11  37089  fourierdlem73  46873  etransclem23  46951