isfldidl - Mathbox for Jeff Madsen

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

Theorem isfldidl 38308

Description: Determine if a ring is a field based on its ideals. (Contributed by Jeff Madsen, 10-Jun-2010.)

**Hypotheses**
Ref	Expression
isfldidl.1	⊢ 𝐺 = (1^st ‘𝐾)
isfldidl.2	⊢ 𝐻 = (2^nd ‘𝐾)
isfldidl.3	⊢ 𝑋 = ran 𝐺
isfldidl.4	⊢ 𝑍 = (GId‘𝐺)
isfldidl.5	⊢ 𝑈 = (GId‘𝐻)

**Assertion**
Ref	Expression
isfldidl	⊢ (𝐾 ∈ Fld ↔ (𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}))

Proof of Theorem isfldidl Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fldcrngo 38244	. . 3 ⊢ (𝐾 ∈ Fld → 𝐾 ∈ CRingOps)
2		flddivrng 38239	. . . 4 ⊢ (𝐾 ∈ Fld → 𝐾 ∈ DivRingOps)
3		isfldidl.1	. . . . 5 ⊢ 𝐺 = (1^st ‘𝐾)
4		isfldidl.2	. . . . 5 ⊢ 𝐻 = (2^nd ‘𝐾)
5		isfldidl.3	. . . . 5 ⊢ 𝑋 = ran 𝐺
6		isfldidl.4	. . . . 5 ⊢ 𝑍 = (GId‘𝐺)
7		isfldidl.5	. . . . 5 ⊢ 𝑈 = (GId‘𝐻)
8	3, 4, 5, 6, 7	dvrunz 38194	. . . 4 ⊢ (𝐾 ∈ DivRingOps → 𝑈 ≠ 𝑍)
9	2, 8	syl 17	. . 3 ⊢ (𝐾 ∈ Fld → 𝑈 ≠ 𝑍)
10	3, 4, 5, 6	divrngidl 38268	. . . 4 ⊢ (𝐾 ∈ DivRingOps → (Idl‘𝐾) = {{𝑍}, 𝑋})
11	2, 10	syl 17	. . 3 ⊢ (𝐾 ∈ Fld → (Idl‘𝐾) = {{𝑍}, 𝑋})
12	1, 9, 11	3jca 1129	. 2 ⊢ (𝐾 ∈ Fld → (𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}))
13		crngorngo 38240	. . . . . 6 ⊢ (𝐾 ∈ CRingOps → 𝐾 ∈ RingOps)
14	13	3ad2ant1 1134	. . . . 5 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ RingOps)
15		simp2 1138	. . . . 5 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝑈 ≠ 𝑍)
16	3	rneqi 5894	. . . . . . . . . . . . . . 15 ⊢ ran 𝐺 = ran (1^st ‘𝐾)
17	5, 16	eqtri 2760	. . . . . . . . . . . . . 14 ⊢ 𝑋 = ran (1^st ‘𝐾)
18	17, 4, 7	rngo1cl 38179	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ RingOps → 𝑈 ∈ 𝑋)
19	13, 18	syl 17	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ CRingOps → 𝑈 ∈ 𝑋)
20	19	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → 𝑈 ∈ 𝑋)
21		eldif 3913	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (𝑋 ∖ {𝑍}) ↔ (𝑥 ∈ 𝑋 ∧ ¬ 𝑥 ∈ {𝑍}))
22		snssi 4766	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ 𝑋 → {𝑥} ⊆ 𝑋)
23	3, 5	igenss 38302	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐾 ∈ RingOps ∧ {𝑥} ⊆ 𝑋) → {𝑥} ⊆ (𝐾 IdlGen {𝑥}))
24	22, 23	sylan2 594	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → {𝑥} ⊆ (𝐾 IdlGen {𝑥}))
25		vex 3446	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑥 ∈ V
26	25	snss 4743	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝐾 IdlGen {𝑥}) ↔ {𝑥} ⊆ (𝐾 IdlGen {𝑥}))
27	26	biimpri 228	. . . . . . . . . . . . . . . . . . . 20 ⊢ ({𝑥} ⊆ (𝐾 IdlGen {𝑥}) → 𝑥 ∈ (𝐾 IdlGen {𝑥}))
28		eleq2 2826	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐾 IdlGen {𝑥}) = {𝑍} → (𝑥 ∈ (𝐾 IdlGen {𝑥}) ↔ 𝑥 ∈ {𝑍}))
29	27, 28	syl5ibcom 245	. . . . . . . . . . . . . . . . . . 19 ⊢ ({𝑥} ⊆ (𝐾 IdlGen {𝑥}) → ((𝐾 IdlGen {𝑥}) = {𝑍} → 𝑥 ∈ {𝑍}))
30	29	con3dimp 408	. . . . . . . . . . . . . . . . . 18 ⊢ (({𝑥} ⊆ (𝐾 IdlGen {𝑥}) ∧ ¬ 𝑥 ∈ {𝑍}) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
31	24, 30	sylan 581	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐾 ∈ RingOps ∧ 𝑥 ∈ 𝑋) ∧ ¬ 𝑥 ∈ {𝑍}) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
32	31	anasss 466	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾 ∈ RingOps ∧ (𝑥 ∈ 𝑋 ∧ ¬ 𝑥 ∈ {𝑍})) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
33	21, 32	sylan2b 595	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
34	33	adantlr 716	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
35		eldifi 4085	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝑋 ∖ {𝑍}) → 𝑥 ∈ 𝑋)
36	35	snssd 4767	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ (𝑋 ∖ {𝑍}) → {𝑥} ⊆ 𝑋)
37	3, 5	igenidl 38303	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐾 ∈ RingOps ∧ {𝑥} ⊆ 𝑋) → (𝐾 IdlGen {𝑥}) ∈ (Idl‘𝐾))
38	36, 37	sylan2 594	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) ∈ (Idl‘𝐾))
39		eleq2 2826	. . . . . . . . . . . . . . . . . . 19 ⊢ ((Idl‘𝐾) = {{𝑍}, 𝑋} → ((𝐾 IdlGen {𝑥}) ∈ (Idl‘𝐾) ↔ (𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋}))
40	38, 39	syl5ibcom 245	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ((Idl‘𝐾) = {{𝑍}, 𝑋} → (𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋}))
41	40	imp 406	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐾 ∈ RingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → (𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋})
42	41	an32s 653	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋})
43		ovex 7401	. . . . . . . . . . . . . . . . 17 ⊢ (𝐾 IdlGen {𝑥}) ∈ V
44	43	elpr 4607	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋} ↔ ((𝐾 IdlGen {𝑥}) = {𝑍} ∨ (𝐾 IdlGen {𝑥}) = 𝑋))
45	42, 44	sylib 218	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ((𝐾 IdlGen {𝑥}) = {𝑍} ∨ (𝐾 IdlGen {𝑥}) = 𝑋))
46	45	ord 865	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (¬ (𝐾 IdlGen {𝑥}) = {𝑍} → (𝐾 IdlGen {𝑥}) = 𝑋))
47	34, 46	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = 𝑋)
48	13, 47	sylanl1 681	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = 𝑋)
49	3, 4, 5	prnc 38307	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑥 ∈ 𝑋) → (𝐾 IdlGen {𝑥}) = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
50	35, 49	sylan2 594	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
51	50	adantlr 716	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
52	48, 51	eqtr3d 2774	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → 𝑋 = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
53	20, 52	eleqtrd 2839	. . . . . . . . . 10 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → 𝑈 ∈ {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
54		eqeq1 2741	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑈 → (𝑧 = (𝑦𝐻𝑥) ↔ 𝑈 = (𝑦𝐻𝑥)))
55	54	rexbidv 3162	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑈 → (∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥) ↔ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥)))
56	55	elrab 3648	. . . . . . . . . 10 ⊢ (𝑈 ∈ {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)} ↔ (𝑈 ∈ 𝑋 ∧ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥)))
57	53, 56	sylib 218	. . . . . . . . 9 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝑈 ∈ 𝑋 ∧ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥)))
58	57	simprd 495	. . . . . . . 8 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥))
59		eqcom 2744	. . . . . . . . 9 ⊢ ((𝑦𝐻𝑥) = 𝑈 ↔ 𝑈 = (𝑦𝐻𝑥))
60	59	rexbii 3085	. . . . . . . 8 ⊢ (∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈 ↔ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥))
61	58, 60	sylibr 234	. . . . . . 7 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)
62	61	ralrimiva 3130	. . . . . 6 ⊢ ((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)
63	62	3adant2 1132	. . . . 5 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)
64	14, 15, 63	jca32 515	. . . 4 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → (𝐾 ∈ RingOps ∧ (𝑈 ≠ 𝑍 ∧ ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)))
65	3, 4, 6, 5, 7	isdrngo3 38199	. . . 4 ⊢ (𝐾 ∈ DivRingOps ↔ (𝐾 ∈ RingOps ∧ (𝑈 ≠ 𝑍 ∧ ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)))
66	64, 65	sylibr 234	. . 3 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ DivRingOps)
67		simp1 1137	. . 3 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ CRingOps)
68		isfld2 38245	. . 3 ⊢ (𝐾 ∈ Fld ↔ (𝐾 ∈ DivRingOps ∧ 𝐾 ∈ CRingOps))
69	66, 67, 68	sylanbrc 584	. 2 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ Fld)
70	12, 69	impbii 209	1 ⊢ (𝐾 ∈ Fld ↔ (𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 ↔ wb 206 ∧ wa 395 ∨ wo 848 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 ∃wrex 3062 {crab 3401 ∖ cdif 3900 ⊆ wss 3903 {csn 4582 {cpr 4584 ran crn 5633 ‘cfv 6500 (class class class)co 7368 1^st c1st 7941 2^nd c2nd 7942 GIdcgi 30577 RingOpscrngo 38134 DivRingOpscdrng 38188 Fldcfld 38231 CRingOpsccring 38233 Idlcidl 38247 IdlGen cigen 38299

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5226 ax-sep 5243 ax-nul 5253 ax-pow 5312 ax-pr 5379 ax-un 7690

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-ral 3053 df-rex 3063 df-rmo 3352 df-reu 3353 df-rab 3402 df-v 3444 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-nul 4288 df-if 4482 df-pw 4558 df-sn 4583 df-pr 4585 df-op 4589 df-uni 4866 df-int 4905 df-iun 4950 df-br 5101 df-opab 5163 df-mpt 5182 df-id 5527 df-xp 5638 df-rel 5639 df-cnv 5640 df-co 5641 df-dm 5642 df-rn 5643 df-res 5644 df-ima 5645 df-suc 6331 df-iota 6456 df-fun 6502 df-fn 6503 df-f 6504 df-f1 6505 df-fo 6506 df-f1o 6507 df-fv 6508 df-riota 7325 df-ov 7371 df-oprab 7372 df-mpo 7373 df-1st 7943 df-2nd 7944 df-1o 8407 df-en 8896 df-grpo 30580 df-gid 30581 df-ginv 30582 df-ablo 30632 df-ass 38083 df-exid 38085 df-mgmOLD 38089 df-sgrOLD 38101 df-mndo 38107 df-rngo 38135 df-drngo 38189 df-com2 38230 df-fld 38232 df-crngo 38234 df-idl 38250 df-igen 38300

This theorem is referenced by: isfldidl2 38309

W3C validator