Theorem tmdgsum 24037

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 7364	. . . . . . . 8 ⊢ (𝑤 = ∅ → (𝐵 ↑m 𝑤) = (𝐵 ↑m ∅))
2	1	mpteq1d 5186	. . . . . . 7 ⊢ (𝑤 = ∅ → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)))
3		xpeq1 5636	. . . . . . . . . 10 ⊢ (𝑤 = ∅ → (𝑤 × {𝐽}) = (∅ × {𝐽}))
4		0xp 5721	. . . . . . . . . 10 ⊢ (∅ × {𝐽}) = ∅
5	3, 4	eqtrdi 2785	. . . . . . . . 9 ⊢ (𝑤 = ∅ → (𝑤 × {𝐽}) = ∅)
6	5	fveq2d 6836	. . . . . . . 8 ⊢ (𝑤 = ∅ → (∏t‘(𝑤 × {𝐽})) = (∏t‘∅))
7	6	oveq1d 7371	. . . . . . 7 ⊢ (𝑤 = ∅ → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘∅) Cn 𝐽))
8	2, 7	eleq12d 2828	. . . . . 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 7364	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → (𝐵 ↑m 𝑤) = (𝐵 ↑m 𝑦))
11	10	mpteq1d 5186	. . . . . . 7 ⊢ (𝑤 = 𝑦 → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)))
12		xpeq1 5636	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝑤 × {𝐽}) = (𝑦 × {𝐽}))
13	12	fveq2d 6836	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → (∏t‘(𝑤 × {𝐽})) = (∏t‘(𝑦 × {𝐽})))
14	13	oveq1d 7371	. . . . . . 7 ⊢ (𝑤 = 𝑦 → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘(𝑦 × {𝐽})) Cn 𝐽))
15	11, 14	eleq12d 2828	. . . . . 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 7364	. . . . . . . 8 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (𝐵 ↑m 𝑤) = (𝐵 ↑m (𝑦 ∪ {𝑧})))
18	17	mpteq1d 5186	. . . . . . 7 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)))
19		xpeq1 5636	. . . . . . . . 9 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (𝑤 × {𝐽}) = ((𝑦 ∪ {𝑧}) × {𝐽}))
20	19	fveq2d 6836	. . . . . . . 8 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (∏t‘(𝑤 × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
21	20	oveq1d 7371	. . . . . . 7 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
22	18, 21	eleq12d 2828	. . . . . 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 7364	. . . . . . . 8 ⊢ (𝑤 = 𝐴 → (𝐵 ↑m 𝑤) = (𝐵 ↑m 𝐴))
25	24	mpteq1d 5186	. . . . . . 7 ⊢ (𝑤 = 𝐴 → (𝑥 ∈ (𝐵 ↑m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)))
26		xpeq1 5636	. . . . . . . . 9 ⊢ (𝑤 = 𝐴 → (𝑤 × {𝐽}) = (𝐴 × {𝐽}))
27	26	fveq2d 6836	. . . . . . . 8 ⊢ (𝑤 = 𝐴 → (∏t‘(𝑤 × {𝐽})) = (∏t‘(𝐴 × {𝐽})))
28	27	oveq1d 7371	. . . . . . 7 ⊢ (𝑤 = 𝐴 → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
29	25, 28	eleq12d 2828	. . . . . 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 8800	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → 𝑥 Fn ∅)
32		fn0 6621	. . . . . . . . . 10 ⊢ (𝑥 Fn ∅ ↔ 𝑥 = ∅)
33	31, 32	sylib 218	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → 𝑥 = ∅)
34	33	oveq2d 7372	. . . . . . . 8 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → (𝐺 Σg 𝑥) = (𝐺 Σg ∅))
35		eqid 2734	. . . . . . . . 9 ⊢ (0g‘𝐺) = (0g‘𝐺)
36	35	gsum0 18607	. . . . . . . 8 ⊢ (𝐺 Σg ∅) = (0g‘𝐺)
37	34, 36	eqtrdi 2785	. . . . . . 7 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) → (𝐺 Σg 𝑥) = (0g‘𝐺))
38	37	mpteq2ia 5191	. . . . . 6 ⊢ (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵 ↑m ∅) ↦ (0g‘𝐺))
39		0ex 5250	. . . . . . . 8 ⊢ ∅ ∈ V
40		tmdgsum.j	. . . . . . . . . 10 ⊢ 𝐽 = (TopOpen‘𝐺)
41		tmdgsum.b	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝐺)
42	40, 41	tmdtopon 24023	. . . . . . . . 9 ⊢ (𝐺 ∈ TopMnd → 𝐽 ∈ (TopOn‘𝐵))
43	42	adantl 481	. . . . . . . 8 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → 𝐽 ∈ (TopOn‘𝐵))
44	4	fveq2i 6835	. . . . . . . . . 10 ⊢ (∏t‘(∅ × {𝐽})) = (∏t‘∅)
45	44	eqcomi 2743	. . . . . . . . 9 ⊢ (∏t‘∅) = (∏t‘(∅ × {𝐽}))
46	45	pttoponconst 23539	. . . . . . . 8 ⊢ ((∅ ∈ V ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘∅) ∈ (TopOn‘(𝐵 ↑m ∅)))
47	39, 43, 46	sylancr 587	. . . . . . 7 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (∏t‘∅) ∈ (TopOn‘(𝐵 ↑m ∅)))
48		tmdmnd 24017	. . . . . . . . 9 ⊢ (𝐺 ∈ TopMnd → 𝐺 ∈ Mnd)
49	48	adantl 481	. . . . . . . 8 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → 𝐺 ∈ Mnd)
50	41, 35	mndidcl 18672	. . . . . . . 8 ⊢ (𝐺 ∈ Mnd → (0g‘𝐺) ∈ 𝐵)
51	49, 50	syl 17	. . . . . . 7 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (0g‘𝐺) ∈ 𝐵)
52	47, 43, 51	cnmptc 23604	. . . . . 6 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m ∅) ↦ (0g‘𝐺)) ∈ ((∏t‘∅) Cn 𝐽))
53	38, 52	eqeltrid 2838	. . . . 5 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵 ↑m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽))
54		oveq2 7364	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑤 → (𝐺 Σg 𝑥) = (𝐺 Σg 𝑤))
55	54	cbvmptv 5200	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑤))
56		eqid 2734	. . . . . . . . . . . 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 8978	. . . . . . . . . . . . . 14 ⊢ {𝑧} ∈ Fin
60		unfi 9093	. . . . . . . . . . . . . 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 8784	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) → 𝑤:(𝑦 ∪ {𝑧})⟶𝐵)
64	63	adantl 481	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑤:(𝑦 ∪ {𝑧})⟶𝐵)
65		fvexd 6847	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (0g‘𝐺) ∈ V)
66	64, 62, 65	fdmfifsupp 9276	. . . . . . . . . . . 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 4666	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∩ {𝑧}) = ∅ ↔ ¬ 𝑧 ∈ 𝑦)
69	67, 68	sylibr 234	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑦 ∩ {𝑧}) = ∅)
70		eqidd 2735	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑦 ∪ {𝑧}) = (𝑦 ∪ {𝑧}))
71	41, 35, 56, 57, 62, 64, 66, 69, 70	gsumsplit 19855	. . . . . . . . . . 11 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg 𝑤) = ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧}))))
72	71	mpteq2dva 5189	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑤)) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))))
73	55, 72	eqtrid 2781	. . . . . . . . 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 2734	. . . . . . . . . . . 12 ⊢ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽}))
77	76	pttoponconst 23539	. . . . . . . . . . 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 22856	. . . . . . . . . . . . . 14 ⊢ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐵 ↑m (𝑦 ∪ {𝑧})) = ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
80	78, 79	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝐵 ↑m (𝑦 ∪ {𝑧})) = ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
81	80	mpteq1d 5186	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤 ↾ 𝑦)) = (𝑤 ∈ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤 ↾ 𝑦)))
82		topontop 22855	. . . . . . . . . . . . . . 15 ⊢ (𝐽 ∈ (TopOn‘𝐵) → 𝐽 ∈ Top)
83	74, 42, 82	3syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝐽 ∈ Top)
84		fconst6g 6721	. . . . . . . . . . . . . 14 ⊢ (𝐽 ∈ Top → ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top)
85	83, 84	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top)
86		ssun1 4128	. . . . . . . . . . . . . 14 ⊢ 𝑦 ⊆ (𝑦 ∪ {𝑧})
87	86	a1i 11	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝑦 ⊆ (𝑦 ∪ {𝑧}))
88		eqid 2734	. . . . . . . . . . . . . 14 ⊢ ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) = ∪ (∏t‘((𝑦 ∪ {𝑧}) × {𝐽}))
89		xpssres 5975	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦) = (𝑦 × {𝐽}))
90	86, 89	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦) = (𝑦 × {𝐽})
91	90	eqcomi 2743	. . . . . . . . . . . . . . 15 ⊢ (𝑦 × {𝐽}) = (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦)
92	91	fveq2i 6835	. . . . . . . . . . . . . 14 ⊢ (∏t‘(𝑦 × {𝐽})) = (∏t‘(((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦))
93	88, 76, 92	ptrescn 23581	. . . . . . . . . . . . 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 2834	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤 ↾ 𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
96		eqid 2734	. . . . . . . . . . . . 13 ⊢ (∏t‘(𝑦 × {𝐽})) = (∏t‘(𝑦 × {𝐽}))
97	96	pttoponconst 23539	. . . . . . . . . . . 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 7364	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑤 ↾ 𝑦) → (𝐺 Σg 𝑥) = (𝐺 Σg (𝑤 ↾ 𝑦)))
101	78, 95, 98, 99, 100	cnmpt11 23605	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ 𝑦))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
102	64	feqmptd 6900	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑤 = (𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)))
103	102	reseq1d 5935	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑤 ↾ {𝑧}) = ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)) ↾ {𝑧}))
104		ssun2 4129	. . . . . . . . . . . . . . . 16 ⊢ {𝑧} ⊆ (𝑦 ∪ {𝑧})
105		resmpt 5994	. . . . . . . . . . . . . . . 16 ⊢ ({𝑧} ⊆ (𝑦 ∪ {𝑧}) → ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)) ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘)))
106	104, 105	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤‘𝑘)) ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘))
107	103, 106	eqtrdi 2785	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑤 ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘)))
108	107	oveq2d 7372	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑤 ↾ {𝑧})) = (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤‘𝑘))))
109		cmnmnd 19724	. . . . . . . . . . . . . . 15 ⊢ (𝐺 ∈ CMnd → 𝐺 ∈ Mnd)
110	57, 109	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝐺 ∈ Mnd)
111		vex 3442	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ V
112	111	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑧 ∈ V)
113		vsnid 4618	. . . . . . . . . . . . . . . 16 ⊢ 𝑧 ∈ {𝑧}
114		elun2 4133	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ {𝑧} → 𝑧 ∈ (𝑦 ∪ {𝑧}))
115	113, 114	mp1i 13	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → 𝑧 ∈ (𝑦 ∪ {𝑧}))
116	64, 115	ffvelcdmd 7028	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝑤‘𝑧) ∈ 𝐵)
117		fveq2 6832	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑧 → (𝑤‘𝑘) = (𝑤‘𝑧))
118	41, 117	gsumsn 19881	. . . . . . . . . . . . . 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 2769	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑤 ↾ {𝑧})) = (𝑤‘𝑧))
121	120	mpteq2dva 5189	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ {𝑧}))) = (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)))
122	80	mpteq1d 5186	. . . . . . . . . . . . 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 23553	. . . . . . . . . . . . . 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 2834	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
127		fvconst2g 7146	. . . . . . . . . . . . . 14 ⊢ ((𝐽 ∈ Top ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧) = 𝐽)
128	83, 123, 127	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧) = 𝐽)
129	128	oveq2d 7372	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)) = ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
130	126, 129	eleqtrd 2836	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝑤‘𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
131	121, 130	eqeltrd 2834	. . . . . . . . . 10 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ {𝑧}))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
132	40, 56, 74, 78, 101, 131	cnmpt1plusg 24029	. . . . . . . . 9 ⊢ (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑥 ∈ (𝐵 ↑m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵 ↑m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤 ↾ 𝑦))(+g‘𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
133	73, 132	eqeltrd 2834	. . . . . . . 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 9088	. . . 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 23597	. . . . 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 7371	. 2 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽) = ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
145	139, 144	eleqtrrd 2837	1 ⊢ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝑥 ∈ (𝐵 ↑m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∧ w3a 1086   = wceq 1541   ∈ wcel 2113  Vcvv 3438   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ∅c0 4283  𝒫 cpw 4552  {csn 4578  ∪ cuni 4861   ↦ cmpt 5177   × cxp 5620   ↾ cres 5624   Fn wfn 6485  ⟶wf 6486  ‘cfv 6490  (class class class)co 7356   ↑_m cmap 8761  Fincfn 8881  Basecbs 17134  +_gcplusg 17175  TopOpenctopn 17339  ∏_tcpt 17356  0_gc0g 17357   Σ_g cgsu 17358  Mndcmnd 18657  CMndccmn 19707  Topctop 22835  TopOnctopon 22852   Cn ccn 23166   ↑_ko cxko 23503  TopMndctmd 24012

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706  ax-rep 5222  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678  ax-cnex 11080  ax-resscn 11081  ax-1cn 11082  ax-icn 11083  ax-addcl 11084  ax-addrcl 11085  ax-mulcl 11086  ax-mulrcl 11087  ax-mulcom 11088  ax-addass 11089  ax-mulass 11090  ax-distr 11091  ax-i2m1 11092  ax-1ne0 11093  ax-1rid 11094  ax-rnegex 11095  ax-rrecex 11096  ax-cnre 11097  ax-pre-lttri 11098  ax-pre-lttrn 11099  ax-pre-ltadd 11100  ax-pre-mulgt0 11101

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-op 4585  df-uni 4862  df-int 4901  df-iun 4946  df-iin 4947  df-br 5097  df-opab 5159  df-mpt 5178  df-tr 5204  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-se 5576  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-isom 6499  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8633  df-map 8763  df-ixp 8834  df-en 8882  df-dom 8883  df-sdom 8884  df-fin 8885  df-fsupp 9263  df-fi 9312  df-oi 9413  df-card 9849  df-pnf 11166  df-mnf 11167  df-xr 11168  df-ltxr 11169  df-le 11170  df-sub 11364  df-neg 11365  df-nn 12144  df-2 12206  df-n0 12400  df-z 12487  df-uz 12750  df-fz 13422  df-fzo 13569  df-seq 13923  df-hash 14252  df-sets 17089  df-slot 17107  df-ndx 17119  df-base 17135  df-ress 17156  df-plusg 17188  df-rest 17340  df-0g 17359  df-gsum 17360  df-topgen 17361  df-pt 17362  df-mre 17503  df-mrc 17504  df-acs 17506  df-plusf 18562  df-mgm 18563  df-sgrp 18642  df-mnd 18658  df-submnd 18707  df-mulg 18996  df-cntz 19244  df-cmn 19709  df-top 22836  df-topon 22853  df-topsp 22875  df-bases 22888  df-cn 23169  df-cnp 23170  df-cmp 23329  df-tx 23504  df-xko 23505  df-tmd 24014

This theorem is referenced by:  tmdgsum2  24038