Theorem mxidlprm 33560

Description: Every maximal ideal is prime. Statement in [Lang] p. 92. (Contributed by Thierry Arnoux, 21-Jan-2024.)

Hypothesis

Ref	Expression
mxidlprm.1	⊢ × = (LSSum‘(mulGrp‘𝑅))

Assertion

Ref	Expression
mxidlprm	⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (PrmIdeal‘𝑅))

Proof of Theorem mxidlprm

Dummy variables 𝑎 𝑘 𝑢 𝑏 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		crngring 20224	. . 3 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
2	1	adantr 481	. 2 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑅 ∈ Ring)
3		eqid 2740	. . . 4 ⊢ (Base‘𝑅) = (Base‘𝑅)
4	3	mxidlidl 33553	. . 3 ⊢ ((𝑅 ∈ Ring ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (LIdeal‘𝑅))
5	1, 4	sylan 586	. 2 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (LIdeal‘𝑅))
6	3	mxidlnr 33554	. . 3 ⊢ ((𝑅 ∈ Ring ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ≠ (Base‘𝑅))
7	1, 6	sylan 586	. 2 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ≠ (Base‘𝑅))
8		simpllr 781	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘))
9		simpr 485	. . . . . . . . . . . . . 14 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑘 = (𝑎(.r‘𝑅)𝑥))
10	9	oveq2d 7379	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑢(+g‘𝑅)𝑘) = (𝑢(+g‘𝑅)(𝑎(.r‘𝑅)𝑥)))
11	8, 10	eqtrd 2775	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (1r‘𝑅) = (𝑢(+g‘𝑅)(𝑎(.r‘𝑅)𝑥)))
12	11	oveq1d 7378	. . . . . . . . . . 11 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → ((1r‘𝑅)(.r‘𝑅)𝑦) = ((𝑢(+g‘𝑅)(𝑎(.r‘𝑅)𝑥))(.r‘𝑅)𝑦))
13	2	ad4antr 738	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑅 ∈ Ring)
14	13	ad5antr 740	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑅 ∈ Ring)
15		simp-8r 797	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑦 ∈ (Base‘𝑅))
16		eqid 2740	. . . . . . . . . . . . 13 ⊢ (.r‘𝑅) = (.r‘𝑅)
17		eqid 2740	. . . . . . . . . . . . 13 ⊢ (1r‘𝑅) = (1r‘𝑅)
18	3, 16, 17	ringlidm 20248	. . . . . . . . . . . 12 ⊢ ((𝑅 ∈ Ring ∧ 𝑦 ∈ (Base‘𝑅)) → ((1r‘𝑅)(.r‘𝑅)𝑦) = 𝑦)
19	14, 15, 18	syl2anc 590	. . . . . . . . . . 11 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → ((1r‘𝑅)(.r‘𝑅)𝑦) = 𝑦)
20		eqid 2740	. . . . . . . . . . . . . . . . 17 ⊢ (LIdeal‘𝑅) = (LIdeal‘𝑅)
21	3, 20	lidlss 21212	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ (LIdeal‘𝑅) → 𝑀 ⊆ (Base‘𝑅))
22	5, 21	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ⊆ (Base‘𝑅))
23	22	ad4antr 738	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ⊆ (Base‘𝑅))
24	23	ad5antr 740	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑀 ⊆ (Base‘𝑅))
25		simp-5r 791	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑢 ∈ 𝑀)
26	24, 25	sseldd 3923	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑢 ∈ (Base‘𝑅))
27		simplr 774	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑎 ∈ (Base‘𝑅))
28		simp-4r 789	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑥 ∈ (Base‘𝑅))
29	28	ad5antr 740	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑥 ∈ (Base‘𝑅))
30	3, 16	ringcl 20229	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ Ring ∧ 𝑎 ∈ (Base‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅)) → (𝑎(.r‘𝑅)𝑥) ∈ (Base‘𝑅))
31	14, 27, 29, 30	syl3anc 1379	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑎(.r‘𝑅)𝑥) ∈ (Base‘𝑅))
32		eqid 2740	. . . . . . . . . . . . 13 ⊢ (+g‘𝑅) = (+g‘𝑅)
33	3, 32, 16	ringdir 20241	. . . . . . . . . . . 12 ⊢ ((𝑅 ∈ Ring ∧ (𝑢 ∈ (Base‘𝑅) ∧ (𝑎(.r‘𝑅)𝑥) ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅))) → ((𝑢(+g‘𝑅)(𝑎(.r‘𝑅)𝑥))(.r‘𝑅)𝑦) = ((𝑢(.r‘𝑅)𝑦)(+g‘𝑅)((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦)))
34	14, 26, 31, 15, 33	syl13anc 1380	. . . . . . . . . . 11 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → ((𝑢(+g‘𝑅)(𝑎(.r‘𝑅)𝑥))(.r‘𝑅)𝑦) = ((𝑢(.r‘𝑅)𝑦)(+g‘𝑅)((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦)))
35	12, 19, 34	3eqtr3d 2783	. . . . . . . . . 10 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑦 = ((𝑢(.r‘𝑅)𝑦)(+g‘𝑅)((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦)))
36		simp-5r 791	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ∈ (MaxIdeal‘𝑅))
37	13, 36, 4	syl2anc 590	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ∈ (LIdeal‘𝑅))
38	37	ad5antr 740	. . . . . . . . . . 11 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑀 ∈ (LIdeal‘𝑅))
39		simp-10l 800	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑅 ∈ CRing)
40	3, 16	crngcom 20230	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ CRing ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑢 ∈ (Base‘𝑅)) → (𝑦(.r‘𝑅)𝑢) = (𝑢(.r‘𝑅)𝑦))
41	39, 15, 26, 40	syl3anc 1379	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑦(.r‘𝑅)𝑢) = (𝑢(.r‘𝑅)𝑦))
42	20, 3, 16	lidlmcl 21225	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ (LIdeal‘𝑅)) ∧ (𝑦 ∈ (Base‘𝑅) ∧ 𝑢 ∈ 𝑀)) → (𝑦(.r‘𝑅)𝑢) ∈ 𝑀)
43	14, 38, 15, 25, 42	syl22anc 844	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑦(.r‘𝑅)𝑢) ∈ 𝑀)
44	41, 43	eqeltrrd 2841	. . . . . . . . . . 11 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑢(.r‘𝑅)𝑦) ∈ 𝑀)
45	3, 16	ringass 20232	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ Ring ∧ (𝑎 ∈ (Base‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅))) → ((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦) = (𝑎(.r‘𝑅)(𝑥(.r‘𝑅)𝑦)))
46	14, 27, 29, 15, 45	syl13anc 1380	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → ((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦) = (𝑎(.r‘𝑅)(𝑥(.r‘𝑅)𝑦)))
47		simp-7r 795	. . . . . . . . . . . . 13 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑥(.r‘𝑅)𝑦) ∈ 𝑀)
48	20, 3, 16	lidlmcl 21225	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ (LIdeal‘𝑅)) ∧ (𝑎 ∈ (Base‘𝑅) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀)) → (𝑎(.r‘𝑅)(𝑥(.r‘𝑅)𝑦)) ∈ 𝑀)
49	14, 38, 27, 47, 48	syl22anc 844	. . . . . . . . . . . 12 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → (𝑎(.r‘𝑅)(𝑥(.r‘𝑅)𝑦)) ∈ 𝑀)
50	46, 49	eqeltrd 2840	. . . . . . . . . . 11 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → ((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦) ∈ 𝑀)
51	20, 32	lidlacl 21221	. . . . . . . . . . 11 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ (LIdeal‘𝑅)) ∧ ((𝑢(.r‘𝑅)𝑦) ∈ 𝑀 ∧ ((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦) ∈ 𝑀)) → ((𝑢(.r‘𝑅)𝑦)(+g‘𝑅)((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦)) ∈ 𝑀)
52	14, 38, 44, 50, 51	syl22anc 844	. . . . . . . . . 10 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → ((𝑢(.r‘𝑅)𝑦)(+g‘𝑅)((𝑎(.r‘𝑅)𝑥)(.r‘𝑅)𝑦)) ∈ 𝑀)
53	35, 52	eqeltrd 2840	. . . . . . . . 9 ⊢ (((((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) ∧ 𝑎 ∈ (Base‘𝑅)) ∧ 𝑘 = (𝑎(.r‘𝑅)𝑥)) → 𝑦 ∈ 𝑀)
54		simplr 774	. . . . . . . . . 10 ⊢ (((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) → 𝑘 ∈ ((Base‘𝑅) × {𝑥}))
55		eqid 2740	. . . . . . . . . . . . 13 ⊢ (mulGrp‘𝑅) = (mulGrp‘𝑅)
56	55, 3	mgpbas 20124	. . . . . . . . . . . 12 ⊢ (Base‘𝑅) = (Base‘(mulGrp‘𝑅))
57	55, 16	mgpplusg 20123	. . . . . . . . . . . 12 ⊢ (.r‘𝑅) = (+g‘(mulGrp‘𝑅))
58		mxidlprm.1	. . . . . . . . . . . 12 ⊢ × = (LSSum‘(mulGrp‘𝑅))
59		fvexd 6849	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (mulGrp‘𝑅) ∈ V)
60		ssidd 3945	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (Base‘𝑅) ⊆ (Base‘𝑅))
61	56, 57, 58, 59, 60, 28	elgrplsmsn 33480	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑘 ∈ ((Base‘𝑅) × {𝑥}) ↔ ∃𝑎 ∈ (Base‘𝑅)𝑘 = (𝑎(.r‘𝑅)𝑥)))
62	61	ad3antrrr 736	. . . . . . . . . 10 ⊢ (((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) → (𝑘 ∈ ((Base‘𝑅) × {𝑥}) ↔ ∃𝑎 ∈ (Base‘𝑅)𝑘 = (𝑎(.r‘𝑅)𝑥)))
63	54, 62	mpbid 233	. . . . . . . . 9 ⊢ (((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) → ∃𝑎 ∈ (Base‘𝑅)𝑘 = (𝑎(.r‘𝑅)𝑥))
64	53, 63	r19.29a 3148	. . . . . . . 8 ⊢ (((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑢 ∈ 𝑀) ∧ 𝑘 ∈ ((Base‘𝑅) × {𝑥})) ∧ (1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)) → 𝑦 ∈ 𝑀)
65	3, 17	ringidcl 20244	. . . . . . . . . . 11 ⊢ (𝑅 ∈ Ring → (1r‘𝑅) ∈ (Base‘𝑅))
66	13, 65	syl 17	. . . . . . . . . 10 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (1r‘𝑅) ∈ (Base‘𝑅))
67		eqid 2740	. . . . . . . . . . . . 13 ⊢ (LSSum‘𝑅) = (LSSum‘𝑅)
68		eqid 2740	. . . . . . . . . . . . 13 ⊢ (RSpan‘𝑅) = (RSpan‘𝑅)
69		eqid 2740	. . . . . . . . . . . . . . . 16 ⊢ (LPIdeal‘𝑅) = (LPIdeal‘𝑅)
70	69, 20	lpiss 21329	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ Ring → (LPIdeal‘𝑅) ⊆ (LIdeal‘𝑅))
71	13, 70	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (LPIdeal‘𝑅) ⊆ (LIdeal‘𝑅))
72	3, 55, 58, 68, 13, 28	lsmsnidl 33489	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((Base‘𝑅) × {𝑥}) ∈ (LPIdeal‘𝑅))
73	71, 72	sseldd 3923	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((Base‘𝑅) × {𝑥}) ∈ (LIdeal‘𝑅))
74	3, 67, 68, 13, 37, 73	lsmidl 33491	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ∈ (LIdeal‘𝑅))
75		rlmlmod 21200	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ Ring → (ringLMod‘𝑅) ∈ LMod)
76	13, 75	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (ringLMod‘𝑅) ∈ LMod)
77		rlmbas 21190	. . . . . . . . . . . . . . . 16 ⊢ (Base‘𝑅) = (Base‘(ringLMod‘𝑅))
78		rspval 21211	. . . . . . . . . . . . . . . 16 ⊢ (RSpan‘𝑅) = (LSpan‘(ringLMod‘𝑅))
79	77, 78	lspssid 20982	. . . . . . . . . . . . . . 15 ⊢ (((ringLMod‘𝑅) ∈ LMod ∧ 𝑀 ⊆ (Base‘𝑅)) → 𝑀 ⊆ ((RSpan‘𝑅)‘𝑀))
80	76, 23, 79	syl2anc 590	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ⊆ ((RSpan‘𝑅)‘𝑀))
81	28	snssd 4725	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → {𝑥} ⊆ (Base‘𝑅))
82	3, 55, 58, 13, 60, 81	ringlsmss 33485	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((Base‘𝑅) × {𝑥}) ⊆ (Base‘𝑅))
83	23, 82	unssd 4128	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑀 ∪ ((Base‘𝑅) × {𝑥})) ⊆ (Base‘𝑅))
84		ssun1 4114	. . . . . . . . . . . . . . . 16 ⊢ 𝑀 ⊆ (𝑀 ∪ ((Base‘𝑅) × {𝑥}))
85	84	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ⊆ (𝑀 ∪ ((Base‘𝑅) × {𝑥})))
86	77, 78	lspss 20981	. . . . . . . . . . . . . . 15 ⊢ (((ringLMod‘𝑅) ∈ LMod ∧ (𝑀 ∪ ((Base‘𝑅) × {𝑥})) ⊆ (Base‘𝑅) ∧ 𝑀 ⊆ (𝑀 ∪ ((Base‘𝑅) × {𝑥}))) → ((RSpan‘𝑅)‘𝑀) ⊆ ((RSpan‘𝑅)‘(𝑀 ∪ ((Base‘𝑅) × {𝑥}))))
87	76, 83, 85, 86	syl3anc 1379	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((RSpan‘𝑅)‘𝑀) ⊆ ((RSpan‘𝑅)‘(𝑀 ∪ ((Base‘𝑅) × {𝑥}))))
88	80, 87	sstrd 3932	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ⊆ ((RSpan‘𝑅)‘(𝑀 ∪ ((Base‘𝑅) × {𝑥}))))
89	3, 67, 68, 13, 37, 73	lsmidllsp 33490	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = ((RSpan‘𝑅)‘(𝑀 ∪ ((Base‘𝑅) × {𝑥}))))
90	88, 89	sseqtrrd 3959	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑀 ⊆ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})))
91	3	mxidlmax 33555	. . . . . . . . . . . 12 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ ((𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ∈ (LIdeal‘𝑅) ∧ 𝑀 ⊆ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})))) → ((𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = 𝑀 ∨ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = (Base‘𝑅)))
92	13, 36, 74, 90, 91	syl22anc 844	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = 𝑀 ∨ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = (Base‘𝑅)))
93		eqid 2740	. . . . . . . . . . . . . . . . 17 ⊢ (0g‘𝑅) = (0g‘𝑅)
94	20, 93	lidl0cl 21220	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Ring ∧ 𝑀 ∈ (LIdeal‘𝑅)) → (0g‘𝑅) ∈ 𝑀)
95	13, 37, 94	syl2anc 590	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (0g‘𝑅) ∈ 𝑀)
96		oveq1 7370	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = (0g‘𝑅) → (𝑎(+g‘𝑅)𝑏) = ((0g‘𝑅)(+g‘𝑅)𝑏))
97	96	eqeq2d 2751	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (0g‘𝑅) → (𝑥 = (𝑎(+g‘𝑅)𝑏) ↔ 𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑏)))
98	97	rexbidv 3164	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (0g‘𝑅) → (∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = (𝑎(+g‘𝑅)𝑏) ↔ ∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑏)))
99	98	adantl 482	. . . . . . . . . . . . . . 15 ⊢ (((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑎 = (0g‘𝑅)) → (∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = (𝑎(+g‘𝑅)𝑏) ↔ ∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑏)))
100		oveq1 7370	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (1r‘𝑅) → (𝑎(.r‘𝑅)𝑥) = ((1r‘𝑅)(.r‘𝑅)𝑥))
101	100	eqeq2d 2751	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (1r‘𝑅) → (𝑥 = (𝑎(.r‘𝑅)𝑥) ↔ 𝑥 = ((1r‘𝑅)(.r‘𝑅)𝑥)))
102	101	adantl 482	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑎 = (1r‘𝑅)) → (𝑥 = (𝑎(.r‘𝑅)𝑥) ↔ 𝑥 = ((1r‘𝑅)(.r‘𝑅)𝑥)))
103	3, 16, 17	ringlidm 20248	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑅 ∈ Ring ∧ 𝑥 ∈ (Base‘𝑅)) → ((1r‘𝑅)(.r‘𝑅)𝑥) = 𝑥)
104	13, 28, 103	syl2anc 590	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((1r‘𝑅)(.r‘𝑅)𝑥) = 𝑥)
105	104	eqcomd 2746	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑥 = ((1r‘𝑅)(.r‘𝑅)𝑥))
106	66, 102, 105	rspcedvd 3569	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ∃𝑎 ∈ (Base‘𝑅)𝑥 = (𝑎(.r‘𝑅)𝑥))
107	56, 57, 58, 59, 60, 28	elgrplsmsn 33480	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑥 ∈ ((Base‘𝑅) × {𝑥}) ↔ ∃𝑎 ∈ (Base‘𝑅)𝑥 = (𝑎(.r‘𝑅)𝑥)))
108	106, 107	mpbird 258	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑥 ∈ ((Base‘𝑅) × {𝑥}))
109		oveq2 7371	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑏 = 𝑥 → ((0g‘𝑅)(+g‘𝑅)𝑏) = ((0g‘𝑅)(+g‘𝑅)𝑥))
110	109	eqeq2d 2751	. . . . . . . . . . . . . . . . 17 ⊢ (𝑏 = 𝑥 → (𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑏) ↔ 𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑥)))
111	110	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) ∧ 𝑏 = 𝑥) → (𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑏) ↔ 𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑥)))
112		ringgrp 20217	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑅 ∈ Ring → 𝑅 ∈ Grp)
113	13, 112	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑅 ∈ Grp)
114	3, 32, 93	grplid 18941	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑅 ∈ Grp ∧ 𝑥 ∈ (Base‘𝑅)) → ((0g‘𝑅)(+g‘𝑅)𝑥) = 𝑥)
115	113, 28, 114	syl2anc 590	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((0g‘𝑅)(+g‘𝑅)𝑥) = 𝑥)
116	115	eqcomd 2746	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑥))
117	108, 111, 116	rspcedvd 3569	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = ((0g‘𝑅)(+g‘𝑅)𝑏))
118	95, 99, 117	rspcedvd 3569	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ∃𝑎 ∈ 𝑀 ∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = (𝑎(+g‘𝑅)𝑏))
119		simp-5l 790	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑅 ∈ CRing)
120	3, 32, 67	lsmelvalx 19613	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ⊆ (Base‘𝑅) ∧ ((Base‘𝑅) × {𝑥}) ⊆ (Base‘𝑅)) → (𝑥 ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ↔ ∃𝑎 ∈ 𝑀 ∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = (𝑎(+g‘𝑅)𝑏)))
121	119, 23, 82, 120	syl3anc 1379	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑥 ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ↔ ∃𝑎 ∈ 𝑀 ∃𝑏 ∈ ((Base‘𝑅) × {𝑥})𝑥 = (𝑎(+g‘𝑅)𝑏)))
122	118, 121	mpbird 258	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑥 ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})))
123		simpr 485	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ¬ 𝑥 ∈ 𝑀)
124		nelne1 3032	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ≠ 𝑀)
125	122, 123, 124	syl2anc 590	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ≠ 𝑀)
126	125	neneqd 2940	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ¬ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = 𝑀)
127	92, 126	orcnd 884	. . . . . . . . . 10 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) = (Base‘𝑅))
128	66, 127	eleqtrrd 2843	. . . . . . . . 9 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → (1r‘𝑅) ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})))
129	3, 32, 67	lsmelvalx 19613	. . . . . . . . . 10 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ⊆ (Base‘𝑅) ∧ ((Base‘𝑅) × {𝑥}) ⊆ (Base‘𝑅)) → ((1r‘𝑅) ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ↔ ∃𝑢 ∈ 𝑀 ∃𝑘 ∈ ((Base‘𝑅) × {𝑥})(1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)))
130	119, 23, 82, 129	syl3anc 1379	. . . . . . . . 9 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ((1r‘𝑅) ∈ (𝑀(LSSum‘𝑅)((Base‘𝑅) × {𝑥})) ↔ ∃𝑢 ∈ 𝑀 ∃𝑘 ∈ ((Base‘𝑅) × {𝑥})(1r‘𝑅) = (𝑢(+g‘𝑅)𝑘)))
131	128, 130	mpbid 233	. . . . . . . 8 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → ∃𝑢 ∈ 𝑀 ∃𝑘 ∈ ((Base‘𝑅) × {𝑥})(1r‘𝑅) = (𝑢(+g‘𝑅)𝑘))
132	64, 131	r19.29vva 3200	. . . . . . 7 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) ∧ ¬ 𝑥 ∈ 𝑀) → 𝑦 ∈ 𝑀)
133	132	ex 413	. . . . . 6 ⊢ (((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) → (¬ 𝑥 ∈ 𝑀 → 𝑦 ∈ 𝑀))
134	133	orrd 869	. . . . 5 ⊢ (((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) ∧ (𝑥(.r‘𝑅)𝑦) ∈ 𝑀) → (𝑥 ∈ 𝑀 ∨ 𝑦 ∈ 𝑀))
135	134	ex 413	. . . 4 ⊢ ((((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑥 ∈ (Base‘𝑅)) ∧ 𝑦 ∈ (Base‘𝑅)) → ((𝑥(.r‘𝑅)𝑦) ∈ 𝑀 → (𝑥 ∈ 𝑀 ∨ 𝑦 ∈ 𝑀)))
136	135	anasss 467	. . 3 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅))) → ((𝑥(.r‘𝑅)𝑦) ∈ 𝑀 → (𝑥 ∈ 𝑀 ∨ 𝑦 ∈ 𝑀)))
137	136	ralrimivva 3183	. 2 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → ∀𝑥 ∈ (Base‘𝑅)∀𝑦 ∈ (Base‘𝑅)((𝑥(.r‘𝑅)𝑦) ∈ 𝑀 → (𝑥 ∈ 𝑀 ∨ 𝑦 ∈ 𝑀)))
138	3, 16	prmidl2 33531	. 2 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ (LIdeal‘𝑅)) ∧ (𝑀 ≠ (Base‘𝑅) ∧ ∀𝑥 ∈ (Base‘𝑅)∀𝑦 ∈ (Base‘𝑅)((𝑥(.r‘𝑅)𝑦) ∈ 𝑀 → (𝑥 ∈ 𝑀 ∨ 𝑦 ∈ 𝑀)))) → 𝑀 ∈ (PrmIdeal‘𝑅))
139	2, 5, 7, 137, 138	syl22anc 844	1 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (PrmIdeal‘𝑅))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 207   ∧ wa 396   ∨ wo 853   = wceq 1547   ∈ wcel 2119   ≠ wne 2935  ∀wral 3054  ∃wrex 3064  Vcvv 3432   ∪ cun 3888   ⊆ wss 3890  {csn 4562  ‘cfv 6492  (class class class)co 7363  Basecbs 17177  +_gcplusg 17218  ._rcmulr 17219  0_gc0g 17400  Grpcgrp 18907  LSSumclsm 19607  mulGrpcmgp 20119  1_rcur 20160  Ringcrg 20212  CRingccrg 20213  LModclmod 20857  ringLModcrglmod 21169  LIdealclidl 21206  RSpancrsp 21207  LPIdealclpidl 21320  PrmIdealcprmidl 33525  MaxIdealcmxidl 33549

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-er 8640  df-en 8891  df-dom 8892  df-sdom 8893  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-nn 12173  df-2 12242  df-3 12243  df-4 12244  df-5 12245  df-6 12246  df-7 12247  df-8 12248  df-sets 17132  df-slot 17150  df-ndx 17162  df-base 17178  df-ress 17199  df-plusg 17231  df-mulr 17232  df-sca 17234  df-vsca 17235  df-ip 17236  df-0g 17402  df-mgm 18606  df-sgrp 18685  df-mnd 18701  df-submnd 18750  df-grp 18910  df-minusg 18911  df-sbg 18912  df-subg 19097  df-cntz 19290  df-lsm 19609  df-cmn 19755  df-abl 19756  df-mgp 20120  df-rng 20132  df-ur 20161  df-ring 20214  df-cring 20215  df-subrg 20549  df-lmod 20859  df-lss 20929  df-lsp 20969  df-sra 21170  df-rgmod 21171  df-lidl 21208  df-rsp 21209  df-lpidl 21322  df-prmidl 33526  df-mxidl 33550

This theorem is referenced by:  rprmirredb  33622  1arithufdlem1  33634  zarcls1  34060  zarclssn  34064  zarmxt1  34071