Metamath Proof Explorer


Theorem ssdifidllem

Description: Lemma for ssdifidl : The set P used in the proof of ssdifidl satisfies the condition of Zorn's Lemma. (Contributed by Thierry Arnoux, 3-Jun-2025)

Ref Expression
Hypotheses ssdifidl.1 𝐵 = ( Base ‘ 𝑅 )
ssdifidl.2 ( 𝜑𝑅 ∈ Ring )
ssdifidl.3 ( 𝜑𝐼 ∈ ( LIdeal ‘ 𝑅 ) )
ssdifidl.4 ( 𝜑𝑆𝐵 )
ssdifidl.5 ( 𝜑 → ( 𝑆𝐼 ) = ∅ )
ssdifidl.6 𝑃 = { 𝑝 ∈ ( LIdeal ‘ 𝑅 ) ∣ ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) }
ssdifidllem.7 ( 𝜑𝑍𝑃 )
ssdifidllem.8 ( 𝜑𝑍 ≠ ∅ )
ssdifidllem.9 ( 𝜑 → [] Or 𝑍 )
Assertion ssdifidllem ( 𝜑 𝑍𝑃 )

Proof

Step Hyp Ref Expression
1 ssdifidl.1 𝐵 = ( Base ‘ 𝑅 )
2 ssdifidl.2 ( 𝜑𝑅 ∈ Ring )
3 ssdifidl.3 ( 𝜑𝐼 ∈ ( LIdeal ‘ 𝑅 ) )
4 ssdifidl.4 ( 𝜑𝑆𝐵 )
5 ssdifidl.5 ( 𝜑 → ( 𝑆𝐼 ) = ∅ )
6 ssdifidl.6 𝑃 = { 𝑝 ∈ ( LIdeal ‘ 𝑅 ) ∣ ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) }
7 ssdifidllem.7 ( 𝜑𝑍𝑃 )
8 ssdifidllem.8 ( 𝜑𝑍 ≠ ∅ )
9 ssdifidllem.9 ( 𝜑 → [] Or 𝑍 )
10 ineq2 ( 𝑝 = 𝑍 → ( 𝑆𝑝 ) = ( 𝑆 𝑍 ) )
11 10 eqeq1d ( 𝑝 = 𝑍 → ( ( 𝑆𝑝 ) = ∅ ↔ ( 𝑆 𝑍 ) = ∅ ) )
12 sseq2 ( 𝑝 = 𝑍 → ( 𝐼𝑝𝐼 𝑍 ) )
13 11 12 anbi12d ( 𝑝 = 𝑍 → ( ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) ↔ ( ( 𝑆 𝑍 ) = ∅ ∧ 𝐼 𝑍 ) ) )
14 6 ssrab3 𝑃 ⊆ ( LIdeal ‘ 𝑅 )
15 7 14 sstrdi ( 𝜑𝑍 ⊆ ( LIdeal ‘ 𝑅 ) )
16 15 sselda ( ( 𝜑𝑗𝑍 ) → 𝑗 ∈ ( LIdeal ‘ 𝑅 ) )
17 eqid ( LIdeal ‘ 𝑅 ) = ( LIdeal ‘ 𝑅 )
18 1 17 lidlss ( 𝑗 ∈ ( LIdeal ‘ 𝑅 ) → 𝑗𝐵 )
19 16 18 syl ( ( 𝜑𝑗𝑍 ) → 𝑗𝐵 )
20 19 ralrimiva ( 𝜑 → ∀ 𝑗𝑍 𝑗𝐵 )
21 unissb ( 𝑍𝐵 ↔ ∀ 𝑗𝑍 𝑗𝐵 )
22 20 21 sylibr ( 𝜑 𝑍𝐵 )
23 eqid ( 0g𝑅 ) = ( 0g𝑅 )
24 17 23 lidl0cl ( ( 𝑅 ∈ Ring ∧ 𝑗 ∈ ( LIdeal ‘ 𝑅 ) ) → ( 0g𝑅 ) ∈ 𝑗 )
25 2 16 24 syl2an2r ( ( 𝜑𝑗𝑍 ) → ( 0g𝑅 ) ∈ 𝑗 )
26 n0i ( ( 0g𝑅 ) ∈ 𝑗 → ¬ 𝑗 = ∅ )
27 25 26 syl ( ( 𝜑𝑗𝑍 ) → ¬ 𝑗 = ∅ )
28 27 reximdva0 ( ( 𝜑𝑍 ≠ ∅ ) → ∃ 𝑗𝑍 ¬ 𝑗 = ∅ )
29 8 28 mpdan ( 𝜑 → ∃ 𝑗𝑍 ¬ 𝑗 = ∅ )
30 rexnal ( ∃ 𝑗𝑍 ¬ 𝑗 = ∅ ↔ ¬ ∀ 𝑗𝑍 𝑗 = ∅ )
31 29 30 sylib ( 𝜑 → ¬ ∀ 𝑗𝑍 𝑗 = ∅ )
32 uni0c ( 𝑍 = ∅ ↔ ∀ 𝑗𝑍 𝑗 = ∅ )
33 32 necon3abii ( 𝑍 ≠ ∅ ↔ ¬ ∀ 𝑗𝑍 𝑗 = ∅ )
34 31 33 sylibr ( 𝜑 𝑍 ≠ ∅ )
35 eluni2 ( 𝑎 𝑍 ↔ ∃ 𝑖𝑍 𝑎𝑖 )
36 eluni2 ( 𝑏 𝑍 ↔ ∃ 𝑗𝑍 𝑏𝑗 )
37 35 36 anbi12i ( ( 𝑎 𝑍𝑏 𝑍 ) ↔ ( ∃ 𝑖𝑍 𝑎𝑖 ∧ ∃ 𝑗𝑍 𝑏𝑗 ) )
38 an32 ( ( ( ( 𝜑𝑥𝐵 ) ∧ ∃ 𝑖𝑍 𝑎𝑖 ) ∧ 𝑗𝑍 ) ↔ ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ ∃ 𝑖𝑍 𝑎𝑖 ) )
39 2 ad6antr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑅 ∈ Ring )
40 15 ad6antr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑍 ⊆ ( LIdeal ‘ 𝑅 ) )
41 simp-5r ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑗𝑍 )
42 40 41 sseldd ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑗 ∈ ( LIdeal ‘ 𝑅 ) )
43 eqid ( .r𝑅 ) = ( .r𝑅 )
44 simp-6r ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑥𝐵 )
45 simpr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑖𝑗 )
46 simplr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑎𝑖 )
47 45 46 sseldd ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑎𝑗 )
48 17 1 43 39 42 44 47 lidlmcld ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → ( 𝑥 ( .r𝑅 ) 𝑎 ) ∈ 𝑗 )
49 simp-4r ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → 𝑏𝑗 )
50 eqid ( +g𝑅 ) = ( +g𝑅 )
51 17 50 lidlacl ( ( ( 𝑅 ∈ Ring ∧ 𝑗 ∈ ( LIdeal ‘ 𝑅 ) ) ∧ ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ∈ 𝑗𝑏𝑗 ) ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑗 )
52 39 42 48 49 51 syl22anc ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑗 )
53 elunii ( ( ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑗𝑗𝑍 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
54 52 41 53 syl2anc ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑖𝑗 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
55 2 ad6antr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑅 ∈ Ring )
56 15 ad6antr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑍 ⊆ ( LIdeal ‘ 𝑅 ) )
57 simpllr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑖𝑍 )
58 56 57 sseldd ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑖 ∈ ( LIdeal ‘ 𝑅 ) )
59 simp-6r ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑥𝐵 )
60 simplr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑎𝑖 )
61 17 1 43 55 58 59 60 lidlmcld ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → ( 𝑥 ( .r𝑅 ) 𝑎 ) ∈ 𝑖 )
62 simpr ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑗𝑖 )
63 simp-4r ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑏𝑗 )
64 62 63 sseldd ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → 𝑏𝑖 )
65 17 50 lidlacl ( ( ( 𝑅 ∈ Ring ∧ 𝑖 ∈ ( LIdeal ‘ 𝑅 ) ) ∧ ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ∈ 𝑖𝑏𝑖 ) ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑖 )
66 55 58 61 64 65 syl22anc ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑖 )
67 elunii ( ( ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑖𝑖𝑍 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
68 66 57 67 syl2anc ( ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) ∧ 𝑗𝑖 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
69 9 ad5antr ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) → [] Or 𝑍 )
70 simplr ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) → 𝑖𝑍 )
71 simp-4r ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) → 𝑗𝑍 )
72 sorpssi ( ( [] Or 𝑍 ∧ ( 𝑖𝑍𝑗𝑍 ) ) → ( 𝑖𝑗𝑗𝑖 ) )
73 69 70 71 72 syl12anc ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) → ( 𝑖𝑗𝑗𝑖 ) )
74 54 68 73 mpjaodan ( ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ 𝑖𝑍 ) ∧ 𝑎𝑖 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
75 74 r19.29an ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) ∧ ∃ 𝑖𝑍 𝑎𝑖 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
76 75 an32s ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑗𝑍 ) ∧ ∃ 𝑖𝑍 𝑎𝑖 ) ∧ 𝑏𝑗 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
77 38 76 sylanb ( ( ( ( ( 𝜑𝑥𝐵 ) ∧ ∃ 𝑖𝑍 𝑎𝑖 ) ∧ 𝑗𝑍 ) ∧ 𝑏𝑗 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
78 77 r19.29an ( ( ( ( 𝜑𝑥𝐵 ) ∧ ∃ 𝑖𝑍 𝑎𝑖 ) ∧ ∃ 𝑗𝑍 𝑏𝑗 ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
79 78 anasss ( ( ( 𝜑𝑥𝐵 ) ∧ ( ∃ 𝑖𝑍 𝑎𝑖 ∧ ∃ 𝑗𝑍 𝑏𝑗 ) ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
80 37 79 sylan2b ( ( ( 𝜑𝑥𝐵 ) ∧ ( 𝑎 𝑍𝑏 𝑍 ) ) → ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
81 80 ralrimivva ( ( 𝜑𝑥𝐵 ) → ∀ 𝑎 𝑍𝑏 𝑍 ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
82 81 ralrimiva ( 𝜑 → ∀ 𝑥𝐵𝑎 𝑍𝑏 𝑍 ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 )
83 17 1 50 43 islidl ( 𝑍 ∈ ( LIdeal ‘ 𝑅 ) ↔ ( 𝑍𝐵 𝑍 ≠ ∅ ∧ ∀ 𝑥𝐵𝑎 𝑍𝑏 𝑍 ( ( 𝑥 ( .r𝑅 ) 𝑎 ) ( +g𝑅 ) 𝑏 ) ∈ 𝑍 ) )
84 22 34 82 83 syl3anbrc ( 𝜑 𝑍 ∈ ( LIdeal ‘ 𝑅 ) )
85 iunss1 ( 𝑍𝑃 𝑗𝑍 ( 𝑆𝑗 ) ⊆ 𝑗𝑃 ( 𝑆𝑗 ) )
86 7 85 syl ( 𝜑 𝑗𝑍 ( 𝑆𝑗 ) ⊆ 𝑗𝑃 ( 𝑆𝑗 ) )
87 uniin2 𝑗𝑍 ( 𝑆𝑗 ) = ( 𝑆 𝑍 )
88 87 a1i ( 𝜑 𝑗𝑍 ( 𝑆𝑗 ) = ( 𝑆 𝑍 ) )
89 14 a1i ( 𝜑𝑃 ⊆ ( LIdeal ‘ 𝑅 ) )
90 89 sselda ( ( 𝜑𝑗𝑃 ) → 𝑗 ∈ ( LIdeal ‘ 𝑅 ) )
91 simpr ( ( 𝜑𝑗𝑃 ) → 𝑗𝑃 )
92 91 6 eleqtrdi ( ( 𝜑𝑗𝑃 ) → 𝑗 ∈ { 𝑝 ∈ ( LIdeal ‘ 𝑅 ) ∣ ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) } )
93 ineq2 ( 𝑝 = 𝑗 → ( 𝑆𝑝 ) = ( 𝑆𝑗 ) )
94 93 eqeq1d ( 𝑝 = 𝑗 → ( ( 𝑆𝑝 ) = ∅ ↔ ( 𝑆𝑗 ) = ∅ ) )
95 sseq2 ( 𝑝 = 𝑗 → ( 𝐼𝑝𝐼𝑗 ) )
96 94 95 anbi12d ( 𝑝 = 𝑗 → ( ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) ↔ ( ( 𝑆𝑗 ) = ∅ ∧ 𝐼𝑗 ) ) )
97 96 elrab3 ( 𝑗 ∈ ( LIdeal ‘ 𝑅 ) → ( 𝑗 ∈ { 𝑝 ∈ ( LIdeal ‘ 𝑅 ) ∣ ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) } ↔ ( ( 𝑆𝑗 ) = ∅ ∧ 𝐼𝑗 ) ) )
98 97 simprbda ( ( 𝑗 ∈ ( LIdeal ‘ 𝑅 ) ∧ 𝑗 ∈ { 𝑝 ∈ ( LIdeal ‘ 𝑅 ) ∣ ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) } ) → ( 𝑆𝑗 ) = ∅ )
99 90 92 98 syl2anc ( ( 𝜑𝑗𝑃 ) → ( 𝑆𝑗 ) = ∅ )
100 99 iuneq2dv ( 𝜑 𝑗𝑃 ( 𝑆𝑗 ) = 𝑗𝑃 ∅ )
101 iun0 𝑗𝑃 ∅ = ∅
102 100 101 eqtrdi ( 𝜑 𝑗𝑃 ( 𝑆𝑗 ) = ∅ )
103 86 88 102 3sstr3d ( 𝜑 → ( 𝑆 𝑍 ) ⊆ ∅ )
104 ss0 ( ( 𝑆 𝑍 ) ⊆ ∅ → ( 𝑆 𝑍 ) = ∅ )
105 103 104 syl ( 𝜑 → ( 𝑆 𝑍 ) = ∅ )
106 7 sselda ( ( 𝜑𝑗𝑍 ) → 𝑗𝑃 )
107 96 6 elrab2 ( 𝑗𝑃 ↔ ( 𝑗 ∈ ( LIdeal ‘ 𝑅 ) ∧ ( ( 𝑆𝑗 ) = ∅ ∧ 𝐼𝑗 ) ) )
108 106 107 sylib ( ( 𝜑𝑗𝑍 ) → ( 𝑗 ∈ ( LIdeal ‘ 𝑅 ) ∧ ( ( 𝑆𝑗 ) = ∅ ∧ 𝐼𝑗 ) ) )
109 108 simprrd ( ( 𝜑𝑗𝑍 ) → 𝐼𝑗 )
110 109 ralrimiva ( 𝜑 → ∀ 𝑗𝑍 𝐼𝑗 )
111 ssint ( 𝐼 𝑍 ↔ ∀ 𝑗𝑍 𝐼𝑗 )
112 110 111 sylibr ( 𝜑𝐼 𝑍 )
113 intssuni ( 𝑍 ≠ ∅ → 𝑍 𝑍 )
114 8 113 syl ( 𝜑 𝑍 𝑍 )
115 112 114 sstrd ( 𝜑𝐼 𝑍 )
116 105 115 jca ( 𝜑 → ( ( 𝑆 𝑍 ) = ∅ ∧ 𝐼 𝑍 ) )
117 13 84 116 elrabd ( 𝜑 𝑍 ∈ { 𝑝 ∈ ( LIdeal ‘ 𝑅 ) ∣ ( ( 𝑆𝑝 ) = ∅ ∧ 𝐼𝑝 ) } )
118 117 6 eleqtrrdi ( 𝜑 𝑍𝑃 )