Theorem eqglact 14081

Description: A left coset can be expressed as the image of a left action. (Contributed by Mario Carneiro, 20-Sep-2015.)

Hypotheses

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

Assertion

Ref	Expression
eqglact	⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌))

Distinct variable groups:   𝑥, +   𝑥, ∼   𝑥,𝐺   𝑥,𝑋   𝑥,𝐴   𝑥,𝑌

Proof of Theorem eqglact

Dummy variable 𝑔 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqger.x	. . . . . . 7 ⊢ 𝑋 = (Base‘𝐺)
2		eqid 2238	. . . . . . 7 ⊢ (invg‘𝐺) = (invg‘𝐺)
3		eqglact.3	. . . . . . 7 ⊢ + = (+g‘𝐺)
4		eqger.r	. . . . . . 7 ⊢ ∼ = (𝐺 ~QG 𝑌)
5	1, 2, 3, 4	eqgval 14079	. . . . . 6 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝐴 ∈ 𝑋 ∧ 𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)))
6		3anass 1013	. . . . . 6 ⊢ ((𝐴 ∈ 𝑋 ∧ 𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌) ↔ (𝐴 ∈ 𝑋 ∧ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)))
7	5, 6	bitrdi 196	. . . . 5 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝐴 ∈ 𝑋 ∧ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌))))
8	7	baibd 935	. . . 4 ⊢ (((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) ∧ 𝐴 ∈ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)))
9	8	3impa 1225	. . 3 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)))
10	9	abbidv 2358	. 2 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → {𝑥 ∣ 𝐴 ∼ 𝑥} = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)})
11		dfec2 6810	. . 3 ⊢ (𝐴 ∈ 𝑋 → [𝐴] ∼ = {𝑥 ∣ 𝐴 ∼ 𝑥})
12	11	3ad2ant3 1051	. 2 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = {𝑥 ∣ 𝐴 ∼ 𝑥})
13		eqid 2238	. . . . . . . . 9 ⊢ (𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥))) = (𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))
14	13, 1, 3, 2	grplactcnv 13960	. . . . . . . 8 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴):𝑋–1-1-onto→𝑋 ∧ ◡((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴))))
15	14	simprd 114	. . . . . . 7 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴)))
16	13, 1	grplactfval 13959	. . . . . . . . 9 ⊢ (𝐴 ∈ 𝑋 → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = (𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)))
17	16	adantl 277	. . . . . . . 8 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = (𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)))
18	17	cnveqd 4956	. . . . . . 7 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = ◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)))
19	1, 2	grpinvcl 13906	. . . . . . . 8 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((invg‘𝐺)‘𝐴) ∈ 𝑋)
20	13, 1	grplactfval 13959	. . . . . . . 8 ⊢ (((invg‘𝐺)‘𝐴) ∈ 𝑋 → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)))
21	19, 20	syl 14	. . . . . . 7 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)))
22	15, 18, 21	3eqtr3d 2279	. . . . . 6 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)))
23	22	cnveqd 4956	. . . . 5 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) = ◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)))
24	23	3adant2 1047	. . . 4 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → ◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) = ◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)))
25	24	imaeq1d 5125	. . 3 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → (◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) = (◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) “ 𝑌))
26		imacnvcnv 5252	. . 3 ⊢ (◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) = ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌)
27		eqid 2238	. . . . 5 ⊢ (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥))
28	27	mptpreima 5281	. . . 4 ⊢ (◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) “ 𝑌) = {𝑥 ∈ 𝑋 ∣ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌}
29		df-rab 2537	. . . 4 ⊢ {𝑥 ∈ 𝑋 ∣ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌} = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)}
30	28, 29	eqtri 2259	. . 3 ⊢ (◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) “ 𝑌) = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)}
31	25, 26, 30	3eqtr3g 2294	. 2 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)})
32	10, 12, 31	3eqtr4d 2281	1 ⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌))

This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 1009   = wceq 1402   ∈ wcel 2209  {cab 2224  {crab 2532   ⊆ wss 3220   class class class wbr 4130   ↦ cmpt 4192  ^◡ccnv 4773   “ cima 4777  –1-1-onto→wf1o 5376  ‘cfv 5377  (class class class)co 6085  [cec 6805  Basecbs 13404  +_gcplusg 13484  Grpcgrp 13858  inv_gcminusg 13859   ~_QG cqg 14025

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-pow 4311  ax-pr 4346  ax-un 4578  ax-setind 4684  ax-cnex 8271  ax-resscn 8272  ax-1re 8274  ax-addrcl 8277

This proof depends on definitions:  df-bi 117  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-id 4438  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-riota 6038  df-ov 6088  df-oprab 6089  df-mpo 6090  df-ec 6809  df-inn 9308  df-2 9366  df-ndx 13407  df-slot 13408  df-base 13410  df-plusg 13497  df-0g 13665  df-mgm 13729  df-sgrp 13770  df-mnd 13783  df-grp 13861  df-minusg 13862  df-eqg 14028

This theorem is used by:  eqgen  14083