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

Theorem qustgpopn 24234
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 6063 . . . 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 7433 . . . . . . 7 (𝐺 ~QG 𝑌) ∈ V
87a1i 11 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐺 ~QG 𝑌) ∈ V)
9 simp1 1152 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐺 ∈ TopGrp)
103, 5, 6, 8, 9quslem 17585 . . . . 5 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌)))
11 forn 6785 . . . . 5 (𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌)) → ran 𝐹 = (𝑋 / (𝐺 ~QG 𝑌)))
1210, 11syl 18 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ran 𝐹 = (𝑋 / (𝐺 ~QG 𝑌)))
131, 12sseqtrid 3981 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)))
14 eceq1 8722 . . . . . . . . . 10 (𝑥 = 𝑦 → [𝑥](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌))
1514cbvmptv 5208 . . . . . . . . 9 (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) = (𝑦𝑋 ↦ [𝑦](𝐺 ~QG 𝑌))
166, 15eqtri 2788 . . . . . . . 8 𝐹 = (𝑦𝑋 ↦ [𝑦](𝐺 ~QG 𝑌))
1716mptpreima 6228 . . . . . . 7 (𝐹 “ (𝐹𝑆)) = {𝑦𝑋 ∣ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)}
1817reqabi 3440 . . . . . 6 (𝑦 ∈ (𝐹 “ (𝐹𝑆)) ↔ (𝑦𝑋 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
196funmpt2 6564 . . . . . . . . 9 Fun 𝐹
20 fvelima 6936 . . . . . . . . 9 ((Fun 𝐹 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)) → ∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌))
2119, 20mpan 702 . . . . . . . 8 ([𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆) → ∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌))
22 qustgpopn.j . . . . . . . . . . . . . . . . . . 19 𝐽 = (TopOpen‘𝐺)
2322, 4tgptopon 24196 . . . . . . . . . . . . . . . . . 18 (𝐺 ∈ TopGrp → 𝐽 ∈ (TopOn‘𝑋))
249, 23syl 18 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐽 ∈ (TopOn‘𝑋))
25 simp3 1154 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑆𝐽)
26 toponss 23041 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝑆𝐽) → 𝑆𝑋)
2724, 25, 26syl2anc 595 . . . . . . . . . . . . . . . 16 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑆𝑋)
2827adantr 485 . . . . . . . . . . . . . . 15 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → 𝑆𝑋)
2928sselda 3939 . . . . . . . . . . . . . 14 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑧𝑋)
30 eceq1 8722 . . . . . . . . . . . . . . 15 (𝑥 = 𝑧 → [𝑥](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌))
31 ecexg 8686 . . . . . . . . . . . . . . . 16 ((𝐺 ~QG 𝑌) ∈ V → [𝑧](𝐺 ~QG 𝑌) ∈ V)
327, 31ax-mp 5 . . . . . . . . . . . . . . 15 [𝑧](𝐺 ~QG 𝑌) ∈ V
3330, 6, 32fvmpt 6979 . . . . . . . . . . . . . 14 (𝑧𝑋 → (𝐹𝑧) = [𝑧](𝐺 ~QG 𝑌))
3429, 33syl 18 . . . . . . . . . . . . 13 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝐹𝑧) = [𝑧](𝐺 ~QG 𝑌))
3534eqeq1d 2767 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑧](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌)))
36 eqcom 2772 . . . . . . . . . . . 12 ([𝑧](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌))
3735, 36bitrdi 290 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌)))
38 nsgsubg 19212 . . . . . . . . . . . . . . 15 (𝑌 ∈ (NrmSGrp‘𝐺) → 𝑌 ∈ (SubGrp‘𝐺))
39383ad2ant2 1150 . . . . . . . . . . . . . 14 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑌 ∈ (SubGrp‘𝐺))
4039ad2antrr 738 . . . . . . . . . . . . 13 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑌 ∈ (SubGrp‘𝐺))
41 eqid 2765 . . . . . . . . . . . . . 14 (𝐺 ~QG 𝑌) = (𝐺 ~QG 𝑌)
424, 41eqger 19234 . . . . . . . . . . . . 13 (𝑌 ∈ (SubGrp‘𝐺) → (𝐺 ~QG 𝑌) Er 𝑋)
4340, 42syl 18 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝐺 ~QG 𝑌) Er 𝑋)
44 simplr 780 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑦𝑋)
4543, 44erth 8737 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌)))
469ad2antrr 738 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝐺 ∈ TopGrp)
474subgss 19181 . . . . . . . . . . . . 13 (𝑌 ∈ (SubGrp‘𝐺) → 𝑌𝑋)
4840, 47syl 18 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑌𝑋)
49 eqid 2765 . . . . . . . . . . . . 13 (invg𝐺) = (invg𝐺)
50 eqid 2765 . . . . . . . . . . . . 13 (+g𝐺) = (+g𝐺)
514, 49, 50, 41eqgval 19233 . . . . . . . . . . . 12 ((𝐺 ∈ TopGrp ∧ 𝑌𝑋) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
5246, 48, 51syl2anc 595 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
5337, 45, 523bitr2d 310 . . . . . . . . . 10 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
54 eqid 2765 . . . . . . . . . . . . . . . . . 18 (oppg𝐺) = (oppg𝐺)
55 eqid 2765 . . . . . . . . . . . . . . . . . 18 (+g‘(oppg𝐺)) = (+g‘(oppg𝐺))
5650, 54, 55oppgplus 19407 . . . . . . . . . . . . . . . . 17 ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎) = (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))
5756mpteq2i 5200 . . . . . . . . . . . . . . . 16 (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) = (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
5846adantr 485 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝐺 ∈ TopGrp)
5954oppgtgp 24212 . . . . . . . . . . . . . . . . . 18 (𝐺 ∈ TopGrp → (oppg𝐺) ∈ TopGrp)
6058, 59syl 18 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (oppg𝐺) ∈ TopGrp)
6148sselda 3939 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)
62 eqid 2765 . . . . . . . . . . . . . . . . . 18 (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) = (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎))
6354, 4oppgbas 19409 . . . . . . . . . . . . . . . . . 18 𝑋 = (Base‘(oppg𝐺))
6454, 22oppgtopn 19411 . . . . . . . . . . . . . . . . . 18 𝐽 = (TopOpen‘(oppg𝐺))
6562, 63, 55, 64tgplacthmeo 24217 . . . . . . . . . . . . . . . . 17 (((oppg𝐺) ∈ TopGrp ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) ∈ (𝐽Homeo𝐽))
6660, 61, 65syl2anc 595 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) ∈ (𝐽Homeo𝐽))
6757, 66eqeltrrid 2870 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽Homeo𝐽))
68 hmeocn 23874 . . . . . . . . . . . . . . 15 ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽Homeo𝐽) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽 Cn 𝐽))
6967, 68syl 18 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽 Cn 𝐽))
7025ad3antrrr 742 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑆𝐽)
71 cnima 23379 . . . . . . . . . . . . . 14 (((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽 Cn 𝐽) ∧ 𝑆𝐽) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽)
7269, 70, 71syl2anc 595 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽)
7344adantr 485 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑦𝑋)
74 tgpgrp 24192 . . . . . . . . . . . . . . . . . . 19 (𝐺 ∈ TopGrp → 𝐺 ∈ Grp)
7558, 74syl 18 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝐺 ∈ Grp)
76 eqid 2765 . . . . . . . . . . . . . . . . . . 19 (0g𝐺) = (0g𝐺)
774, 50, 76, 49grprinv 19045 . . . . . . . . . . . . . . . . . 18 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
7875, 73, 77syl2anc 595 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
7978oveq1d 7415 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = ((0g𝐺)(+g𝐺)𝑧))
804, 49grpinvcl 19042 . . . . . . . . . . . . . . . . . 18 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → ((invg𝐺)‘𝑦) ∈ 𝑋)
8175, 73, 80syl2anc 595 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((invg𝐺)‘𝑦) ∈ 𝑋)
8229adantr 485 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑧𝑋)
834, 50grpass 18997 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ Grp ∧ (𝑦𝑋 ∧ ((invg𝐺)‘𝑦) ∈ 𝑋𝑧𝑋)) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
8475, 73, 81, 82, 83syl13anc 1395 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
854, 50, 76grplid 19022 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ Grp ∧ 𝑧𝑋) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
8675, 82, 85syl2anc 595 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
8779, 84, 863eqtr3d 2808 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = 𝑧)
88 simplr 780 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑧𝑆)
8987, 88eqeltrd 2865 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆)
90 oveq1 7407 . . . . . . . . . . . . . . . 16 (𝑎 = 𝑦 → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
9190eleq1d 2850 . . . . . . . . . . . . . . 15 (𝑎 = 𝑦 → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 ↔ (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆))
92 eqid 2765 . . . . . . . . . . . . . . . 16 (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
9392mptpreima 6228 . . . . . . . . . . . . . . 15 ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) = {𝑎𝑋 ∣ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆}
9491, 93elrab2 3657 . . . . . . . . . . . . . 14 (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ↔ (𝑦𝑋 ∧ (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆))
9573, 89, 94sylanbrc 594 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆))
96 ecexg 8686 . . . . . . . . . . . . . . . . . . 19 ((𝐺 ~QG 𝑌) ∈ V → [𝑥](𝐺 ~QG 𝑌) ∈ V)
977, 96ax-mp 5 . . . . . . . . . . . . . . . . . 18 [𝑥](𝐺 ~QG 𝑌) ∈ V
9897, 6fnmpti 6668 . . . . . . . . . . . . . . . . 17 𝐹 Fn 𝑋
9928ad3antrrr 742 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑆𝑋)
100 fnfvima 7221 . . . . . . . . . . . . . . . . . 18 ((𝐹 Fn 𝑋𝑆𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆))
1011003expia 1137 . . . . . . . . . . . . . . . . 17 ((𝐹 Fn 𝑋𝑆𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆)))
10298, 99, 101sylancr 598 . . . . . . . . . . . . . . . 16 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆)))
10375adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝐺 ∈ Grp)
104 simpr 489 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑎𝑋)
10561adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)
1064, 50grpcl 18996 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ 𝑎𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋)
107103, 104, 105, 106syl3anc 1394 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋)
108 eceq1 8722 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) → [𝑥](𝐺 ~QG 𝑌) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
109108, 6, 97fvmpt3i 6985 . . . . . . . . . . . . . . . . . . 19 ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋 → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
110107, 109syl 18 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
11143ad2antrr 738 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐺 ~QG 𝑌) Er 𝑋)
1124, 50, 76, 49grplinv 19044 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺 ∈ Grp ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)𝑎) = (0g𝐺))
113103, 104, 112syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)𝑎) = (0g𝐺))
114113oveq1d 7415 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
1154, 49grpinvcl 19042 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺 ∈ Grp ∧ 𝑎𝑋) → ((invg𝐺)‘𝑎) ∈ 𝑋)
116103, 104, 115syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((invg𝐺)‘𝑎) ∈ 𝑋)
1174, 50grpass 18997 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ∈ Grp ∧ (((invg𝐺)‘𝑎) ∈ 𝑋𝑎𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
118103, 116, 104, 105, 117syl13anc 1395 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
1194, 50, 76grplid 19022 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ∈ Grp ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
120103, 105, 119syl2anc 595 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
121114, 118, 1203eqtr3d 2808 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
122 simplr 780 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)
123121, 122eqeltrd 2865 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)
12448ad2antrr 738 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑌𝑋)
1254, 49, 50, 41eqgval 19233 . . . . . . . . . . . . . . . . . . . . 21 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ↔ (𝑎𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋 ∧ (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)))
126103, 124, 125syl2anc 595 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ↔ (𝑎𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋 ∧ (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)))
127104, 107, 123, 126mpbir3and 1359 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
128111, 127erthi 8739 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → [𝑎](𝐺 ~QG 𝑌) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
129110, 128eqtr4d 2803 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [𝑎](𝐺 ~QG 𝑌))
130129eleq1d 2850 . . . . . . . . . . . . . . . 16 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆) ↔ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
131102, 130sylibd 242 . . . . . . . . . . . . . . 15 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
132131ss2rabdv 4031 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → {𝑎𝑋 ∣ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆} ⊆ {𝑎𝑋 ∣ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)})
133 eceq1 8722 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑎 → [𝑥](𝐺 ~QG 𝑌) = [𝑎](𝐺 ~QG 𝑌))
134133cbvmptv 5208 . . . . . . . . . . . . . . . 16 (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) = (𝑎𝑋 ↦ [𝑎](𝐺 ~QG 𝑌))
1356, 134eqtri 2788 . . . . . . . . . . . . . . 15 𝐹 = (𝑎𝑋 ↦ [𝑎](𝐺 ~QG 𝑌))
136135mptpreima 6228 . . . . . . . . . . . . . 14 (𝐹 “ (𝐹𝑆)) = {𝑎𝑋 ∣ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)}
137132, 93, 1363sstr4g 3992 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))
138 eleq2 2854 . . . . . . . . . . . . . . 15 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → (𝑦𝑢𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆)))
139 sseq1 3964 . . . . . . . . . . . . . . 15 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → (𝑢 ⊆ (𝐹 “ (𝐹𝑆)) ↔ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆))))
140138, 139anbi12d 643 . . . . . . . . . . . . . 14 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → ((𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))) ↔ (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∧ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))))
141140rspcev 3584 . . . . . . . . . . . . 13 ((((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽 ∧ (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∧ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
14272, 95, 137, 141syl12anc 849 . . . . . . . . . . . 12 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
1431423ad2antr3 1207 . . . . . . . . . . 11 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
144143ex 417 . . . . . . . . . 10 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
14553, 144sylbid 243 . . . . . . . . 9 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
146145rexlimdva 3166 . . . . . . . 8 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → (∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
14721, 146syl5 35 . . . . . . 7 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → ([𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
148147expimpd 458 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝑦𝑋 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
14918, 148biimtrid 245 . . . . 5 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝑦 ∈ (𝐹 “ (𝐹𝑆)) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
150149ralrimiv 3156 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
151 topontop 23027 . . . . 5 (𝐽 ∈ (TopOn‘𝑋) → 𝐽 ∈ Top)
152 eltop2 23089 . . . . 5 (𝐽 ∈ Top → ((𝐹 “ (𝐹𝑆)) ∈ 𝐽 ↔ ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
15324, 151, 1523syl 19 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝐹 “ (𝐹𝑆)) ∈ 𝐽 ↔ ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
154150, 153mpbird 260 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹 “ (𝐹𝑆)) ∈ 𝐽)
155 elqtop3 23817 . . . 4 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌))) → ((𝐹𝑆) ∈ (𝐽 qTop 𝐹) ↔ ((𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)) ∧ (𝐹 “ (𝐹𝑆)) ∈ 𝐽)))
15624, 10, 155syl2anc 595 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝐹𝑆) ∈ (𝐽 qTop 𝐹) ↔ ((𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)) ∧ (𝐹 “ (𝐹𝑆)) ∈ 𝐽)))
15713, 154, 156mpbir2and 725 . 2 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ∈ (𝐽 qTop 𝐹))
1583, 5, 6, 8, 9qusval 17584 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐻 = (𝐹s 𝐺))
159 qustgpopn.k . . 3 𝐾 = (TopOpen‘𝐻)
160158, 5, 10, 9, 22, 159imastopn 23834 . 2 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐾 = (𝐽 qTop 𝐹))
161157, 160eleqtrrd 2868 1 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ∈ 𝐾)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1101   = wceq 1563  wcel 2145  wral 3079  wrex 3089  {crab 3417  Vcvv 3457  wss 3907   class class class wbr 5104  cmpt 5185  ccnv 5650  ran crn 5652  cima 5654  Fun wfun 6519   Fn wfn 6520  ontowfo 6523  cfv 6525  (class class class)co 7400   Er wer 8679  [cec 8680   / cqs 8681  Basecbs 17257  +gcplusg 17298  TopOpenctopn 17462  0gc0g 17480   qTop cqtop 17545   /s cqus 17547  Grpcgrp 18988  invgcminusg 18989  SubGrpcsubg 19174  NrmSGrpcnsg 19175   ~QG cqg 19176  oppgcoppg 19403  Topctop 23007  TopOnctopon 23024   Cn ccn 23338  Homeochmeo 23867  TopGrpctgp 24185
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5231  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722  ax-cnex 11144  ax-resscn 11145  ax-1cn 11146  ax-icn 11147  ax-addcl 11148  ax-addrcl 11149  ax-mulcl 11150  ax-mulrcl 11151  ax-mulcom 11152  ax-addass 11153  ax-mulass 11154  ax-distr 11155  ax-i2m1 11156  ax-1ne0 11157  ax-1rid 11158  ax-rnegex 11159  ax-rrecex 11160  ax-cnre 11161  ax-pre-lttri 11162  ax-pre-lttrn 11163  ax-pre-ltadd 11164  ax-pre-mulgt0 11165
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4868  df-iun 4953  df-br 5105  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6291  df-ord 6352  df-on 6353  df-lim 6354  df-suc 6355  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-om 7851  df-1st 7974  df-2nd 7975  df-tpos 8210  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-1o 8441  df-er 8682  df-ec 8684  df-qs 8688  df-map 8814  df-en 8932  df-dom 8933  df-sdom 8934  df-fin 8935  df-sup 9390  df-inf 9391  df-pnf 11233  df-mnf 11234  df-xr 11235  df-ltxr 11236  df-le 11237  df-sub 11431  df-neg 11432  df-nn 12222  df-2 12291  df-3 12292  df-4 12293  df-5 12294  df-6 12295  df-7 12296  df-8 12297  df-9 12298  df-n0 12493  df-z 12580  df-dec 12700  df-uz 12851  df-fz 13524  df-struct 17195  df-sets 17212  df-slot 17230  df-ndx 17242  df-base 17258  df-ress 17279  df-plusg 17311  df-mulr 17312  df-sca 17314  df-vsca 17315  df-ip 17316  df-tset 17317  df-ple 17318  df-ds 17320  df-rest 17463  df-topn 17464  df-0g 17482  df-topgen 17484  df-qtop 17549  df-imas 17550  df-qus 17551  df-plusf 18685  df-mgm 18686  df-sgrp 18765  df-mnd 18781  df-grp 18991  df-minusg 18992  df-subg 19177  df-nsg 19178  df-eqg 19179  df-oppg 19404  df-top 23008  df-topon 23025  df-topsp 23047  df-bases 23060  df-cn 23341  df-cnp 23342  df-tx 23676  df-hmeo 23869  df-tmd 24186  df-tgp 24187
This theorem is referenced by:  qustgplem  24235
  Copyright terms: Public domain W3C validator