Metamath Proof Explorer


Theorem gsumesum

Description: Relate a group sum on ` ( RR*s |``s ( 0 , +oo ) ) ` to a finite extended sum. (Contributed by Thierry Arnoux, 19-Oct-2017) (Proof shortened by AV, 12-Dec-2019)

Ref Expression
Hypotheses gsumesum.0 ⊢ Ⅎ k φ
gsumesum.1 ⊢ φ → A ∈ Fin
gsumesum.2 ⊢ φ ∧ k ∈ A → B ∈ 0 +∞
Assertion gsumesum ⊢ φ → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ * k ∈ A B

Proof

Step Hyp Ref Expression
1 gsumesum.0 ⊢ Ⅎ k φ
2 gsumesum.1 ⊢ φ → A ∈ Fin
3 gsumesum.2 ⊢ φ ∧ k ∈ A → B ∈ 0 +∞
4 nfcv ⊢ Ⅎ _ k A
5 eqidd ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B
6 1 4 2 3 5 esumval ⊢ φ → ∑ * k ∈ A B = sup ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ℝ * <
7 xrltso ⊢ < Or ℝ *
8 7 a1i ⊢ φ → < Or ℝ *
9 iccssxr ⊢ 0 +∞ ⊆ ℝ *
10 xrge0base ⊢ 0 +∞ = Base ℝ 𝑠 * ↾ 𝑠 0 +∞
11 xrge0cmn ⊢ ℝ 𝑠 * ↾ 𝑠 0 +∞ ∈ CMnd
12 11 a1i ⊢ φ → ℝ 𝑠 * ↾ 𝑠 0 +∞ ∈ CMnd
13 3 ex ⊢ φ → k ∈ A → B ∈ 0 +∞
14 1 13 ralrimi ⊢ φ → ∀ k ∈ A B ∈ 0 +∞
15 10 12 2 14 gsummptcl ⊢ φ → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ 0 +∞
16 9 15 sselid ⊢ φ → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ ℝ *
17 pwidg ⊢ A ∈ Fin → A ∈ 𝒫 A
18 2 17 syl ⊢ φ → A ∈ 𝒫 A
19 18 2 elind ⊢ φ → A ∈ 𝒫 A ∩ Fin
20 eqidd ⊢ φ → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
21 mpteq1 ⊢ x = A → k ∈ x ⟼ B = k ∈ A ⟼ B
22 21 oveq2d ⊢ x = A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
23 22 rspceeqv ⊢ A ∈ 𝒫 A ∩ Fin ∧ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B → ∃ x ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B
24 19 20 23 syl2anc ⊢ φ → ∃ x ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B
25 eqid ⊢ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B = x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B
26 ovex ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∈ V
27 25 26 elrnmpti ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ↔ ∃ x ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B
28 24 27 sylibr ⊢ φ → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B
29 mpteq1 ⊢ x = a → k ∈ x ⟼ B = k ∈ a ⟼ B
30 29 oveq2d ⊢ x = a → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B
31 30 cbvmptv ⊢ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B = a ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B
32 ovex ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∈ V
33 31 32 elrnmpti ⊢ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ↔ ∃ a ∈ 𝒫 A ∩ Fin y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B
34 33 bilani ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → ∃ a ∈ 𝒫 A ∩ Fin y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B
35 11 a1i ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ℝ 𝑠 * ↾ 𝑠 0 +∞ ∈ CMnd
36 inss2 ⊢ 𝒫 A ∩ Fin ⊆ Fin
37 simpr ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → a ∈ 𝒫 A ∩ Fin
38 36 37 sselid ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → a ∈ Fin
39 nfv ⊢ Ⅎ k a ∈ 𝒫 A ∩ Fin
40 1 39 nfan ⊢ Ⅎ k φ ∧ a ∈ 𝒫 A ∩ Fin
41 simpll ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ a → φ
42 inss1 ⊢ 𝒫 A ∩ Fin ⊆ 𝒫 A
43 42 sseli ⊢ a ∈ 𝒫 A ∩ Fin → a ∈ 𝒫 A
44 43 elpwid ⊢ a ∈ 𝒫 A ∩ Fin → a ⊆ A
45 44 ad2antlr ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ a → a ⊆ A
46 simpr ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ a → k ∈ a
47 45 46 sseldd ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ a → k ∈ A
48 41 47 3 syl2anc ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ a → B ∈ 0 +∞
49 48 ex ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → k ∈ a → B ∈ 0 +∞
50 40 49 ralrimi ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∀ k ∈ a B ∈ 0 +∞
51 10 35 38 50 gsummptcl ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∈ 0 +∞
52 9 51 sselid ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∈ ℝ *
53 diffi ⊢ A ∈ Fin → A ∖ a ∈ Fin
54 2 53 syl ⊢ φ → A ∖ a ∈ Fin
55 54 adantr ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → A ∖ a ∈ Fin
56 simpll ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ A ∖ a → φ
57 simpr ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ A ∖ a → k ∈ A ∖ a
58 57 eldifad ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ A ∖ a → k ∈ A
59 56 58 3 syl2anc ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin ∧ k ∈ A ∖ a → B ∈ 0 +∞
60 59 ex ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → k ∈ A ∖ a → B ∈ 0 +∞
61 40 60 ralrimi ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∀ k ∈ A ∖ a B ∈ 0 +∞
62 10 35 55 61 gsummptcl ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ 0 +∞
63 9 62 sselid ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ ℝ *
64 elxrge0 ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ 0 +∞ ↔ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ ℝ * ∧ 0 ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
65 64 simprbi ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ 0 +∞ → 0 ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
66 62 65 syl ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → 0 ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
67 xraddge02 ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∈ ℝ * ∧ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ ℝ * → 0 ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
68 67 imp ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∈ ℝ * ∧ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B ∈ ℝ * ∧ 0 ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
69 52 63 66 68 syl21anc ⊢ φ ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
70 69 adantlr ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
71 simpll ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∧ a ∈ 𝒫 A ∩ Fin → φ
72 44 adantl ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∧ a ∈ 𝒫 A ∩ Fin → a ⊆ A
73 xrge00 ⊢ 0 = 0 ℝ 𝑠 * ↾ 𝑠 0 +∞
74 xrge0plusg ⊢ + 𝑒 = + ℝ 𝑠 * ↾ 𝑠 0 +∞
75 11 a1i ⊢ φ ∧ a ⊆ A → ℝ 𝑠 * ↾ 𝑠 0 +∞ ∈ CMnd
76 2 adantr ⊢ φ ∧ a ⊆ A → A ∈ Fin
77 eqid ⊢ k ∈ A ⟼ B = k ∈ A ⟼ B
78 1 3 77 fmptdf ⊢ φ → k ∈ A ⟼ B : A ⟶ 0 +∞
79 78 adantr ⊢ φ ∧ a ⊆ A → k ∈ A ⟼ B : A ⟶ 0 +∞
80 77 fnmpt ⊢ ∀ k ∈ A B ∈ 0 +∞ → k ∈ A ⟼ B Fn A
81 14 80 syl ⊢ φ → k ∈ A ⟼ B Fn A
82 c0ex ⊢ 0 ∈ V
83 82 a1i ⊢ φ → 0 ∈ V
84 81 2 83 fndmfifsupp ⊢ φ → finSupp 0 ⁡ k ∈ A ⟼ B
85 84 adantr ⊢ φ ∧ a ⊆ A → finSupp 0 ⁡ k ∈ A ⟼ B
86 disjdif ⊢ a ∩ A ∖ a = ∅
87 86 a1i ⊢ φ ∧ a ⊆ A → a ∩ A ∖ a = ∅
88 undif ⊢ a ⊆ A ↔ a ∪ A ∖ a = A
89 88 biimpi ⊢ a ⊆ A → a ∪ A ∖ a = A
90 89 eqcomd ⊢ a ⊆ A → A = a ∪ A ∖ a
91 90 adantl ⊢ φ ∧ a ⊆ A → A = a ∪ A ∖ a
92 10 73 74 75 76 79 85 87 91 gsumsplit ⊢ φ ∧ a ⊆ A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ a + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ A ∖ a
93 resmpt ⊢ a ⊆ A → k ∈ A ⟼ B ↾ a = k ∈ a ⟼ B
94 93 oveq2d ⊢ a ⊆ A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ a = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B
95 94 adantl ⊢ φ ∧ a ⊆ A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ a = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B
96 difss ⊢ A ∖ a ⊆ A
97 resmpt ⊢ A ∖ a ⊆ A → k ∈ A ⟼ B ↾ A ∖ a = k ∈ A ∖ a ⟼ B
98 96 97 ax-mp ⊢ k ∈ A ⟼ B ↾ A ∖ a = k ∈ A ∖ a ⟼ B
99 98 oveq2i ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ A ∖ a = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
100 99 a1i ⊢ φ ∧ a ⊆ A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ A ∖ a = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
101 95 100 oveq12d ⊢ φ ∧ a ⊆ A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ a + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ⟼ B ↾ A ∖ a = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
102 92 101 eqtrd ⊢ φ ∧ a ⊆ A → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
103 71 72 102 syl2anc ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B + 𝑒 ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A ∖ a B
104 70 103 breqtrrd ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∧ a ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
105 104 ralrimiva ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → ∀ a ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
106 r19.29r ⊢ ∃ a ∈ 𝒫 A ∩ Fin y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∧ ∀ a ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B → ∃ a ∈ 𝒫 A ∩ Fin y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∧ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
107 breq1 ⊢ y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ↔ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
108 107 biimpar ⊢ y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∧ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
109 108 rexlimivw ⊢ ∃ a ∈ 𝒫 A ∩ Fin y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∧ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
110 106 109 syl ⊢ ∃ a ∈ 𝒫 A ∩ Fin y = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ∧ ∀ a ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ a B ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
111 34 105 110 syl2anc ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
112 16 adantr ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ ℝ *
113 11 a1i ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → ℝ 𝑠 * ↾ 𝑠 0 +∞ ∈ CMnd
114 simpr ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → x ∈ 𝒫 A ∩ Fin
115 36 114 sselid ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → x ∈ Fin
116 nfv ⊢ Ⅎ k x ∈ 𝒫 A ∩ Fin
117 1 116 nfan ⊢ Ⅎ k φ ∧ x ∈ 𝒫 A ∩ Fin
118 simpll ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin ∧ k ∈ x → φ
119 42 sseli ⊢ x ∈ 𝒫 A ∩ Fin → x ∈ 𝒫 A
120 119 ad2antlr ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin ∧ k ∈ x → x ∈ 𝒫 A
121 120 elpwid ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin ∧ k ∈ x → x ⊆ A
122 simpr ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin ∧ k ∈ x → k ∈ x
123 121 122 sseldd ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin ∧ k ∈ x → k ∈ A
124 118 123 3 syl2anc ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin ∧ k ∈ x → B ∈ 0 +∞
125 124 ex ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → k ∈ x → B ∈ 0 +∞
126 117 125 ralrimi ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → ∀ k ∈ x B ∈ 0 +∞
127 10 113 115 126 gsummptcl ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∈ 0 +∞
128 9 127 sselid ⊢ φ ∧ x ∈ 𝒫 A ∩ Fin → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∈ ℝ *
129 128 ralrimiva ⊢ φ → ∀ x ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∈ ℝ *
130 25 rnmptss ⊢ ∀ x ∈ 𝒫 A ∩ Fin ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ∈ ℝ * → ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ⊆ ℝ *
131 129 130 syl ⊢ φ → ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ⊆ ℝ *
132 131 sselda ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → y ∈ ℝ *
133 xrltnle ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ ℝ * ∧ y ∈ ℝ * → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B < y ↔ ¬ y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
134 133 con2bid ⊢ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ∈ ℝ * ∧ y ∈ ℝ * → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ↔ ¬ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B < y
135 112 132 134 syl2anc ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → y ≤ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B ↔ ¬ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B < y
136 111 135 mpbid ⊢ φ ∧ y ∈ ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B → ¬ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B < y
137 8 16 28 136 supmax ⊢ φ → sup ran ⁡ x ∈ 𝒫 A ∩ Fin ⟼ ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ x B ℝ * < = ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B
138 6 137 eqtr2d ⊢ φ → ∑ ℝ 𝑠 * ↾ 𝑠 0 +∞ k ∈ A B = ∑ * k ∈ A B