Theorem esumsnf 34061

Description: The extended sum of a singleton is the term. (Contributed by Thierry Arnoux, 2-Jan-2017.) (Revised by Thierry Arnoux, 2-May-2020.)

Hypotheses

Ref	Expression
esumsnf.0	⊢ Ⅎ𝑘𝐵
esumsnf.1	⊢ ((𝜑 ∧ 𝑘 = 𝑀) → 𝐴 = 𝐵)
esumsnf.2	⊢ (𝜑 → 𝑀 ∈ 𝑉)
esumsnf.3	⊢ (𝜑 → 𝐵 ∈ (0[,]+∞))

Assertion

Ref	Expression
esumsnf	⊢ (𝜑 → Σ*𝑘 ∈ {𝑀}𝐴 = 𝐵)

Distinct variable groups:   𝑘,𝑀   𝜑,𝑘

Allowed substitution hints:   𝐴(𝑘)   𝐵(𝑘)   𝑉(𝑘)

Proof of Theorem esumsnf

Dummy variables 𝑥 𝑙 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-esum 34025	. . 3 ⊢ Σ*𝑘 ∈ {𝑀}𝐴 = ∪ ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴))
2	1	a1i 11	. 2 ⊢ (𝜑 → Σ*𝑘 ∈ {𝑀}𝐴 = ∪ ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴)))
3		eqid 2730	. . . 4 ⊢ (ℝ*𝑠 ↾s (0[,]+∞)) = (ℝ*𝑠 ↾s (0[,]+∞))
4		snfi 9017	. . . . 5 ⊢ {𝑀} ∈ Fin
5	4	a1i 11	. . . 4 ⊢ (𝜑 → {𝑀} ∈ Fin)
6		elsni 4609	. . . . . . . . 9 ⊢ (𝑘 ∈ {𝑀} → 𝑘 = 𝑀)
7		esumsnf.1	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 = 𝑀) → 𝐴 = 𝐵)
8	6, 7	sylan2 593	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑀}) → 𝐴 = 𝐵)
9	8	mpteq2dva 5203	. . . . . . 7 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴) = (𝑘 ∈ {𝑀} ↦ 𝐵))
10		esumsnf.2	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ 𝑉)
11		esumsnf.3	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ (0[,]+∞))
12		fmptsn 7144	. . . . . . . . 9 ⊢ ((𝑀 ∈ 𝑉 ∧ 𝐵 ∈ (0[,]+∞)) → {⟨𝑀, 𝐵⟩} = (𝑙 ∈ {𝑀} ↦ 𝐵))
13		nfcv 2892	. . . . . . . . . 10 ⊢ Ⅎ𝑙𝐵
14		esumsnf.0	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝐵
15		eqidd 2731	. . . . . . . . . 10 ⊢ (𝑘 = 𝑙 → 𝐵 = 𝐵)
16	13, 14, 15	cbvmpt 5212	. . . . . . . . 9 ⊢ (𝑘 ∈ {𝑀} ↦ 𝐵) = (𝑙 ∈ {𝑀} ↦ 𝐵)
17	12, 16	eqtr4di 2783	. . . . . . . 8 ⊢ ((𝑀 ∈ 𝑉 ∧ 𝐵 ∈ (0[,]+∞)) → {⟨𝑀, 𝐵⟩} = (𝑘 ∈ {𝑀} ↦ 𝐵))
18	10, 11, 17	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → {⟨𝑀, 𝐵⟩} = (𝑘 ∈ {𝑀} ↦ 𝐵))
19	9, 18	eqtr4d 2768	. . . . . 6 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴) = {⟨𝑀, 𝐵⟩})
20		fsng 7112	. . . . . . 7 ⊢ ((𝑀 ∈ 𝑉 ∧ 𝐵 ∈ (0[,]+∞)) → ((𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶{𝐵} ↔ (𝑘 ∈ {𝑀} ↦ 𝐴) = {⟨𝑀, 𝐵⟩}))
21	10, 11, 20	syl2anc 584	. . . . . 6 ⊢ (𝜑 → ((𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶{𝐵} ↔ (𝑘 ∈ {𝑀} ↦ 𝐴) = {⟨𝑀, 𝐵⟩}))
22	19, 21	mpbird 257	. . . . 5 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶{𝐵})
23	11	snssd 4776	. . . . 5 ⊢ (𝜑 → {𝐵} ⊆ (0[,]+∞))
24	22, 23	fssd 6708	. . . 4 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶(0[,]+∞))
25		xrltso 13108	. . . . . . 7 ⊢ < Or ℝ*
26	25	a1i 11	. . . . . 6 ⊢ (𝜑 → < Or ℝ*)
27		0xr 11228	. . . . . . 7 ⊢ 0 ∈ ℝ*
28	27	a1i 11	. . . . . 6 ⊢ (𝜑 → 0 ∈ ℝ*)
29		elxrge0 13425	. . . . . . . 8 ⊢ (𝐵 ∈ (0[,]+∞) ↔ (𝐵 ∈ ℝ* ∧ 0 ≤ 𝐵))
30	11, 29	sylib 218	. . . . . . 7 ⊢ (𝜑 → (𝐵 ∈ ℝ* ∧ 0 ≤ 𝐵))
31	30	simpld 494	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℝ*)
32		suppr 9430	. . . . . 6 ⊢ (( < Or ℝ* ∧ 0 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → sup({0, 𝐵}, ℝ*, < ) = if(𝐵 < 0, 0, 𝐵))
33	26, 28, 31, 32	syl3anc 1373	. . . . 5 ⊢ (𝜑 → sup({0, 𝐵}, ℝ*, < ) = if(𝐵 < 0, 0, 𝐵))
34		0fi 9016	. . . . . . . . . . 11 ⊢ ∅ ∈ Fin
35	34	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → ∅ ∈ Fin)
36		reseq2 5948	. . . . . . . . . . . . . 14 ⊢ (𝑥 = ∅ → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ ∅))
37		res0 5957	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ ∅) = ∅
38	36, 37	eqtrdi 2781	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = ∅)
39	38	oveq2d 7406	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ∅))
40		xrge00 32960	. . . . . . . . . . . . 13 ⊢ 0 = (0g‘(ℝ*𝑠 ↾s (0[,]+∞)))
41	40	gsum0 18618	. . . . . . . . . . . 12 ⊢ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ∅) = 0
42	39, 41	eqtrdi 2781	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = 0)
43	42	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ∅) → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = 0)
44		reseq2 5948	. . . . . . . . . . . . 13 ⊢ (𝑥 = {𝑀} → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ {𝑀}))
45		ssid 3972	. . . . . . . . . . . . . 14 ⊢ {𝑀} ⊆ {𝑀}
46		resmpt 6011	. . . . . . . . . . . . . 14 ⊢ ({𝑀} ⊆ {𝑀} → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ {𝑀}) = (𝑘 ∈ {𝑀} ↦ 𝐴))
47	45, 46	ax-mp 5	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ {𝑀}) = (𝑘 ∈ {𝑀} ↦ 𝐴)
48	44, 47	eqtrdi 2781	. . . . . . . . . . . 12 ⊢ (𝑥 = {𝑀} → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = (𝑘 ∈ {𝑀} ↦ 𝐴))
49	48	oveq2d 7406	. . . . . . . . . . 11 ⊢ (𝑥 = {𝑀} → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = ((ℝ*𝑠 ↾s (0[,]+∞)) Σg (𝑘 ∈ {𝑀} ↦ 𝐴)))
50		xrge0base 32959	. . . . . . . . . . . 12 ⊢ (0[,]+∞) = (Base‘(ℝ*𝑠 ↾s (0[,]+∞)))
51		xrge0cmn 21332	. . . . . . . . . . . . . 14 ⊢ (ℝ*𝑠 ↾s (0[,]+∞)) ∈ CMnd
52		cmnmnd 19734	. . . . . . . . . . . . . 14 ⊢ ((ℝ*𝑠 ↾s (0[,]+∞)) ∈ CMnd → (ℝ*𝑠 ↾s (0[,]+∞)) ∈ Mnd)
53	51, 52	ax-mp 5	. . . . . . . . . . . . 13 ⊢ (ℝ*𝑠 ↾s (0[,]+∞)) ∈ Mnd
54	53	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℝ*𝑠 ↾s (0[,]+∞)) ∈ Mnd)
55		nfv 1914	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝜑
56	50, 54, 10, 11, 7, 55, 14	gsumsnfd 19888	. . . . . . . . . . 11 ⊢ (𝜑 → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg (𝑘 ∈ {𝑀} ↦ 𝐴)) = 𝐵)
57	49, 56	sylan9eqr 2787	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = {𝑀}) → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = 𝐵)
58	35, 5, 28, 11, 43, 57	fmptpr 7149	. . . . . . . . 9 ⊢ (𝜑 → {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = (𝑥 ∈ {∅, {𝑀}} ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))))
59		pwsn 4867	. . . . . . . . . . . . 13 ⊢ 𝒫 {𝑀} = {∅, {𝑀}}
60		prssi 4788	. . . . . . . . . . . . . 14 ⊢ ((∅ ∈ Fin ∧ {𝑀} ∈ Fin) → {∅, {𝑀}} ⊆ Fin)
61	34, 4, 60	mp2an 692	. . . . . . . . . . . . 13 ⊢ {∅, {𝑀}} ⊆ Fin
62	59, 61	eqsstri 3996	. . . . . . . . . . . 12 ⊢ 𝒫 {𝑀} ⊆ Fin
63		dfss2 3935	. . . . . . . . . . . 12 ⊢ (𝒫 {𝑀} ⊆ Fin ↔ (𝒫 {𝑀} ∩ Fin) = 𝒫 {𝑀})
64	62, 63	mpbi 230	. . . . . . . . . . 11 ⊢ (𝒫 {𝑀} ∩ Fin) = 𝒫 {𝑀}
65	64, 59	eqtri 2753	. . . . . . . . . 10 ⊢ (𝒫 {𝑀} ∩ Fin) = {∅, {𝑀}}
66		eqid 2730	. . . . . . . . . 10 ⊢ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))
67	65, 66	mpteq12i 5207	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))) = (𝑥 ∈ {∅, {𝑀}} ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)))
68	58, 67	eqtr4di 2783	. . . . . . . 8 ⊢ (𝜑 → {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))))
69	68	rneqd 5905	. . . . . . 7 ⊢ (𝜑 → ran {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))))
70		rnpropg 6198	. . . . . . . 8 ⊢ ((∅ ∈ Fin ∧ {𝑀} ∈ Fin) → ran {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = {0, 𝐵})
71	35, 5, 70	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → ran {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = {0, 𝐵})
72	69, 71	eqtr3d 2767	. . . . . 6 ⊢ (𝜑 → ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))) = {0, 𝐵})
73	72	supeq1d 9404	. . . . 5 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))), ℝ*, < ) = sup({0, 𝐵}, ℝ*, < ))
74	30	simprd 495	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ 𝐵)
75		xrlenlt 11246	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (0 ≤ 𝐵 ↔ ¬ 𝐵 < 0))
76	28, 31, 75	syl2anc 584	. . . . . . . . 9 ⊢ (𝜑 → (0 ≤ 𝐵 ↔ ¬ 𝐵 < 0))
77	74, 76	mpbid 232	. . . . . . . 8 ⊢ (𝜑 → ¬ 𝐵 < 0)
78		eqidd 2731	. . . . . . . 8 ⊢ (𝜑 → 𝐵 = 𝐵)
79	77, 78	jca 511	. . . . . . 7 ⊢ (𝜑 → (¬ 𝐵 < 0 ∧ 𝐵 = 𝐵))
80	79	olcd 874	. . . . . 6 ⊢ (𝜑 → ((𝐵 < 0 ∧ 𝐵 = 0) ∨ (¬ 𝐵 < 0 ∧ 𝐵 = 𝐵)))
81		eqif 4533	. . . . . 6 ⊢ (𝐵 = if(𝐵 < 0, 0, 𝐵) ↔ ((𝐵 < 0 ∧ 𝐵 = 0) ∨ (¬ 𝐵 < 0 ∧ 𝐵 = 𝐵)))
82	80, 81	sylibr 234	. . . . 5 ⊢ (𝜑 → 𝐵 = if(𝐵 < 0, 0, 𝐵))
83	33, 73, 82	3eqtr4rd 2776	. . . 4 ⊢ (𝜑 → 𝐵 = sup(ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))), ℝ*, < ))
84	3, 5, 24, 83	xrge0tsmsd 33009	. . 3 ⊢ (𝜑 → ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴)) = {𝐵})
85	84	unieqd 4887	. 2 ⊢ (𝜑 → ∪ ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴)) = ∪ {𝐵})
86		unisng 4892	. . 3 ⊢ (𝐵 ∈ (0[,]+∞) → ∪ {𝐵} = 𝐵)
87	11, 86	syl 17	. 2 ⊢ (𝜑 → ∪ {𝐵} = 𝐵)
88	2, 85, 87	3eqtrd 2769	1 ⊢ (𝜑 → Σ*𝑘 ∈ {𝑀}𝐴 = 𝐵)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 847   = wceq 1540   ∈ wcel 2109  Ⅎwnfc 2877   ∩ cin 3916   ⊆ wss 3917  ∅c0 4299  ifcif 4491  𝒫 cpw 4566  {csn 4592  {cpr 4594  ⟨cop 4598  ∪ cuni 4874   class class class wbr 5110   ↦ cmpt 5191   Or wor 5548  ran crn 5642   ↾ cres 5643  ⟶wf 6510  (class class class)co 7390  Fincfn 8921  supcsup 9398  0cc0 11075  +∞cpnf 11212  ℝ^*cxr 11214   < clt 11215   ≤ cle 11216  [,]cicc 13316   ↾_s cress 17207   Σ_g cgsu 17410  ℝ^*_𝑠cxrs 17470  Mndcmnd 18668  CMndccmn 19717   tsums ctsu 24020  Σ^*cesum 34024

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-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-tp 4597  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-iin 4961  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-of 7656  df-om 7846  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-2o 8438  df-er 8674  df-map 8804  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-fsupp 9320  df-fi 9369  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-4 12258  df-5 12259  df-6 12260  df-7 12261  df-8 12262  df-9 12263  df-n0 12450  df-z 12537  df-dec 12657  df-uz 12801  df-q 12915  df-xadd 13080  df-ioo 13317  df-ioc 13318  df-ico 13319  df-icc 13320  df-fz 13476  df-fzo 13623  df-seq 13974  df-hash 14303  df-struct 17124  df-sets 17141  df-slot 17159  df-ndx 17171  df-base 17187  df-ress 17208  df-plusg 17240  df-mulr 17241  df-tset 17246  df-ple 17247  df-ds 17249  df-rest 17392  df-topn 17393  df-0g 17411  df-gsum 17412  df-topgen 17413  df-ordt 17471  df-xrs 17472  df-mre 17554  df-mrc 17555  df-acs 17557  df-ps 18532  df-tsr 18533  df-mgm 18574  df-sgrp 18653  df-mnd 18669  df-submnd 18718  df-mulg 19007  df-cntz 19256  df-cmn 19719  df-fbas 21268  df-fg 21269  df-top 22788  df-topon 22805  df-topsp 22827  df-bases 22840  df-ntr 22914  df-nei 22992  df-cn 23121  df-haus 23209  df-fil 23740  df-fm 23832  df-flim 23833  df-flf 23834  df-tsms 24021  df-esum 34025

This theorem is referenced by:  esumsn  34062  esum2dlem  34089