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

Theorem qustgpopn 24076
Description: A quotient map in a topological group is an open map. (Contributed by Mario Carneiro, 18-Sep-2015.)
Hypotheses
Ref Expression
qustgp.h 𝐻 = (𝐺 /s (𝐺 ~QG 𝑌))
qustgpopn.x 𝑋 = (Base‘𝐺)
qustgpopn.j 𝐽 = (TopOpen‘𝐺)
qustgpopn.k 𝐾 = (TopOpen‘𝐻)
qustgpopn.f 𝐹 = (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌))
Assertion
Ref Expression
qustgpopn ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ∈ 𝐾)
Distinct variable groups:   𝑥,𝐺   𝑥,𝐽   𝑥,𝑆   𝑥,𝑋   𝑥,𝐻   𝑥,𝐾   𝑥,𝑌
Allowed substitution hint:   𝐹(𝑥)

Proof of Theorem qustgpopn
Dummy variables 𝑎 𝑢 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 imassrn 6038 . . . 4 (𝐹𝑆) ⊆ ran 𝐹
2 qustgp.h . . . . . . 7 𝐻 = (𝐺 /s (𝐺 ~QG 𝑌))
32a1i 11 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐻 = (𝐺 /s (𝐺 ~QG 𝑌)))
4 qustgpopn.x . . . . . . 7 𝑋 = (Base‘𝐺)
54a1i 11 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑋 = (Base‘𝐺))
6 qustgpopn.f . . . . . 6 𝐹 = (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌))
7 ovex 7401 . . . . . . 7 (𝐺 ~QG 𝑌) ∈ V
87a1i 11 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐺 ~QG 𝑌) ∈ V)
9 simp1 1137 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐺 ∈ TopGrp)
103, 5, 6, 8, 9quslem 17476 . . . . 5 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌)))
11 forn 6757 . . . . 5 (𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌)) → ran 𝐹 = (𝑋 / (𝐺 ~QG 𝑌)))
1210, 11syl 17 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ran 𝐹 = (𝑋 / (𝐺 ~QG 𝑌)))
131, 12sseqtrid 3978 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)))
14 eceq1 8685 . . . . . . . . . 10 (𝑥 = 𝑦 → [𝑥](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌))
1514cbvmptv 5204 . . . . . . . . 9 (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) = (𝑦𝑋 ↦ [𝑦](𝐺 ~QG 𝑌))
166, 15eqtri 2760 . . . . . . . 8 𝐹 = (𝑦𝑋 ↦ [𝑦](𝐺 ~QG 𝑌))
1716mptpreima 6204 . . . . . . 7 (𝐹 “ (𝐹𝑆)) = {𝑦𝑋 ∣ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)}
1817reqabi 3424 . . . . . 6 (𝑦 ∈ (𝐹 “ (𝐹𝑆)) ↔ (𝑦𝑋 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
196funmpt2 6539 . . . . . . . . 9 Fun 𝐹
20 fvelima 6907 . . . . . . . . 9 ((Fun 𝐹 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)) → ∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌))
2119, 20mpan 691 . . . . . . . 8 ([𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆) → ∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌))
22 qustgpopn.j . . . . . . . . . . . . . . . . . . 19 𝐽 = (TopOpen‘𝐺)
2322, 4tgptopon 24038 . . . . . . . . . . . . . . . . . 18 (𝐺 ∈ TopGrp → 𝐽 ∈ (TopOn‘𝑋))
249, 23syl 17 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐽 ∈ (TopOn‘𝑋))
25 simp3 1139 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑆𝐽)
26 toponss 22883 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝑆𝐽) → 𝑆𝑋)
2724, 25, 26syl2anc 585 . . . . . . . . . . . . . . . 16 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑆𝑋)
2827adantr 480 . . . . . . . . . . . . . . 15 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → 𝑆𝑋)
2928sselda 3935 . . . . . . . . . . . . . 14 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑧𝑋)
30 eceq1 8685 . . . . . . . . . . . . . . 15 (𝑥 = 𝑧 → [𝑥](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌))
31 ecexg 8649 . . . . . . . . . . . . . . . 16 ((𝐺 ~QG 𝑌) ∈ V → [𝑧](𝐺 ~QG 𝑌) ∈ V)
327, 31ax-mp 5 . . . . . . . . . . . . . . 15 [𝑧](𝐺 ~QG 𝑌) ∈ V
3330, 6, 32fvmpt 6949 . . . . . . . . . . . . . 14 (𝑧𝑋 → (𝐹𝑧) = [𝑧](𝐺 ~QG 𝑌))
3429, 33syl 17 . . . . . . . . . . . . 13 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝐹𝑧) = [𝑧](𝐺 ~QG 𝑌))
3534eqeq1d 2739 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑧](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌)))
36 eqcom 2744 . . . . . . . . . . . 12 ([𝑧](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌))
3735, 36bitrdi 287 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌)))
38 nsgsubg 19099 . . . . . . . . . . . . . . 15 (𝑌 ∈ (NrmSGrp‘𝐺) → 𝑌 ∈ (SubGrp‘𝐺))
39383ad2ant2 1135 . . . . . . . . . . . . . 14 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑌 ∈ (SubGrp‘𝐺))
4039ad2antrr 727 . . . . . . . . . . . . 13 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑌 ∈ (SubGrp‘𝐺))
41 eqid 2737 . . . . . . . . . . . . . 14 (𝐺 ~QG 𝑌) = (𝐺 ~QG 𝑌)
424, 41eqger 19119 . . . . . . . . . . . . 13 (𝑌 ∈ (SubGrp‘𝐺) → (𝐺 ~QG 𝑌) Er 𝑋)
4340, 42syl 17 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝐺 ~QG 𝑌) Er 𝑋)
44 simplr 769 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑦𝑋)
4543, 44erth 8700 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌)))
469ad2antrr 727 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝐺 ∈ TopGrp)
474subgss 19069 . . . . . . . . . . . . 13 (𝑌 ∈ (SubGrp‘𝐺) → 𝑌𝑋)
4840, 47syl 17 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑌𝑋)
49 eqid 2737 . . . . . . . . . . . . 13 (invg𝐺) = (invg𝐺)
50 eqid 2737 . . . . . . . . . . . . 13 (+g𝐺) = (+g𝐺)
514, 49, 50, 41eqgval 19118 . . . . . . . . . . . 12 ((𝐺 ∈ TopGrp ∧ 𝑌𝑋) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
5246, 48, 51syl2anc 585 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
5337, 45, 523bitr2d 307 . . . . . . . . . 10 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
54 eqid 2737 . . . . . . . . . . . . . . . . . 18 (oppg𝐺) = (oppg𝐺)
55 eqid 2737 . . . . . . . . . . . . . . . . . 18 (+g‘(oppg𝐺)) = (+g‘(oppg𝐺))
5650, 54, 55oppgplus 19290 . . . . . . . . . . . . . . . . 17 ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎) = (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))
5756mpteq2i 5196 . . . . . . . . . . . . . . . 16 (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) = (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
5846adantr 480 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝐺 ∈ TopGrp)
5954oppgtgp 24054 . . . . . . . . . . . . . . . . . 18 (𝐺 ∈ TopGrp → (oppg𝐺) ∈ TopGrp)
6058, 59syl 17 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (oppg𝐺) ∈ TopGrp)
6148sselda 3935 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)
62 eqid 2737 . . . . . . . . . . . . . . . . . 18 (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) = (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎))
6354, 4oppgbas 19292 . . . . . . . . . . . . . . . . . 18 𝑋 = (Base‘(oppg𝐺))
6454, 22oppgtopn 19294 . . . . . . . . . . . . . . . . . 18 𝐽 = (TopOpen‘(oppg𝐺))
6562, 63, 55, 64tgplacthmeo 24059 . . . . . . . . . . . . . . . . 17 (((oppg𝐺) ∈ TopGrp ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) ∈ (𝐽Homeo𝐽))
6660, 61, 65syl2anc 585 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) ∈ (𝐽Homeo𝐽))
6757, 66eqeltrrid 2842 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽Homeo𝐽))
68 hmeocn 23716 . . . . . . . . . . . . . . 15 ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽Homeo𝐽) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽 Cn 𝐽))
6967, 68syl 17 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽 Cn 𝐽))
7025ad3antrrr 731 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑆𝐽)
71 cnima 23221 . . . . . . . . . . . . . 14 (((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽 Cn 𝐽) ∧ 𝑆𝐽) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽)
7269, 70, 71syl2anc 585 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽)
7344adantr 480 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑦𝑋)
74 tgpgrp 24034 . . . . . . . . . . . . . . . . . . 19 (𝐺 ∈ TopGrp → 𝐺 ∈ Grp)
7558, 74syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝐺 ∈ Grp)
76 eqid 2737 . . . . . . . . . . . . . . . . . . 19 (0g𝐺) = (0g𝐺)
774, 50, 76, 49grprinv 18932 . . . . . . . . . . . . . . . . . 18 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
7875, 73, 77syl2anc 585 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
7978oveq1d 7383 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = ((0g𝐺)(+g𝐺)𝑧))
804, 49grpinvcl 18929 . . . . . . . . . . . . . . . . . 18 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → ((invg𝐺)‘𝑦) ∈ 𝑋)
8175, 73, 80syl2anc 585 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((invg𝐺)‘𝑦) ∈ 𝑋)
8229adantr 480 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑧𝑋)
834, 50grpass 18884 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ Grp ∧ (𝑦𝑋 ∧ ((invg𝐺)‘𝑦) ∈ 𝑋𝑧𝑋)) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
8475, 73, 81, 82, 83syl13anc 1375 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
854, 50, 76grplid 18909 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ Grp ∧ 𝑧𝑋) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
8675, 82, 85syl2anc 585 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
8779, 84, 863eqtr3d 2780 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = 𝑧)
88 simplr 769 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑧𝑆)
8987, 88eqeltrd 2837 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆)
90 oveq1 7375 . . . . . . . . . . . . . . . 16 (𝑎 = 𝑦 → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
9190eleq1d 2822 . . . . . . . . . . . . . . 15 (𝑎 = 𝑦 → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 ↔ (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆))
92 eqid 2737 . . . . . . . . . . . . . . . 16 (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
9392mptpreima 6204 . . . . . . . . . . . . . . 15 ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) = {𝑎𝑋 ∣ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆}
9491, 93elrab2 3651 . . . . . . . . . . . . . 14 (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ↔ (𝑦𝑋 ∧ (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆))
9573, 89, 94sylanbrc 584 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆))
96 ecexg 8649 . . . . . . . . . . . . . . . . . . 19 ((𝐺 ~QG 𝑌) ∈ V → [𝑥](𝐺 ~QG 𝑌) ∈ V)
977, 96ax-mp 5 . . . . . . . . . . . . . . . . . 18 [𝑥](𝐺 ~QG 𝑌) ∈ V
9897, 6fnmpti 6643 . . . . . . . . . . . . . . . . 17 𝐹 Fn 𝑋
9928ad3antrrr 731 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑆𝑋)
100 fnfvima 7189 . . . . . . . . . . . . . . . . . 18 ((𝐹 Fn 𝑋𝑆𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆))
1011003expia 1122 . . . . . . . . . . . . . . . . 17 ((𝐹 Fn 𝑋𝑆𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆)))
10298, 99, 101sylancr 588 . . . . . . . . . . . . . . . 16 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆)))
10375adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝐺 ∈ Grp)
104 simpr 484 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑎𝑋)
10561adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)
1064, 50grpcl 18883 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ 𝑎𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋)
107103, 104, 105, 106syl3anc 1374 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋)
108 eceq1 8685 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) → [𝑥](𝐺 ~QG 𝑌) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
109108, 6, 97fvmpt3i 6955 . . . . . . . . . . . . . . . . . . 19 ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋 → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
110107, 109syl 17 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
11143ad2antrr 727 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐺 ~QG 𝑌) Er 𝑋)
1124, 50, 76, 49grplinv 18931 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺 ∈ Grp ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)𝑎) = (0g𝐺))
113103, 104, 112syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)𝑎) = (0g𝐺))
114113oveq1d 7383 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
1154, 49grpinvcl 18929 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺 ∈ Grp ∧ 𝑎𝑋) → ((invg𝐺)‘𝑎) ∈ 𝑋)
116103, 104, 115syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((invg𝐺)‘𝑎) ∈ 𝑋)
1174, 50grpass 18884 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ∈ Grp ∧ (((invg𝐺)‘𝑎) ∈ 𝑋𝑎𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
118103, 116, 104, 105, 117syl13anc 1375 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
1194, 50, 76grplid 18909 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ∈ Grp ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
120103, 105, 119syl2anc 585 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
121114, 118, 1203eqtr3d 2780 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
122 simplr 769 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)
123121, 122eqeltrd 2837 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)
12448ad2antrr 727 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑌𝑋)
1254, 49, 50, 41eqgval 19118 . . . . . . . . . . . . . . . . . . . . 21 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ↔ (𝑎𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋 ∧ (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)))
126103, 124, 125syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ↔ (𝑎𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋 ∧ (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)))
127104, 107, 123, 126mpbir3and 1344 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
128111, 127erthi 8702 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → [𝑎](𝐺 ~QG 𝑌) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
129110, 128eqtr4d 2775 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [𝑎](𝐺 ~QG 𝑌))
130129eleq1d 2822 . . . . . . . . . . . . . . . 16 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆) ↔ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
131102, 130sylibd 239 . . . . . . . . . . . . . . 15 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
132131ss2rabdv 4029 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → {𝑎𝑋 ∣ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆} ⊆ {𝑎𝑋 ∣ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)})
133 eceq1 8685 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑎 → [𝑥](𝐺 ~QG 𝑌) = [𝑎](𝐺 ~QG 𝑌))
134133cbvmptv 5204 . . . . . . . . . . . . . . . 16 (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) = (𝑎𝑋 ↦ [𝑎](𝐺 ~QG 𝑌))
1356, 134eqtri 2760 . . . . . . . . . . . . . . 15 𝐹 = (𝑎𝑋 ↦ [𝑎](𝐺 ~QG 𝑌))
136135mptpreima 6204 . . . . . . . . . . . . . 14 (𝐹 “ (𝐹𝑆)) = {𝑎𝑋 ∣ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)}
137132, 93, 1363sstr4g 3989 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))
138 eleq2 2826 . . . . . . . . . . . . . . 15 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → (𝑦𝑢𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆)))
139 sseq1 3961 . . . . . . . . . . . . . . 15 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → (𝑢 ⊆ (𝐹 “ (𝐹𝑆)) ↔ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆))))
140138, 139anbi12d 633 . . . . . . . . . . . . . 14 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → ((𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))) ↔ (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∧ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))))
141140rspcev 3578 . . . . . . . . . . . . 13 ((((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽 ∧ (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∧ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
14272, 95, 137, 141syl12anc 837 . . . . . . . . . . . 12 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
1431423ad2antr3 1192 . . . . . . . . . . 11 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
144143ex 412 . . . . . . . . . 10 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
14553, 144sylbid 240 . . . . . . . . 9 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
146145rexlimdva 3139 . . . . . . . 8 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → (∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
14721, 146syl5 34 . . . . . . 7 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → ([𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
148147expimpd 453 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝑦𝑋 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
14918, 148biimtrid 242 . . . . 5 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝑦 ∈ (𝐹 “ (𝐹𝑆)) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
150149ralrimiv 3129 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
151 topontop 22869 . . . . 5 (𝐽 ∈ (TopOn‘𝑋) → 𝐽 ∈ Top)
152 eltop2 22931 . . . . 5 (𝐽 ∈ Top → ((𝐹 “ (𝐹𝑆)) ∈ 𝐽 ↔ ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
15324, 151, 1523syl 18 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝐹 “ (𝐹𝑆)) ∈ 𝐽 ↔ ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
154150, 153mpbird 257 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹 “ (𝐹𝑆)) ∈ 𝐽)
155 elqtop3 23659 . . . 4 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌))) → ((𝐹𝑆) ∈ (𝐽 qTop 𝐹) ↔ ((𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)) ∧ (𝐹 “ (𝐹𝑆)) ∈ 𝐽)))
15624, 10, 155syl2anc 585 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝐹𝑆) ∈ (𝐽 qTop 𝐹) ↔ ((𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)) ∧ (𝐹 “ (𝐹𝑆)) ∈ 𝐽)))
15713, 154, 156mpbir2and 714 . 2 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ∈ (𝐽 qTop 𝐹))
1583, 5, 6, 8, 9qusval 17475 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐻 = (𝐹s 𝐺))
159 qustgpopn.k . . 3 𝐾 = (TopOpen‘𝐻)
160158, 5, 10, 9, 22, 159imastopn 23676 . 2 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐾 = (𝐽 qTop 𝐹))
161157, 160eleqtrrd 2840 1 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ∈ 𝐾)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wral 3052  wrex 3062  {crab 3401  Vcvv 3442  wss 3903   class class class wbr 5100  cmpt 5181  ccnv 5631  ran crn 5633  cima 5635  Fun wfun 6494   Fn wfn 6495  ontowfo 6498  cfv 6500  (class class class)co 7368   Er wer 8642  [cec 8643   / cqs 8644  Basecbs 17148  +gcplusg 17189  TopOpenctopn 17353  0gc0g 17371   qTop cqtop 17436   /s cqus 17438  Grpcgrp 18875  invgcminusg 18876  SubGrpcsubg 19062  NrmSGrpcnsg 19063   ~QG cqg 19064  oppgcoppg 19286  Topctop 22849  TopOnctopon 22866   Cn ccn 23180  Homeochmeo 23709  TopGrpctgp 24027
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 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115
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 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-tpos 8178  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-er 8645  df-ec 8647  df-qs 8651  df-map 8777  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-sup 9357  df-inf 9358  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-nn 12158  df-2 12220  df-3 12221  df-4 12222  df-5 12223  df-6 12224  df-7 12225  df-8 12226  df-9 12227  df-n0 12414  df-z 12501  df-dec 12620  df-uz 12764  df-fz 13436  df-struct 17086  df-sets 17103  df-slot 17121  df-ndx 17133  df-base 17149  df-ress 17170  df-plusg 17202  df-mulr 17203  df-sca 17205  df-vsca 17206  df-ip 17207  df-tset 17208  df-ple 17209  df-ds 17211  df-rest 17354  df-topn 17355  df-0g 17373  df-topgen 17375  df-qtop 17440  df-imas 17441  df-qus 17442  df-plusf 18576  df-mgm 18577  df-sgrp 18656  df-mnd 18672  df-grp 18878  df-minusg 18879  df-subg 19065  df-nsg 19066  df-eqg 19067  df-oppg 19287  df-top 22850  df-topon 22867  df-topsp 22889  df-bases 22902  df-cn 23183  df-cnp 23184  df-tx 23518  df-hmeo 23711  df-tmd 24028  df-tgp 24029
This theorem is referenced by:  qustgplem  24077
  Copyright terms: Public domain W3C validator