Theorem tmdgsum 24038

Description: In a topological monoid, the group sum operation is a continuous function from the function space to the base topology. This theorem is not true when 𝐴 is infinite, because in this case for any basic open set of the domain one of the factors will be the whole space, so by varying the value of the functions to sum at this index, one can achieve any desired sum. (Contributed by Mario Carneiro, 19-Sep-2015.) (Proof shortened by AV, 24-Jul-2019.)

Hypotheses

Ref	Expression
tmdgsum.j	⊢ 𝐽 = (TopOpen‘𝐺)
tmdgsum.b	⊢ 𝐵 = (Base‘𝐺)

Assertion

Ref	Expression
tmdgsum	⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐽   𝑥,𝐵   𝑥,𝐺

Proof of Theorem tmdgsum

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

Step	Hyp	Ref	Expression
1		oveq2 7418	. . . . . . . 8 ⊢ (𝑤 = ∅ → (𝐵 ↑m 𝑤) = (𝐵 ↑m ∅))
2	1	mpteq1d 5215	. . . . . . 7 ⊢ (𝑤 = ∅ → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)))
3		xpeq1 5673	. . . . . . . . . 10 ⊢ (𝑤 = ∅ → (𝑤 × {𝐽}) = (∅ × {𝐽}))
4		0xp 5758	. . . . . . . . . 10 ⊢ (∅ × {𝐽}) = ∅
5	3, 4	eqtrdi 2787	. . . . . . . . 9 ⊢ (𝑤 = ∅ → (𝑤 × {𝐽}) = ∅)
6	5	fveq2d 6885	. . . . . . . 8 ⊢ (𝑤 = ∅ → (∏t‘(𝑤 × {𝐽})) = (∏t‘∅))
7	6	oveq1d 7425	. . . . . . 7 ⊢ (𝑤 = ∅ → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘∅) Cn 𝐽))
8	2, 7	eleq12d 2829	. . . . . 6 ⊢ (𝑤 = ∅ → ((𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽)))
9	8	imbi2d 340	. . . . 5 ⊢ (𝑤 = ∅ → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽))))
10		oveq2 7418	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → (𝐵 ↑m 𝑤) = (𝐵 ↑m 𝑦))
11	10	mpteq1d 5215	. . . . . . 7 ⊢ (𝑤 = 𝑦 → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)))
12		xpeq1 5673	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝑤 × {𝐽}) = (𝑦 × {𝐽}))
13	12	fveq2d 6885	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → (∏t‘(𝑤 × {𝐽})) = (∏t‘(𝑦 × {𝐽})))
14	13	oveq1d 7425	. . . . . . 7 ⊢ (𝑤 = 𝑦 → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘(𝑦 × {𝐽})) Cn 𝐽))
15	11, 14	eleq12d 2829	. . . . . 6 ⊢ (𝑤 = 𝑦 → ((𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)))
16	15	imbi2d 340	. . . . 5 ⊢ (𝑤 = 𝑦 → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽))))
17		oveq2 7418	. . . . . . . 8 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (𝐵 ↑m 𝑤) = (𝐵 ↑m (𝑦 ∪ {𝑧})))
18	17	mpteq1d 5215	. . . . . . 7 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)))
19		xpeq1 5673	. . . . . . . . 9 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (𝑤 × {𝐽}) = ((𝑦 ∪ {𝑧}) × {𝐽}))
20	19	fveq2d 6885	. . . . . . . 8 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (∏t‘(𝑤 × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
21	20	oveq1d 7425	. . . . . . 7 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
22	18, 21	eleq12d 2829	. . . . . 6 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → ((𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽)))
23	22	imbi2d 340	. . . . 5 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))))
24		oveq2 7418	. . . . . . . 8 ⊢ (𝑤 = 𝐴 → (𝐵 ↑m 𝑤) = (𝐵 ↑m 𝐴))
25	24	mpteq1d 5215	. . . . . . 7 ⊢ (𝑤 = 𝐴 → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)))
26		xpeq1 5673	. . . . . . . . 9 ⊢ (𝑤 = 𝐴 → (𝑤 × {𝐽}) = (𝐴 × {𝐽}))
27	26	fveq2d 6885	. . . . . . . 8 ⊢ (𝑤 = 𝐴 → (∏t‘(𝑤 × {𝐽})) = (∏t‘(𝐴 × {𝐽})))
28	27	oveq1d 7425	. . . . . . 7 ⊢ (𝑤 = 𝐴 → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
29	25, 28	eleq12d 2829	. . . . . 6 ⊢ (𝑤 = 𝐴 → ((𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽)))
30	29	imbi2d 340	. . . . 5 ⊢ (𝑤 = 𝐴 → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))))
31		elmapfn 8884	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → 𝑥 Fn ∅)
32		fn0 6674	. . . . . . . . . 10 ⊢ (𝑥 Fn ∅ ↔ 𝑥 = ∅)
33	31, 32	sylib 218	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → 𝑥 = ∅)
34	33	oveq2d 7426	. . . . . . . 8 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → (𝐺 Σg 𝑥) = (𝐺 Σg ∅))
35		eqid 2736	. . . . . . . . 9 ⊢ (0g‘𝐺) = (0g‘𝐺)
36	35	gsum0 18667	. . . . . . . 8 ⊢ (𝐺 Σg ∅) = (0g‘𝐺)
37	34, 36	eqtrdi 2787	. . . . . . 7 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → (𝐺 Σg 𝑥) = (0g‘𝐺))
38	37	mpteq2ia 5221	. . . . . 6 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m ∅) ↦ (0g‘𝐺))
39		0ex 5282	. . . . . . . 8 ⊢ ∅ ∈ V
40		tmdgsum.j	. . . . . . . . . 10 ⊢ 𝐽 = (TopOpen‘𝐺)
41		tmdgsum.b	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝐺)
42	40, 41	tmdtopon 24024	. . . . . . . . 9 ⊢ (𝐺 ∈ TopMnd → 𝐽 ∈ (TopOn‘𝐵))
43	42	adantl 481	. . . . . . . 8 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → 𝐽 ∈ (TopOn‘𝐵))
44	4	fveq2i 6884	. . . . . . . . . 10 ⊢ (∏t‘(∅ × {𝐽})) = (∏t‘∅)
45	44	eqcomi 2745	. . . . . . . . 9 ⊢ (∏t‘∅) = (∏t‘(∅ × {𝐽}))
46	45	pttoponconst 23540	. . . . . . . 8 ⊢ ((∅ ∈ V ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘∅) ∈ (TopOn‘(𝐵 ↑m ∅)))
47	39, 43, 46	sylancr 587	. . . . . . 7 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (∏t‘∅) ∈ (TopOn‘(𝐵 ↑m ∅)))
48		tmdmnd 24018	. . . . . . . . 9 ⊢ (𝐺 ∈ TopMnd → 𝐺 ∈ Mnd)
49	48	adantl 481	. . . . . . . 8 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → 𝐺 ∈ Mnd)
50	41, 35	mndidcl 18732	. . . . . . . 8 ⊢ (𝐺 ∈ Mnd → (0g‘𝐺) ∈ 𝐵)
51	49, 50	syl 17	. . . . . . 7 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (0g‘𝐺) ∈ 𝐵)
52	47, 43, 51	cnmptc 23605	. . . . . 6 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m ∅) ↦ (0g‘𝐺)) ∈ ((∏t‘∅) Cn 𝐽))
53	38, 52	eqeltrid 2839	. . . . 5 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽))
54		oveq2 7418	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑤 → (𝐺 Σg 𝑥) = (𝐺 Σg 𝑤))
55	54	cbvmptv 5230	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑤))
56		eqid 2736	. . . . . . . . . . . 12 ⊢ (+g‘𝐺) = (+g‘𝐺)
57		simpl1l 1225	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝐺 ∈ CMnd)
58		simp2l 1200	. . . . . . . . . . . . . 14 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝑦 ∈ Fin)
59		snfi 9062	. . . . . . . . . . . . . 14 ⊢ {𝑧} ∈ Fin
60		unfi 9190	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ {𝑧} ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
61	58, 59, 60	sylancl 586	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑦 ∪ {𝑧}) ∈ Fin)
62	61	adantr 480	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑦 ∪ {𝑧}) ∈ Fin)
63		elmapi 8868	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) → 𝑤:(𝑦 ∪ {𝑧})⟶𝐵)
64	63	adantl 481	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑤:(𝑦 ∪ {𝑧})⟶𝐵)
65		fvexd 6896	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (0g‘𝐺) ∈ V)
66	64, 62, 65	fdmfifsupp 9392	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑤 finSupp (0g‘𝐺))
67		simpl2r 1228	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → ¬ 𝑧 ∈ 𝑦)
68		disjsn 4692	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∩ {𝑧}) = ∅ ↔ ¬ 𝑧 ∈ 𝑦)
69	67, 68	sylibr 234	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑦 ∩ {𝑧}) = ∅)
70		eqidd 2737	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑦 ∪ {𝑧}) = (𝑦 ∪ {𝑧}))
71	41, 35, 56, 57, 62, 64, 66, 69, 70	gsumsplit 19914	. . . . . . . . . . 11 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg 𝑤) = ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧}))))
72	71	mpteq2dva 5219	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑤)) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))))
73	55, 72	eqtrid 2783	. . . . . . . . 9 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))))
74		simp1r 1199	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝐺 ∈ TopMnd)
75	74, 42	syl 17	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝐽 ∈ (TopOn‘𝐵))
76		eqid 2736	. . . . . . . . . . . 12 ⊢ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽}))
77	76	pttoponconst 23540	. . . . . . . . . . 11 ⊢ (((𝑦 ∪ {𝑧}) ∈ Fin ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵 ↑m (𝑦 ∪ {𝑧}))))
78	61, 75, 77	syl2anc 584	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵 ↑m (𝑦 ∪ {𝑧}))))
79		toponuni 22857	. . . . . . . . . . . . . 14 ⊢ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐵 ↑m (𝑦 ∪ {𝑧})) = ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
80	78, 79	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝐵 ↑m (𝑦 ∪ {𝑧})) = ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
81	80	mpteq1d 5215	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤 ↾ 𝑦)) = (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤 ↾ 𝑦)))
82		topontop 22856	. . . . . . . . . . . . . . 15 ⊢ (𝐽 ∈ (TopOn‘𝐵) → 𝐽 ∈ Top)
83	74, 42, 82	3syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝐽 ∈ Top)
84		fconst6g 6772	. . . . . . . . . . . . . 14 ⊢ (𝐽 ∈ Top → ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top)
85	83, 84	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top)
86		ssun1 4158	. . . . . . . . . . . . . 14 ⊢ 𝑦 ⊆ (𝑦 ∪ {𝑧})
87	86	a1i 11	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝑦 ⊆ (𝑦 ∪ {𝑧}))
88		eqid 2736	. . . . . . . . . . . . . 14 ⊢ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) = ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽}))
89		xpssres 6010	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦) = (𝑦 × {𝐽}))
90	86, 89	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦) = (𝑦 × {𝐽})
91	90	eqcomi 2745	. . . . . . . . . . . . . . 15 ⊢ (𝑦 × {𝐽}) = (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦)
92	91	fveq2i 6884	. . . . . . . . . . . . . 14 ⊢ (∏t‘(𝑦 × {𝐽})) = (∏t‘(((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦))
93	88, 76, 92	ptrescn 23582	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ∈ Fin ∧ ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top ∧ 𝑦 ⊆ (𝑦 ∪ {𝑧})) → (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤 ↾ 𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
94	61, 85, 87, 93	syl3anc 1373	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤 ↾ 𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
95	81, 94	eqeltrd 2835	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤 ↾ 𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
96		eqid 2736	. . . . . . . . . . . . 13 ⊢ (∏t‘(𝑦 × {𝐽})) = (∏t‘(𝑦 × {𝐽}))
97	96	pttoponconst 23540	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Fin ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘(𝑦 × {𝐽})) ∈ (TopOn‘(𝐵 ↑m 𝑦)))
98	58, 75, 97	syl2anc 584	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (∏t‘(𝑦 × {𝐽})) ∈ (TopOn‘(𝐵 ↑m 𝑦)))
99		simp3 1138	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽))
100		oveq2 7418	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑤 ↾ 𝑦) → (𝐺 Σg 𝑥) = (𝐺 Σg (𝑤 ↾ 𝑦)))
101	78, 95, 98, 99, 100	cnmpt11 23606	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ 𝑦))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
102	64	feqmptd 6952	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑤 = (𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)))
103	102	reseq1d 5970	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑤 ↾ {𝑧}) = ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)) ↾ {𝑧}))
104		ssun2 4159	. . . . . . . . . . . . . . . 16 ⊢ {𝑧} ⊆ (𝑦 ∪ {𝑧})
105		resmpt 6029	. . . . . . . . . . . . . . . 16 ⊢ ({𝑧} ⊆ (𝑦 ∪ {𝑧}) → ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)) ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘)))
106	104, 105	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)) ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘))
107	103, 106	eqtrdi 2787	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑤 ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘)))
108	107	oveq2d 7426	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑤 ↾ {𝑧})) = (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘))))
109		cmnmnd 19783	. . . . . . . . . . . . . . 15 ⊢ (𝐺 ∈ CMnd → 𝐺 ∈ Mnd)
110	57, 109	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝐺 ∈ Mnd)
111		vex 3468	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ V
112	111	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑧 ∈ V)
113		vsnid 4644	. . . . . . . . . . . . . . . 16 ⊢ 𝑧 ∈ {𝑧}
114		elun2 4163	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ {𝑧} → 𝑧 ∈ (𝑦 ∪ {𝑧}))
115	113, 114	mp1i 13	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑧 ∈ (𝑦 ∪ {𝑧}))
116	64, 115	ffvelcdmd 7080	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑤‘𝑧) ∈ 𝐵)
117		fveq2 6881	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑧 → (𝑤‘𝑘) = (𝑤‘𝑧))
118	41, 117	gsumsn 19940	. . . . . . . . . . . . . 14 ⊢ ((𝐺 ∈ Mnd ∧ 𝑧 ∈ V ∧ (𝑤‘𝑧) ∈ 𝐵) → (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘))) = (𝑤‘𝑧))
119	110, 112, 116, 118	syl3anc 1373	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘))) = (𝑤‘𝑧))
120	108, 119	eqtrd 2771	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑤 ↾ {𝑧})) = (𝑤‘𝑧))
121	120	mpteq2dva 5219	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ {𝑧}))) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)))
122	80	mpteq1d 5215	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)) = (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤‘𝑧)))
123	113, 114	mp1i 13	. . . . . . . . . . . . . 14 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝑧 ∈ (𝑦 ∪ {𝑧}))
124	88, 76	ptpjcn 23554	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ∈ Fin ∧ ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤‘𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
125	61, 85, 123, 124	syl3anc 1373	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤‘𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
126	122, 125	eqeltrd 2835	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
127		fvconst2g 7199	. . . . . . . . . . . . . 14 ⊢ ((𝐽 ∈ Top ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧) = 𝐽)
128	83, 123, 127	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧) = 𝐽)
129	128	oveq2d 7426	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)) = ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
130	126, 129	eleqtrd 2837	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
131	121, 130	eqeltrd 2835	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ {𝑧}))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
132	40, 56, 74, 78, 101, 131	cnmpt1plusg 24030	. . . . . . . . 9 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
133	73, 132	eqeltrd 2835	. . . . . . . 8 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
134	133	3expia 1121	. . . . . . 7 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ((𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽) → (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽)))
135	134	expcom 413	. . . . . 6 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → ((𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽) → (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))))
136	135	a2d 29	. . . . 5 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))))
137	9, 16, 23, 30, 53, 136	findcard2s 9184	. . . 4 ⊢ (𝐴 ∈ Fin → ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽)))
138	137	com12 32	. . 3 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝐴 ∈ Fin → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽)))
139	138	3impia 1117	. 2 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
140	42, 82	syl 17	. . . . 5 ⊢ (𝐺 ∈ TopMnd → 𝐽 ∈ Top)
141		xkopt 23598	. . . . 5 ⊢ ((𝐽 ∈ Top ∧ 𝐴 ∈ Fin) → (𝐽 ↑ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝐽})))
142	140, 141	sylan 580	. . . 4 ⊢ ((𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝐽 ↑ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝐽})))
143	142	3adant1 1130	. . 3 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝐽 ↑ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝐽})))
144	143	oveq1d 7425	. 2 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽) = ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
145	139, 144	eleqtrrd 2838	1 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2109  Vcvv 3464   ∪ cun 3929   ∩ cin 3930   ⊆ wss 3931  ∅c0 4313  𝒫 cpw 4580  {csn 4606  ∪ cuni 4888   ↦ cmpt 5206   × cxp 5657   ↾ cres 5661   Fn wfn 6531  ⟶wf 6532  ‘cfv 6536  (class class class)co 7410   ↑_m cmap 8845  Fincfn 8964  Basecbs 17233  +_gcplusg 17276  TopOpenctopn 17440  ∏_tcpt 17457  0_gc0g 17458   Σ_g cgsu 17459  Mndcmnd 18717  CMndccmn 19766  Topctop 22836  TopOnctopon 22853   Cn ccn 23167   ↑_ko cxko 23504  TopMndctmd 24013

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 2708  ax-rep 5254  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734  ax-cnex 11190  ax-resscn 11191  ax-1cn 11192  ax-icn 11193  ax-addcl 11194  ax-addrcl 11195  ax-mulcl 11196  ax-mulrcl 11197  ax-mulcom 11198  ax-addass 11199  ax-mulass 11200  ax-distr 11201  ax-i2m1 11202  ax-1ne0 11203  ax-1rid 11204  ax-rnegex 11205  ax-rrecex 11206  ax-cnre 11207  ax-pre-lttri 11208  ax-pre-lttrn 11209  ax-pre-ltadd 11210  ax-pre-mulgt0 11211

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 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4889  df-int 4928  df-iun 4974  df-iin 4975  df-br 5125  df-opab 5187  df-mpt 5207  df-tr 5235  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-se 5612  df-we 5613  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6295  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7676  df-om 7867  df-1st 7993  df-2nd 7994  df-supp 8165  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-2o 8486  df-er 8724  df-map 8847  df-ixp 8917  df-en 8965  df-dom 8966  df-sdom 8967  df-fin 8968  df-fsupp 9379  df-fi 9428  df-oi 9529  df-card 9958  df-pnf 11276  df-mnf 11277  df-xr 11278  df-ltxr 11279  df-le 11280  df-sub 11473  df-neg 11474  df-nn 12246  df-2 12308  df-n0 12507  df-z 12594  df-uz 12858  df-fz 13530  df-fzo 13677  df-seq 14025  df-hash 14354  df-sets 17188  df-slot 17206  df-ndx 17218  df-base 17234  df-ress 17257  df-plusg 17289  df-rest 17441  df-0g 17460  df-gsum 17461  df-topgen 17462  df-pt 17463  df-mre 17603  df-mrc 17604  df-acs 17606  df-plusf 18622  df-mgm 18623  df-sgrp 18702  df-mnd 18718  df-submnd 18767  df-mulg 19056  df-cntz 19305  df-cmn 19768  df-top 22837  df-topon 22854  df-topsp 22876  df-bases 22889  df-cn 23170  df-cnp 23171  df-cmp 23330  df-tx 23505  df-xko 23506  df-tmd 24015

This theorem is referenced by:  tmdgsum2  24039