Users' Mathboxes Mathbox for Jeff Madsen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  smprngopr Structured version   Visualization version   GIF version

Theorem smprngopr 36514
Description: A simple ring (one whose only ideals are 0 and 𝑅) is a prime ring. (Contributed by Jeff Madsen, 6-Jan-2011.)
Hypotheses
Ref Expression
smprngpr.1 𝐺 = (1st β€˜π‘…)
smprngpr.2 𝐻 = (2nd β€˜π‘…)
smprngpr.3 𝑋 = ran 𝐺
smprngpr.4 𝑍 = (GIdβ€˜πΊ)
smprngpr.5 π‘ˆ = (GIdβ€˜π»)
Assertion
Ref Expression
smprngopr ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ 𝑅 ∈ PrRing)

Proof of Theorem smprngopr
Dummy variables 𝑖 𝑗 π‘₯ 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simp1 1137 . 2 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ 𝑅 ∈ RingOps)
2 smprngpr.1 . . . . 5 𝐺 = (1st β€˜π‘…)
3 smprngpr.4 . . . . 5 𝑍 = (GIdβ€˜πΊ)
42, 30idl 36487 . . . 4 (𝑅 ∈ RingOps β†’ {𝑍} ∈ (Idlβ€˜π‘…))
543ad2ant1 1134 . . 3 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ {𝑍} ∈ (Idlβ€˜π‘…))
6 smprngpr.2 . . . . . . . 8 𝐻 = (2nd β€˜π‘…)
7 smprngpr.3 . . . . . . . 8 𝑋 = ran 𝐺
8 smprngpr.5 . . . . . . . 8 π‘ˆ = (GIdβ€˜π»)
92, 6, 7, 3, 80rngo 36489 . . . . . . 7 (𝑅 ∈ RingOps β†’ (𝑍 = π‘ˆ ↔ 𝑋 = {𝑍}))
10 eqcom 2744 . . . . . . 7 (π‘ˆ = 𝑍 ↔ 𝑍 = π‘ˆ)
11 eqcom 2744 . . . . . . 7 ({𝑍} = 𝑋 ↔ 𝑋 = {𝑍})
129, 10, 113bitr4g 314 . . . . . 6 (𝑅 ∈ RingOps β†’ (π‘ˆ = 𝑍 ↔ {𝑍} = 𝑋))
1312necon3bid 2989 . . . . 5 (𝑅 ∈ RingOps β†’ (π‘ˆ β‰  𝑍 ↔ {𝑍} β‰  𝑋))
1413biimpa 478 . . . 4 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ {𝑍} β‰  𝑋)
15143adant3 1133 . . 3 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ {𝑍} β‰  𝑋)
16 df-pr 4590 . . . . . . . 8 {{𝑍}, 𝑋} = ({{𝑍}} βˆͺ {𝑋})
1716eqeq2i 2750 . . . . . . 7 ((Idlβ€˜π‘…) = {{𝑍}, 𝑋} ↔ (Idlβ€˜π‘…) = ({{𝑍}} βˆͺ {𝑋}))
18 eleq2 2827 . . . . . . . . 9 ((Idlβ€˜π‘…) = ({{𝑍}} βˆͺ {𝑋}) β†’ (𝑖 ∈ (Idlβ€˜π‘…) ↔ 𝑖 ∈ ({{𝑍}} βˆͺ {𝑋})))
19 eleq2 2827 . . . . . . . . 9 ((Idlβ€˜π‘…) = ({{𝑍}} βˆͺ {𝑋}) β†’ (𝑗 ∈ (Idlβ€˜π‘…) ↔ 𝑗 ∈ ({{𝑍}} βˆͺ {𝑋})))
2018, 19anbi12d 632 . . . . . . . 8 ((Idlβ€˜π‘…) = ({{𝑍}} βˆͺ {𝑋}) β†’ ((𝑖 ∈ (Idlβ€˜π‘…) ∧ 𝑗 ∈ (Idlβ€˜π‘…)) ↔ (𝑖 ∈ ({{𝑍}} βˆͺ {𝑋}) ∧ 𝑗 ∈ ({{𝑍}} βˆͺ {𝑋}))))
21 elun 4109 . . . . . . . . . 10 (𝑖 ∈ ({{𝑍}} βˆͺ {𝑋}) ↔ (𝑖 ∈ {{𝑍}} ∨ 𝑖 ∈ {𝑋}))
22 velsn 4603 . . . . . . . . . . 11 (𝑖 ∈ {{𝑍}} ↔ 𝑖 = {𝑍})
23 velsn 4603 . . . . . . . . . . 11 (𝑖 ∈ {𝑋} ↔ 𝑖 = 𝑋)
2422, 23orbi12i 914 . . . . . . . . . 10 ((𝑖 ∈ {{𝑍}} ∨ 𝑖 ∈ {𝑋}) ↔ (𝑖 = {𝑍} ∨ 𝑖 = 𝑋))
2521, 24bitri 275 . . . . . . . . 9 (𝑖 ∈ ({{𝑍}} βˆͺ {𝑋}) ↔ (𝑖 = {𝑍} ∨ 𝑖 = 𝑋))
26 elun 4109 . . . . . . . . . 10 (𝑗 ∈ ({{𝑍}} βˆͺ {𝑋}) ↔ (𝑗 ∈ {{𝑍}} ∨ 𝑗 ∈ {𝑋}))
27 velsn 4603 . . . . . . . . . . 11 (𝑗 ∈ {{𝑍}} ↔ 𝑗 = {𝑍})
28 velsn 4603 . . . . . . . . . . 11 (𝑗 ∈ {𝑋} ↔ 𝑗 = 𝑋)
2927, 28orbi12i 914 . . . . . . . . . 10 ((𝑗 ∈ {{𝑍}} ∨ 𝑗 ∈ {𝑋}) ↔ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋))
3026, 29bitri 275 . . . . . . . . 9 (𝑗 ∈ ({{𝑍}} βˆͺ {𝑋}) ↔ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋))
3125, 30anbi12i 628 . . . . . . . 8 ((𝑖 ∈ ({{𝑍}} βˆͺ {𝑋}) ∧ 𝑗 ∈ ({{𝑍}} βˆͺ {𝑋})) ↔ ((𝑖 = {𝑍} ∨ 𝑖 = 𝑋) ∧ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋)))
3220, 31bitrdi 287 . . . . . . 7 ((Idlβ€˜π‘…) = ({{𝑍}} βˆͺ {𝑋}) β†’ ((𝑖 ∈ (Idlβ€˜π‘…) ∧ 𝑗 ∈ (Idlβ€˜π‘…)) ↔ ((𝑖 = {𝑍} ∨ 𝑖 = 𝑋) ∧ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋))))
3317, 32sylbi 216 . . . . . 6 ((Idlβ€˜π‘…) = {{𝑍}, 𝑋} β†’ ((𝑖 ∈ (Idlβ€˜π‘…) ∧ 𝑗 ∈ (Idlβ€˜π‘…)) ↔ ((𝑖 = {𝑍} ∨ 𝑖 = 𝑋) ∧ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋))))
34333ad2ant3 1136 . . . . 5 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ ((𝑖 ∈ (Idlβ€˜π‘…) ∧ 𝑗 ∈ (Idlβ€˜π‘…)) ↔ ((𝑖 = {𝑍} ∨ 𝑖 = 𝑋) ∧ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋))))
35 eqimss 4001 . . . . . . . . . . 11 (𝑖 = {𝑍} β†’ 𝑖 βŠ† {𝑍})
3635orcd 872 . . . . . . . . . 10 (𝑖 = {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))
3736adantr 482 . . . . . . . . 9 ((𝑖 = {𝑍} ∧ 𝑗 = {𝑍}) β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))
3837a1d 25 . . . . . . . 8 ((𝑖 = {𝑍} ∧ 𝑗 = {𝑍}) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))
3938a1i 11 . . . . . . 7 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ ((𝑖 = {𝑍} ∧ 𝑗 = {𝑍}) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
40 eqimss 4001 . . . . . . . . . . 11 (𝑗 = {𝑍} β†’ 𝑗 βŠ† {𝑍})
4140olcd 873 . . . . . . . . . 10 (𝑗 = {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))
4241adantl 483 . . . . . . . . 9 ((𝑖 = 𝑋 ∧ 𝑗 = {𝑍}) β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))
4342a1d 25 . . . . . . . 8 ((𝑖 = 𝑋 ∧ 𝑗 = {𝑍}) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))
4443a1i 11 . . . . . . 7 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ ((𝑖 = 𝑋 ∧ 𝑗 = {𝑍}) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
4536adantr 482 . . . . . . . . 9 ((𝑖 = {𝑍} ∧ 𝑗 = 𝑋) β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))
4645a1d 25 . . . . . . . 8 ((𝑖 = {𝑍} ∧ 𝑗 = 𝑋) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))
4746a1i 11 . . . . . . 7 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ ((𝑖 = {𝑍} ∧ 𝑗 = 𝑋) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
482rneqi 5893 . . . . . . . . . . . . . 14 ran 𝐺 = ran (1st β€˜π‘…)
497, 48eqtri 2765 . . . . . . . . . . . . 13 𝑋 = ran (1st β€˜π‘…)
5049, 6, 8rngo1cl 36401 . . . . . . . . . . . 12 (𝑅 ∈ RingOps β†’ π‘ˆ ∈ 𝑋)
5150adantr 482 . . . . . . . . . . 11 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ π‘ˆ ∈ 𝑋)
526, 49, 8rngolidm 36399 . . . . . . . . . . . . . . . 16 ((𝑅 ∈ RingOps ∧ π‘ˆ ∈ 𝑋) β†’ (π‘ˆπ»π‘ˆ) = π‘ˆ)
5350, 52mpdan 686 . . . . . . . . . . . . . . 15 (𝑅 ∈ RingOps β†’ (π‘ˆπ»π‘ˆ) = π‘ˆ)
5453eleq1d 2823 . . . . . . . . . . . . . 14 (𝑅 ∈ RingOps β†’ ((π‘ˆπ»π‘ˆ) ∈ {𝑍} ↔ π‘ˆ ∈ {𝑍}))
558fvexi 6857 . . . . . . . . . . . . . . 15 π‘ˆ ∈ V
5655elsn 4602 . . . . . . . . . . . . . 14 (π‘ˆ ∈ {𝑍} ↔ π‘ˆ = 𝑍)
5754, 56bitrdi 287 . . . . . . . . . . . . 13 (𝑅 ∈ RingOps β†’ ((π‘ˆπ»π‘ˆ) ∈ {𝑍} ↔ π‘ˆ = 𝑍))
5857necon3bbid 2982 . . . . . . . . . . . 12 (𝑅 ∈ RingOps β†’ (Β¬ (π‘ˆπ»π‘ˆ) ∈ {𝑍} ↔ π‘ˆ β‰  𝑍))
5958biimpar 479 . . . . . . . . . . 11 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ Β¬ (π‘ˆπ»π‘ˆ) ∈ {𝑍})
60 oveq1 7365 . . . . . . . . . . . . . 14 (π‘₯ = π‘ˆ β†’ (π‘₯𝐻𝑦) = (π‘ˆπ»π‘¦))
6160eleq1d 2823 . . . . . . . . . . . . 13 (π‘₯ = π‘ˆ β†’ ((π‘₯𝐻𝑦) ∈ {𝑍} ↔ (π‘ˆπ»π‘¦) ∈ {𝑍}))
6261notbid 318 . . . . . . . . . . . 12 (π‘₯ = π‘ˆ β†’ (Β¬ (π‘₯𝐻𝑦) ∈ {𝑍} ↔ Β¬ (π‘ˆπ»π‘¦) ∈ {𝑍}))
63 oveq2 7366 . . . . . . . . . . . . . 14 (𝑦 = π‘ˆ β†’ (π‘ˆπ»π‘¦) = (π‘ˆπ»π‘ˆ))
6463eleq1d 2823 . . . . . . . . . . . . 13 (𝑦 = π‘ˆ β†’ ((π‘ˆπ»π‘¦) ∈ {𝑍} ↔ (π‘ˆπ»π‘ˆ) ∈ {𝑍}))
6564notbid 318 . . . . . . . . . . . 12 (𝑦 = π‘ˆ β†’ (Β¬ (π‘ˆπ»π‘¦) ∈ {𝑍} ↔ Β¬ (π‘ˆπ»π‘ˆ) ∈ {𝑍}))
6662, 65rspc2ev 3593 . . . . . . . . . . 11 ((π‘ˆ ∈ 𝑋 ∧ π‘ˆ ∈ 𝑋 ∧ Β¬ (π‘ˆπ»π‘ˆ) ∈ {𝑍}) β†’ βˆƒπ‘₯ ∈ 𝑋 βˆƒπ‘¦ ∈ 𝑋 Β¬ (π‘₯𝐻𝑦) ∈ {𝑍})
6751, 51, 59, 66syl3anc 1372 . . . . . . . . . 10 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ βˆƒπ‘₯ ∈ 𝑋 βˆƒπ‘¦ ∈ 𝑋 Β¬ (π‘₯𝐻𝑦) ∈ {𝑍})
68 rexnal2 3133 . . . . . . . . . 10 (βˆƒπ‘₯ ∈ 𝑋 βˆƒπ‘¦ ∈ 𝑋 Β¬ (π‘₯𝐻𝑦) ∈ {𝑍} ↔ Β¬ βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍})
6967, 68sylib 217 . . . . . . . . 9 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ Β¬ βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍})
7069pm2.21d 121 . . . . . . . 8 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ (βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))
71 raleq 3310 . . . . . . . . . 10 (𝑖 = 𝑋 β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} ↔ βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍}))
72 raleq 3310 . . . . . . . . . . 11 (𝑗 = 𝑋 β†’ (βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} ↔ βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍}))
7372ralbidv 3175 . . . . . . . . . 10 (𝑗 = 𝑋 β†’ (βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} ↔ βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍}))
7471, 73sylan9bb 511 . . . . . . . . 9 ((𝑖 = 𝑋 ∧ 𝑗 = 𝑋) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} ↔ βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍}))
7574imbi1d 342 . . . . . . . 8 ((𝑖 = 𝑋 ∧ 𝑗 = 𝑋) β†’ ((βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})) ↔ (βˆ€π‘₯ ∈ 𝑋 βˆ€π‘¦ ∈ 𝑋 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
7670, 75syl5ibrcom 247 . . . . . . 7 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ ((𝑖 = 𝑋 ∧ 𝑗 = 𝑋) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
7739, 44, 47, 76ccased 1038 . . . . . 6 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍) β†’ (((𝑖 = {𝑍} ∨ 𝑖 = 𝑋) ∧ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋)) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
78773adant3 1133 . . . . 5 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ (((𝑖 = {𝑍} ∨ 𝑖 = 𝑋) ∧ (𝑗 = {𝑍} ∨ 𝑗 = 𝑋)) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
7934, 78sylbid 239 . . . 4 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ ((𝑖 ∈ (Idlβ€˜π‘…) ∧ 𝑗 ∈ (Idlβ€˜π‘…)) β†’ (βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍}))))
8079ralrimivv 3196 . . 3 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ βˆ€π‘– ∈ (Idlβ€˜π‘…)βˆ€π‘— ∈ (Idlβ€˜π‘…)(βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))
812, 6, 7ispridl 36496 . . . 4 (𝑅 ∈ RingOps β†’ ({𝑍} ∈ (PrIdlβ€˜π‘…) ↔ ({𝑍} ∈ (Idlβ€˜π‘…) ∧ {𝑍} β‰  𝑋 ∧ βˆ€π‘– ∈ (Idlβ€˜π‘…)βˆ€π‘— ∈ (Idlβ€˜π‘…)(βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))))
82813ad2ant1 1134 . . 3 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ ({𝑍} ∈ (PrIdlβ€˜π‘…) ↔ ({𝑍} ∈ (Idlβ€˜π‘…) ∧ {𝑍} β‰  𝑋 ∧ βˆ€π‘– ∈ (Idlβ€˜π‘…)βˆ€π‘— ∈ (Idlβ€˜π‘…)(βˆ€π‘₯ ∈ 𝑖 βˆ€π‘¦ ∈ 𝑗 (π‘₯𝐻𝑦) ∈ {𝑍} β†’ (𝑖 βŠ† {𝑍} ∨ 𝑗 βŠ† {𝑍})))))
835, 15, 80, 82mpbir3and 1343 . 2 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ {𝑍} ∈ (PrIdlβ€˜π‘…))
842, 3isprrngo 36512 . 2 (𝑅 ∈ PrRing ↔ (𝑅 ∈ RingOps ∧ {𝑍} ∈ (PrIdlβ€˜π‘…)))
851, 83, 84sylanbrc 584 1 ((𝑅 ∈ RingOps ∧ π‘ˆ β‰  𝑍 ∧ (Idlβ€˜π‘…) = {{𝑍}, 𝑋}) β†’ 𝑅 ∈ PrRing)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∨ wo 846   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107   β‰  wne 2944  βˆ€wral 3065  βˆƒwrex 3074   βˆͺ cun 3909   βŠ† wss 3911  {csn 4587  {cpr 4589  ran crn 5635  β€˜cfv 6497  (class class class)co 7358  1st c1st 7920  2nd c2nd 7921  GIdcgi 29435  RingOpscrngo 36356  Idlcidl 36469  PrIdlcpridl 36470  PrRingcprrng 36508
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-rep 5243  ax-sep 5257  ax-nul 5264  ax-pow 5321  ax-pr 5385  ax-un 7673
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-ral 3066  df-rex 3075  df-rmo 3354  df-reu 3355  df-rab 3409  df-v 3448  df-sbc 3741  df-csb 3857  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-nul 4284  df-if 4488  df-pw 4563  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4867  df-iun 4957  df-br 5107  df-opab 5169  df-mpt 5190  df-id 5532  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-iota 6449  df-fun 6499  df-fn 6500  df-f 6501  df-f1 6502  df-fo 6503  df-f1o 6504  df-fv 6505  df-riota 7314  df-ov 7361  df-1st 7922  df-2nd 7923  df-grpo 29438  df-gid 29439  df-ginv 29440  df-ablo 29490  df-ass 36305  df-exid 36307  df-mgmOLD 36311  df-sgrOLD 36323  df-mndo 36329  df-rngo 36357  df-idl 36472  df-pridl 36473  df-prrngo 36510
This theorem is referenced by:  divrngpr  36515
  Copyright terms: Public domain W3C validator