Theorem esumsnf 34223

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 34187	. . 3 ⊢ Σ*𝑘 ∈ {𝑀}𝐴 = ∪ ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴))
2	1	a1i 11	. 2 ⊢ (𝜑 → Σ*𝑘 ∈ {𝑀}𝐴 = ∪ ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴)))
3		eqid 2737	. . . 4 ⊢ (ℝ*𝑠 ↾s (0[,]+∞)) = (ℝ*𝑠 ↾s (0[,]+∞))
4		snfi 8984	. . . . 5 ⊢ {𝑀} ∈ Fin
5	4	a1i 11	. . . 4 ⊢ (𝜑 → {𝑀} ∈ Fin)
6		elsni 4598	. . . . . . . . 9 ⊢ (𝑘 ∈ {𝑀} → 𝑘 = 𝑀)
7		esumsnf.1	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 = 𝑀) → 𝐴 = 𝐵)
8	6, 7	sylan2 594	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑀}) → 𝐴 = 𝐵)
9	8	mpteq2dva 5192	. . . . . . 7 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴) = (𝑘 ∈ {𝑀} ↦ 𝐵))
10		esumsnf.2	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ 𝑉)
11		esumsnf.3	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ (0[,]+∞))
12		fmptsn 7115	. . . . . . . . 9 ⊢ ((𝑀 ∈ 𝑉 ∧ 𝐵 ∈ (0[,]+∞)) → {⟨𝑀, 𝐵⟩} = (𝑙 ∈ {𝑀} ↦ 𝐵))
13		nfcv 2899	. . . . . . . . . 10 ⊢ Ⅎ𝑙𝐵
14		esumsnf.0	. . . . . . . . . 10 ⊢ Ⅎ𝑘𝐵
15		eqidd 2738	. . . . . . . . . 10 ⊢ (𝑘 = 𝑙 → 𝐵 = 𝐵)
16	13, 14, 15	cbvmpt 5201	. . . . . . . . 9 ⊢ (𝑘 ∈ {𝑀} ↦ 𝐵) = (𝑙 ∈ {𝑀} ↦ 𝐵)
17	12, 16	eqtr4di 2790	. . . . . . . 8 ⊢ ((𝑀 ∈ 𝑉 ∧ 𝐵 ∈ (0[,]+∞)) → {⟨𝑀, 𝐵⟩} = (𝑘 ∈ {𝑀} ↦ 𝐵))
18	10, 11, 17	syl2anc 585	. . . . . . 7 ⊢ (𝜑 → {⟨𝑀, 𝐵⟩} = (𝑘 ∈ {𝑀} ↦ 𝐵))
19	9, 18	eqtr4d 2775	. . . . . 6 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴) = {⟨𝑀, 𝐵⟩})
20		fsng 7084	. . . . . . 7 ⊢ ((𝑀 ∈ 𝑉 ∧ 𝐵 ∈ (0[,]+∞)) → ((𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶{𝐵} ↔ (𝑘 ∈ {𝑀} ↦ 𝐴) = {⟨𝑀, 𝐵⟩}))
21	10, 11, 20	syl2anc 585	. . . . . 6 ⊢ (𝜑 → ((𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶{𝐵} ↔ (𝑘 ∈ {𝑀} ↦ 𝐴) = {⟨𝑀, 𝐵⟩}))
22	19, 21	mpbird 257	. . . . 5 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶{𝐵})
23	11	snssd 4766	. . . . 5 ⊢ (𝜑 → {𝐵} ⊆ (0[,]+∞))
24	22, 23	fssd 6680	. . . 4 ⊢ (𝜑 → (𝑘 ∈ {𝑀} ↦ 𝐴):{𝑀}⟶(0[,]+∞))
25		xrltso 13059	. . . . . . 7 ⊢ < Or ℝ*
26	25	a1i 11	. . . . . 6 ⊢ (𝜑 → < Or ℝ*)
27		0xr 11183	. . . . . . 7 ⊢ 0 ∈ ℝ*
28	27	a1i 11	. . . . . 6 ⊢ (𝜑 → 0 ∈ ℝ*)
29		elxrge0 13377	. . . . . . . 8 ⊢ (𝐵 ∈ (0[,]+∞) ↔ (𝐵 ∈ ℝ* ∧ 0 ≤ 𝐵))
30	11, 29	sylib 218	. . . . . . 7 ⊢ (𝜑 → (𝐵 ∈ ℝ* ∧ 0 ≤ 𝐵))
31	30	simpld 494	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℝ*)
32		suppr 9379	. . . . . 6 ⊢ (( < Or ℝ* ∧ 0 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → sup({0, 𝐵}, ℝ*, < ) = if(𝐵 < 0, 0, 𝐵))
33	26, 28, 31, 32	syl3anc 1374	. . . . 5 ⊢ (𝜑 → sup({0, 𝐵}, ℝ*, < ) = if(𝐵 < 0, 0, 𝐵))
34		0fi 8983	. . . . . . . . . . 11 ⊢ ∅ ∈ Fin
35	34	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → ∅ ∈ Fin)
36		reseq2 5934	. . . . . . . . . . . . . 14 ⊢ (𝑥 = ∅ → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ ∅))
37		res0 5943	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ ∅) = ∅
38	36, 37	eqtrdi 2788	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = ∅)
39	38	oveq2d 7376	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ∅))
40		xrge00 33098	. . . . . . . . . . . . 13 ⊢ 0 = (0g‘(ℝ*𝑠 ↾s (0[,]+∞)))
41	40	gsum0 18613	. . . . . . . . . . . 12 ⊢ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ∅) = 0
42	39, 41	eqtrdi 2788	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = 0)
43	42	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = ∅) → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = 0)
44		reseq2 5934	. . . . . . . . . . . . 13 ⊢ (𝑥 = {𝑀} → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ {𝑀}))
45		ssid 3957	. . . . . . . . . . . . . 14 ⊢ {𝑀} ⊆ {𝑀}
46		resmpt 5997	. . . . . . . . . . . . . 14 ⊢ ({𝑀} ⊆ {𝑀} → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ {𝑀}) = (𝑘 ∈ {𝑀} ↦ 𝐴))
47	45, 46	ax-mp 5	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ {𝑀}) = (𝑘 ∈ {𝑀} ↦ 𝐴)
48	44, 47	eqtrdi 2788	. . . . . . . . . . . 12 ⊢ (𝑥 = {𝑀} → ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥) = (𝑘 ∈ {𝑀} ↦ 𝐴))
49	48	oveq2d 7376	. . . . . . . . . . 11 ⊢ (𝑥 = {𝑀} → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = ((ℝ*𝑠 ↾s (0[,]+∞)) Σg (𝑘 ∈ {𝑀} ↦ 𝐴)))
50		xrge0base 17532	. . . . . . . . . . . 12 ⊢ (0[,]+∞) = (Base‘(ℝ*𝑠 ↾s (0[,]+∞)))
51		xrge0cmn 21403	. . . . . . . . . . . . . 14 ⊢ (ℝ*𝑠 ↾s (0[,]+∞)) ∈ CMnd
52		cmnmnd 19730	. . . . . . . . . . . . . 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 1916	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘𝜑
56	50, 54, 10, 11, 7, 55, 14	gsumsnfd 19884	. . . . . . . . . . 11 ⊢ (𝜑 → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg (𝑘 ∈ {𝑀} ↦ 𝐴)) = 𝐵)
57	49, 56	sylan9eqr 2794	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 = {𝑀}) → ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = 𝐵)
58	35, 5, 28, 11, 43, 57	fmptpr 7120	. . . . . . . . 9 ⊢ (𝜑 → {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = (𝑥 ∈ {∅, {𝑀}} ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))))
59		pwsn 4857	. . . . . . . . . . . . 13 ⊢ 𝒫 {𝑀} = {∅, {𝑀}}
60		prssi 4778	. . . . . . . . . . . . . 14 ⊢ ((∅ ∈ Fin ∧ {𝑀} ∈ Fin) → {∅, {𝑀}} ⊆ Fin)
61	34, 4, 60	mp2an 693	. . . . . . . . . . . . 13 ⊢ {∅, {𝑀}} ⊆ Fin
62	59, 61	eqsstri 3981	. . . . . . . . . . . 12 ⊢ 𝒫 {𝑀} ⊆ Fin
63		dfss2 3920	. . . . . . . . . . . 12 ⊢ (𝒫 {𝑀} ⊆ Fin ↔ (𝒫 {𝑀} ∩ Fin) = 𝒫 {𝑀})
64	62, 63	mpbi 230	. . . . . . . . . . 11 ⊢ (𝒫 {𝑀} ∩ Fin) = 𝒫 {𝑀}
65	64, 59	eqtri 2760	. . . . . . . . . 10 ⊢ (𝒫 {𝑀} ∩ Fin) = {∅, {𝑀}}
66		eqid 2737	. . . . . . . . . 10 ⊢ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)) = ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))
67	65, 66	mpteq12i 5196	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))) = (𝑥 ∈ {∅, {𝑀}} ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥)))
68	58, 67	eqtr4di 2790	. . . . . . . 8 ⊢ (𝜑 → {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))))
69	68	rneqd 5888	. . . . . . 7 ⊢ (𝜑 → ran {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))))
70		rnpropg 6181	. . . . . . . 8 ⊢ ((∅ ∈ Fin ∧ {𝑀} ∈ Fin) → ran {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = {0, 𝐵})
71	35, 5, 70	syl2anc 585	. . . . . . 7 ⊢ (𝜑 → ran {⟨∅, 0⟩, ⟨{𝑀}, 𝐵⟩} = {0, 𝐵})
72	69, 71	eqtr3d 2774	. . . . . 6 ⊢ (𝜑 → ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))) = {0, 𝐵})
73	72	supeq1d 9353	. . . . 5 ⊢ (𝜑 → sup(ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))), ℝ*, < ) = sup({0, 𝐵}, ℝ*, < ))
74	30	simprd 495	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ 𝐵)
75		xrlenlt 11201	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (0 ≤ 𝐵 ↔ ¬ 𝐵 < 0))
76	28, 31, 75	syl2anc 585	. . . . . . . . 9 ⊢ (𝜑 → (0 ≤ 𝐵 ↔ ¬ 𝐵 < 0))
77	74, 76	mpbid 232	. . . . . . . 8 ⊢ (𝜑 → ¬ 𝐵 < 0)
78		eqidd 2738	. . . . . . . 8 ⊢ (𝜑 → 𝐵 = 𝐵)
79	77, 78	jca 511	. . . . . . 7 ⊢ (𝜑 → (¬ 𝐵 < 0 ∧ 𝐵 = 𝐵))
80	79	olcd 875	. . . . . 6 ⊢ (𝜑 → ((𝐵 < 0 ∧ 𝐵 = 0) ∨ (¬ 𝐵 < 0 ∧ 𝐵 = 𝐵)))
81		eqif 4522	. . . . . 6 ⊢ (𝐵 = if(𝐵 < 0, 0, 𝐵) ↔ ((𝐵 < 0 ∧ 𝐵 = 0) ∨ (¬ 𝐵 < 0 ∧ 𝐵 = 𝐵)))
82	80, 81	sylibr 234	. . . . 5 ⊢ (𝜑 → 𝐵 = if(𝐵 < 0, 0, 𝐵))
83	33, 73, 82	3eqtr4rd 2783	. . . 4 ⊢ (𝜑 → 𝐵 = sup(ran (𝑥 ∈ (𝒫 {𝑀} ∩ Fin) ↦ ((ℝ*𝑠 ↾s (0[,]+∞)) Σg ((𝑘 ∈ {𝑀} ↦ 𝐴) ↾ 𝑥))), ℝ*, < ))
84	3, 5, 24, 83	xrge0tsmsd 33157	. . 3 ⊢ (𝜑 → ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴)) = {𝐵})
85	84	unieqd 4877	. 2 ⊢ (𝜑 → ∪ ((ℝ*𝑠 ↾s (0[,]+∞)) tsums (𝑘 ∈ {𝑀} ↦ 𝐴)) = ∪ {𝐵})
86		unisng 4882	. . 3 ⊢ (𝐵 ∈ (0[,]+∞) → ∪ {𝐵} = 𝐵)
87	11, 86	syl 17	. 2 ⊢ (𝜑 → ∪ {𝐵} = 𝐵)
88	2, 85, 87	3eqtrd 2776	1 ⊢ (𝜑 → Σ*𝑘 ∈ {𝑀}𝐴 = 𝐵)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 848   = wceq 1542   ∈ wcel 2114  Ⅎwnfc 2884   ∩ cin 3901   ⊆ wss 3902  ∅c0 4286  ifcif 4480  𝒫 cpw 4555  {csn 4581  {cpr 4583  ⟨cop 4587  ∪ cuni 4864   class class class wbr 5099   ↦ cmpt 5180   Or wor 5532  ran crn 5626   ↾ cres 5627  ⟶wf 6489  (class class class)co 7360  Fincfn 8887  supcsup 9347  0cc0 11030  +∞cpnf 11167  ℝ^*cxr 11169   < clt 11170   ≤ cle 11171  [,]cicc 13268   ↾_s cress 17161   Σ_g cgsu 17364  ℝ^*_𝑠cxrs 17425  Mndcmnd 18663  CMndccmn 19713   tsums ctsu 24074  Σ^*cesum 34186

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5225  ax-sep 5242  ax-nul 5252  ax-pow 5311  ax-pr 5378  ax-un 7682  ax-cnex 11086  ax-resscn 11087  ax-1cn 11088  ax-icn 11089  ax-addcl 11090  ax-addrcl 11091  ax-mulcl 11092  ax-mulrcl 11093  ax-mulcom 11094  ax-addass 11095  ax-mulass 11096  ax-distr 11097  ax-i2m1 11098  ax-1ne0 11099  ax-1rid 11100  ax-rnegex 11101  ax-rrecex 11102  ax-cnre 11103  ax-pre-lttri 11104  ax-pre-lttrn 11105  ax-pre-ltadd 11106  ax-pre-mulgt0 11107  ax-pre-sup 11108

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3351  df-reu 3352  df-rab 3401  df-v 3443  df-sbc 3742  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4287  df-if 4481  df-pw 4557  df-sn 4582  df-pr 4584  df-tp 4586  df-op 4588  df-uni 4865  df-int 4904  df-iun 4949  df-iin 4950  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-se 5579  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-isom 6502  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-of 7624  df-om 7811  df-1st 7935  df-2nd 7936  df-supp 8105  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-rdg 8343  df-1o 8399  df-2o 8400  df-er 8637  df-map 8769  df-en 8888  df-dom 8889  df-sdom 8890  df-fin 8891  df-fsupp 9269  df-fi 9318  df-sup 9349  df-inf 9350  df-oi 9419  df-card 9855  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12150  df-2 12212  df-3 12213  df-4 12214  df-5 12215  df-6 12216  df-7 12217  df-8 12218  df-9 12219  df-n0 12406  df-z 12493  df-dec 12612  df-uz 12756  df-q 12866  df-xadd 13031  df-ioo 13269  df-ioc 13270  df-ico 13271  df-icc 13272  df-fz 13428  df-fzo 13575  df-seq 13929  df-hash 14258  df-struct 17078  df-sets 17095  df-slot 17113  df-ndx 17125  df-base 17141  df-ress 17162  df-plusg 17194  df-mulr 17195  df-tset 17200  df-ple 17201  df-ds 17203  df-rest 17346  df-topn 17347  df-0g 17365  df-gsum 17366  df-topgen 17367  df-ordt 17426  df-xrs 17427  df-mre 17509  df-mrc 17510  df-acs 17512  df-ps 18493  df-tsr 18494  df-mgm 18569  df-sgrp 18648  df-mnd 18664  df-submnd 18713  df-mulg 19002  df-cntz 19250  df-cmn 19715  df-fbas 21310  df-fg 21311  df-top 22842  df-topon 22859  df-topsp 22881  df-bases 22894  df-ntr 22968  df-nei 23046  df-cn 23175  df-haus 23263  df-fil 23794  df-fm 23886  df-flim 23887  df-flf 23888  df-tsms 24075  df-esum 34187

This theorem is referenced by:  esumsn  34224  esum2dlem  34251