Theorem snclseqg 23612

Description: The coset of the closure of the identity is the closure of a point. (Contributed by Mario Carneiro, 22-Sep-2015.)

Hypotheses

Ref	Expression
snclseqg.x	⊢ 𝑋 = (Base‘𝐺)
snclseqg.j	⊢ 𝐽 = (TopOpen‘𝐺)
snclseqg.z	⊢ 0 = (0g‘𝐺)
snclseqg.r	⊢ ∼ = (𝐺 ~QG 𝑆)
snclseqg.s	⊢ 𝑆 = ((cls‘𝐽)‘{ 0 })

Assertion

Ref	Expression
snclseqg	⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((cls‘𝐽)‘{𝐴}))

Proof of Theorem snclseqg

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		snclseqg.s	. . . 4 ⊢ 𝑆 = ((cls‘𝐽)‘{ 0 })
2	1	imaeq2i 6056	. . 3 ⊢ ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ 𝑆) = ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ ((cls‘𝐽)‘{ 0 }))
3		tgpgrp 23574	. . . . 5 ⊢ (𝐺 ∈ TopGrp → 𝐺 ∈ Grp)
4	3	adantr 482	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 𝐺 ∈ Grp)
5		snclseqg.j	. . . . . . . . . 10 ⊢ 𝐽 = (TopOpen‘𝐺)
6		snclseqg.x	. . . . . . . . . 10 ⊢ 𝑋 = (Base‘𝐺)
7	5, 6	tgptopon 23578	. . . . . . . . 9 ⊢ (𝐺 ∈ TopGrp → 𝐽 ∈ (TopOn‘𝑋))
8	7	adantr 482	. . . . . . . 8 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 𝐽 ∈ (TopOn‘𝑋))
9		topontop 22407	. . . . . . . 8 ⊢ (𝐽 ∈ (TopOn‘𝑋) → 𝐽 ∈ Top)
10	8, 9	syl 17	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 𝐽 ∈ Top)
11		snclseqg.z	. . . . . . . . . . 11 ⊢ 0 = (0g‘𝐺)
12	6, 11	grpidcl 18847	. . . . . . . . . 10 ⊢ (𝐺 ∈ Grp → 0 ∈ 𝑋)
13	4, 12	syl 17	. . . . . . . . 9 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 0 ∈ 𝑋)
14	13	snssd 4812	. . . . . . . 8 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → { 0 } ⊆ 𝑋)
15		toponuni 22408	. . . . . . . . 9 ⊢ (𝐽 ∈ (TopOn‘𝑋) → 𝑋 = ∪ 𝐽)
16	8, 15	syl 17	. . . . . . . 8 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 𝑋 = ∪ 𝐽)
17	14, 16	sseqtrd 4022	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → { 0 } ⊆ ∪ 𝐽)
18		eqid 2733	. . . . . . . 8 ⊢ ∪ 𝐽 = ∪ 𝐽
19	18	clsss3 22555	. . . . . . 7 ⊢ ((𝐽 ∈ Top ∧ { 0 } ⊆ ∪ 𝐽) → ((cls‘𝐽)‘{ 0 }) ⊆ ∪ 𝐽)
20	10, 17, 19	syl2anc 585	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((cls‘𝐽)‘{ 0 }) ⊆ ∪ 𝐽)
21	20, 16	sseqtrrd 4023	. . . . 5 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((cls‘𝐽)‘{ 0 }) ⊆ 𝑋)
22	1, 21	eqsstrid 4030	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 𝑆 ⊆ 𝑋)
23		simpr 486	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → 𝐴 ∈ 𝑋)
24		snclseqg.r	. . . . 5 ⊢ ∼ = (𝐺 ~QG 𝑆)
25		eqid 2733	. . . . 5 ⊢ (+g‘𝐺) = (+g‘𝐺)
26	6, 24, 25	eqglact 19054	. . . 4 ⊢ ((𝐺 ∈ Grp ∧ 𝑆 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ 𝑆))
27	4, 22, 23, 26	syl3anc 1372	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ 𝑆))
28		eqid 2733	. . . . 5 ⊢ (𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) = (𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥))
29	28, 6, 25, 5	tgplacthmeo 23599	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → (𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) ∈ (𝐽Homeo𝐽))
30	18	hmeocls 23264	. . . 4 ⊢ (((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) ∈ (𝐽Homeo𝐽) ∧ { 0 } ⊆ ∪ 𝐽) → ((cls‘𝐽)‘((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 })) = ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ ((cls‘𝐽)‘{ 0 })))
31	29, 17, 30	syl2anc 585	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((cls‘𝐽)‘((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 })) = ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ ((cls‘𝐽)‘{ 0 })))
32	2, 27, 31	3eqtr4a 2799	. 2 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((cls‘𝐽)‘((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 })))
33		df-ima 5689	. . . . 5 ⊢ ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 }) = ran ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) ↾ { 0 })
34	14	resmptd 6039	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) ↾ { 0 }) = (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥)))
35	34	rneqd 5936	. . . . 5 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ran ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) ↾ { 0 }) = ran (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥)))
36	33, 35	eqtrid 2785	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 }) = ran (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥)))
37	11	fvexi 6903	. . . . . . . 8 ⊢ 0 ∈ V
38		oveq2 7414	. . . . . . . . 9 ⊢ (𝑥 = 0 → (𝐴(+g‘𝐺)𝑥) = (𝐴(+g‘𝐺) 0 ))
39	38	eqeq2d 2744	. . . . . . . 8 ⊢ (𝑥 = 0 → (𝑦 = (𝐴(+g‘𝐺)𝑥) ↔ 𝑦 = (𝐴(+g‘𝐺) 0 )))
40	37, 39	rexsn 4686	. . . . . . 7 ⊢ (∃𝑥 ∈ { 0 }𝑦 = (𝐴(+g‘𝐺)𝑥) ↔ 𝑦 = (𝐴(+g‘𝐺) 0 ))
41	6, 25, 11	grprid 18850	. . . . . . . . 9 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (𝐴(+g‘𝐺) 0 ) = 𝐴)
42	3, 41	sylan 581	. . . . . . . 8 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → (𝐴(+g‘𝐺) 0 ) = 𝐴)
43	42	eqeq2d 2744	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → (𝑦 = (𝐴(+g‘𝐺) 0 ) ↔ 𝑦 = 𝐴))
44	40, 43	bitrid 283	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → (∃𝑥 ∈ { 0 }𝑦 = (𝐴(+g‘𝐺)𝑥) ↔ 𝑦 = 𝐴))
45	44	abbidv 2802	. . . . 5 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → {𝑦 ∣ ∃𝑥 ∈ { 0 }𝑦 = (𝐴(+g‘𝐺)𝑥)} = {𝑦 ∣ 𝑦 = 𝐴})
46		eqid 2733	. . . . . 6 ⊢ (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥)) = (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥))
47	46	rnmpt 5953	. . . . 5 ⊢ ran (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥)) = {𝑦 ∣ ∃𝑥 ∈ { 0 }𝑦 = (𝐴(+g‘𝐺)𝑥)}
48		df-sn 4629	. . . . 5 ⊢ {𝐴} = {𝑦 ∣ 𝑦 = 𝐴}
49	45, 47, 48	3eqtr4g 2798	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ran (𝑥 ∈ { 0 } ↦ (𝐴(+g‘𝐺)𝑥)) = {𝐴})
50	36, 49	eqtrd 2773	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 }) = {𝐴})
51	50	fveq2d 6893	. 2 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → ((cls‘𝐽)‘((𝑥 ∈ 𝑋 ↦ (𝐴(+g‘𝐺)𝑥)) “ { 0 })) = ((cls‘𝐽)‘{𝐴}))
52	32, 51	eqtrd 2773	1 ⊢ ((𝐺 ∈ TopGrp ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((cls‘𝐽)‘{𝐴}))

Syntax hints:   → wi 4   ∧ wa 397   = wceq 1542   ∈ wcel 2107  {cab 2710  ∃wrex 3071   ⊆ wss 3948  {csn 4628  ∪ cuni 4908   ↦ cmpt 5231  ran crn 5677   ↾ cres 5678   “ cima 5679  ‘cfv 6541  (class class class)co 7406  [cec 8698  Basecbs 17141  +_gcplusg 17194  TopOpenctopn 17364  0_gc0g 17382  Grpcgrp 18816   ~_QG cqg 18997  Topctop 22387  TopOnctopon 22404  clsccl 22514  Homeochmeo 23249  TopGrpctgp 23567

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-iin 5000  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5574  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-1st 7972  df-2nd 7973  df-ec 8702  df-map 8819  df-0g 17384  df-topgen 17386  df-plusf 18557  df-mgm 18558  df-sgrp 18607  df-mnd 18623  df-grp 18819  df-minusg 18820  df-eqg 19000  df-top 22388  df-topon 22405  df-topsp 22427  df-bases 22441  df-cld 22515  df-cls 22517  df-cn 22723  df-cnp 22724  df-tx 23058  df-hmeo 23251  df-tmd 23568  df-tgp 23569

This theorem is referenced by:  tgptsmscls  23646