Step | Hyp | Ref
| Expression |
1 | | qsdrng.r |
. . . . . 6
β’ (π β π
β NzRing) |
2 | | nzrring 20245 |
. . . . . 6
β’ (π
β NzRing β π
β Ring) |
3 | 1, 2 | syl 17 |
. . . . 5
β’ (π β π
β Ring) |
4 | 3 | adantr 481 |
. . . 4
β’ ((π β§ π β DivRing) β π
β Ring) |
5 | | qsdrng.2 |
. . . . . 6
β’ (π β π β (2Idealβπ
)) |
6 | 5 | 2idllidld 20805 |
. . . . 5
β’ (π β π β (LIdealβπ
)) |
7 | 6 | adantr 481 |
. . . 4
β’ ((π β§ π β DivRing) β π β (LIdealβπ
)) |
8 | | drngnzr 20284 |
. . . . . . 7
β’ (π β DivRing β π β NzRing) |
9 | 8 | ad2antlr 725 |
. . . . . 6
β’ (((π β§ π β DivRing) β§ π = (Baseβπ
)) β π β NzRing) |
10 | | qsdrng.q |
. . . . . . . . . . 11
β’ π = (π
/s (π
~QG π)) |
11 | | eqid 2731 |
. . . . . . . . . . 11
β’
(2Idealβπ
) =
(2Idealβπ
) |
12 | 10, 11 | qusring 20809 |
. . . . . . . . . 10
β’ ((π
β Ring β§ π β (2Idealβπ
)) β π β Ring) |
13 | 3, 5, 12 | syl2anc 584 |
. . . . . . . . 9
β’ (π β π β Ring) |
14 | 13 | adantr 481 |
. . . . . . . 8
β’ ((π β§ π = (Baseβπ
)) β π β Ring) |
15 | | oveq2 7401 |
. . . . . . . . . . . . . 14
β’ (π = (Baseβπ
) β (π
~QG π) = (π
~QG (Baseβπ
))) |
16 | 15 | oveq2d 7409 |
. . . . . . . . . . . . 13
β’ (π = (Baseβπ
) β (π
/s (π
~QG π)) = (π
/s (π
~QG (Baseβπ
)))) |
17 | 10, 16 | eqtrid 2783 |
. . . . . . . . . . . 12
β’ (π = (Baseβπ
) β π = (π
/s (π
~QG (Baseβπ
)))) |
18 | 17 | fveq2d 6882 |
. . . . . . . . . . 11
β’ (π = (Baseβπ
) β (Baseβπ) = (Baseβ(π
/s (π
~QG (Baseβπ
))))) |
19 | 3 | ringgrpd 20023 |
. . . . . . . . . . . 12
β’ (π β π
β Grp) |
20 | | eqid 2731 |
. . . . . . . . . . . . 13
β’
(Baseβπ
) =
(Baseβπ
) |
21 | | eqid 2731 |
. . . . . . . . . . . . 13
β’ (π
/s (π
~QG
(Baseβπ
))) = (π
/s (π
~QG
(Baseβπ
))) |
22 | 20, 21 | qustriv 32338 |
. . . . . . . . . . . 12
β’ (π
β Grp β
(Baseβ(π
/s (π
~QG (Baseβπ
)))) = {(Baseβπ
)}) |
23 | 19, 22 | syl 17 |
. . . . . . . . . . 11
β’ (π β (Baseβ(π
/s (π
~QG
(Baseβπ
)))) =
{(Baseβπ
)}) |
24 | 18, 23 | sylan9eqr 2793 |
. . . . . . . . . 10
β’ ((π β§ π = (Baseβπ
)) β (Baseβπ) = {(Baseβπ
)}) |
25 | 24 | fveq2d 6882 |
. . . . . . . . 9
β’ ((π β§ π = (Baseβπ
)) β (β―β(Baseβπ)) =
(β―β{(Baseβπ
)})) |
26 | | fvex 6891 |
. . . . . . . . . 10
β’
(Baseβπ
)
β V |
27 | | hashsng 14311 |
. . . . . . . . . 10
β’
((Baseβπ
)
β V β (β―β{(Baseβπ
)}) = 1) |
28 | 26, 27 | ax-mp 5 |
. . . . . . . . 9
β’
(β―β{(Baseβπ
)}) = 1 |
29 | 25, 28 | eqtrdi 2787 |
. . . . . . . 8
β’ ((π β§ π = (Baseβπ
)) β (β―β(Baseβπ)) = 1) |
30 | | 0ringnnzr 20252 |
. . . . . . . . 9
β’ (π β Ring β
((β―β(Baseβπ)) = 1 β Β¬ π β NzRing)) |
31 | 30 | biimpa 477 |
. . . . . . . 8
β’ ((π β Ring β§
(β―β(Baseβπ)) = 1) β Β¬ π β NzRing) |
32 | 14, 29, 31 | syl2anc 584 |
. . . . . . 7
β’ ((π β§ π = (Baseβπ
)) β Β¬ π β NzRing) |
33 | 32 | adantlr 713 |
. . . . . 6
β’ (((π β§ π β DivRing) β§ π = (Baseβπ
)) β Β¬ π β NzRing) |
34 | 9, 33 | pm2.65da 815 |
. . . . 5
β’ ((π β§ π β DivRing) β Β¬ π = (Baseβπ
)) |
35 | 34 | neqned 2946 |
. . . 4
β’ ((π β§ π β DivRing) β π β (Baseβπ
)) |
36 | | simplr 767 |
. . . . . . . . . . 11
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β π β π) |
37 | | simpr 485 |
. . . . . . . . . . . . 13
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β Β¬ π = π) |
38 | 37 | neqned 2946 |
. . . . . . . . . . . 12
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β π β π) |
39 | 38 | necomd 2995 |
. . . . . . . . . . 11
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β π β π) |
40 | | pssdifn0 4361 |
. . . . . . . . . . 11
β’ ((π β π β§ π β π) β (π β π) β β
) |
41 | 36, 39, 40 | syl2anc 584 |
. . . . . . . . . 10
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β (π β π) β β
) |
42 | | n0 4342 |
. . . . . . . . . 10
β’ ((π β π) β β
β βπ₯ π₯ β (π β π)) |
43 | 41, 42 | sylib 217 |
. . . . . . . . 9
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β βπ₯ π₯ β (π β π)) |
44 | | qsdrng.0 |
. . . . . . . . . 10
β’ π =
(opprβπ
) |
45 | 1 | ad5antr 732 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π
β NzRing) |
46 | 5 | ad5antr 732 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β (2Idealβπ
)) |
47 | | simp-5r 784 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β DivRing) |
48 | | simp-4r 782 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β (LIdealβπ
)) |
49 | 36 | adantr 481 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β π) |
50 | | simpr 485 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π₯ β (π β π)) |
51 | 44, 10, 45, 46, 20, 47, 48, 49, 50 | qsdrnglem2 32456 |
. . . . . . . . 9
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π = (Baseβπ
)) |
52 | 43, 51 | exlimddv 1938 |
. . . . . . . 8
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β§ Β¬ π = π) β π = (Baseβπ
)) |
53 | 52 | ex 413 |
. . . . . . 7
β’ ((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β (Β¬ π = π β π = (Baseβπ
))) |
54 | 53 | orrd 861 |
. . . . . 6
β’ ((((π β§ π β DivRing) β§ π β (LIdealβπ
)) β§ π β π) β (π = π β¨ π = (Baseβπ
))) |
55 | 54 | ex 413 |
. . . . 5
β’ (((π β§ π β DivRing) β§ π β (LIdealβπ
)) β (π β π β (π = π β¨ π = (Baseβπ
)))) |
56 | 55 | ralrimiva 3145 |
. . . 4
β’ ((π β§ π β DivRing) β βπ β (LIdealβπ
)(π β π β (π = π β¨ π = (Baseβπ
)))) |
57 | 20 | ismxidl 32429 |
. . . . 5
β’ (π
β Ring β (π β (MaxIdealβπ
) β (π β (LIdealβπ
) β§ π β (Baseβπ
) β§ βπ β (LIdealβπ
)(π β π β (π = π β¨ π = (Baseβπ
)))))) |
58 | 57 | biimpar 478 |
. . . 4
β’ ((π
β Ring β§ (π β (LIdealβπ
) β§ π β (Baseβπ
) β§ βπ β (LIdealβπ
)(π β π β (π = π β¨ π = (Baseβπ
))))) β π β (MaxIdealβπ
)) |
59 | 4, 7, 35, 56, 58 | syl13anc 1372 |
. . 3
β’ ((π β§ π β DivRing) β π β (MaxIdealβπ
)) |
60 | 44 | opprring 20113 |
. . . . . 6
β’ (π
β Ring β π β Ring) |
61 | 3, 60 | syl 17 |
. . . . 5
β’ (π β π β Ring) |
62 | 61 | adantr 481 |
. . . 4
β’ ((π β§ π β DivRing) β π β Ring) |
63 | 5 | adantr 481 |
. . . . 5
β’ ((π β§ π β DivRing) β π β (2Idealβπ
)) |
64 | 63, 44 | 2idlridld 20806 |
. . . 4
β’ ((π β§ π β DivRing) β π β (LIdealβπ)) |
65 | | simplr 767 |
. . . . . . . . . . 11
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β π β π) |
66 | | simpr 485 |
. . . . . . . . . . . . 13
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β Β¬ π = π) |
67 | 66 | neqned 2946 |
. . . . . . . . . . . 12
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β π β π) |
68 | 67 | necomd 2995 |
. . . . . . . . . . 11
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β π β π) |
69 | 65, 68, 40 | syl2anc 584 |
. . . . . . . . . 10
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β (π β π) β β
) |
70 | 69, 42 | sylib 217 |
. . . . . . . . 9
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β βπ₯ π₯ β (π β π)) |
71 | | eqid 2731 |
. . . . . . . . . 10
β’
(opprβπ) = (opprβπ) |
72 | | eqid 2731 |
. . . . . . . . . 10
β’ (π /s (π ~QG π)) = (π /s (π ~QG π)) |
73 | 44 | opprnzr 20249 |
. . . . . . . . . . . 12
β’ (π
β NzRing β π β NzRing) |
74 | 1, 73 | syl 17 |
. . . . . . . . . . 11
β’ (π β π β NzRing) |
75 | 74 | ad5antr 732 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β NzRing) |
76 | 44, 3 | oppr2idl 32446 |
. . . . . . . . . . . 12
β’ (π β (2Idealβπ
) = (2Idealβπ)) |
77 | 5, 76 | eleqtrd 2834 |
. . . . . . . . . . 11
β’ (π β π β (2Idealβπ)) |
78 | 77 | ad5antr 732 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β (2Idealβπ)) |
79 | 44, 20 | opprbas 20109 |
. . . . . . . . . 10
β’
(Baseβπ
) =
(Baseβπ) |
80 | | eqid 2731 |
. . . . . . . . . . . . 13
β’
(opprβπ) = (opprβπ) |
81 | 80 | opprdrng 20296 |
. . . . . . . . . . . 12
β’ (π β DivRing β
(opprβπ) β DivRing) |
82 | 20, 44, 10, 3, 5 | opprqusdrng 32453 |
. . . . . . . . . . . . 13
β’ (π β
((opprβπ) β DivRing β (π /s (π ~QG π)) β DivRing)) |
83 | 82 | biimpa 477 |
. . . . . . . . . . . 12
β’ ((π β§
(opprβπ) β DivRing) β (π /s (π ~QG π)) β DivRing) |
84 | 81, 83 | sylan2b 594 |
. . . . . . . . . . 11
β’ ((π β§ π β DivRing) β (π /s (π ~QG π)) β DivRing) |
85 | 84 | ad4antr 730 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β (π /s (π ~QG π)) β DivRing) |
86 | | simp-4r 782 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β (LIdealβπ)) |
87 | 65 | adantr 481 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π β π) |
88 | | simpr 485 |
. . . . . . . . . 10
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π₯ β (π β π)) |
89 | 71, 72, 75, 78, 79, 85, 86, 87, 88 | qsdrnglem2 32456 |
. . . . . . . . 9
β’
((((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β§ π₯ β (π β π)) β π = (Baseβπ
)) |
90 | 70, 89 | exlimddv 1938 |
. . . . . . . 8
β’
(((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β§ Β¬ π = π) β π = (Baseβπ
)) |
91 | 90 | ex 413 |
. . . . . . 7
β’ ((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β (Β¬ π = π β π = (Baseβπ
))) |
92 | 91 | orrd 861 |
. . . . . 6
β’ ((((π β§ π β DivRing) β§ π β (LIdealβπ)) β§ π β π) β (π = π β¨ π = (Baseβπ
))) |
93 | 92 | ex 413 |
. . . . 5
β’ (((π β§ π β DivRing) β§ π β (LIdealβπ)) β (π β π β (π = π β¨ π = (Baseβπ
)))) |
94 | 93 | ralrimiva 3145 |
. . . 4
β’ ((π β§ π β DivRing) β βπ β (LIdealβπ)(π β π β (π = π β¨ π = (Baseβπ
)))) |
95 | 79 | ismxidl 32429 |
. . . . 5
β’ (π β Ring β (π β (MaxIdealβπ) β (π β (LIdealβπ) β§ π β (Baseβπ
) β§ βπ β (LIdealβπ)(π β π β (π = π β¨ π = (Baseβπ
)))))) |
96 | 95 | biimpar 478 |
. . . 4
β’ ((π β Ring β§ (π β (LIdealβπ) β§ π β (Baseβπ
) β§ βπ β (LIdealβπ)(π β π β (π = π β¨ π = (Baseβπ
))))) β π β (MaxIdealβπ)) |
97 | 62, 64, 35, 94, 96 | syl13anc 1372 |
. . 3
β’ ((π β§ π β DivRing) β π β (MaxIdealβπ)) |
98 | 59, 97 | jca 512 |
. 2
β’ ((π β§ π β DivRing) β (π β (MaxIdealβπ
) β§ π β (MaxIdealβπ))) |
99 | 1 | adantr 481 |
. . 3
β’ ((π β§ (π β (MaxIdealβπ
) β§ π β (MaxIdealβπ))) β π
β NzRing) |
100 | | simprl 769 |
. . 3
β’ ((π β§ (π β (MaxIdealβπ
) β§ π β (MaxIdealβπ))) β π β (MaxIdealβπ
)) |
101 | | simprr 771 |
. . 3
β’ ((π β§ (π β (MaxIdealβπ
) β§ π β (MaxIdealβπ))) β π β (MaxIdealβπ)) |
102 | 44, 10, 99, 100, 101 | qsdrngi 32455 |
. 2
β’ ((π β§ (π β (MaxIdealβπ
) β§ π β (MaxIdealβπ))) β π β DivRing) |
103 | 98, 102 | impbida 799 |
1
β’ (π β (π β DivRing β (π β (MaxIdealβπ
) β§ π β (MaxIdealβπ)))) |