Step | Hyp | Ref
| Expression |
1 | | 2idlcpbl.x |
. . . 4
β’ π = (Baseβπ
) |
2 | | 2idlcpbl.t |
. . . 4
β’ Β· =
(.rβπ
) |
3 | | simpll 765 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π
β Ring) |
4 | | eqid 2732 |
. . . . . . . . . . . 12
β’
(LIdealβπ
) =
(LIdealβπ
) |
5 | | eqid 2732 |
. . . . . . . . . . . 12
β’
(opprβπ
) = (opprβπ
) |
6 | | eqid 2732 |
. . . . . . . . . . . 12
β’
(LIdealβ(opprβπ
)) =
(LIdealβ(opprβπ
)) |
7 | | 2idlcpbl.i |
. . . . . . . . . . . 12
β’ πΌ = (2Idealβπ
) |
8 | 4, 5, 6, 7 | 2idlelb 20857 |
. . . . . . . . . . 11
β’ (π β πΌ β (π β (LIdealβπ
) β§ π β
(LIdealβ(opprβπ
)))) |
9 | 8 | simplbi 498 |
. . . . . . . . . 10
β’ (π β πΌ β π β (LIdealβπ
)) |
10 | 9 | ad2antlr 725 |
. . . . . . . . 9
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π β (LIdealβπ
)) |
11 | 4 | lidlsubg 20830 |
. . . . . . . . 9
β’ ((π
β Ring β§ π β (LIdealβπ
)) β π β (SubGrpβπ
)) |
12 | 3, 10, 11 | syl2anc 584 |
. . . . . . . 8
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π β (SubGrpβπ
)) |
13 | | 2idlcpbl.r |
. . . . . . . . 9
β’ πΈ = (π
~QG π) |
14 | 1, 13 | eqger 19052 |
. . . . . . . 8
β’ (π β (SubGrpβπ
) β πΈ Er π) |
15 | 12, 14 | syl 17 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β πΈ Er π) |
16 | | simprl 769 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π΄πΈπΆ) |
17 | 15, 16 | ersym 8711 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β πΆπΈπ΄) |
18 | | ringabl 20091 |
. . . . . . . 8
β’ (π
β Ring β π
β Abel) |
19 | 18 | ad2antrr 724 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π
β Abel) |
20 | 1, 7 | 2idlss 20860 |
. . . . . . . 8
β’ (π β πΌ β π β π) |
21 | 20 | ad2antlr 725 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π β π) |
22 | | eqid 2732 |
. . . . . . . 8
β’
(-gβπ
) = (-gβπ
) |
23 | 1, 22, 13 | eqgabl 19696 |
. . . . . . 7
β’ ((π
β Abel β§ π β π) β (πΆπΈπ΄ β (πΆ β π β§ π΄ β π β§ (π΄(-gβπ
)πΆ) β π))) |
24 | 19, 21, 23 | syl2anc 584 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (πΆπΈπ΄ β (πΆ β π β§ π΄ β π β§ (π΄(-gβπ
)πΆ) β π))) |
25 | 17, 24 | mpbid 231 |
. . . . 5
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (πΆ β π β§ π΄ β π β§ (π΄(-gβπ
)πΆ) β π)) |
26 | 25 | simp2d 1143 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π΄ β π) |
27 | | simprr 771 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π΅πΈπ·) |
28 | 1, 22, 13 | eqgabl 19696 |
. . . . . . 7
β’ ((π
β Abel β§ π β π) β (π΅πΈπ· β (π΅ β π β§ π· β π β§ (π·(-gβπ
)π΅) β π))) |
29 | 19, 21, 28 | syl2anc 584 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΅πΈπ· β (π΅ β π β§ π· β π β§ (π·(-gβπ
)π΅) β π))) |
30 | 27, 29 | mpbid 231 |
. . . . 5
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΅ β π β§ π· β π β§ (π·(-gβπ
)π΅) β π)) |
31 | 30 | simp1d 1142 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π΅ β π) |
32 | 1, 2, 3, 26, 31 | ringcld 20073 |
. . 3
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΄ Β· π΅) β π) |
33 | 25 | simp1d 1142 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β πΆ β π) |
34 | 30 | simp2d 1143 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π· β π) |
35 | 1, 2, 3, 33, 34 | ringcld 20073 |
. . 3
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (πΆ Β· π·) β π) |
36 | | ringgrp 20054 |
. . . . . 6
β’ (π
β Ring β π
β Grp) |
37 | 36 | ad2antrr 724 |
. . . . 5
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π
β Grp) |
38 | 1, 2, 3, 33, 31 | ringcld 20073 |
. . . . 5
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (πΆ Β· π΅) β π) |
39 | 1, 22 | grpnnncan2 18916 |
. . . . 5
β’ ((π
β Grp β§ ((πΆ Β· π·) β π β§ (π΄ Β· π΅) β π β§ (πΆ Β· π΅) β π)) β (((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅))(-gβπ
)((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅))) = ((πΆ Β· π·)(-gβπ
)(π΄ Β· π΅))) |
40 | 37, 35, 32, 38, 39 | syl13anc 1372 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅))(-gβπ
)((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅))) = ((πΆ Β· π·)(-gβπ
)(π΄ Β· π΅))) |
41 | 1, 2, 22, 3, 33, 34, 31 | ringsubdi 20112 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (πΆ Β· (π·(-gβπ
)π΅)) = ((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅))) |
42 | 30 | simp3d 1144 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π·(-gβπ
)π΅) β π) |
43 | 4, 1, 2 | lidlmcl 20832 |
. . . . . . 7
β’ (((π
β Ring β§ π β (LIdealβπ
)) β§ (πΆ β π β§ (π·(-gβπ
)π΅) β π)) β (πΆ Β· (π·(-gβπ
)π΅)) β π) |
44 | 3, 10, 33, 42, 43 | syl22anc 837 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (πΆ Β· (π·(-gβπ
)π΅)) β π) |
45 | 41, 44 | eqeltrrd 2834 |
. . . . 5
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β ((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅)) β π) |
46 | | eqid 2732 |
. . . . . . . 8
β’
(.rβ(opprβπ
)) =
(.rβ(opprβπ
)) |
47 | 1, 2, 5, 46 | opprmul 20145 |
. . . . . . 7
β’ (π΅(.rβ(opprβπ
))(π΄(-gβπ
)πΆ))
= ((π΄(-gβπ
)πΆ) Β· π΅) |
48 | 1, 2, 22, 3, 26, 33, 31 | ringsubdir 20113 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β ((π΄(-gβπ
)πΆ) Β· π΅) = ((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅))) |
49 | 47, 48 | eqtrid 2784 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΅(.rβ(opprβπ
))(π΄(-gβπ
)πΆ))
= ((π΄ Β· π΅)(-gβπ
)(πΆ
Β· π΅))) |
50 | 5 | opprring 20153 |
. . . . . . . 8
β’ (π
β Ring β
(opprβπ
) β Ring) |
51 | 50 | ad2antrr 724 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β
(opprβπ
) β Ring) |
52 | 8 | simprbi 497 |
. . . . . . . 8
β’ (π β πΌ β π β
(LIdealβ(opprβπ
))) |
53 | 52 | ad2antlr 725 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β π β
(LIdealβ(opprβπ
))) |
54 | 25 | simp3d 1144 |
. . . . . . 7
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΄(-gβπ
)πΆ) β π) |
55 | 5, 1 | opprbas 20149 |
. . . . . . . 8
β’ π =
(Baseβ(opprβπ
)) |
56 | 6, 55, 46 | lidlmcl 20832 |
. . . . . . 7
β’
((((opprβπ
) β Ring β§ π β
(LIdealβ(opprβπ
))) β§ (π΅ β π β§ (π΄(-gβπ
)πΆ) β π)) β (π΅(.rβ(opprβπ
))(π΄(-gβπ
)πΆ))
β π) |
57 | 51, 53, 31, 54, 56 | syl22anc 837 |
. . . . . 6
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΅(.rβ(opprβπ
))(π΄(-gβπ
)πΆ))
β π) |
58 | 49, 57 | eqeltrrd 2834 |
. . . . 5
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β ((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅)) β π) |
59 | 4, 22 | lidlsubcl 20831 |
. . . . 5
β’ (((π
β Ring β§ π β (LIdealβπ
)) β§ (((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅)) β π β§ ((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅)) β π)) β (((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅))(-gβπ
)((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅))) β π) |
60 | 3, 10, 45, 58, 59 | syl22anc 837 |
. . . 4
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (((πΆ Β· π·)(-gβπ
)(πΆ Β· π΅))(-gβπ
)((π΄ Β· π΅)(-gβπ
)(πΆ Β· π΅))) β π) |
61 | 40, 60 | eqeltrrd 2834 |
. . 3
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β ((πΆ Β· π·)(-gβπ
)(π΄ Β· π΅)) β π) |
62 | 1, 22, 13 | eqgabl 19696 |
. . . 4
β’ ((π
β Abel β§ π β π) β ((π΄ Β· π΅)πΈ(πΆ Β· π·) β ((π΄ Β· π΅) β π β§ (πΆ Β· π·) β π β§ ((πΆ Β· π·)(-gβπ
)(π΄ Β· π΅)) β π))) |
63 | 19, 21, 62 | syl2anc 584 |
. . 3
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β ((π΄ Β· π΅)πΈ(πΆ Β· π·) β ((π΄ Β· π΅) β π β§ (πΆ Β· π·) β π β§ ((πΆ Β· π·)(-gβπ
)(π΄ Β· π΅)) β π))) |
64 | 32, 35, 61, 63 | mpbir3and 1342 |
. 2
β’ (((π
β Ring β§ π β πΌ) β§ (π΄πΈπΆ β§ π΅πΈπ·)) β (π΄ Β· π΅)πΈ(πΆ Β· π·)) |
65 | 64 | ex 413 |
1
β’ ((π
β Ring β§ π β πΌ) β ((π΄πΈπΆ β§ π΅πΈπ·) β (π΄ Β· π΅)πΈ(πΆ Β· π·))) |