Theorem eqgen 17470

Description: Each coset is equipotent to the subgroup itself (which is also the coset containing the identity). (Contributed by Mario Carneiro, 20-Sep-2015.)

Hypotheses

Ref	Expression
eqger.x	⊢ 𝑋 = (Base‘𝐺)
eqger.r	⊢ ∼ = (𝐺 ~QG 𝑌)

Assertion

Ref	Expression
eqgen	⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝐴 ∈ (𝑋 / ∼ )) → 𝑌 ≈ 𝐴)

Proof of Theorem eqgen

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

Step	Hyp	Ref	Expression
1		eqid 2610	. 2 ⊢ (𝑋 / ∼ ) = (𝑋 / ∼ )
2		breq2 4587	. 2 ⊢ ([𝑥] ∼ = 𝐴 → (𝑌 ≈ [𝑥] ∼ ↔ 𝑌 ≈ 𝐴))
3		simpl 472	. . . 4 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → 𝑌 ∈ (SubGrp‘𝐺))
4		subgrcl 17422	. . . . . . 7 ⊢ (𝑌 ∈ (SubGrp‘𝐺) → 𝐺 ∈ Grp)
5		eqger.x	. . . . . . . 8 ⊢ 𝑋 = (Base‘𝐺)
6	5	subgss 17418	. . . . . . 7 ⊢ (𝑌 ∈ (SubGrp‘𝐺) → 𝑌 ⊆ 𝑋)
7	4, 6	jca 553	. . . . . 6 ⊢ (𝑌 ∈ (SubGrp‘𝐺) → (𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋))
8		eqger.r	. . . . . . . 8 ⊢ ∼ = (𝐺 ~QG 𝑌)
9		eqid 2610	. . . . . . . 8 ⊢ (+g‘𝐺) = (+g‘𝐺)
10	5, 8, 9	eqglact 17468	. . . . . . 7 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝑥 ∈ 𝑋) → [𝑥] ∼ = ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
11	10	3expa 1257	. . . . . 6 ⊢ (((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) ∧ 𝑥 ∈ 𝑋) → [𝑥] ∼ = ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
12	7, 11	sylan 487	. . . . 5 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → [𝑥] ∼ = ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
13		ovex 6577	. . . . . . 7 ⊢ (𝐺 ~QG 𝑌) ∈ V
14	8, 13	eqeltri 2684	. . . . . 6 ⊢ ∼ ∈ V
15		ecexg 7633	. . . . . 6 ⊢ ( ∼ ∈ V → [𝑥] ∼ ∈ V)
16	14, 15	ax-mp 5	. . . . 5 ⊢ [𝑥] ∼ ∈ V
17	12, 16	syl6eqelr 2697	. . . 4 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌) ∈ V)
18		eqid 2610	. . . . . . . . 9 ⊢ (𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧))) = (𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))
19	18, 5, 9	grplactf1o 17342	. . . . . . . 8 ⊢ ((𝐺 ∈ Grp ∧ 𝑥 ∈ 𝑋) → ((𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))‘𝑥):𝑋–1-1-onto→𝑋)
20	18, 5	grplactfval 17339	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑋 → ((𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))‘𝑥) = (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)))
21	20	adantl 481	. . . . . . . . 9 ⊢ ((𝐺 ∈ Grp ∧ 𝑥 ∈ 𝑋) → ((𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))‘𝑥) = (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)))
22		f1oeq1 6040	. . . . . . . . 9 ⊢ (((𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))‘𝑥) = (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) → (((𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))‘𝑥):𝑋–1-1-onto→𝑋 ↔ (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1-onto→𝑋))
23	21, 22	syl 17	. . . . . . . 8 ⊢ ((𝐺 ∈ Grp ∧ 𝑥 ∈ 𝑋) → (((𝑦 ∈ 𝑋 ↦ (𝑧 ∈ 𝑋 ↦ (𝑦(+g‘𝐺)𝑧)))‘𝑥):𝑋–1-1-onto→𝑋 ↔ (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1-onto→𝑋))
24	19, 23	mpbid 221	. . . . . . 7 ⊢ ((𝐺 ∈ Grp ∧ 𝑥 ∈ 𝑋) → (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1-onto→𝑋)
25	4, 24	sylan 487	. . . . . 6 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1-onto→𝑋)
26		f1of1 6049	. . . . . 6 ⊢ ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1-onto→𝑋 → (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1→𝑋)
27	25, 26	syl 17	. . . . 5 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → (𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1→𝑋)
28	6	adantr 480	. . . . 5 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → 𝑌 ⊆ 𝑋)
29		f1ores 6064	. . . . 5 ⊢ (((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)):𝑋–1-1→𝑋 ∧ 𝑌 ⊆ 𝑋) → ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) ↾ 𝑌):𝑌–1-1-onto→((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
30	27, 28, 29	syl2anc 691	. . . 4 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) ↾ 𝑌):𝑌–1-1-onto→((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
31		f1oen2g 7858	. . . 4 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌) ∈ V ∧ ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) ↾ 𝑌):𝑌–1-1-onto→((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌)) → 𝑌 ≈ ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
32	3, 17, 30, 31	syl3anc 1318	. . 3 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → 𝑌 ≈ ((𝑧 ∈ 𝑋 ↦ (𝑥(+g‘𝐺)𝑧)) “ 𝑌))
33	32, 12	breqtrrd 4611	. 2 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 ∈ 𝑋) → 𝑌 ≈ [𝑥] ∼ )
34	1, 2, 33	ectocld 7701	1 ⊢ ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝐴 ∈ (𝑋 / ∼ )) → 𝑌 ≈ 𝐴)

Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383   = wceq 1475   ∈ wcel 1977  Vcvv 3173   ⊆ wss 3540   class class class wbr 4583   ↦ cmpt 4643   ↾ cres 5040   “ cima 5041  –1-1→wf1 5801  –1-1-onto→wf1o 5803  ‘cfv 5804  (class class class)co 6549  [cec 7627   / cqs 7628   ≈ cen 7838  Basecbs 15695  +_gcplusg 15768  Grpcgrp 17245  SubGrpcsubg 17411   ~_QG cqg 17413

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-id 4953  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-ec 7631  df-qs 7635  df-en 7842  df-0g 15925  df-mgm 17065  df-sgrp 17107  df-mnd 17118  df-grp 17248  df-minusg 17249  df-subg 17414  df-eqg 17416

This theorem is referenced by:  lagsubg2  17478  sylow2blem1  17858