MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  tmdgsum Structured version   Visualization version   GIF version

Theorem tmdgsum 24039
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.
StepHypRef Expression
1 oveq2 7366 . . . . . . . 8 (𝑤 = ∅ → (𝐵m 𝑤) = (𝐵m ∅))
21mpteq1d 5188 . . . . . . 7 (𝑤 = ∅ → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵m ∅) ↦ (𝐺 Σg 𝑥)))
3 xpeq1 5638 . . . . . . . . . 10 (𝑤 = ∅ → (𝑤 × {𝐽}) = (∅ × {𝐽}))
4 0xp 5723 . . . . . . . . . 10 (∅ × {𝐽}) = ∅
53, 4eqtrdi 2787 . . . . . . . . 9 (𝑤 = ∅ → (𝑤 × {𝐽}) = ∅)
65fveq2d 6838 . . . . . . . 8 (𝑤 = ∅ → (∏t‘(𝑤 × {𝐽})) = (∏t‘∅))
76oveq1d 7373 . . . . . . 7 (𝑤 = ∅ → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘∅) Cn 𝐽))
82, 7eleq12d 2830 . . . . . 6 (𝑤 = ∅ → ((𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽)))
98imbi2d 340 . . . . 5 (𝑤 = ∅ → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽))))
10 oveq2 7366 . . . . . . . 8 (𝑤 = 𝑦 → (𝐵m 𝑤) = (𝐵m 𝑦))
1110mpteq1d 5188 . . . . . . 7 (𝑤 = 𝑦 → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)))
12 xpeq1 5638 . . . . . . . . 9 (𝑤 = 𝑦 → (𝑤 × {𝐽}) = (𝑦 × {𝐽}))
1312fveq2d 6838 . . . . . . . 8 (𝑤 = 𝑦 → (∏t‘(𝑤 × {𝐽})) = (∏t‘(𝑦 × {𝐽})))
1413oveq1d 7373 . . . . . . 7 (𝑤 = 𝑦 → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘(𝑦 × {𝐽})) Cn 𝐽))
1511, 14eleq12d 2830 . . . . . 6 (𝑤 = 𝑦 → ((𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)))
1615imbi2d 340 . . . . 5 (𝑤 = 𝑦 → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽))))
17 oveq2 7366 . . . . . . . 8 (𝑤 = (𝑦 ∪ {𝑧}) → (𝐵m 𝑤) = (𝐵m (𝑦 ∪ {𝑧})))
1817mpteq1d 5188 . . . . . . 7 (𝑤 = (𝑦 ∪ {𝑧}) → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)))
19 xpeq1 5638 . . . . . . . . 9 (𝑤 = (𝑦 ∪ {𝑧}) → (𝑤 × {𝐽}) = ((𝑦 ∪ {𝑧}) × {𝐽}))
2019fveq2d 6838 . . . . . . . 8 (𝑤 = (𝑦 ∪ {𝑧}) → (∏t‘(𝑤 × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
2120oveq1d 7373 . . . . . . 7 (𝑤 = (𝑦 ∪ {𝑧}) → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
2218, 21eleq12d 2830 . . . . . 6 (𝑤 = (𝑦 ∪ {𝑧}) → ((𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽)))
2322imbi2d 340 . . . . 5 (𝑤 = (𝑦 ∪ {𝑧}) → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))))
24 oveq2 7366 . . . . . . . 8 (𝑤 = 𝐴 → (𝐵m 𝑤) = (𝐵m 𝐴))
2524mpteq1d 5188 . . . . . . 7 (𝑤 = 𝐴 → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)))
26 xpeq1 5638 . . . . . . . . 9 (𝑤 = 𝐴 → (𝑤 × {𝐽}) = (𝐴 × {𝐽}))
2726fveq2d 6838 . . . . . . . 8 (𝑤 = 𝐴 → (∏t‘(𝑤 × {𝐽})) = (∏t‘(𝐴 × {𝐽})))
2827oveq1d 7373 . . . . . . 7 (𝑤 = 𝐴 → ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) = ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
2925, 28eleq12d 2830 . . . . . 6 (𝑤 = 𝐴 → ((𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽) ↔ (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽)))
3029imbi2d 340 . . . . 5 (𝑤 = 𝐴 → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝑤) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑤 × {𝐽})) Cn 𝐽)) ↔ ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))))
31 elmapfn 8802 . . . . . . . . . 10 (𝑥 ∈ (𝐵m ∅) → 𝑥 Fn ∅)
32 fn0 6623 . . . . . . . . . 10 (𝑥 Fn ∅ ↔ 𝑥 = ∅)
3331, 32sylib 218 . . . . . . . . 9 (𝑥 ∈ (𝐵m ∅) → 𝑥 = ∅)
3433oveq2d 7374 . . . . . . . 8 (𝑥 ∈ (𝐵m ∅) → (𝐺 Σg 𝑥) = (𝐺 Σg ∅))
35 eqid 2736 . . . . . . . . 9 (0g𝐺) = (0g𝐺)
3635gsum0 18609 . . . . . . . 8 (𝐺 Σg ∅) = (0g𝐺)
3734, 36eqtrdi 2787 . . . . . . 7 (𝑥 ∈ (𝐵m ∅) → (𝐺 Σg 𝑥) = (0g𝐺))
3837mpteq2ia 5193 . . . . . 6 (𝑥 ∈ (𝐵m ∅) ↦ (𝐺 Σg 𝑥)) = (𝑥 ∈ (𝐵m ∅) ↦ (0g𝐺))
39 0ex 5252 . . . . . . . 8 ∅ ∈ V
40 tmdgsum.j . . . . . . . . . 10 𝐽 = (TopOpen‘𝐺)
41 tmdgsum.b . . . . . . . . . 10 𝐵 = (Base‘𝐺)
4240, 41tmdtopon 24025 . . . . . . . . 9 (𝐺 ∈ TopMnd → 𝐽 ∈ (TopOn‘𝐵))
4342adantl 481 . . . . . . . 8 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → 𝐽 ∈ (TopOn‘𝐵))
444fveq2i 6837 . . . . . . . . . 10 (∏t‘(∅ × {𝐽})) = (∏t‘∅)
4544eqcomi 2745 . . . . . . . . 9 (∏t‘∅) = (∏t‘(∅ × {𝐽}))
4645pttoponconst 23541 . . . . . . . 8 ((∅ ∈ V ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘∅) ∈ (TopOn‘(𝐵m ∅)))
4739, 43, 46sylancr 587 . . . . . . 7 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (∏t‘∅) ∈ (TopOn‘(𝐵m ∅)))
48 tmdmnd 24019 . . . . . . . . 9 (𝐺 ∈ TopMnd → 𝐺 ∈ Mnd)
4948adantl 481 . . . . . . . 8 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → 𝐺 ∈ Mnd)
5041, 35mndidcl 18674 . . . . . . . 8 (𝐺 ∈ Mnd → (0g𝐺) ∈ 𝐵)
5149, 50syl 17 . . . . . . 7 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (0g𝐺) ∈ 𝐵)
5247, 43, 51cnmptc 23606 . . . . . 6 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m ∅) ↦ (0g𝐺)) ∈ ((∏t‘∅) Cn 𝐽))
5338, 52eqeltrid 2840 . . . . 5 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m ∅) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘∅) Cn 𝐽))
54 oveq2 7366 . . . . . . . . . . 11 (𝑥 = 𝑤 → (𝐺 Σg 𝑥) = (𝐺 Σg 𝑤))
5554cbvmptv 5202 . . . . . . . . . 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 8980 . . . . . . . . . . . . . 14 {𝑧} ∈ Fin
60 unfi 9095 . . . . . . . . . . . . . 14 ((𝑦 ∈ Fin ∧ {𝑧} ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
6158, 59, 60sylancl 586 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑦 ∪ {𝑧}) ∈ Fin)
6261adantr 480 . . . . . . . . . . . 12 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝑦 ∪ {𝑧}) ∈ Fin)
63 elmapi 8786 . . . . . . . . . . . . 13 (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) → 𝑤:(𝑦 ∪ {𝑧})⟶𝐵)
6463adantl 481 . . . . . . . . . . . 12 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → 𝑤:(𝑦 ∪ {𝑧})⟶𝐵)
65 fvexd 6849 . . . . . . . . . . . . 13 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (0g𝐺) ∈ V)
6664, 62, 65fdmfifsupp 9278 . . . . . . . . . . . 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 4668 . . . . . . . . . . . . 13 ((𝑦 ∩ {𝑧}) = ∅ ↔ ¬ 𝑧𝑦)
6967, 68sylibr 234 . . . . . . . . . . . 12 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝑦 ∩ {𝑧}) = ∅)
70 eqidd 2737 . . . . . . . . . . . 12 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝑦 ∪ {𝑧}) = (𝑦 ∪ {𝑧}))
7141, 35, 56, 57, 62, 64, 66, 69, 70gsumsplit 19857 . . . . . . . . . . 11 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝐺 Σg 𝑤) = ((𝐺 Σg (𝑤𝑦))(+g𝐺)(𝐺 Σg (𝑤 ↾ {𝑧}))))
7271mpteq2dva 5191 . . . . . . . . . 10 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑤)) = (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤𝑦))(+g𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))))
7355, 72eqtrid 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)
7574, 42syl 17 . . . . . . . . . . 11 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝐽 ∈ (TopOn‘𝐵))
76 eqid 2736 . . . . . . . . . . . 12 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽}))
7776pttoponconst 23541 . . . . . . . . . . 11 (((𝑦 ∪ {𝑧}) ∈ Fin ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵m (𝑦 ∪ {𝑧}))))
7861, 75, 77syl2anc 584 . . . . . . . . . 10 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵m (𝑦 ∪ {𝑧}))))
79 toponuni 22858 . . . . . . . . . . . . . 14 ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ∈ (TopOn‘(𝐵m (𝑦 ∪ {𝑧}))) → (𝐵m (𝑦 ∪ {𝑧})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
8078, 79syl 17 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝐵m (𝑦 ∪ {𝑧})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})))
8180mpteq1d 5188 . . . . . . . . . . . 12 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝑤𝑦)) = (𝑤 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤𝑦)))
82 topontop 22857 . . . . . . . . . . . . . . 15 (𝐽 ∈ (TopOn‘𝐵) → 𝐽 ∈ Top)
8374, 42, 823syl 18 . . . . . . . . . . . . . 14 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝐽 ∈ Top)
84 fconst6g 6723 . . . . . . . . . . . . . 14 (𝐽 ∈ Top → ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top)
8583, 84syl 17 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top)
86 ssun1 4130 . . . . . . . . . . . . . 14 𝑦 ⊆ (𝑦 ∪ {𝑧})
8786a1i 11 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝑦 ⊆ (𝑦 ∪ {𝑧}))
88 eqid 2736 . . . . . . . . . . . . . 14 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) = (∏t‘((𝑦 ∪ {𝑧}) × {𝐽}))
89 xpssres 5977 . . . . . . . . . . . . . . . . 17 (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦) = (𝑦 × {𝐽}))
9086, 89ax-mp 5 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦) = (𝑦 × {𝐽})
9190eqcomi 2745 . . . . . . . . . . . . . . 15 (𝑦 × {𝐽}) = (((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦)
9291fveq2i 6837 . . . . . . . . . . . . . 14 (∏t‘(𝑦 × {𝐽})) = (∏t‘(((𝑦 ∪ {𝑧}) × {𝐽}) ↾ 𝑦))
9388, 76, 92ptrescn 23583 . . . . . . . . . . . . 13 (((𝑦 ∪ {𝑧}) ∈ Fin ∧ ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top ∧ 𝑦 ⊆ (𝑦 ∪ {𝑧})) → (𝑤 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
9461, 85, 87, 93syl3anc 1373 . . . . . . . . . . . 12 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
9581, 94eqeltrd 2836 . . . . . . . . . . 11 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝑤𝑦)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (∏t‘(𝑦 × {𝐽}))))
96 eqid 2736 . . . . . . . . . . . . 13 (∏t‘(𝑦 × {𝐽})) = (∏t‘(𝑦 × {𝐽}))
9796pttoponconst 23541 . . . . . . . . . . . 12 ((𝑦 ∈ Fin ∧ 𝐽 ∈ (TopOn‘𝐵)) → (∏t‘(𝑦 × {𝐽})) ∈ (TopOn‘(𝐵m 𝑦)))
9858, 75, 97syl2anc 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 7366 . . . . . . . . . . 11 (𝑥 = (𝑤𝑦) → (𝐺 Σg 𝑥) = (𝐺 Σg (𝑤𝑦)))
10178, 95, 98, 99, 100cnmpt11 23607 . . . . . . . . . 10 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤𝑦))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
10264feqmptd 6902 . . . . . . . . . . . . . . . 16 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → 𝑤 = (𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤𝑘)))
103102reseq1d 5937 . . . . . . . . . . . . . . 15 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝑤 ↾ {𝑧}) = ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤𝑘)) ↾ {𝑧}))
104 ssun2 4131 . . . . . . . . . . . . . . . 16 {𝑧} ⊆ (𝑦 ∪ {𝑧})
105 resmpt 5996 . . . . . . . . . . . . . . . 16 ({𝑧} ⊆ (𝑦 ∪ {𝑧}) → ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤𝑘)) ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤𝑘)))
106104, 105ax-mp 5 . . . . . . . . . . . . . . 15 ((𝑘 ∈ (𝑦 ∪ {𝑧}) ↦ (𝑤𝑘)) ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤𝑘))
107103, 106eqtrdi 2787 . . . . . . . . . . . . . 14 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝑤 ↾ {𝑧}) = (𝑘 ∈ {𝑧} ↦ (𝑤𝑘)))
108107oveq2d 7374 . . . . . . . . . . . . 13 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑤 ↾ {𝑧})) = (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤𝑘))))
109 cmnmnd 19726 . . . . . . . . . . . . . . 15 (𝐺 ∈ CMnd → 𝐺 ∈ Mnd)
11057, 109syl 17 . . . . . . . . . . . . . 14 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → 𝐺 ∈ Mnd)
111 vex 3444 . . . . . . . . . . . . . . 15 𝑧 ∈ V
112111a1i 11 . . . . . . . . . . . . . 14 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → 𝑧 ∈ V)
113 vsnid 4620 . . . . . . . . . . . . . . . 16 𝑧 ∈ {𝑧}
114 elun2 4135 . . . . . . . . . . . . . . . 16 (𝑧 ∈ {𝑧} → 𝑧 ∈ (𝑦 ∪ {𝑧}))
115113, 114mp1i 13 . . . . . . . . . . . . . . 15 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → 𝑧 ∈ (𝑦 ∪ {𝑧}))
11664, 115ffvelcdmd 7030 . . . . . . . . . . . . . 14 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝑤𝑧) ∈ 𝐵)
117 fveq2 6834 . . . . . . . . . . . . . . 15 (𝑘 = 𝑧 → (𝑤𝑘) = (𝑤𝑧))
11841, 117gsumsn 19883 . . . . . . . . . . . . . 14 ((𝐺 ∈ Mnd ∧ 𝑧 ∈ V ∧ (𝑤𝑧) ∈ 𝐵) → (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤𝑘))) = (𝑤𝑧))
119110, 112, 116, 118syl3anc 1373 . . . . . . . . . . . . 13 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑘 ∈ {𝑧} ↦ (𝑤𝑘))) = (𝑤𝑧))
120108, 119eqtrd 2771 . . . . . . . . . . . 12 ((((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) ∧ 𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧}))) → (𝐺 Σg (𝑤 ↾ {𝑧})) = (𝑤𝑧))
121120mpteq2dva 5191 . . . . . . . . . . 11 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ {𝑧}))) = (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝑤𝑧)))
12280mpteq1d 5188 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝑤𝑧)) = (𝑤 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤𝑧)))
123113, 114mp1i 13 . . . . . . . . . . . . . 14 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → 𝑧 ∈ (𝑦 ∪ {𝑧}))
12488, 76ptpjcn 23555 . . . . . . . . . . . . . 14 (((𝑦 ∪ {𝑧}) ∈ Fin ∧ ((𝑦 ∪ {𝑧}) × {𝐽}):(𝑦 ∪ {𝑧})⟶Top ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → (𝑤 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
12561, 85, 123, 124syl3anc 1373 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 (∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) ↦ (𝑤𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
126122, 125eqeltrd 2836 . . . . . . . . . . . 12 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝑤𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)))
127 fvconst2g 7148 . . . . . . . . . . . . . 14 ((𝐽 ∈ Top ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧) = 𝐽)
12883, 123, 127syl2anc 584 . . . . . . . . . . . . 13 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧) = 𝐽)
129128oveq2d 7374 . . . . . . . . . . . 12 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn (((𝑦 ∪ {𝑧}) × {𝐽})‘𝑧)) = ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
130126, 129eleqtrd 2838 . . . . . . . . . . 11 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝑤𝑧)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
131121, 130eqeltrd 2836 . . . . . . . . . 10 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg (𝑤 ↾ {𝑧}))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
13240, 56, 74, 78, 101, 131cnmpt1plusg 24031 . . . . . . . . 9 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑤 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ ((𝐺 Σg (𝑤𝑦))(+g𝐺)(𝐺 Σg (𝑤 ↾ {𝑧})))) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
13373, 132eqeltrd 2836 . . . . . . . 8 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) ∧ (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))
1341333expia 1121 . . . . . . 7 (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽) → (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽)))
135134expcom 413 . . . . . 6 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → ((𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽) → (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))))
136135a2d 29 . . . . 5 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → (((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝑦) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝑦 × {𝐽})) Cn 𝐽)) → ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m (𝑦 ∪ {𝑧})) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘((𝑦 ∪ {𝑧}) × {𝐽})) Cn 𝐽))))
1379, 16, 23, 30, 53, 136findcard2s 9090 . . . 4 (𝐴 ∈ Fin → ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽)))
138137com12 32 . . 3 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd) → (𝐴 ∈ Fin → (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽)))
1391383impia 1117 . 2 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
14042, 82syl 17 . . . . 5 (𝐺 ∈ TopMnd → 𝐽 ∈ Top)
141 xkopt 23599 . . . . 5 ((𝐽 ∈ Top ∧ 𝐴 ∈ Fin) → (𝐽ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝐽})))
142140, 141sylan 580 . . . 4 ((𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝐽ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝐽})))
1431423adant1 1130 . . 3 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝐽ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝐽})))
144143oveq1d 7373 . 2 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → ((𝐽ko 𝒫 𝐴) Cn 𝐽) = ((∏t‘(𝐴 × {𝐽})) Cn 𝐽))
145139, 144eleqtrrd 2839 1 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) → (𝑥 ∈ (𝐵m 𝐴) ↦ (𝐺 Σg 𝑥)) ∈ ((𝐽ko 𝒫 𝐴) Cn 𝐽))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1086   = wceq 1541  wcel 2113  Vcvv 3440  cun 3899  cin 3900  wss 3901  c0 4285  𝒫 cpw 4554  {csn 4580   cuni 4863  cmpt 5179   × cxp 5622  cres 5626   Fn wfn 6487  wf 6488  cfv 6492  (class class class)co 7358  m cmap 8763  Fincfn 8883  Basecbs 17136  +gcplusg 17177  TopOpenctopn 17341  tcpt 17358  0gc0g 17359   Σg cgsu 17360  Mndcmnd 18659  CMndccmn 19709  Topctop 22837  TopOnctopon 22854   Cn ccn 23168  ko cxko 23505  TopMndctmd 24014
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 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680  ax-cnex 11082  ax-resscn 11083  ax-1cn 11084  ax-icn 11085  ax-addcl 11086  ax-addrcl 11087  ax-mulcl 11088  ax-mulrcl 11089  ax-mulcom 11090  ax-addass 11091  ax-mulass 11092  ax-distr 11093  ax-i2m1 11094  ax-1ne0 11095  ax-1rid 11096  ax-rnegex 11097  ax-rrecex 11098  ax-cnre 11099  ax-pre-lttri 11100  ax-pre-lttrn 11101  ax-pre-ltadd 11102  ax-pre-mulgt0 11103
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 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-iin 4949  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-om 7809  df-1st 7933  df-2nd 7934  df-supp 8103  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-2o 8398  df-er 8635  df-map 8765  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-fi 9314  df-oi 9415  df-card 9851  df-pnf 11168  df-mnf 11169  df-xr 11170  df-ltxr 11171  df-le 11172  df-sub 11366  df-neg 11367  df-nn 12146  df-2 12208  df-n0 12402  df-z 12489  df-uz 12752  df-fz 13424  df-fzo 13571  df-seq 13925  df-hash 14254  df-sets 17091  df-slot 17109  df-ndx 17121  df-base 17137  df-ress 17158  df-plusg 17190  df-rest 17342  df-0g 17361  df-gsum 17362  df-topgen 17363  df-pt 17364  df-mre 17505  df-mrc 17506  df-acs 17508  df-plusf 18564  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-submnd 18709  df-mulg 18998  df-cntz 19246  df-cmn 19711  df-top 22838  df-topon 22855  df-topsp 22877  df-bases 22890  df-cn 23171  df-cnp 23172  df-cmp 23331  df-tx 23506  df-xko 23507  df-tmd 24016
This theorem is referenced by:  tmdgsum2  24040
  Copyright terms: Public domain W3C validator