sge0xaddlem2 - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > sge0xaddlem2		Structured version Visualization version GIF version

Theorem sge0xaddlem2 40651

Description: The extended addition of two generalized sums of nonnegative extended reals. (Contributed by Glauco Siliprandi, 11-Oct-2020.)

**Hypotheses**
Ref	Expression
sge0xaddlem2.a	⊢ (𝜑 → 𝐴 ∈ 𝑉)
sge0xaddlem2.b	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ (0[,)+∞))
sge0xaddlem2.c	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ (0[,)+∞))
sge0xaddlem2.sb	⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) ∈ ℝ)
sge0xaddlem2.sc	⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) ∈ ℝ)

**Assertion**
Ref	Expression
sge0xaddlem2	⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 +_𝑒 𝐶))) = ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) +_𝑒 (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))))

Distinct variable groups: 𝐴,𝑘 𝜑,𝑘 Allowed substitution hints: 𝐵(𝑘) 𝐶(𝑘) 𝑉(𝑘)

Proof of Theorem sge0xaddlem2 Dummy variables 𝑥 𝑒 𝑗 𝑢 𝑣 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfv 1843	. . 3 ⊢ Ⅎ𝑘𝜑
2		sge0xaddlem2.a	. . 3 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
3		0xr 10086	. . . . 5 ⊢ 0 ∈ ℝ^*
4	3	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 0 ∈ ℝ^*)
5		pnfxr 10092	. . . . 5 ⊢ +∞ ∈ ℝ^*
6	5	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → +∞ ∈ ℝ^*)
7		rge0ssre 12280	. . . . . . 7 ⊢ (0[,)+∞) ⊆ ℝ
8		sge0xaddlem2.b	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ (0[,)+∞))
9	7, 8	sseldi 3601	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℝ)
10		sge0xaddlem2.c	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ (0[,)+∞))
11	7, 10	sseldi 3601	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ ℝ)
12	9, 11	readdcld 10069	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 + 𝐶) ∈ ℝ)
13	12	rexrd 10089	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 + 𝐶) ∈ ℝ^*)
14		icossicc 12260	. . . . . . 7 ⊢ (0[,)+∞) ⊆ (0[,]+∞)
15	14, 8	sseldi 3601	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ (0[,]+∞))
16		xrge0ge0 39563	. . . . . 6 ⊢ (𝐵 ∈ (0[,]+∞) → 0 ≤ 𝐵)
17	15, 16	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 0 ≤ 𝐵)
18	14, 10	sseldi 3601	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ (0[,]+∞))
19		xrge0ge0 39563	. . . . . 6 ⊢ (𝐶 ∈ (0[,]+∞) → 0 ≤ 𝐶)
20	18, 19	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 0 ≤ 𝐶)
21	9, 11, 17, 20	addge0d 10603	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 0 ≤ (𝐵 + 𝐶))
22	12	ltpnfd 11955	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 + 𝐶) < +∞)
23	4, 6, 13, 21, 22	elicod 12224	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 + 𝐶) ∈ (0[,)+∞))
24	1, 2, 23	sge0revalmpt 40595	. 2 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))) = sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ))
25		rexadd 12063	. . . . 5 ⊢ ((𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ) → (𝐵 +_𝑒 𝐶) = (𝐵 + 𝐶))
26	9, 11, 25	syl2anc 693	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 +_𝑒 𝐶) = (𝐵 + 𝐶))
27	26	mpteq2dva 4744	. . 3 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ (𝐵 +_𝑒 𝐶)) = (𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶)))
28	27	fveq2d 6195	. 2 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 +_𝑒 𝐶))) = (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))))
29		sge0xaddlem2.sb	. . . 4 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) ∈ ℝ)
30		sge0xaddlem2.sc	. . . 4 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) ∈ ℝ)
31		rexadd 12063	. . . 4 ⊢ (((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) ∈ ℝ ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) ∈ ℝ) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) +_𝑒 (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) = ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))))
32	29, 30, 31	syl2anc 693	. . 3 ⊢ (𝜑 → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) +_𝑒 (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) = ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))))
33	1, 2, 8	sge0revalmpt 40595	. . . 4 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) = sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^*, < ))
34	1, 2, 10	sge0revalmpt 40595	. . . 4 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) = sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^*, < ))
35	33, 34	oveq12d 6668	. . 3 ⊢ (𝜑 → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) = (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )))
36	33	eqcomd 2628	. . . . . . 7 ⊢ (𝜑 → sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^*, < ) = (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)))
37	36, 29	eqeltrd 2701	. . . . . 6 ⊢ (𝜑 → sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^*, < ) ∈ ℝ)
38	34, 30	eqeltrrd 2702	. . . . . 6 ⊢ (𝜑 → sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^*, < ) ∈ ℝ)
39	37, 38	readdcld 10069	. . . . 5 ⊢ (𝜑 → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) ∈ ℝ)
40	39	rexrd 10089	. . . 4 ⊢ (𝜑 → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) ∈ ℝ^*)
41		elinel2 3800	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝒫 𝐴 ∩ Fin) → 𝑥 ∈ Fin)
42	41	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑥 ∈ Fin)
43		simpll 790	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → 𝜑)
44		elpwinss 39216	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (𝒫 𝐴 ∩ Fin) → 𝑥 ⊆ 𝐴)
45	44	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑥) → 𝑥 ⊆ 𝐴)
46		simpr 477	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑥) → 𝑘 ∈ 𝑥)
47	45, 46	sseldd 3604	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑥) → 𝑘 ∈ 𝐴)
48	47	adantll 750	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → 𝑘 ∈ 𝐴)
49	43, 48, 9	syl2anc 693	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → 𝐵 ∈ ℝ)
50	43, 48, 11	syl2anc 693	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → 𝐶 ∈ ℝ)
51	49, 50	readdcld 10069	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → (𝐵 + 𝐶) ∈ ℝ)
52	42, 51	fsumrecl 14465	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶) ∈ ℝ)
53	52	rexrd 10089	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶) ∈ ℝ^*)
54	53	ralrimiva 2966	. . . . . 6 ⊢ (𝜑 → ∀𝑥 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶) ∈ ℝ^*)
55		eqid 2622	. . . . . . 7 ⊢ (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)) = (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶))
56	55	rnmptss 6392	. . . . . 6 ⊢ (∀𝑥 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶) ∈ ℝ^* → ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)) ⊆ ℝ^*)
57	54, 56	syl 17	. . . . 5 ⊢ (𝜑 → ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)) ⊆ ℝ^*)
58		supxrcl 12145	. . . . 5 ⊢ (ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)) ⊆ ℝ^* → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ) ∈ ℝ^)
59	57, 58	syl 17	. . . 4 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ) ∈ ℝ^)
60	35	eqcomd 2628	. . . . . . 7 ⊢ (𝜑 → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) = ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))))
61	60	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) = ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))))
62		nfv 1843	. . . . . . . 8 ⊢ Ⅎ𝑘(𝜑 ∧ 𝑒 ∈ ℝ⁺)
63	2	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → 𝐴 ∈ 𝑉)
64	15	adantlr 751	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ (0[,]+∞))
65		rphalfcl 11858	. . . . . . . . 9 ⊢ (𝑒 ∈ ℝ⁺ → (𝑒 / 2) ∈ ℝ⁺)
66	65	adantl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (𝑒 / 2) ∈ ℝ⁺)
67	29	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) ∈ ℝ)
68	62, 63, 64, 66, 67	sge0ltfirpmpt2 40643	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑢 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)))
69	18	adantlr 751	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ (0[,]+∞))
70	30	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) ∈ ℝ)
71	62, 63, 69, 66, 70	sge0ltfirpmpt2 40643	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑣 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)))
72	71	3ad2ant1 1082	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) → ∃𝑣 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)))
73	63	3ad2ant1 1082	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) → 𝐴 ∈ 𝑉)
74	73	3ad2ant1 1082	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝐴 ∈ 𝑉)
75		simpl1l 1112	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑗 ∈ 𝐴) → 𝜑)
76	75	3ad2antl1 1223	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) ∧ 𝑗 ∈ 𝐴) → 𝜑)
77		simpr 477	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) ∧ 𝑗 ∈ 𝐴) → 𝑗 ∈ 𝐴)
78		nfv 1843	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘(𝜑 ∧ 𝑗 ∈ 𝐴)
79		nfcsb1v 3549	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑘⦋𝑗 / 𝑘⦌𝐵
80	79	nfel1 2779	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘⦋𝑗 / 𝑘⦌𝐵 ∈ (0[,)+∞)
81	78, 80	nfim 1825	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘((𝜑 ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐵 ∈ (0[,)+∞))
82		eleq1 2689	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑗 → (𝑘 ∈ 𝐴 ↔ 𝑗 ∈ 𝐴))
83	82	anbi2d 740	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑗 → ((𝜑 ∧ 𝑘 ∈ 𝐴) ↔ (𝜑 ∧ 𝑗 ∈ 𝐴)))
84		csbeq1a 3542	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑗 → 𝐵 = ⦋𝑗 / 𝑘⦌𝐵)
85	84	eleq1d 2686	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑗 → (𝐵 ∈ (0[,)+∞) ↔ ⦋𝑗 / 𝑘⦌𝐵 ∈ (0[,)+∞)))
86	83, 85	imbi12d 334	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑗 → (((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ (0[,)+∞)) ↔ ((𝜑 ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐵 ∈ (0[,)+∞))))
87	81, 86, 8	chvar 2262	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐵 ∈ (0[,)+∞))
88	76, 77, 87	syl2anc 693	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐵 ∈ (0[,)+∞))
89		nfcsb1v 3549	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑘⦋𝑗 / 𝑘⦌𝐶
90	89	nfel1 2779	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘⦋𝑗 / 𝑘⦌𝐶 ∈ (0[,)+∞)
91	78, 90	nfim 1825	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘((𝜑 ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐶 ∈ (0[,)+∞))
92		csbeq1a 3542	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑗 → 𝐶 = ⦋𝑗 / 𝑘⦌𝐶)
93	92	eleq1d 2686	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑗 → (𝐶 ∈ (0[,)+∞) ↔ ⦋𝑗 / 𝑘⦌𝐶 ∈ (0[,)+∞)))
94	83, 93	imbi12d 334	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑗 → (((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ (0[,)+∞)) ↔ ((𝜑 ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐶 ∈ (0[,)+∞))))
95	91, 94, 10	chvar 2262	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐶 ∈ (0[,)+∞))
96	76, 77, 95	syl2anc 693	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐶 ∈ (0[,)+∞))
97		simp11r 1173	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑒 ∈ ℝ⁺)
98		simp12 1092	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑢 ∈ (𝒫 𝐴 ∩ Fin))
99		elpwinss 39216	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ (𝒫 𝐴 ∩ Fin) → 𝑢 ⊆ 𝐴)
100	98, 99	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑢 ⊆ 𝐴)
101		elinel2 3800	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ (𝒫 𝐴 ∩ Fin) → 𝑢 ∈ Fin)
102	101	3ad2ant2 1083	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) → 𝑢 ∈ Fin)
103	102	3ad2ant1 1082	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑢 ∈ Fin)
104		simp2 1062	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑣 ∈ (𝒫 𝐴 ∩ Fin))
105		elpwinss 39216	. . . . . . . . . . . . . . 15 ⊢ (𝑣 ∈ (𝒫 𝐴 ∩ Fin) → 𝑣 ⊆ 𝐴)
106	104, 105	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑣 ⊆ 𝐴)
107		elinel2 3800	. . . . . . . . . . . . . . 15 ⊢ (𝑣 ∈ (𝒫 𝐴 ∩ Fin) → 𝑣 ∈ Fin)
108	107	3ad2ant2 1083	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝑣 ∈ Fin)
109		simp13 1093	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)))
110		nfcv 2764	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑗𝐵
111	110, 79, 84	cbvmpt 4749	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ 𝐴 ↦ 𝐵) = (𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)
112	111	fveq2i 6194	. . . . . . . . . . . . . . . . 17 ⊢ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) = (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵))
113		nfcv 2764	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑗𝑢
114		nfcv 2764	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑘𝑢
115	84, 113, 114, 110, 79	cbvsum 14425	. . . . . . . . . . . . . . . . . 18 ⊢ Σ𝑘 ∈ 𝑢 𝐵 = Σ𝑗 ∈ 𝑢 ⦋𝑗 / 𝑘⦌𝐵
116	115	oveq1i 6660	. . . . . . . . . . . . . . . . 17 ⊢ (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)) = (Σ𝑗 ∈ 𝑢 ⦋𝑗 / 𝑘⦌𝐵 + (𝑒 / 2))
117	112, 116	breq12i 4662	. . . . . . . . . . . . . . . 16 ⊢ ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)) ↔ (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) < (Σ𝑗 ∈ 𝑢 ⦋𝑗 / 𝑘⦌𝐵 + (𝑒 / 2)))
118	117	biimpi 206	. . . . . . . . . . . . . . 15 ⊢ ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)) → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) < (Σ𝑗 ∈ 𝑢 ⦋𝑗 / 𝑘⦌𝐵 + (𝑒 / 2)))
119	109, 118	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) < (Σ𝑗 ∈ 𝑢 ⦋𝑗 / 𝑘⦌𝐵 + (𝑒 / 2)))
120		simp3 1063	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)))
121		nfcv 2764	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑗𝐶
122	121, 89, 92	cbvmpt 4749	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ 𝐴 ↦ 𝐶) = (𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)
123	122	fveq2i 6194	. . . . . . . . . . . . . . . . 17 ⊢ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) = (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶))
124		nfcv 2764	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑗𝑣
125		nfcv 2764	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑘𝑣
126	92, 124, 125, 121, 89	cbvsum 14425	. . . . . . . . . . . . . . . . . 18 ⊢ Σ𝑘 ∈ 𝑣 𝐶 = Σ𝑗 ∈ 𝑣 ⦋𝑗 / 𝑘⦌𝐶
127	126	oveq1i 6660	. . . . . . . . . . . . . . . . 17 ⊢ (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)) = (Σ𝑗 ∈ 𝑣 ⦋𝑗 / 𝑘⦌𝐶 + (𝑒 / 2))
128	123, 127	breq12i 4662	. . . . . . . . . . . . . . . 16 ⊢ ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)) ↔ (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)) < (Σ𝑗 ∈ 𝑣 ⦋𝑗 / 𝑘⦌𝐶 + (𝑒 / 2)))
129	128	biimpi 206	. . . . . . . . . . . . . . 15 ⊢ ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)) → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)) < (Σ𝑗 ∈ 𝑣 ⦋𝑗 / 𝑘⦌𝐶 + (𝑒 / 2)))
130	120, 129	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)) < (Σ𝑗 ∈ 𝑣 ⦋𝑗 / 𝑘⦌𝐶 + (𝑒 / 2)))
131		simp11l 1172	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → 𝜑)
132	84, 92	oveq12d 6668	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑘 = 𝑗 → (𝐵 + 𝐶) = (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶))
133		nfcv 2764	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑗𝑥
134		nfcv 2764	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑘𝑥
135		nfcv 2764	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑗(𝐵 + 𝐶)
136		nfcv 2764	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑘 +
137	79, 136, 89	nfov 6676	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑘(⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)
138	132, 133, 134, 135, 137	cbvsum 14425	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶) = Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)
139	138	mpteq2i 4741	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)) = (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶))
140	139	rneqi 5352	. . . . . . . . . . . . . . . . . . . 20 ⊢ ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)) = ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶))
141	140	supeq1i 8353	. . . . . . . . . . . . . . . . . . 19 ⊢ sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ) = sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^, < )
142	141	eqcomi 2631	. . . . . . . . . . . . . . . . . 18 ⊢ sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^, < ) = sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < )
143	142	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^, < ) = sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ))
144	143, 24	eqtr4d 2659	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^*, < ) = (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))))
145		ge0xaddcl 12286	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐵 ∈ (0[,]+∞) ∧ 𝐶 ∈ (0[,]+∞)) → (𝐵 +_𝑒 𝐶) ∈ (0[,]+∞))
146	15, 18, 145	syl2anc 693	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 +_𝑒 𝐶) ∈ (0[,]+∞))
147	26, 146	eqeltrrd 2702	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 + 𝐶) ∈ (0[,]+∞))
148	1, 2, 147	sge0clmpt 40642	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ (0[,]+∞))
149	144, 148	eqeltrd 2701	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^*, < ) ∈ (0[,]+∞))
150	131, 149	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^*, < ) ∈ (0[,]+∞))
151	112, 29	syl5eqelr 2706	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) ∈ ℝ)
152	131, 151	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) ∈ ℝ)
153	123, 30	syl5eqelr 2706	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)) ∈ ℝ)
154	131, 153	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)) ∈ ℝ)
155	74, 88, 96, 97, 100, 103, 106, 108, 119, 130, 150, 152, 154	sge0xaddlem1 40650	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → ((Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) + (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^*, < ) +_𝑒 𝑒))
156	112, 123	oveq12i 6662	. . . . . . . . . . . . . 14 ⊢ ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) = ((Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) + (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶)))
157	141	oveq1i 6660	. . . . . . . . . . . . . 14 ⊢ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ) +_𝑒 𝑒) = (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^, < ) +_𝑒 𝑒)
158	156, 157	breq12i 4662	. . . . . . . . . . . . 13 ⊢ (((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ) +_𝑒 𝑒) ↔ ((Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐵)) + (Σ^{^}‘(𝑗 ∈ 𝐴 ↦ ⦋𝑗 / 𝑘⦌𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑗 ∈ 𝑥 (⦋𝑗 / 𝑘⦌𝐵 + ⦋𝑗 / 𝑘⦌𝐶)), ℝ^, < ) +_𝑒 𝑒))
159	155, 158	sylibr 224	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) ∧ 𝑣 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2))) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒))
160	159	3exp 1264	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) → (𝑣 ∈ (𝒫 𝐴 ∩ Fin) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒))))
161	160	rexlimdv 3030	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) → (∃𝑣 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶)) < (Σ𝑘 ∈ 𝑣 𝐶 + (𝑒 / 2)) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒)))
162	72, 161	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑢 ∈ (𝒫 𝐴 ∩ Fin) ∧ (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2))) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒))
163	162	3exp 1264	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (𝑢 ∈ (𝒫 𝐴 ∩ Fin) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒))))
164	163	rexlimdv 3030	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (∃𝑢 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑘 ∈ 𝑢 𝐵 + (𝑒 / 2)) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒)))
165	68, 164	mpd 15	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) + (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒))
166	61, 165	eqbrtrd 4675	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) ≤ (sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) +_𝑒 𝑒))
167	40, 59, 166	xrlexaddrp 39568	. . . 4 ⊢ (𝜑 → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) ≤ sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ))
168	24	eqcomd 2628	. . . . 5 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ) = (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))))
169	43, 48, 23	syl2anc 693	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → (𝐵 + 𝐶) ∈ (0[,)+∞))
170	42, 169	sge0fsummpt 40607	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → (Σ^{^}‘(𝑘 ∈ 𝑥 ↦ (𝐵 + 𝐶))) = Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶))
171	49	recnd 10068	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → 𝐵 ∈ ℂ)
172	50	recnd 10068	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑥) → 𝐶 ∈ ℂ)
173	42, 171, 172	fsumadd 14470	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶) = (Σ𝑘 ∈ 𝑥 𝐵 + Σ𝑘 ∈ 𝑥 𝐶))
174	170, 173	eqtrd 2656	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → (Σ^{^}‘(𝑘 ∈ 𝑥 ↦ (𝐵 + 𝐶))) = (Σ𝑘 ∈ 𝑥 𝐵 + Σ𝑘 ∈ 𝑥 𝐶))
175	42, 49	fsumrecl 14465	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐵 ∈ ℝ)
176	42, 50	fsumrecl 14465	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐶 ∈ ℝ)
177	37	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^*, < ) ∈ ℝ)
178	38	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^*, < ) ∈ ℝ)
179		elinel2 3800	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → 𝑦 ∈ Fin)
180	179	adantl 482	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑦 ∈ Fin)
181		simpll 790	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → 𝜑)
182		elpwinss 39216	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → 𝑦 ⊆ 𝐴)
183	182	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑦) → 𝑦 ⊆ 𝐴)
184		simpr 477	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑦) → 𝑘 ∈ 𝑦)
185	183, 184	sseldd 3604	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑦) → 𝑘 ∈ 𝐴)
186	185	adantll 750	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → 𝑘 ∈ 𝐴)
187	181, 186, 9	syl2anc 693	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → 𝐵 ∈ ℝ)
188	180, 187	fsumrecl 14465	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑦 𝐵 ∈ ℝ)
189	188	rexrd 10089	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑦 𝐵 ∈ ℝ^*)
190	189	ralrimiva 2966	. . . . . . . . . . . 12 ⊢ (𝜑 → ∀𝑦 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑦 𝐵 ∈ ℝ^*)
191		eqid 2622	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵) = (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵)
192	191	rnmptss 6392	. . . . . . . . . . . 12 ⊢ (∀𝑦 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑦 𝐵 ∈ ℝ^* → ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵) ⊆ ℝ^*)
193	190, 192	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵) ⊆ ℝ^*)
194	193	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵) ⊆ ℝ^*)
195		simpr 477	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑥 ∈ (𝒫 𝐴 ∩ Fin))
196		eqidd 2623	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐵 = Σ𝑘 ∈ 𝑥 𝐵)
197		sumeq1 14419	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝑥 → Σ𝑘 ∈ 𝑦 𝐵 = Σ𝑘 ∈ 𝑥 𝐵)
198	197	eqeq2d 2632	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑥 → (Σ𝑘 ∈ 𝑥 𝐵 = Σ𝑘 ∈ 𝑦 𝐵 ↔ Σ𝑘 ∈ 𝑥 𝐵 = Σ𝑘 ∈ 𝑥 𝐵))
199	198	rspcev 3309	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ (𝒫 𝐴 ∩ Fin) ∧ Σ𝑘 ∈ 𝑥 𝐵 = Σ𝑘 ∈ 𝑥 𝐵) → ∃𝑦 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑥 𝐵 = Σ𝑘 ∈ 𝑦 𝐵)
200	195, 196, 199	syl2anc 693	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → ∃𝑦 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑥 𝐵 = Σ𝑘 ∈ 𝑦 𝐵)
201	175	elexd 3214	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐵 ∈ V)
202	191, 200, 201	elrnmptd 39366	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐵 ∈ ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵))
203		supxrub 12154	. . . . . . . . . 10 ⊢ ((ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵) ⊆ ℝ^* ∧ Σ𝑘 ∈ 𝑥 𝐵 ∈ ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵)) → Σ𝑘 ∈ 𝑥 𝐵 ≤ sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^*, < ))
204	194, 202, 203	syl2anc 693	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐵 ≤ sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^*, < ))
205		nfv 1843	. . . . . . . . . . . 12 ⊢ Ⅎ𝑧𝜑
206		eqid 2622	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶) = (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶)
207		elinel2 3800	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∈ (𝒫 𝐴 ∩ Fin) → 𝑧 ∈ Fin)
208	207	adantl 482	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑧 ∈ Fin)
209		simpll 790	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑧) → 𝜑)
210		elpwinss 39216	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 ∈ (𝒫 𝐴 ∩ Fin) → 𝑧 ⊆ 𝐴)
211	210	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑧) → 𝑧 ⊆ 𝐴)
212		simpr 477	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑧) → 𝑘 ∈ 𝑧)
213	211, 212	sseldd 3604	. . . . . . . . . . . . . . . 16 ⊢ ((𝑧 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑧) → 𝑘 ∈ 𝐴)
214	213	adantll 750	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑧) → 𝑘 ∈ 𝐴)
215	209, 214, 11	syl2anc 693	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑧) → 𝐶 ∈ ℝ)
216	208, 215	fsumrecl 14465	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑧 𝐶 ∈ ℝ)
217	216	rexrd 10089	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑧 𝐶 ∈ ℝ^*)
218	205, 206, 217	rnmptssd 39385	. . . . . . . . . . 11 ⊢ (𝜑 → ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶) ⊆ ℝ^*)
219	218	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶) ⊆ ℝ^*)
220		eqidd 2623	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐶 = Σ𝑘 ∈ 𝑥 𝐶)
221		sumeq1 14419	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑥 → Σ𝑘 ∈ 𝑧 𝐶 = Σ𝑘 ∈ 𝑥 𝐶)
222	221	eqeq2d 2632	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑥 → (Σ𝑘 ∈ 𝑥 𝐶 = Σ𝑘 ∈ 𝑧 𝐶 ↔ Σ𝑘 ∈ 𝑥 𝐶 = Σ𝑘 ∈ 𝑥 𝐶))
223	222	rspcev 3309	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ (𝒫 𝐴 ∩ Fin) ∧ Σ𝑘 ∈ 𝑥 𝐶 = Σ𝑘 ∈ 𝑥 𝐶) → ∃𝑧 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑥 𝐶 = Σ𝑘 ∈ 𝑧 𝐶)
224	195, 220, 223	syl2anc 693	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → ∃𝑧 ∈ (𝒫 𝐴 ∩ Fin)Σ𝑘 ∈ 𝑥 𝐶 = Σ𝑘 ∈ 𝑧 𝐶)
225	176	elexd 3214	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐶 ∈ V)
226	206, 224, 225	elrnmptd 39366	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐶 ∈ ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶))
227		supxrub 12154	. . . . . . . . . 10 ⊢ ((ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶) ⊆ ℝ^* ∧ Σ𝑘 ∈ 𝑥 𝐶 ∈ ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶)) → Σ𝑘 ∈ 𝑥 𝐶 ≤ sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^*, < ))
228	219, 226, 227	syl2anc 693	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑥 𝐶 ≤ sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^*, < ))
229	175, 176, 177, 178, 204, 228	le2addd 10646	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → (Σ𝑘 ∈ 𝑥 𝐵 + Σ𝑘 ∈ 𝑥 𝐶) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )))
230	174, 229	eqbrtrd 4675	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝒫 𝐴 ∩ Fin)) → (Σ^{^}‘(𝑘 ∈ 𝑥 ↦ (𝐵 + 𝐶))) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )))
231	230	ralrimiva 2966	. . . . . 6 ⊢ (𝜑 → ∀𝑥 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝑥 ↦ (𝐵 + 𝐶))) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )))
232	1, 2, 147, 40	sge0lefimpt 40640	. . . . . 6 ⊢ (𝜑 → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) ↔ ∀𝑥 ∈ (𝒫 𝐴 ∩ Fin)(Σ^{^}‘(𝑘 ∈ 𝑥 ↦ (𝐵 + 𝐶))) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < ))))
233	231, 232	mpbird 247	. . . . 5 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )))
234	168, 233	eqbrtrd 4675	. . . 4 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^, < ) ≤ (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^*, < )))
235	40, 59, 167, 234	xrletrid 11986	. . 3 ⊢ (𝜑 → (sup(ran (𝑦 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑦 𝐵), ℝ^, < ) + sup(ran (𝑧 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑧 𝐶), ℝ^, < )) = sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ))
236	32, 35, 235	3eqtrd 2660	. 2 ⊢ (𝜑 → ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) +_𝑒 (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))) = sup(ran (𝑥 ∈ (𝒫 𝐴 ∩ Fin) ↦ Σ𝑘 ∈ 𝑥 (𝐵 + 𝐶)), ℝ^*, < ))
237	24, 28, 236	3eqtr4d 2666	1 ⊢ (𝜑 → (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ (𝐵 +_𝑒 𝐶))) = ((Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐵)) +_𝑒 (Σ^{^}‘(𝑘 ∈ 𝐴 ↦ 𝐶))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 384 ∧ w3a 1037 = wceq 1483 ∈ wcel 1990 ∀wral 2912 ∃wrex 2913 Vcvv 3200 ⦋csb 3533 ∩ cin 3573 ⊆ wss 3574 𝒫 cpw 4158 class class class wbr 4653 ↦ cmpt 4729 ran crn 5115 ‘cfv 5888 (class class class)co 6650 Fincfn 7955 supcsup 8346 ℝcr 9935 0cc0 9936 + caddc 9939 +∞cpnf 10071 ℝ^*cxr 10073 < clt 10074 ≤ cle 10075 / cdiv 10684 2c2 11070 ℝ⁺crp 11832 +_𝑒 cxad 11944 [,)cico 12177 [,]cicc 12178 Σcsu 14416 Σ^{^}csumge0 40579

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-rep 4771 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-inf2 8538 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013 ax-pre-sup 10014

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-fal 1489 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rmo 2920 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-uni 4437 df-int 4476 df-iun 4522 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-se 5074 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-isom 5897 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-om 7066 df-1st 7168 df-2nd 7169 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-1o 7560 df-oadd 7564 df-er 7742 df-en 7956 df-dom 7957 df-sdom 7958 df-fin 7959 df-sup 8348 df-inf 8349 df-oi 8415 df-card 8765 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-div 10685 df-nn 11021 df-2 11079 df-3 11080 df-n0 11293 df-z 11378 df-uz 11688 df-q 11789 df-rp 11833 df-xadd 11947 df-ico 12181 df-icc 12182 df-fz 12327 df-fzo 12466 df-seq 12802 df-exp 12861 df-hash 13118 df-cj 13839 df-re 13840 df-im 13841 df-sqrt 13975 df-abs 13976 df-clim 14219 df-sum 14417 df-sumge0 40580

This theorem is referenced by: sge0xadd 40652

W3C validator