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