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

Theorem qustgpopn 24277
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 6073 . . . 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 7443 . . . . . . 7 (𝐺 ~QG 𝑌) ∈ V
87a1i 11 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐺 ~QG 𝑌) ∈ V)
9 simp1 1154 . . . . . 6 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐺 ∈ TopGrp)
103, 5, 6, 8, 9quslem 17592 . . . . 5 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌)))
11 forn 6795 . . . . 5 (𝐹:𝑋onto→(𝑋 / (𝐺 ~QG 𝑌)) → ran 𝐹 = (𝑋 / (𝐺 ~QG 𝑌)))
1210, 11syl 18 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ran 𝐹 = (𝑋 / (𝐺 ~QG 𝑌)))
131, 12sseqtrid 3979 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ⊆ (𝑋 / (𝐺 ~QG 𝑌)))
14 eceq1 8730 . . . . . . . . . 10 (𝑥 = 𝑦 → [𝑥](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌))
1514cbvmptv 5215 . . . . . . . . 9 (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) = (𝑦𝑋 ↦ [𝑦](𝐺 ~QG 𝑌))
166, 15eqtri 2786 . . . . . . . 8 𝐹 = (𝑦𝑋 ↦ [𝑦](𝐺 ~QG 𝑌))
1716mptpreima 6239 . . . . . . 7 (𝐹 “ (𝐹𝑆)) = {𝑦𝑋 ∣ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)}
1817reqabi 3439 . . . . . 6 (𝑦 ∈ (𝐹 “ (𝐹𝑆)) ↔ (𝑦𝑋 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
196funmpt2 6575 . . . . . . . . 9 Fun 𝐹
20 fvelima 6946 . . . . . . . . 9 ((Fun 𝐹 ∧ [𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)) → ∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌))
2119, 20mpan 702 . . . . . . . 8 ([𝑦](𝐺 ~QG 𝑌) ∈ (𝐹𝑆) → ∃𝑧𝑆 (𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌))
22 qustgpopn.j . . . . . . . . . . . . . . . . . . 19 𝐽 = (TopOpen‘𝐺)
2322, 4tgptopon 24239 . . . . . . . . . . . . . . . . . 18 (𝐺 ∈ TopGrp → 𝐽 ∈ (TopOn‘𝑋))
249, 23syl 18 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐽 ∈ (TopOn‘𝑋))
25 simp3 1156 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑆𝐽)
26 toponss 23084 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝑆𝐽) → 𝑆𝑋)
2724, 25, 26syl2anc 595 . . . . . . . . . . . . . . . 16 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑆𝑋)
2827adantr 485 . . . . . . . . . . . . . . 15 (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) → 𝑆𝑋)
2928sselda 3937 . . . . . . . . . . . . . 14 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑧𝑋)
30 eceq1 8730 . . . . . . . . . . . . . . 15 (𝑥 = 𝑧 → [𝑥](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌))
31 ecexg 8694 . . . . . . . . . . . . . . . 16 ((𝐺 ~QG 𝑌) ∈ V → [𝑧](𝐺 ~QG 𝑌) ∈ V)
327, 31ax-mp 5 . . . . . . . . . . . . . . 15 [𝑧](𝐺 ~QG 𝑌) ∈ V
3330, 6, 32fvmpt 6989 . . . . . . . . . . . . . 14 (𝑧𝑋 → (𝐹𝑧) = [𝑧](𝐺 ~QG 𝑌))
3429, 33syl 18 . . . . . . . . . . . . 13 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝐹𝑧) = [𝑧](𝐺 ~QG 𝑌))
3534eqeq1d 2765 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑧](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌)))
36 eqcom 2770 . . . . . . . . . . . 12 ([𝑧](𝐺 ~QG 𝑌) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌))
3735, 36bitrdi 290 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → ((𝐹𝑧) = [𝑦](𝐺 ~QG 𝑌) ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌)))
38 nsgsubg 19219 . . . . . . . . . . . . . . 15 (𝑌 ∈ (NrmSGrp‘𝐺) → 𝑌 ∈ (SubGrp‘𝐺))
39383ad2ant2 1152 . . . . . . . . . . . . . 14 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝑌 ∈ (SubGrp‘𝐺))
4039ad2antrr 738 . . . . . . . . . . . . 13 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑌 ∈ (SubGrp‘𝐺))
41 eqid 2763 . . . . . . . . . . . . . 14 (𝐺 ~QG 𝑌) = (𝐺 ~QG 𝑌)
424, 41eqger 19241 . . . . . . . . . . . . 13 (𝑌 ∈ (SubGrp‘𝐺) → (𝐺 ~QG 𝑌) Er 𝑋)
4340, 42syl 18 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝐺 ~QG 𝑌) Er 𝑋)
44 simplr 780 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑦𝑋)
4543, 44erth 8745 . . . . . . . . . . 11 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → (𝑦(𝐺 ~QG 𝑌)𝑧 ↔ [𝑦](𝐺 ~QG 𝑌) = [𝑧](𝐺 ~QG 𝑌)))
469ad2antrr 738 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝐺 ∈ TopGrp)
474subgss 19188 . . . . . . . . . . . . 13 (𝑌 ∈ (SubGrp‘𝐺) → 𝑌𝑋)
4840, 47syl 18 . . . . . . . . . . . 12 ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) → 𝑌𝑋)
49 eqid 2763 . . . . . . . . . . . . 13 (invg𝐺) = (invg𝐺)
50 eqid 2763 . . . . . . . . . . . . 13 (+g𝐺) = (+g𝐺)
514, 49, 50, 41eqgval 19240 . . . . . . . . . . . 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 2763 . . . . . . . . . . . . . . . . . 18 (oppg𝐺) = (oppg𝐺)
55 eqid 2763 . . . . . . . . . . . . . . . . . 18 (+g‘(oppg𝐺)) = (+g‘(oppg𝐺))
5650, 54, 55oppgplus 19414 . . . . . . . . . . . . . . . . 17 ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎) = (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))
5756mpteq2i 5207 . . . . . . . . . . . . . . . 16 (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) = (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
5846adantr 485 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝐺 ∈ TopGrp)
5954oppgtgp 24255 . . . . . . . . . . . . . . . . . 18 (𝐺 ∈ TopGrp → (oppg𝐺) ∈ TopGrp)
6058, 59syl 18 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (oppg𝐺) ∈ TopGrp)
6148sselda 3937 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)
62 eqid 2763 . . . . . . . . . . . . . . . . . 18 (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎)) = (𝑎𝑋 ↦ ((((invg𝐺)‘𝑦)(+g𝐺)𝑧)(+g‘(oppg𝐺))𝑎))
6354, 4oppgbas 19416 . . . . . . . . . . . . . . . . . 18 𝑋 = (Base‘(oppg𝐺))
6454, 22oppgtopn 19418 . . . . . . . . . . . . . . . . . 18 𝐽 = (TopOpen‘(oppg𝐺))
6562, 63, 55, 64tgplacthmeo 24260 . . . . . . . . . . . . . . . . 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 2868 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐽Homeo𝐽))
68 hmeocn 23917 . . . . . . . . . . . . . . 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 23422 . . . . . . . . . . . . . 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 24235 . . . . . . . . . . . . . . . . . . 19 (𝐺 ∈ TopGrp → 𝐺 ∈ Grp)
7558, 74syl 18 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝐺 ∈ Grp)
76 eqid 2763 . . . . . . . . . . . . . . . . . . 19 (0g𝐺) = (0g𝐺)
774, 50, 76, 49grprinv 19052 . . . . . . . . . . . . . . . . . 18 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
7875, 73, 77syl2anc 595 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
7978oveq1d 7425 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = ((0g𝐺)(+g𝐺)𝑧))
804, 49grpinvcl 19049 . . . . . . . . . . . . . . . . . 18 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → ((invg𝐺)‘𝑦) ∈ 𝑋)
8175, 73, 80syl2anc 595 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((invg𝐺)‘𝑦) ∈ 𝑋)
8229adantr 485 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑧𝑋)
834, 50grpass 19004 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ Grp ∧ (𝑦𝑋 ∧ ((invg𝐺)‘𝑦) ∈ 𝑋𝑧𝑋)) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
8475, 73, 81, 82, 83syl13anc 1399 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
854, 50, 76grplid 19029 . . . . . . . . . . . . . . . . 17 ((𝐺 ∈ Grp ∧ 𝑧𝑋) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
8675, 82, 85syl2anc 595 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
8779, 84, 863eqtr3d 2806 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = 𝑧)
88 simplr 780 . . . . . . . . . . . . . . 15 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑧𝑆)
8987, 88eqeltrd 2863 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆)
90 oveq1 7417 . . . . . . . . . . . . . . . 16 (𝑎 = 𝑦 → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
9190eleq1d 2848 . . . . . . . . . . . . . . 15 (𝑎 = 𝑦 → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 ↔ (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆))
92 eqid 2763 . . . . . . . . . . . . . . . 16 (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
9392mptpreima 6239 . . . . . . . . . . . . . . 15 ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) = {𝑎𝑋 ∣ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆}
9491, 93elrab2 3654 . . . . . . . . . . . . . 14 (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ↔ (𝑦𝑋 ∧ (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆))
9573, 89, 94sylanbrc 594 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → 𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆))
96 ecexg 8694 . . . . . . . . . . . . . . . . . . 19 ((𝐺 ~QG 𝑌) ∈ V → [𝑥](𝐺 ~QG 𝑌) ∈ V)
977, 96ax-mp 5 . . . . . . . . . . . . . . . . . 18 [𝑥](𝐺 ~QG 𝑌) ∈ V
9897, 6fnmpti 6678 . . . . . . . . . . . . . . . . 17 𝐹 Fn 𝑋
9928ad3antrrr 742 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑆𝑋)
100 fnfvima 7231 . . . . . . . . . . . . . . . . . 18 ((𝐹 Fn 𝑋𝑆𝑋 ∧ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆))
1011003expia 1139 . . . . . . . . . . . . . . . . 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 19003 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ 𝑎𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋) → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋)
107103, 104, 105, 106syl3anc 1398 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑋)
108 eceq1 8730 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) → [𝑥](𝐺 ~QG 𝑌) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
109108, 6, 97fvmpt3i 6995 . . . . . . . . . . . . . . . . . . 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 19051 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺 ∈ Grp ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)𝑎) = (0g𝐺))
113103, 104, 112syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)𝑎) = (0g𝐺))
114113oveq1d 7425 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = ((0g𝐺)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
1154, 49grpinvcl 19049 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺 ∈ Grp ∧ 𝑎𝑋) → ((invg𝐺)‘𝑎) ∈ 𝑋)
116103, 104, 115syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((invg𝐺)‘𝑎) ∈ 𝑋)
1174, 50grpass 19004 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ∈ Grp ∧ (((invg𝐺)‘𝑎) ∈ 𝑋𝑎𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
118103, 116, 104, 105, 117syl13anc 1399 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((((invg𝐺)‘𝑎)(+g𝐺)𝑎)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
1194, 50, 76grplid 19029 . . . . . . . . . . . . . . . . . . . . . . 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 2806 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (((invg𝐺)‘𝑦)(+g𝐺)𝑧))
122 simplr 780 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)
123121, 122eqeltrd 2863 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (((invg𝐺)‘𝑎)(+g𝐺)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ 𝑌)
12448ad2antrr 738 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑌𝑋)
1254, 49, 50, 41eqgval 19240 . . . . . . . . . . . . . . . . . . . . 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 1361 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → 𝑎(𝐺 ~QG 𝑌)(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
128111, 127erthi 8747 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → [𝑎](𝐺 ~QG 𝑌) = [(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))](𝐺 ~QG 𝑌))
129110, 128eqtr4d 2801 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → (𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = [𝑎](𝐺 ~QG 𝑌))
130129eleq1d 2848 . . . . . . . . . . . . . . . 16 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝐹‘(𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) ∈ (𝐹𝑆) ↔ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
131102, 130sylibd 242 . . . . . . . . . . . . . . 15 ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) ∧ 𝑎𝑋) → ((𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆 → [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)))
132131ss2rabdv 4029 . . . . . . . . . . . . . 14 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → {𝑎𝑋 ∣ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑆} ⊆ {𝑎𝑋 ∣ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)})
133 eceq1 8730 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑎 → [𝑥](𝐺 ~QG 𝑌) = [𝑎](𝐺 ~QG 𝑌))
134133cbvmptv 5215 . . . . . . . . . . . . . . . 16 (𝑥𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) = (𝑎𝑋 ↦ [𝑎](𝐺 ~QG 𝑌))
1356, 134eqtri 2786 . . . . . . . . . . . . . . 15 𝐹 = (𝑎𝑋 ↦ [𝑎](𝐺 ~QG 𝑌))
136135mptpreima 6239 . . . . . . . . . . . . . 14 (𝐹 “ (𝐹𝑆)) = {𝑎𝑋 ∣ [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹𝑆)}
137132, 93, 1363sstr4g 3990 . . . . . . . . . . . . 13 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))
138 eleq2 2852 . . . . . . . . . . . . . . 15 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → (𝑦𝑢𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆)))
139 sseq1 3962 . . . . . . . . . . . . . . 15 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → (𝑢 ⊆ (𝐹 “ (𝐹𝑆)) ↔ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆))))
140138, 139anbi12d 643 . . . . . . . . . . . . . 14 (𝑢 = ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) → ((𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))) ↔ (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∧ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))))
141140rspcev 3581 . . . . . . . . . . . . 13 ((((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∈ 𝐽 ∧ (𝑦 ∈ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ∧ ((𝑎𝑋 ↦ (𝑎(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) “ 𝑆) ⊆ (𝐹 “ (𝐹𝑆)))) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
14272, 95, 137, 141syl12anc 849 . . . . . . . . . . . 12 (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) ∧ 𝑦𝑋) ∧ 𝑧𝑆) ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆))))
1431423ad2antr3 1209 . . . . . . . . . . 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 23070 . . . . 5 (𝐽 ∈ (TopOn‘𝑋) → 𝐽 ∈ Top)
152 eltop2 23132 . . . . 5 (𝐽 ∈ Top → ((𝐹 “ (𝐹𝑆)) ∈ 𝐽 ↔ ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
15324, 151, 1523syl 19 . . . 4 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → ((𝐹 “ (𝐹𝑆)) ∈ 𝐽 ↔ ∀𝑦 ∈ (𝐹 “ (𝐹𝑆))∃𝑢𝐽 (𝑦𝑢𝑢 ⊆ (𝐹 “ (𝐹𝑆)))))
154150, 153mpbird 260 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹 “ (𝐹𝑆)) ∈ 𝐽)
155 elqtop3 23860 . . . 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 17591 . . 3 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐻 = (𝐹s 𝐺))
159 qustgpopn.k . . 3 𝐾 = (TopOpen‘𝐻)
160158, 5, 10, 9, 22, 159imastopn 23877 . 2 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → 𝐾 = (𝐽 qTop 𝐹))
161157, 160eleqtrrd 2866 1 ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑆𝐽) → (𝐹𝑆) ∈ 𝐾)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1103   = wceq 1570  wcel 2143  wral 3079  wrex 3089  {crab 3416  Vcvv 3455  wss 3905   class class class wbr 5109  cmpt 5192  ccnv 5660  ran crn 5662  cima 5664  Fun wfun 6530   Fn wfn 6531  ontowfo 6534  cfv 6536  (class class class)co 7410   Er wer 8687  [cec 8688   / cqs 8689  Basecbs 17264  +gcplusg 17305  TopOpenctopn 17469  0gc0g 17487   qTop cqtop 17552   /s cqus 17554  Grpcgrp 18995  invgcminusg 18996  SubGrpcsubg 19181  NrmSGrpcnsg 19182   ~QG cqg 19183  oppgcoppg 19410  Topctop 23050  TopOnctopon 23067   Cn ccn 23381  Homeochmeo 23910  TopGrpctgp 24228
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-tpos 8218  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-er 8690  df-ec 8692  df-qs 8696  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-sup 9398  df-inf 9399  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-nn 12229  df-2 12298  df-3 12299  df-4 12300  df-5 12301  df-6 12302  df-7 12303  df-8 12304  df-9 12305  df-n0 12500  df-z 12587  df-dec 12707  df-uz 12858  df-fz 13531  df-struct 17202  df-sets 17219  df-slot 17237  df-ndx 17249  df-base 17265  df-ress 17286  df-plusg 17318  df-mulr 17319  df-sca 17321  df-vsca 17322  df-ip 17323  df-tset 17324  df-ple 17325  df-ds 17327  df-rest 17470  df-topn 17471  df-0g 17489  df-topgen 17491  df-qtop 17556  df-imas 17557  df-qus 17558  df-plusf 18692  df-mgm 18693  df-sgrp 18772  df-mnd 18788  df-grp 18998  df-minusg 18999  df-subg 19184  df-nsg 19185  df-eqg 19186  df-oppg 19411  df-top 23051  df-topon 23068  df-topsp 23090  df-bases 23103  df-cn 23384  df-cnp 23385  df-tx 23719  df-hmeo 23912  df-tmd 24229  df-tgp 24230
This theorem is referenced by:  qustgplem  24278
  Copyright terms: Public domain W3C validator