Step | Hyp | Ref
| Expression |
1 | | eqid 2610 |
. . 3
⊢ (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)) = (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)) |
2 | | grplact.2 |
. . . . 5
⊢ 𝑋 = (Base‘𝐺) |
3 | | grplact.3 |
. . . . 5
⊢ + =
(+g‘𝐺) |
4 | 2, 3 | grpcl 17253 |
. . . 4
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋 ∧ 𝑎 ∈ 𝑋) → (𝐴 + 𝑎) ∈ 𝑋) |
5 | 4 | 3expa 1257 |
. . 3
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ 𝑎 ∈ 𝑋) → (𝐴 + 𝑎) ∈ 𝑋) |
6 | | simpl 472 |
. . . . 5
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → 𝐺 ∈ Grp) |
7 | | grplactcnv.4 |
. . . . . 6
⊢ 𝐼 = (invg‘𝐺) |
8 | 2, 7 | grpinvcl 17290 |
. . . . 5
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (𝐼‘𝐴) ∈ 𝑋) |
9 | 6, 8 | jca 553 |
. . . 4
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (𝐺 ∈ Grp ∧ (𝐼‘𝐴) ∈ 𝑋)) |
10 | 2, 3 | grpcl 17253 |
. . . . 5
⊢ ((𝐺 ∈ Grp ∧ (𝐼‘𝐴) ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → ((𝐼‘𝐴) + 𝑏) ∈ 𝑋) |
11 | 10 | 3expa 1257 |
. . . 4
⊢ (((𝐺 ∈ Grp ∧ (𝐼‘𝐴) ∈ 𝑋) ∧ 𝑏 ∈ 𝑋) → ((𝐼‘𝐴) + 𝑏) ∈ 𝑋) |
12 | 9, 11 | sylan 487 |
. . 3
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ 𝑏 ∈ 𝑋) → ((𝐼‘𝐴) + 𝑏) ∈ 𝑋) |
13 | | eqcom 2617 |
. . . . 5
⊢ (𝑎 = ((𝐼‘𝐴) + 𝑏) ↔ ((𝐼‘𝐴) + 𝑏) = 𝑎) |
14 | | eqid 2610 |
. . . . . . . . . 10
⊢
(0g‘𝐺) = (0g‘𝐺) |
15 | 2, 3, 14, 7 | grplinv 17291 |
. . . . . . . . 9
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝐼‘𝐴) + 𝐴) = (0g‘𝐺)) |
16 | 15 | adantr 480 |
. . . . . . . 8
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((𝐼‘𝐴) + 𝐴) = (0g‘𝐺)) |
17 | 16 | oveq1d 6564 |
. . . . . . 7
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((𝐼‘𝐴) + 𝐴) + 𝑎) = ((0g‘𝐺) + 𝑎)) |
18 | | simpll 786 |
. . . . . . . 8
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝐺 ∈ Grp) |
19 | 8 | adantr 480 |
. . . . . . . 8
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝐼‘𝐴) ∈ 𝑋) |
20 | | simplr 788 |
. . . . . . . 8
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝐴 ∈ 𝑋) |
21 | | simprl 790 |
. . . . . . . 8
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑎 ∈ 𝑋) |
22 | 2, 3 | grpass 17254 |
. . . . . . . 8
⊢ ((𝐺 ∈ Grp ∧ ((𝐼‘𝐴) ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝑎 ∈ 𝑋)) → (((𝐼‘𝐴) + 𝐴) + 𝑎) = ((𝐼‘𝐴) + (𝐴 + 𝑎))) |
23 | 18, 19, 20, 21, 22 | syl13anc 1320 |
. . . . . . 7
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((𝐼‘𝐴) + 𝐴) + 𝑎) = ((𝐼‘𝐴) + (𝐴 + 𝑎))) |
24 | 2, 3, 14 | grplid 17275 |
. . . . . . . 8
⊢ ((𝐺 ∈ Grp ∧ 𝑎 ∈ 𝑋) → ((0g‘𝐺) + 𝑎) = 𝑎) |
25 | 24 | ad2ant2r 779 |
. . . . . . 7
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((0g‘𝐺) + 𝑎) = 𝑎) |
26 | 17, 23, 25 | 3eqtr3rd 2653 |
. . . . . 6
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑎 = ((𝐼‘𝐴) + (𝐴 + 𝑎))) |
27 | 26 | eqeq2d 2620 |
. . . . 5
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((𝐼‘𝐴) + 𝑏) = 𝑎 ↔ ((𝐼‘𝐴) + 𝑏) = ((𝐼‘𝐴) + (𝐴 + 𝑎)))) |
28 | 13, 27 | syl5bb 271 |
. . . 4
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝑎 = ((𝐼‘𝐴) + 𝑏) ↔ ((𝐼‘𝐴) + 𝑏) = ((𝐼‘𝐴) + (𝐴 + 𝑎)))) |
29 | | simprr 792 |
. . . . 5
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑏 ∈ 𝑋) |
30 | 5 | adantrr 749 |
. . . . 5
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝐴 + 𝑎) ∈ 𝑋) |
31 | 2, 3 | grplcan 17300 |
. . . . 5
⊢ ((𝐺 ∈ Grp ∧ (𝑏 ∈ 𝑋 ∧ (𝐴 + 𝑎) ∈ 𝑋 ∧ (𝐼‘𝐴) ∈ 𝑋)) → (((𝐼‘𝐴) + 𝑏) = ((𝐼‘𝐴) + (𝐴 + 𝑎)) ↔ 𝑏 = (𝐴 + 𝑎))) |
32 | 18, 29, 30, 19, 31 | syl13anc 1320 |
. . . 4
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((𝐼‘𝐴) + 𝑏) = ((𝐼‘𝐴) + (𝐴 + 𝑎)) ↔ 𝑏 = (𝐴 + 𝑎))) |
33 | 28, 32 | bitrd 267 |
. . 3
⊢ (((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝑎 = ((𝐼‘𝐴) + 𝑏) ↔ 𝑏 = (𝐴 + 𝑎))) |
34 | 1, 5, 12, 33 | f1ocnv2d 6784 |
. 2
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)):𝑋–1-1-onto→𝑋 ∧ ◡(𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)) = (𝑏 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑏)))) |
35 | | grplact.1 |
. . . . . 6
⊢ 𝐹 = (𝑔 ∈ 𝑋 ↦ (𝑎 ∈ 𝑋 ↦ (𝑔 + 𝑎))) |
36 | 35, 2 | grplactfval 17339 |
. . . . 5
⊢ (𝐴 ∈ 𝑋 → (𝐹‘𝐴) = (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎))) |
37 | 36 | adantl 481 |
. . . 4
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (𝐹‘𝐴) = (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎))) |
38 | | f1oeq1 6040 |
. . . 4
⊢ ((𝐹‘𝐴) = (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)) → ((𝐹‘𝐴):𝑋–1-1-onto→𝑋 ↔ (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)):𝑋–1-1-onto→𝑋)) |
39 | 37, 38 | syl 17 |
. . 3
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝐹‘𝐴):𝑋–1-1-onto→𝑋 ↔ (𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)):𝑋–1-1-onto→𝑋)) |
40 | 37 | cnveqd 5220 |
. . . 4
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ◡(𝐹‘𝐴) = ◡(𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎))) |
41 | 35, 2 | grplactfval 17339 |
. . . . . 6
⊢ ((𝐼‘𝐴) ∈ 𝑋 → (𝐹‘(𝐼‘𝐴)) = (𝑎 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑎))) |
42 | | oveq2 6557 |
. . . . . . 7
⊢ (𝑎 = 𝑏 → ((𝐼‘𝐴) + 𝑎) = ((𝐼‘𝐴) + 𝑏)) |
43 | 42 | cbvmptv 4678 |
. . . . . 6
⊢ (𝑎 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑎)) = (𝑏 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑏)) |
44 | 41, 43 | syl6eq 2660 |
. . . . 5
⊢ ((𝐼‘𝐴) ∈ 𝑋 → (𝐹‘(𝐼‘𝐴)) = (𝑏 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑏))) |
45 | 8, 44 | syl 17 |
. . . 4
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (𝐹‘(𝐼‘𝐴)) = (𝑏 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑏))) |
46 | 40, 45 | eqeq12d 2625 |
. . 3
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (◡(𝐹‘𝐴) = (𝐹‘(𝐼‘𝐴)) ↔ ◡(𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)) = (𝑏 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑏)))) |
47 | 39, 46 | anbi12d 743 |
. 2
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → (((𝐹‘𝐴):𝑋–1-1-onto→𝑋 ∧ ◡(𝐹‘𝐴) = (𝐹‘(𝐼‘𝐴))) ↔ ((𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)):𝑋–1-1-onto→𝑋 ∧ ◡(𝑎 ∈ 𝑋 ↦ (𝐴 + 𝑎)) = (𝑏 ∈ 𝑋 ↦ ((𝐼‘𝐴) + 𝑏))))) |
48 | 34, 47 | mpbird 246 |
1
⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝑋) → ((𝐹‘𝐴):𝑋–1-1-onto→𝑋 ∧ ◡(𝐹‘𝐴) = (𝐹‘(𝐼‘𝐴)))) |