Theorem zarclssn 34263

Description: The closed points of Zariski topology are the maximal ideals. (Contributed by Thierry Arnoux, 16-Jun-2024.)

Hypotheses

Ref	Expression
zarclsx.1	⊢ 𝑉 = (𝑖 ∈ (LIdeal‘𝑅) ↦ {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗})
zarclssn.1	⊢ 𝐵 = (LIdeal‘𝑅)

Assertion

Ref	Expression
zarclssn	⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → ({𝑀} = (𝑉‘𝑀) ↔ 𝑀 ∈ (MaxIdeal‘𝑅)))

Distinct variable groups:   𝑅,𝑖,𝑗   𝑖,𝑉   𝐵,𝑖,𝑗   𝑖,𝑀,𝑗   𝑗,𝑉

Proof of Theorem zarclssn

Dummy variable 𝑚 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		crngring 20322	. . . 4 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
2	1	ad2antrr 738	. . 3 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑅 ∈ Ring)
3		simplr 780	. . . . 5 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑀 ∈ 𝐵)
4		zarclssn.1	. . . . 5 ⊢ 𝐵 = (LIdeal‘𝑅)
5	3, 4	eleqtrdi 2873	. . . 4 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑀 ∈ (LIdeal‘𝑅))
6		simpr 489	. . . . . 6 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → {𝑀} = (𝑉‘𝑀))
7	3	snn0d 4741	. . . . . 6 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → {𝑀} ≠ ∅)
8	6, 7	eqnetrrd 3026	. . . . 5 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → (𝑉‘𝑀) ≠ ∅)
9		simpll 778	. . . . . 6 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑅 ∈ CRing)
10		zarclsx.1	. . . . . . . 8 ⊢ 𝑉 = (𝑖 ∈ (LIdeal‘𝑅) ↦ {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗})
11		eqid 2763	. . . . . . . 8 ⊢ (Base‘𝑅) = (Base‘𝑅)
12	10, 11	zarcls1 34259	. . . . . . 7 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (LIdeal‘𝑅)) → ((𝑉‘𝑀) = ∅ ↔ 𝑀 = (Base‘𝑅)))
13	12	necon3bid 3002	. . . . . 6 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (LIdeal‘𝑅)) → ((𝑉‘𝑀) ≠ ∅ ↔ 𝑀 ≠ (Base‘𝑅)))
14	9, 5, 13	syl2anc 595	. . . . 5 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → ((𝑉‘𝑀) ≠ ∅ ↔ 𝑀 ≠ (Base‘𝑅)))
15	8, 14	mpbid 235	. . . 4 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑀 ≠ (Base‘𝑅))
16		simpr 489	. . . . . . . . . . . 12 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑗 ⊆ 𝑚)
17	9	ad5antr 746	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑅 ∈ CRing)
18		simplr 780	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑚 ∈ (MaxIdeal‘𝑅))
19		eqid 2763	. . . . . . . . . . . . . . 15 ⊢ (LSSum‘(mulGrp‘𝑅)) = (LSSum‘(mulGrp‘𝑅))
20	19	mxidlprm 33753	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ CRing ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) → 𝑚 ∈ (PrmIdeal‘𝑅))
21	17, 18, 20	syl2anc 595	. . . . . . . . . . . . 13 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑚 ∈ (PrmIdeal‘𝑅))
22		simp-4r 795	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑀 ⊆ 𝑗)
23	22, 16	sstrd 3947	. . . . . . . . . . . . 13 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑀 ⊆ 𝑚)
24	10	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑉 = (𝑖 ∈ (LIdeal‘𝑅) ↦ {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗}))
25		sseq1 3962	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑖 = 𝑀 → (𝑖 ⊆ 𝑗 ↔ 𝑀 ⊆ 𝑗))
26	25	rabbidv 3423	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 = 𝑀 → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗} = {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗})
27	26	adantl 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑖 = 𝑀) → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗} = {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗})
28		fvex 6894	. . . . . . . . . . . . . . . . . . . 20 ⊢ (PrmIdeal‘𝑅) ∈ V
29	28	rabex 5309	. . . . . . . . . . . . . . . . . . 19 ⊢ {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗} ∈ V
30	29	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗} ∈ V)
31	24, 27, 5, 30	fvmptd 6997	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → (𝑉‘𝑀) = {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗})
32	6, 31	eqtr2d 2799	. . . . . . . . . . . . . . . 16 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗} = {𝑀})
33		rabeqsn 4633	. . . . . . . . . . . . . . . 16 ⊢ ({𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗} = {𝑀} ↔ ∀𝑗((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀))
34	32, 33	sylib 221	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → ∀𝑗((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀))
35	34	ad5antr 746	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → ∀𝑗((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀))
36		vex 3459	. . . . . . . . . . . . . . 15 ⊢ 𝑚 ∈ V
37		eleq1w 2846	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝑚 → (𝑗 ∈ (PrmIdeal‘𝑅) ↔ 𝑚 ∈ (PrmIdeal‘𝑅)))
38		sseq2 3963	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝑚 → (𝑀 ⊆ 𝑗 ↔ 𝑀 ⊆ 𝑚))
39	37, 38	anbi12d 643	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝑚 → ((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ (𝑚 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑚)))
40		eqeq1 2767	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝑚 → (𝑗 = 𝑀 ↔ 𝑚 = 𝑀))
41	39, 40	bibi12d 348	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = 𝑚 → (((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀) ↔ ((𝑚 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑚) ↔ 𝑚 = 𝑀)))
42	36, 41	spcv 3564	. . . . . . . . . . . . . 14 ⊢ (∀𝑗((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀) → ((𝑚 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑚) ↔ 𝑚 = 𝑀))
43	35, 42	syl 18	. . . . . . . . . . . . 13 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → ((𝑚 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑚) ↔ 𝑚 = 𝑀))
44	21, 23, 43	mpbi2and 724	. . . . . . . . . . . 12 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑚 = 𝑀)
45	16, 44	sseqtrd 3973	. . . . . . . . . . 11 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑗 ⊆ 𝑀)
46	45, 22	eqssd 3954	. . . . . . . . . 10 ⊢ ((((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) ∧ 𝑚 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 ⊆ 𝑚) → 𝑗 = 𝑀)
47	1	ad5antr 746	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) → 𝑅 ∈ Ring)
48		simpllr 787	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) → 𝑗 ∈ (LIdeal‘𝑅))
49		simpr 489	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) → ¬ 𝑗 = (Base‘𝑅))
50	49	neqned 2965	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) → 𝑗 ≠ (Base‘𝑅))
51	11	ssmxidl 33757	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ Ring ∧ 𝑗 ∈ (LIdeal‘𝑅) ∧ 𝑗 ≠ (Base‘𝑅)) → ∃𝑚 ∈ (MaxIdeal‘𝑅)𝑗 ⊆ 𝑚)
52	47, 48, 50, 51	syl3anc 1398	. . . . . . . . . 10 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) → ∃𝑚 ∈ (MaxIdeal‘𝑅)𝑗 ⊆ 𝑚)
53	46, 52	r19.29a 3173	. . . . . . . . 9 ⊢ ((((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) ∧ ¬ 𝑗 = (Base‘𝑅)) → 𝑗 = 𝑀)
54	53	ex 417	. . . . . . . 8 ⊢ (((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) → (¬ 𝑗 = (Base‘𝑅) → 𝑗 = 𝑀))
55	54	orrd 876	. . . . . . 7 ⊢ (((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) → (𝑗 = (Base‘𝑅) ∨ 𝑗 = 𝑀))
56	55	orcomd 884	. . . . . 6 ⊢ (((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) ∧ 𝑀 ⊆ 𝑗) → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅)))
57	56	ex 417	. . . . 5 ⊢ ((((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) ∧ 𝑗 ∈ (LIdeal‘𝑅)) → (𝑀 ⊆ 𝑗 → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅))))
58	57	ralrimiva 3157	. . . 4 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → ∀𝑗 ∈ (LIdeal‘𝑅)(𝑀 ⊆ 𝑗 → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅))))
59	5, 15, 58	3jca 1146	. . 3 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → (𝑀 ∈ (LIdeal‘𝑅) ∧ 𝑀 ≠ (Base‘𝑅) ∧ ∀𝑗 ∈ (LIdeal‘𝑅)(𝑀 ⊆ 𝑗 → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅)))))
60	11	ismxidl 33745	. . . 4 ⊢ (𝑅 ∈ Ring → (𝑀 ∈ (MaxIdeal‘𝑅) ↔ (𝑀 ∈ (LIdeal‘𝑅) ∧ 𝑀 ≠ (Base‘𝑅) ∧ ∀𝑗 ∈ (LIdeal‘𝑅)(𝑀 ⊆ 𝑗 → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅))))))
61	60	biimpar 482	. . 3 ⊢ ((𝑅 ∈ Ring ∧ (𝑀 ∈ (LIdeal‘𝑅) ∧ 𝑀 ≠ (Base‘𝑅) ∧ ∀𝑗 ∈ (LIdeal‘𝑅)(𝑀 ⊆ 𝑗 → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅))))) → 𝑀 ∈ (MaxIdeal‘𝑅))
62	2, 59, 61	syl2anc 595	. 2 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ {𝑀} = (𝑉‘𝑀)) → 𝑀 ∈ (MaxIdeal‘𝑅))
63	10	a1i 11	. . . . 5 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑉 = (𝑖 ∈ (LIdeal‘𝑅) ↦ {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗}))
64	26	adantl 486	. . . . 5 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑖 = 𝑀) → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑖 ⊆ 𝑗} = {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗})
65	11	mxidlidl 33746	. . . . . 6 ⊢ ((𝑅 ∈ Ring ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (LIdeal‘𝑅))
66	1, 65	sylan 591	. . . . 5 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (LIdeal‘𝑅))
67	29	a1i 11	. . . . 5 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗} ∈ V)
68	63, 64, 66, 67	fvmptd 6997	. . . 4 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → (𝑉‘𝑀) = {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗})
69	1	ad2antrr 738	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑅 ∈ Ring)
70		simplr 780	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑀 ∈ (MaxIdeal‘𝑅))
71		simprl 782	. . . . . . . . . . 11 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑗 ∈ (PrmIdeal‘𝑅))
72		prmidlidl 21469	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ Ring ∧ 𝑗 ∈ (PrmIdeal‘𝑅)) → 𝑗 ∈ (LIdeal‘𝑅))
73	69, 71, 72	syl2anc 595	. . . . . . . . . 10 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑗 ∈ (LIdeal‘𝑅))
74		simprr 784	. . . . . . . . . 10 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑀 ⊆ 𝑗)
75	73, 74	jca 520	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → (𝑗 ∈ (LIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗))
76	11	mxidlmax 33748	. . . . . . . . 9 ⊢ (((𝑅 ∈ Ring ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (LIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅)))
77	69, 70, 75, 76	syl21anc 850	. . . . . . . 8 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → (𝑗 = 𝑀 ∨ 𝑗 = (Base‘𝑅)))
78		eqid 2763	. . . . . . . . . . 11 ⊢ (.r‘𝑅) = (.r‘𝑅)
79	11, 78	prmidlnr 21464	. . . . . . . . . 10 ⊢ ((𝑅 ∈ Ring ∧ 𝑗 ∈ (PrmIdeal‘𝑅)) → 𝑗 ≠ (Base‘𝑅))
80	69, 71, 79	syl2anc 595	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑗 ≠ (Base‘𝑅))
81	80	neneqd 2963	. . . . . . . 8 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → ¬ 𝑗 = (Base‘𝑅))
82	77, 81	olcnd 890	. . . . . . 7 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗)) → 𝑗 = 𝑀)
83		simpr 489	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 = 𝑀) → 𝑗 = 𝑀)
84	19	mxidlprm 33753	. . . . . . . . . 10 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → 𝑀 ∈ (PrmIdeal‘𝑅))
85	84	adantr 485	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 = 𝑀) → 𝑀 ∈ (PrmIdeal‘𝑅))
86	83, 85	eqeltrd 2863	. . . . . . . 8 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 = 𝑀) → 𝑗 ∈ (PrmIdeal‘𝑅))
87		ssidd 3960	. . . . . . . . 9 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 = 𝑀) → 𝑗 ⊆ 𝑗)
88	83, 87	eqsstrrd 3972	. . . . . . . 8 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 = 𝑀) → 𝑀 ⊆ 𝑗)
89	86, 88	jca 520	. . . . . . 7 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) ∧ 𝑗 = 𝑀) → (𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗))
90	82, 89	impbida 812	. . . . . 6 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → ((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀))
91	90	alrimiv 1957	. . . . 5 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → ∀𝑗((𝑗 ∈ (PrmIdeal‘𝑅) ∧ 𝑀 ⊆ 𝑗) ↔ 𝑗 = 𝑀))
92	91, 33	sylibr 237	. . . 4 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → {𝑗 ∈ (PrmIdeal‘𝑅) ∣ 𝑀 ⊆ 𝑗} = {𝑀})
93	68, 92	eqtr2d 2799	. . 3 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → {𝑀} = (𝑉‘𝑀))
94	93	adantlr 727	. 2 ⊢ (((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ 𝑀 ∈ (MaxIdeal‘𝑅)) → {𝑀} = (𝑉‘𝑀))
95	62, 94	impbida 812	1 ⊢ ((𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → ({𝑀} = (𝑉‘𝑀) ↔ 𝑀 ∈ (MaxIdeal‘𝑅)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   ∧ w3a 1103  ∀wal 1568   = wceq 1570   ∈ wcel 2143   ≠ wne 2958  ∀wral 3079  ∃wrex 3089  {crab 3416  Vcvv 3455   ⊆ wss 3905  ∅c0 4286  {csn 4589   ↦ cmpt 5192  ‘cfv 6536  Basecbs 17264  ._rcmulr 17306  LSSumclsm 19699  mulGrpcmgp 20211  Ringcrg 20310  CRingccrg 20311  LIdealclidl 21330  PrmIdealcprmidl 21460  MaxIdealcmxidl 33742

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-ac2 10442  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-rpss 7720  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-oadd 8453  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-dju 9883  df-card 9921  df-ac 10096  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-nn 12229  df-2 12298  df-3 12299  df-4 12300  df-5 12301  df-6 12302  df-7 12303  df-8 12304  df-sets 17219  df-slot 17237  df-ndx 17249  df-base 17265  df-ress 17286  df-plusg 17318  df-mulr 17319  df-sca 17321  df-vsca 17322  df-ip 17323  df-0g 17489  df-mgm 18693  df-sgrp 18772  df-mnd 18788  df-submnd 18837  df-grp 18998  df-minusg 18999  df-sbg 19000  df-subg 19184  df-cntz 19382  df-lsm 19701  df-cmn 19847  df-abl 19848  df-mgp 20212  df-rng 20226  df-ur 20259  df-ring 20312  df-cring 20313  df-subrg 20669  df-lmod 20983  df-lss 21053  df-lsp 21093  df-sra 21294  df-rgmod 21295  df-lidl 21332  df-rsp 21333  df-prmidl 21461  df-lpidl 21490  df-mxidl 33743

This theorem is referenced by:  zarmxt1  34270