Step | Hyp | Ref
| Expression |
1 | | rng2idlring.r |
. . . . . . . . 9
β’ (π β π
β Rng) |
2 | | rng2idlring.i |
. . . . . . . . 9
β’ (π β πΌ β (2Idealβπ
)) |
3 | | rng2idlring.j |
. . . . . . . . . . . 12
β’ π½ = (π
βΎs πΌ) |
4 | | rng2idlring.u |
. . . . . . . . . . . . 13
β’ (π β π½ β Ring) |
5 | | ringrng 46642 |
. . . . . . . . . . . . 13
β’ (π½ β Ring β π½ β Rng) |
6 | 4, 5 | syl 17 |
. . . . . . . . . . . 12
β’ (π β π½ β Rng) |
7 | 3, 6 | eqeltrrid 2839 |
. . . . . . . . . . 11
β’ (π β (π
βΎs πΌ) β Rng) |
8 | 1, 2, 7 | rng2idlnsg 46743 |
. . . . . . . . . 10
β’ (π β πΌ β (NrmSGrpβπ
)) |
9 | | nsgsubg 19033 |
. . . . . . . . . 10
β’ (πΌ β (NrmSGrpβπ
) β πΌ β (SubGrpβπ
)) |
10 | 8, 9 | syl 17 |
. . . . . . . . 9
β’ (π β πΌ β (SubGrpβπ
)) |
11 | | rngqiprngim.q |
. . . . . . . . . . 11
β’ π = (π
/s βΌ ) |
12 | | rngqiprngim.g |
. . . . . . . . . . . 12
β’ βΌ =
(π
~QG
πΌ) |
13 | 12 | oveq2i 7417 |
. . . . . . . . . . 11
β’ (π
/s βΌ ) =
(π
/s
(π
~QG
πΌ)) |
14 | 11, 13 | eqtri 2761 |
. . . . . . . . . 10
β’ π = (π
/s (π
~QG πΌ)) |
15 | | eqid 2733 |
. . . . . . . . . 10
β’
(2Idealβπ
) =
(2Idealβπ
) |
16 | 14, 15 | qus2idrng 46749 |
. . . . . . . . 9
β’ ((π
β Rng β§ πΌ β (2Idealβπ
) β§ πΌ β (SubGrpβπ
)) β π β Rng) |
17 | 1, 2, 10, 16 | syl3anc 1372 |
. . . . . . . 8
β’ (π β π β Rng) |
18 | | rnggrp 46641 |
. . . . . . . . 9
β’ (π β Rng β π β Grp) |
19 | 18 | grpmndd 18829 |
. . . . . . . 8
β’ (π β Rng β π β Mnd) |
20 | 17, 19 | syl 17 |
. . . . . . 7
β’ (π β π β Mnd) |
21 | | ringmnd 20060 |
. . . . . . . 8
β’ (π½ β Ring β π½ β Mnd) |
22 | 4, 21 | syl 17 |
. . . . . . 7
β’ (π β π½ β Mnd) |
23 | | rngqiprngim.p |
. . . . . . . 8
β’ π = (π Γs π½) |
24 | 23 | xpsmnd0 18663 |
. . . . . . 7
β’ ((π β Mnd β§ π½ β Mnd) β
(0gβπ) =
β¨(0gβπ), (0gβπ½)β©) |
25 | 20, 22, 24 | syl2anc 585 |
. . . . . 6
β’ (π β (0gβπ) =
β¨(0gβπ), (0gβπ½)β©) |
26 | 25 | sneqd 4640 |
. . . . 5
β’ (π β
{(0gβπ)} =
{β¨(0gβπ), (0gβπ½)β©}) |
27 | 26 | imaeq2d 6058 |
. . . 4
β’ (π β (β‘πΉ β {(0gβπ)}) = (β‘πΉ β {β¨(0gβπ), (0gβπ½)β©})) |
28 | | nfv 1918 |
. . . . . 6
β’
β²π₯π |
29 | | opex 5464 |
. . . . . . 7
β’
β¨[π₯] βΌ , (
1 Β· π₯)β© β
V |
30 | 29 | a1i 11 |
. . . . . 6
β’ ((π β§ π₯ β π΅) β β¨[π₯] βΌ , ( 1 Β· π₯)β© β
V) |
31 | | rngqiprngim.f |
. . . . . 6
β’ πΉ = (π₯ β π΅ β¦ β¨[π₯] βΌ , ( 1 Β· π₯)β©) |
32 | 28, 30, 31 | fnmptd 6689 |
. . . . 5
β’ (π β πΉ Fn π΅) |
33 | | fncnvima2 7060 |
. . . . 5
β’ (πΉ Fn π΅ β (β‘πΉ β {β¨(0gβπ), (0gβπ½)β©}) = {π β π΅ β£ (πΉβπ) β {β¨(0gβπ), (0gβπ½)β©}}) |
34 | 32, 33 | syl 17 |
. . . 4
β’ (π β (β‘πΉ β {β¨(0gβπ), (0gβπ½)β©}) = {π β π΅ β£ (πΉβπ) β {β¨(0gβπ), (0gβπ½)β©}}) |
35 | | rng2idlring.b |
. . . . . . . 8
β’ π΅ = (Baseβπ
) |
36 | | rng2idlring.t |
. . . . . . . 8
β’ Β· =
(.rβπ
) |
37 | | rng2idlring.1 |
. . . . . . . 8
β’ 1 =
(1rβπ½) |
38 | | rngqiprngim.c |
. . . . . . . 8
β’ πΆ = (Baseβπ) |
39 | 1, 2, 3, 4, 35, 36, 37, 12, 11, 38, 23, 31 | rngqiprngimfv 46764 |
. . . . . . 7
β’ ((π β§ π β π΅) β (πΉβπ) = β¨[π] βΌ , ( 1 Β· π)β©) |
40 | 39 | eleq1d 2819 |
. . . . . 6
β’ ((π β§ π β π΅) β ((πΉβπ) β {β¨(0gβπ), (0gβπ½)β©} β β¨[π] βΌ , ( 1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©})) |
41 | 40 | rabbidva 3440 |
. . . . 5
β’ (π β {π β π΅ β£ (πΉβπ) β {β¨(0gβπ), (0gβπ½)β©}} = {π β π΅ β£ β¨[π] βΌ , ( 1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©}}) |
42 | | eceq1 8738 |
. . . . . . . 8
β’ (π = (0gβπ
) β [π] βΌ =
[(0gβπ
)]
βΌ
) |
43 | | oveq2 7414 |
. . . . . . . 8
β’ (π = (0gβπ
) β ( 1 Β· π) = ( 1 Β·
(0gβπ
))) |
44 | 42, 43 | opeq12d 4881 |
. . . . . . 7
β’ (π = (0gβπ
) β β¨[π] βΌ , ( 1 Β· π)β© =
β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β©) |
45 | 44 | eleq1d 2819 |
. . . . . 6
β’ (π = (0gβπ
) β (β¨[π] βΌ , ( 1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©} β
β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β© β
{β¨(0gβπ), (0gβπ½)β©})) |
46 | | rnggrp 46641 |
. . . . . . . . 9
β’ (π
β Rng β π
β Grp) |
47 | 1, 46 | syl 17 |
. . . . . . . 8
β’ (π β π
β Grp) |
48 | 47 | grpmndd 18829 |
. . . . . . 7
β’ (π β π
β Mnd) |
49 | | eqid 2733 |
. . . . . . . 8
β’
(0gβπ
) = (0gβπ
) |
50 | 35, 49 | mndidcl 18637 |
. . . . . . 7
β’ (π
β Mnd β
(0gβπ
)
β π΅) |
51 | 48, 50 | syl 17 |
. . . . . 6
β’ (π β (0gβπ
) β π΅) |
52 | 12 | eceq2i 8741 |
. . . . . . . . 9
β’
[(0gβπ
)] βΌ =
[(0gβπ
)](π
~QG πΌ) |
53 | 14, 49 | qus0 19063 |
. . . . . . . . . 10
β’ (πΌ β (NrmSGrpβπ
) β
[(0gβπ
)](π
~QG πΌ) = (0gβπ)) |
54 | 8, 53 | syl 17 |
. . . . . . . . 9
β’ (π β
[(0gβπ
)](π
~QG πΌ) = (0gβπ)) |
55 | 52, 54 | eqtrid 2785 |
. . . . . . . 8
β’ (π β
[(0gβπ
)]
βΌ
= (0gβπ)) |
56 | 1, 2, 7 | rng2idl0 46744 |
. . . . . . . . . . 11
β’ (π β (0gβπ
) β πΌ) |
57 | 35, 15 | 2idlss 20861 |
. . . . . . . . . . . 12
β’ (πΌ β (2Idealβπ
) β πΌ β π΅) |
58 | 2, 57 | syl 17 |
. . . . . . . . . . 11
β’ (π β πΌ β π΅) |
59 | 3, 35, 49 | ress0g 18650 |
. . . . . . . . . . 11
β’ ((π
β Mnd β§
(0gβπ
)
β πΌ β§ πΌ β π΅) β (0gβπ
) = (0gβπ½)) |
60 | 48, 56, 58, 59 | syl3anc 1372 |
. . . . . . . . . 10
β’ (π β (0gβπ
) = (0gβπ½)) |
61 | 60 | oveq2d 7422 |
. . . . . . . . 9
β’ (π β ( 1 Β·
(0gβπ
)) =
( 1 Β·
(0gβπ½))) |
62 | 3, 36 | ressmulr 17249 |
. . . . . . . . . . 11
β’ (πΌ β (2Idealβπ
) β Β· =
(.rβπ½)) |
63 | 2, 62 | syl 17 |
. . . . . . . . . 10
β’ (π β Β· =
(.rβπ½)) |
64 | 63 | oveqd 7423 |
. . . . . . . . 9
β’ (π β ( 1 Β·
(0gβπ½)) =
( 1
(.rβπ½)(0gβπ½))) |
65 | | eqid 2733 |
. . . . . . . . . . 11
β’
(Baseβπ½) =
(Baseβπ½) |
66 | 65, 37 | ringidcl 20077 |
. . . . . . . . . 10
β’ (π½ β Ring β 1 β
(Baseβπ½)) |
67 | | eqid 2733 |
. . . . . . . . . . 11
β’
(.rβπ½) = (.rβπ½) |
68 | | eqid 2733 |
. . . . . . . . . . 11
β’
(0gβπ½) = (0gβπ½) |
69 | 65, 67, 68 | ringrz 20102 |
. . . . . . . . . 10
β’ ((π½ β Ring β§ 1 β
(Baseβπ½)) β (
1
(.rβπ½)(0gβπ½)) = (0gβπ½)) |
70 | 4, 66, 69 | syl2anc2 586 |
. . . . . . . . 9
β’ (π β ( 1 (.rβπ½)(0gβπ½)) = (0gβπ½)) |
71 | 61, 64, 70 | 3eqtrd 2777 |
. . . . . . . 8
β’ (π β ( 1 Β·
(0gβπ
)) =
(0gβπ½)) |
72 | 55, 71 | opeq12d 4881 |
. . . . . . 7
β’ (π β
β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β© = β¨(0gβπ), (0gβπ½)β©) |
73 | | opex 5464 |
. . . . . . . 8
β’
β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β© β V |
74 | 73 | elsn 4643 |
. . . . . . 7
β’
(β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β© β
{β¨(0gβπ), (0gβπ½)β©} β
β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β© = β¨(0gβπ), (0gβπ½)β©) |
75 | 72, 74 | sylibr 233 |
. . . . . 6
β’ (π β
β¨[(0gβπ
)] βΌ , ( 1 Β·
(0gβπ
))β© β
{β¨(0gβπ), (0gβπ½)β©}) |
76 | | opex 5464 |
. . . . . . . . . 10
β’
β¨[π] βΌ , (
1 Β· π)β© β
V |
77 | 76 | elsn 4643 |
. . . . . . . . 9
β’
(β¨[π] βΌ , (
1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©} β β¨[π] βΌ , ( 1 Β· π)β© =
β¨(0gβπ), (0gβπ½)β©) |
78 | 12 | ovexi 7440 |
. . . . . . . . . . 11
β’ βΌ β
V |
79 | | ecexg 8704 |
. . . . . . . . . . 11
β’ ( βΌ β
V β [π] βΌ β
V) |
80 | 78, 79 | ax-mp 5 |
. . . . . . . . . 10
β’ [π] βΌ β
V |
81 | | ovex 7439 |
. . . . . . . . . 10
β’ ( 1 Β· π) β V |
82 | 80, 81 | opth 5476 |
. . . . . . . . 9
β’
(β¨[π] βΌ , (
1 Β· π)β© =
β¨(0gβπ), (0gβπ½)β© β ([π] βΌ =
(0gβπ)
β§ ( 1
Β·
π) =
(0gβπ½))) |
83 | 77, 82 | bitri 275 |
. . . . . . . 8
β’
(β¨[π] βΌ , (
1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©} β ([π] βΌ =
(0gβπ)
β§ ( 1
Β·
π) =
(0gβπ½))) |
84 | 1, 2, 3, 4, 35, 36, 37, 12, 11 | rngqiprngimf1lem 46760 |
. . . . . . . 8
β’ ((π β§ π β π΅) β (([π] βΌ =
(0gβπ)
β§ ( 1
Β·
π) =
(0gβπ½))
β π =
(0gβπ
))) |
85 | 83, 84 | biimtrid 241 |
. . . . . . 7
β’ ((π β§ π β π΅) β (β¨[π] βΌ , ( 1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©} β π = (0gβπ
))) |
86 | 85 | imp 408 |
. . . . . 6
β’ (((π β§ π β π΅) β§ β¨[π] βΌ , ( 1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©}) β π = (0gβπ
)) |
87 | 45, 51, 75, 86 | rabeqsnd 4671 |
. . . . 5
β’ (π β {π β π΅ β£ β¨[π] βΌ , ( 1 Β· π)β© β
{β¨(0gβπ), (0gβπ½)β©}} = {(0gβπ
)}) |
88 | 41, 87 | eqtrd 2773 |
. . . 4
β’ (π β {π β π΅ β£ (πΉβπ) β {β¨(0gβπ), (0gβπ½)β©}} =
{(0gβπ
)}) |
89 | 27, 34, 88 | 3eqtrd 2777 |
. . 3
β’ (π β (β‘πΉ β {(0gβπ)}) =
{(0gβπ
)}) |
90 | 1, 2, 3, 4, 35, 36, 37, 12, 11, 38, 23, 31 | rngqiprngghm 46765 |
. . . 4
β’ (π β πΉ β (π
GrpHom π)) |
91 | | eqid 2733 |
. . . . 5
β’
(Baseβπ) =
(Baseβπ) |
92 | | eqid 2733 |
. . . . 5
β’
(0gβπ) = (0gβπ) |
93 | 35, 91, 49, 92 | kerf1ghm 20275 |
. . . 4
β’ (πΉ β (π
GrpHom π) β (πΉ:π΅β1-1β(Baseβπ) β (β‘πΉ β {(0gβπ)}) =
{(0gβπ
)})) |
94 | 90, 93 | syl 17 |
. . 3
β’ (π β (πΉ:π΅β1-1β(Baseβπ) β (β‘πΉ β {(0gβπ)}) =
{(0gβπ
)})) |
95 | 89, 94 | mpbird 257 |
. 2
β’ (π β πΉ:π΅β1-1β(Baseβπ)) |
96 | | eqidd 2734 |
. . 3
β’ (π β πΉ = πΉ) |
97 | | eqidd 2734 |
. . 3
β’ (π β π΅ = π΅) |
98 | 1, 2, 3, 4, 35, 36, 37, 12, 11, 38, 23 | rngqipbas 46761 |
. . 3
β’ (π β (Baseβπ) = (πΆ Γ πΌ)) |
99 | 96, 97, 98 | f1eq123d 6823 |
. 2
β’ (π β (πΉ:π΅β1-1β(Baseβπ) β πΉ:π΅β1-1β(πΆ Γ πΌ))) |
100 | 95, 99 | mpbid 231 |
1
β’ (π β πΉ:π΅β1-1β(πΆ Γ πΌ)) |