Theorem rprmirredb 33767

Description: In a principal ideal domain, the converse of rprmirred 33766 holds, i.e. irreducible elements are prime. (Contributed by Thierry Arnoux, 18-May-2025.)

Hypotheses

Ref	Expression
rprmirredb.p	⊢ 𝑃 = (RPrime‘𝑅)
rprmirredb.i	⊢ 𝐼 = (Irred‘𝑅)
rprmirredb.r	⊢ (𝜑 → 𝑅 ∈ PID)

Assertion

Ref	Expression
rprmirredb	⊢ (𝜑 → 𝐼 = 𝑃)

Proof of Theorem rprmirredb

Dummy variables 𝑝 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		rprmirredb.r	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ PID)
2	1	adantr 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑅 ∈ PID)
3		rprmirredb.i	. . . . . . . 8 ⊢ 𝐼 = (Irred‘𝑅)
4		eqid 2769	. . . . . . . 8 ⊢ (Base‘𝑅) = (Base‘𝑅)
5	3, 4	irredcl 20506	. . . . . . 7 ⊢ (𝑝 ∈ 𝐼 → 𝑝 ∈ (Base‘𝑅))
6	5	adantl 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ∈ (Base‘𝑅))
7		eqid 2769	. . . . . . . . 9 ⊢ (Unit‘𝑅) = (Unit‘𝑅)
8	3, 7	irrednu 20507	. . . . . . . 8 ⊢ (𝑝 ∈ 𝐼 → ¬ 𝑝 ∈ (Unit‘𝑅))
9	8	adantl 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → ¬ 𝑝 ∈ (Unit‘𝑅))
10		df-pid 21474	. . . . . . . . . . . . 13 ⊢ PID = (IDomn ∩ LPIR)
11	1, 10	eleqtrdi 2879	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑅 ∈ (IDomn ∩ LPIR))
12	11	elin1d 4165	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ IDomn)
13	12	idomringd 20812	. . . . . . . . . 10 ⊢ (𝜑 → 𝑅 ∈ Ring)
14	13	adantr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑅 ∈ Ring)
15		simpr 489	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ∈ 𝐼)
16		eqid 2769	. . . . . . . . . 10 ⊢ (0g‘𝑅) = (0g‘𝑅)
17	3, 16	irredn0 20505	. . . . . . . . 9 ⊢ ((𝑅 ∈ Ring ∧ 𝑝 ∈ 𝐼) → 𝑝 ≠ (0g‘𝑅))
18	14, 15, 17	syl2anc 595	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ≠ (0g‘𝑅))
19		nelsn 4637	. . . . . . . 8 ⊢ (𝑝 ≠ (0g‘𝑅) → ¬ 𝑝 ∈ {(0g‘𝑅)})
20	18, 19	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → ¬ 𝑝 ∈ {(0g‘𝑅)})
21		eqid 2769	. . . . . . . 8 ⊢ ((Unit‘𝑅) ∪ {(0g‘𝑅)}) = ((Unit‘𝑅) ∪ {(0g‘𝑅)})
22		nelun 32800	. . . . . . . 8 ⊢ (((Unit‘𝑅) ∪ {(0g‘𝑅)}) = ((Unit‘𝑅) ∪ {(0g‘𝑅)}) → (¬ 𝑝 ∈ ((Unit‘𝑅) ∪ {(0g‘𝑅)}) ↔ (¬ 𝑝 ∈ (Unit‘𝑅) ∧ ¬ 𝑝 ∈ {(0g‘𝑅)})))
23	21, 22	ax-mp 5	. . . . . . 7 ⊢ (¬ 𝑝 ∈ ((Unit‘𝑅) ∪ {(0g‘𝑅)}) ↔ (¬ 𝑝 ∈ (Unit‘𝑅) ∧ ¬ 𝑝 ∈ {(0g‘𝑅)}))
24	9, 20, 23	sylanbrc 594	. . . . . 6 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → ¬ 𝑝 ∈ ((Unit‘𝑅) ∪ {(0g‘𝑅)}))
25	6, 24	eldifd 3924	. . . . 5 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ∈ ((Base‘𝑅) ∖ ((Unit‘𝑅) ∪ {(0g‘𝑅)})))
26		eqid 2769	. . . . . . . . . . 11 ⊢ (RSpan‘𝑅) = (RSpan‘𝑅)
27		eqid 2769	. . . . . . . . . . 11 ⊢ (∥r‘𝑅) = (∥r‘𝑅)
28	14	ad3antrrr 742	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → 𝑅 ∈ Ring)
29	6	ad3antrrr 742	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → 𝑝 ∈ (Base‘𝑅))
30	4, 26, 27, 28, 29	ellpi 33630	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → (𝑥 ∈ ((RSpan‘𝑅)‘{𝑝}) ↔ 𝑝(∥r‘𝑅)𝑥))
31	30	biimpa 481	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) ∧ 𝑥 ∈ ((RSpan‘𝑅)‘{𝑝})) → 𝑝(∥r‘𝑅)𝑥)
32	4, 26, 27, 28, 29	ellpi 33630	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → (𝑦 ∈ ((RSpan‘𝑅)‘{𝑝}) ↔ 𝑝(∥r‘𝑅)𝑦))
33	32	biimpa 481	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) ∧ 𝑦 ∈ ((RSpan‘𝑅)‘{𝑝})) → 𝑝(∥r‘𝑅)𝑦)
34	12	idomcringd 20811	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ CRing)
35	34	ad4antr 744	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → 𝑅 ∈ CRing)
36	3	eleq2i 2861	. . . . . . . . . . . . . 14 ⊢ (𝑝 ∈ 𝐼 ↔ 𝑝 ∈ (Irred‘𝑅))
37	36	bilani 509	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ∈ (Irred‘𝑅))
38		eqid 2769	. . . . . . . . . . . . . 14 ⊢ ((RSpan‘𝑅)‘{𝑝}) = ((RSpan‘𝑅)‘{𝑝})
39	6	snssd 4757	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → {𝑝} ⊆ (Base‘𝑅))
40		eqid 2769	. . . . . . . . . . . . . . . 16 ⊢ (LIdeal‘𝑅) = (LIdeal‘𝑅)
41	26, 4, 40	rspcl 21342	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Ring ∧ {𝑝} ⊆ (Base‘𝑅)) → ((RSpan‘𝑅)‘{𝑝}) ∈ (LIdeal‘𝑅))
42	14, 39, 41	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → ((RSpan‘𝑅)‘{𝑝}) ∈ (LIdeal‘𝑅))
43	4, 26, 16, 38, 2, 6, 18, 42	mxidlirred 33700	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → (((RSpan‘𝑅)‘{𝑝}) ∈ (MaxIdeal‘𝑅) ↔ 𝑝 ∈ (Irred‘𝑅)))
44	37, 43	mpbird 260	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → ((RSpan‘𝑅)‘{𝑝}) ∈ (MaxIdeal‘𝑅))
45	44	ad3antrrr 742	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → ((RSpan‘𝑅)‘{𝑝}) ∈ (MaxIdeal‘𝑅))
46		eqid 2769	. . . . . . . . . . . 12 ⊢ (LSSum‘(mulGrp‘𝑅)) = (LSSum‘(mulGrp‘𝑅))
47	46	mxidlprm 33698	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ CRing ∧ ((RSpan‘𝑅)‘{𝑝}) ∈ (MaxIdeal‘𝑅)) → ((RSpan‘𝑅)‘{𝑝}) ∈ (PrmIdeal‘𝑅))
48	35, 45, 47	syl2anc 595	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → ((RSpan‘𝑅)‘{𝑝}) ∈ (PrmIdeal‘𝑅))
49		simpllr 787	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → 𝑥 ∈ (Base‘𝑅))
50		simplr 780	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → 𝑦 ∈ (Base‘𝑅))
51		simpr 489	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦))
52	4, 26, 27, 28, 29	ellpi 33630	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → ((𝑥(.r‘𝑅)𝑦) ∈ ((RSpan‘𝑅)‘{𝑝}) ↔ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)))
53	51, 52	mpbird 260	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → (𝑥(.r‘𝑅)𝑦) ∈ ((RSpan‘𝑅)‘{𝑝}))
54		eqid 2769	. . . . . . . . . . 11 ⊢ (.r‘𝑅) = (.r‘𝑅)
55	4, 54	prmidlc 21444	. . . . . . . . . 10 ⊢ (((𝑅 ∈ CRing ∧ ((RSpan‘𝑅)‘{𝑝}) ∈ (PrmIdeal‘𝑅)) ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ (𝑥(.r‘𝑅)𝑦) ∈ ((RSpan‘𝑅)‘{𝑝}))) → (𝑥 ∈ ((RSpan‘𝑅)‘{𝑝}) ∨ 𝑦 ∈ ((RSpan‘𝑅)‘{𝑝})))
56	35, 48, 49, 50, 53, 55	syl23anc 1402	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → (𝑥 ∈ ((RSpan‘𝑅)‘{𝑝}) ∨ 𝑦 ∈ ((RSpan‘𝑅)‘{𝑝})))
57	31, 33, 56	orim12da 980	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ 𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦)) → (𝑝(∥r‘𝑅)𝑥 ∨ 𝑝(∥r‘𝑅)𝑦))
58	57	ex 417	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) → (𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦) → (𝑝(∥r‘𝑅)𝑥 ∨ 𝑝(∥r‘𝑅)𝑦)))
59	58	anasss 471	. . . . . 6 ⊢ (((𝜑 ∧ 𝑝 ∈ 𝐼) ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅))) → (𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦) → (𝑝(∥r‘𝑅)𝑥 ∨ 𝑝(∥r‘𝑅)𝑦)))
60	59	ralrimivva 3214	. . . . 5 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → ∀𝑥 ∈ (Base‘𝑅)∀𝑦 ∈ (Base‘𝑅)(𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦) → (𝑝(∥r‘𝑅)𝑥 ∨ 𝑝(∥r‘𝑅)𝑦)))
61	4, 7, 16, 27, 54	isrprm 33752	. . . . . 6 ⊢ (𝑅 ∈ PID → (𝑝 ∈ (RPrime‘𝑅) ↔ (𝑝 ∈ ((Base‘𝑅) ∖ ((Unit‘𝑅) ∪ {(0g‘𝑅)})) ∧ ∀𝑥 ∈ (Base‘𝑅)∀𝑦 ∈ (Base‘𝑅)(𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦) → (𝑝(∥r‘𝑅)𝑥 ∨ 𝑝(∥r‘𝑅)𝑦)))))
62	61	biimpar 482	. . . . 5 ⊢ ((𝑅 ∈ PID ∧ (𝑝 ∈ ((Base‘𝑅) ∖ ((Unit‘𝑅) ∪ {(0g‘𝑅)})) ∧ ∀𝑥 ∈ (Base‘𝑅)∀𝑦 ∈ (Base‘𝑅)(𝑝(∥r‘𝑅)(𝑥(.r‘𝑅)𝑦) → (𝑝(∥r‘𝑅)𝑥 ∨ 𝑝(∥r‘𝑅)𝑦)))) → 𝑝 ∈ (RPrime‘𝑅))
63	2, 25, 60, 62	syl12anc 849	. . . 4 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ∈ (RPrime‘𝑅))
64		rprmirredb.p	. . . 4 ⊢ 𝑃 = (RPrime‘𝑅)
65	63, 64	eleqtrrdi 2880	. . 3 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝐼) → 𝑝 ∈ 𝑃)
66		simpr 489	. . . 4 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝑃) → 𝑝 ∈ 𝑃)
67	12	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝑃) → 𝑅 ∈ IDomn)
68	64, 3, 66, 67	rprmirred 33766	. . 3 ⊢ ((𝜑 ∧ 𝑝 ∈ 𝑃) → 𝑝 ∈ 𝐼)
69	65, 68	impbida 812	. 2 ⊢ (𝜑 → (𝑝 ∈ 𝐼 ↔ 𝑝 ∈ 𝑃))
70	69	eqrdv 2767	1 ⊢ (𝜑 → 𝐼 = 𝑃)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   = wceq 1567   ∈ wcel 2149   ≠ wne 2964  ∀wral 3085   ∖ cdif 3910   ∪ cun 3911   ∩ cin 3912   ⊆ wss 3913  {csn 4594   class class class wbr 5113  ‘cfv 6537  (class class class)co 7411  Basecbs 17269  ._rcmulr 17311  0_gc0g 17492  LSSumclsm 19704  mulGrpcmgp 20216  Ringcrg 20315  CRingccrg 20316  ∥_rcdsr 20436  Unitcui 20437  Irredcir 20438  RPrimecrpm 20514  IDomncidom 20778  LIdealclidl 21308  RSpancrsp 21309  PrmIdealcprmidl 21431  LPIRclpir 21458  PIDcpid 21473  MaxIdealcmxidl 33687

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-int 4917  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-tpos 8222  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-er 8694  df-en 8944  df-dom 8945  df-sdom 8946  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-nn 12234  df-2 12303  df-3 12304  df-4 12305  df-5 12306  df-6 12307  df-7 12308  df-8 12309  df-sets 17224  df-slot 17242  df-ndx 17254  df-base 17270  df-ress 17291  df-plusg 17323  df-mulr 17324  df-sca 17326  df-vsca 17327  df-ip 17328  df-0g 17494  df-mgm 18698  df-sgrp 18777  df-mnd 18793  df-submnd 18842  df-grp 19003  df-minusg 19004  df-sbg 19005  df-subg 19189  df-cntz 19387  df-lsm 19706  df-cmn 19852  df-abl 19853  df-mgp 20217  df-rng 20231  df-ur 20264  df-ring 20317  df-cring 20318  df-oppr 20419  df-dvdsr 20439  df-unit 20440  df-irred 20441  df-invr 20470  df-rprm 20515  df-nzr 20596  df-subrg 20655  df-domn 20780  df-idom 20781  df-lmod 20961  df-lss 21031  df-lsp 21071  df-sra 21272  df-rgmod 21273  df-lidl 21310  df-rsp 21311  df-prmidl 21432  df-lpidl 21459  df-lpir 21460  df-pid 21474  df-mxidl 33688

This theorem is referenced by:  dfprm3  33788