Metamath Proof Explorer


Theorem mxidlirred

Description: In a principal ideal domain, maximal ideals are exactly the ideals generated by irreducible elements. (Contributed by Thierry Arnoux, 22-Mar-2025)

Ref Expression
Hypotheses mxidlirred.b B = Base R
mxidlirred.k K = RSpan R
mxidlirred.0 0 ˙ = 0 R
mxidlirred.m M = K X
mxidlirred.r φ R PID
mxidlirred.x φ X B
mxidlirred.y φ X 0 ˙
mxidlirred.1 φ M LIdeal R
Assertion mxidlirred φ M MaxIdeal R X Irred R

Proof

Step Hyp Ref Expression
1 mxidlirred.b B = Base R
2 mxidlirred.k K = RSpan R
3 mxidlirred.0 0 ˙ = 0 R
4 mxidlirred.m M = K X
5 mxidlirred.r φ R PID
6 mxidlirred.x φ X B
7 mxidlirred.y φ X 0 ˙
8 mxidlirred.1 φ M LIdeal R
9 df-pid PID = IDomn LPIR
10 5 9 eleqtrdi φ R IDomn LPIR
11 10 elin1d φ R IDomn
12 11 adantr φ M MaxIdeal R R IDomn
13 6 adantr φ M MaxIdeal R X B
14 7 adantr φ M MaxIdeal R X 0 ˙
15 simpr φ M MaxIdeal R M MaxIdeal R
16 1 2 3 4 12 13 14 15 mxidlirredi φ M MaxIdeal R X Irred R
17 eqid r R = r R
18 simplr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x x B
19 18 ad2antrr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x x B
20 6 ad8antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x X B
21 eqid Unit R = Unit R
22 eqid R = R
23 11 idomringd φ R Ring
24 23 ad4antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B R Ring
25 24 ad2antrr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x R Ring
26 25 ad2antrr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x R Ring
27 simplr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x t B
28 simpr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x X = t R x
29 simp-8r φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x X Irred R
30 28 29 eqeltrrd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x t R x Irred R
31 eqid Irred R = Irred R
32 31 1 21 22 irredmul t B x B t R x Irred R t Unit R x Unit R
33 27 19 30 32 syl3anc φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x t Unit R x Unit R
34 simpr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x k = K x
35 34 ad2antrr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x k = K x
36 simpr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B ¬ M k k = M k = B
37 annim M k ¬ k = M k = B ¬ M k k = M k = B
38 36 37 sylibr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B M k ¬ k = M k = B
39 38 simprd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B ¬ k = M k = B
40 ioran ¬ k = M k = B ¬ k = M ¬ k = B
41 39 40 sylib φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B ¬ k = M ¬ k = B
42 41 simprd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B ¬ k = B
43 42 neqned φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B k B
44 43 ad4antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x k B
45 35 44 eqnetrrd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x K x B
46 45 neneqd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x ¬ K x = B
47 eqid K x = K x
48 11 ad8antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x R IDomn
49 48 idomcringd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x R CRing
50 21 2 47 1 19 49 unitpidl1 φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x K x = B x Unit R
51 46 50 mtbid φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x ¬ x Unit R
52 33 51 olcnd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x t Unit R
53 28 eqcomd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x t R x = X
54 1 2 17 19 20 21 22 26 52 53 dvdsruassoi φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x x r R X X r R x
55 1 2 17 19 20 26 rspsnasso φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x x r R X X r R x K X = K x
56 54 55 mpbid φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x K X = K x
57 56 35 eqtr4d φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x K X = k
58 4 57 eqtr2id φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x k = M
59 41 simpld φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B ¬ k = M
60 59 ad4antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x ¬ k = M
61 58 60 pm2.21dd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x M MaxIdeal R
62 38 simpld φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B M k
63 62 ad2antrr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x M k
64 6 snssd φ X B
65 2 1 rspssid R Ring X B X K X
66 23 64 65 syl2anc φ X K X
67 66 4 sseqtrrdi φ X M
68 snssg X B X M X M
69 68 biimpar X B X M X M
70 6 67 69 syl2anc φ X M
71 70 ad6antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x X M
72 63 71 sseldd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x X k
73 72 34 eleqtrd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x X K x
74 1 22 2 elrspsn R Ring x B X K x t B X = t R x
75 74 biimpa R Ring x B X K x t B X = t R x
76 25 18 73 75 syl21anc φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x t B X = t R x
77 61 76 r19.29a φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x M MaxIdeal R
78 simplr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B k LIdeal R
79 10 elin2d φ R LPIR
80 eqid LPIdeal R = LPIdeal R
81 eqid LIdeal R = LIdeal R
82 80 81 islpir R LPIR R Ring LIdeal R = LPIdeal R
83 82 simprbi R LPIR LIdeal R = LPIdeal R
84 79 83 syl φ LIdeal R = LPIdeal R
85 84 ad4antr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B LIdeal R = LPIdeal R
86 78 85 eleqtrd φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B k LPIdeal R
87 80 2 1 islpidl R Ring k LPIdeal R x B k = K x
88 87 biimpa R Ring k LPIdeal R x B k = K x
89 24 86 88 syl2anc φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B x B k = K x
90 77 89 r19.29a φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B M MaxIdeal R
91 8 ad2antrr φ X Irred R ¬ M MaxIdeal R M LIdeal R
92 31 21 irrednu X Irred R ¬ X Unit R
93 92 adantl φ X Irred R ¬ X Unit R
94 11 idomcringd φ R CRing
95 21 2 4 1 6 94 unitpidl1 φ M = B X Unit R
96 95 adantr φ X Irred R M = B X Unit R
97 96 necon3abid φ X Irred R M B ¬ X Unit R
98 93 97 mpbird φ X Irred R M B
99 98 adantr φ X Irred R ¬ M MaxIdeal R M B
100 91 99 jca φ X Irred R ¬ M MaxIdeal R M LIdeal R M B
101 1 ismxidl R Ring M MaxIdeal R M LIdeal R M B k LIdeal R M k k = M k = B
102 23 101 syl φ M MaxIdeal R M LIdeal R M B k LIdeal R M k k = M k = B
103 df-3an M LIdeal R M B k LIdeal R M k k = M k = B M LIdeal R M B k LIdeal R M k k = M k = B
104 102 103 bitrdi φ M MaxIdeal R M LIdeal R M B k LIdeal R M k k = M k = B
105 104 notbid φ ¬ M MaxIdeal R ¬ M LIdeal R M B k LIdeal R M k k = M k = B
106 105 biimpa φ ¬ M MaxIdeal R ¬ M LIdeal R M B k LIdeal R M k k = M k = B
107 106 adantlr φ X Irred R ¬ M MaxIdeal R ¬ M LIdeal R M B k LIdeal R M k k = M k = B
108 100 107 mpnanrd φ X Irred R ¬ M MaxIdeal R ¬ k LIdeal R M k k = M k = B
109 rexnal k LIdeal R ¬ M k k = M k = B ¬ k LIdeal R M k k = M k = B
110 108 109 sylibr φ X Irred R ¬ M MaxIdeal R k LIdeal R ¬ M k k = M k = B
111 90 110 r19.29a φ X Irred R ¬ M MaxIdeal R M MaxIdeal R
112 111 pm2.18da φ X Irred R M MaxIdeal R
113 16 112 impbida φ M MaxIdeal R X Irred R