| Step | Hyp | Ref
| Expression |
| 1 | | eqger.x |
. . . . . . 7
⊢ 𝑋 = (Base‘𝐺) |
| 2 | | eqid 2737 |
. . . . . . 7
⊢
(invg‘𝐺) = (invg‘𝐺) |
| 3 | | eqglact.3 |
. . . . . . 7
⊢ + =
(+g‘𝐺) |
| 4 | | eqger.r |
. . . . . . 7
⊢ ∼ =
(𝐺 ~QG
𝑌) |
| 5 | 1, 2, 3, 4 | eqgval 19195 |
. . . . . 6
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝐴 ∈ 𝑋 ∧ 𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌))) |
| 6 | | 3anass 1095 |
. . . . . 6
⊢ ((𝐴 ∈ 𝑋 ∧ 𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌) ↔ (𝐴 ∈ 𝑋 ∧ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌))) |
| 7 | 5, 6 | bitrdi 287 |
. . . . 5
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝐴 ∈ 𝑋 ∧ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)))) |
| 8 | 7 | baibd 539 |
. . . 4
⊢ (((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋) ∧ 𝐴 ∈ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌))) |
| 9 | 8 | 3impa 1110 |
. . 3
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → (𝐴 ∼ 𝑥 ↔ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌))) |
| 10 | 9 | abbidv 2808 |
. 2
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → {𝑥 ∣ 𝐴 ∼ 𝑥} = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)}) |
| 11 | | dfec2 8748 |
. . 3
⊢ (𝐴 ∈ 𝑋 → [𝐴] ∼ = {𝑥 ∣ 𝐴 ∼ 𝑥}) |
| 12 | 11 | 3ad2ant3 1136 |
. 2
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = {𝑥 ∣ 𝐴 ∼ 𝑥}) |
| 13 | | eqid 2737 |
. . . . . . . . 9
⊢ (𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥))) = (𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥))) |
| 14 | 13, 1, 3, 2 | grplactcnv 19061 |
. . . . . . . 8
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴):𝑋–1-1-onto→𝑋 ∧ ◡((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴)))) |
| 15 | 14 | simprd 495 |
. . . . . . 7
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴))) |
| 16 | 13, 1 | grplactfval 19059 |
. . . . . . . . 9
⊢ (𝐴 ∈ 𝑋 → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = (𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥))) |
| 17 | 16 | adantl 481 |
. . . . . . . 8
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = (𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥))) |
| 18 | 17 | cnveqd 5886 |
. . . . . . 7
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘𝐴) = ◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥))) |
| 19 | 1, 2 | grpinvcl 19005 |
. . . . . . . 8
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((invg‘𝐺)‘𝐴) ∈ 𝑋) |
| 20 | 13, 1 | grplactfval 19059 |
. . . . . . . 8
⊢
(((invg‘𝐺)‘𝐴) ∈ 𝑋 → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥))) |
| 21 | 19, 20 | syl 17 |
. . . . . . 7
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝑔 ∈ 𝑋 ↦ (𝑥 ∈ 𝑋 ↦ (𝑔 + 𝑥)))‘((invg‘𝐺)‘𝐴)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥))) |
| 22 | 15, 18, 21 | 3eqtr3d 2785 |
. . . . . 6
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥))) |
| 23 | 22 | cnveqd 5886 |
. . . . 5
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) = ◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥))) |
| 24 | 23 | 3adant2 1132 |
. . . 4
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → ◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) = ◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥))) |
| 25 | 24 | imaeq1d 6077 |
. . 3
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → (◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) = (◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) “ 𝑌)) |
| 26 | | imacnvcnv 6226 |
. . 3
⊢ (◡◡(𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) = ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) |
| 27 | | eqid 2737 |
. . . . 5
⊢ (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) = (𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) |
| 28 | 27 | mptpreima 6258 |
. . . 4
⊢ (◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) “ 𝑌) = {𝑥 ∈ 𝑋 ∣ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌} |
| 29 | | df-rab 3437 |
. . . 4
⊢ {𝑥 ∈ 𝑋 ∣ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌} = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)} |
| 30 | 28, 29 | eqtri 2765 |
. . 3
⊢ (◡(𝑥 ∈ 𝑋 ↦ (((invg‘𝐺)‘𝐴) + 𝑥)) “ 𝑌) = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)} |
| 31 | 25, 26, 30 | 3eqtr3g 2800 |
. 2
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌) = {𝑥 ∣ (𝑥 ∈ 𝑋 ∧ (((invg‘𝐺)‘𝐴) + 𝑥) ∈ 𝑌)}) |
| 32 | 10, 12, 31 | 3eqtr4d 2787 |
1
⊢ ((𝐺 ∈ Grp ∧ 𝑌 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑋) → [𝐴] ∼ = ((𝑥 ∈ 𝑋 ↦ (𝐴 + 𝑥)) “ 𝑌)) |