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 38092

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 38028	. . 3 ⊢ (𝐾 ∈ Fld → 𝐾 ∈ CRingOps)
2		flddivrng 38023	. . . 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 37978	. . . 4 ⊢ (𝐾 ∈ DivRingOps → 𝑈 ≠ 𝑍)
9	2, 8	syl 17	. . 3 ⊢ (𝐾 ∈ Fld → 𝑈 ≠ 𝑍)
10	3, 4, 5, 6	divrngidl 38052	. . . 4 ⊢ (𝐾 ∈ DivRingOps → (Idl‘𝐾) = {{𝑍}, 𝑋})
11	2, 10	syl 17	. . 3 ⊢ (𝐾 ∈ Fld → (Idl‘𝐾) = {{𝑍}, 𝑋})
12	1, 9, 11	3jca 1128	. 2 ⊢ (𝐾 ∈ Fld → (𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}))
13		crngorngo 38024	. . . . . 6 ⊢ (𝐾 ∈ CRingOps → 𝐾 ∈ RingOps)
14	13	3ad2ant1 1133	. . . . 5 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ RingOps)
15		simp2 1137	. . . . 5 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝑈 ≠ 𝑍)
16	3	rneqi 5917	. . . . . . . . . . . . . . 15 ⊢ ran 𝐺 = ran (1^st ‘𝐾)
17	5, 16	eqtri 2758	. . . . . . . . . . . . . 14 ⊢ 𝑋 = ran (1^st ‘𝐾)
18	17, 4, 7	rngo1cl 37963	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ RingOps → 𝑈 ∈ 𝑋)
19	13, 18	syl 17	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ CRingOps → 𝑈 ∈ 𝑋)
20	19	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → 𝑈 ∈ 𝑋)
21		eldif 3936	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ (𝑋 ∖ {𝑍}) ↔ (𝑥 ∈ 𝑋 ∧ ¬ 𝑥 ∈ {𝑍}))
22		snssi 4784	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ 𝑋 → {𝑥} ⊆ 𝑋)
23	3, 5	igenss 38086	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐾 ∈ RingOps ∧ {𝑥} ⊆ 𝑋) → {𝑥} ⊆ (𝐾 IdlGen {𝑥}))
24	22, 23	sylan2 593	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → {𝑥} ⊆ (𝐾 IdlGen {𝑥}))
25		vex 3463	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑥 ∈ V
26	25	snss 4761	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝐾 IdlGen {𝑥}) ↔ {𝑥} ⊆ (𝐾 IdlGen {𝑥}))
27	26	biimpri 228	. . . . . . . . . . . . . . . . . . . 20 ⊢ ({𝑥} ⊆ (𝐾 IdlGen {𝑥}) → 𝑥 ∈ (𝐾 IdlGen {𝑥}))
28		eleq2 2823	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐾 IdlGen {𝑥}) = {𝑍} → (𝑥 ∈ (𝐾 IdlGen {𝑥}) ↔ 𝑥 ∈ {𝑍}))
29	27, 28	syl5ibcom 245	. . . . . . . . . . . . . . . . . . 19 ⊢ ({𝑥} ⊆ (𝐾 IdlGen {𝑥}) → ((𝐾 IdlGen {𝑥}) = {𝑍} → 𝑥 ∈ {𝑍}))
30	29	con3dimp 408	. . . . . . . . . . . . . . . . . 18 ⊢ (({𝑥} ⊆ (𝐾 IdlGen {𝑥}) ∧ ¬ 𝑥 ∈ {𝑍}) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
31	24, 30	sylan 580	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐾 ∈ RingOps ∧ 𝑥 ∈ 𝑋) ∧ ¬ 𝑥 ∈ {𝑍}) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
32	31	anasss 466	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾 ∈ RingOps ∧ (𝑥 ∈ 𝑋 ∧ ¬ 𝑥 ∈ {𝑍})) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
33	21, 32	sylan2b 594	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
34	33	adantlr 715	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ¬ (𝐾 IdlGen {𝑥}) = {𝑍})
35		eldifi 4106	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝑋 ∖ {𝑍}) → 𝑥 ∈ 𝑋)
36	35	snssd 4785	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ (𝑋 ∖ {𝑍}) → {𝑥} ⊆ 𝑋)
37	3, 5	igenidl 38087	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐾 ∈ RingOps ∧ {𝑥} ⊆ 𝑋) → (𝐾 IdlGen {𝑥}) ∈ (Idl‘𝐾))
38	36, 37	sylan2 593	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐾 ∈ RingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) ∈ (Idl‘𝐾))
39		eleq2 2823	. . . . . . . . . . . . . . . . . . 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 652	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋})
43		ovex 7438	. . . . . . . . . . . . . . . . 17 ⊢ (𝐾 IdlGen {𝑥}) ∈ V
44	43	elpr 4626	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾 IdlGen {𝑥}) ∈ {{𝑍}, 𝑋} ↔ ((𝐾 IdlGen {𝑥}) = {𝑍} ∨ (𝐾 IdlGen {𝑥}) = 𝑋))
45	42, 44	sylib 218	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ((𝐾 IdlGen {𝑥}) = {𝑍} ∨ (𝐾 IdlGen {𝑥}) = 𝑋))
46	45	ord 864	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (¬ (𝐾 IdlGen {𝑥}) = {𝑍} → (𝐾 IdlGen {𝑥}) = 𝑋))
47	34, 46	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ RingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = 𝑋)
48	13, 47	sylanl1 680	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = 𝑋)
49	3, 4, 5	prnc 38091	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑥 ∈ 𝑋) → (𝐾 IdlGen {𝑥}) = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
50	35, 49	sylan2 593	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
51	50	adantlr 715	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝐾 IdlGen {𝑥}) = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
52	48, 51	eqtr3d 2772	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → 𝑋 = {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
53	20, 52	eleqtrd 2836	. . . . . . . . . 10 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → 𝑈 ∈ {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)})
54		eqeq1 2739	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑈 → (𝑧 = (𝑦𝐻𝑥) ↔ 𝑈 = (𝑦𝐻𝑥)))
55	54	rexbidv 3164	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑈 → (∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥) ↔ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥)))
56	55	elrab 3671	. . . . . . . . . 10 ⊢ (𝑈 ∈ {𝑧 ∈ 𝑋 ∣ ∃𝑦 ∈ 𝑋 𝑧 = (𝑦𝐻𝑥)} ↔ (𝑈 ∈ 𝑋 ∧ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥)))
57	53, 56	sylib 218	. . . . . . . . 9 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → (𝑈 ∈ 𝑋 ∧ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥)))
58	57	simprd 495	. . . . . . . 8 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥))
59		eqcom 2742	. . . . . . . . 9 ⊢ ((𝑦𝐻𝑥) = 𝑈 ↔ 𝑈 = (𝑦𝐻𝑥))
60	59	rexbii 3083	. . . . . . . 8 ⊢ (∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈 ↔ ∃𝑦 ∈ 𝑋 𝑈 = (𝑦𝐻𝑥))
61	58, 60	sylibr 234	. . . . . . 7 ⊢ (((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) ∧ 𝑥 ∈ (𝑋 ∖ {𝑍})) → ∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)
62	61	ralrimiva 3132	. . . . . 6 ⊢ ((𝐾 ∈ CRingOps ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)
63	62	3adant2 1131	. . . . 5 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)
64	14, 15, 63	jca32 515	. . . 4 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → (𝐾 ∈ RingOps ∧ (𝑈 ≠ 𝑍 ∧ ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)))
65	3, 4, 6, 5, 7	isdrngo3 37983	. . . 4 ⊢ (𝐾 ∈ DivRingOps ↔ (𝐾 ∈ RingOps ∧ (𝑈 ≠ 𝑍 ∧ ∀𝑥 ∈ (𝑋 ∖ {𝑍})∃𝑦 ∈ 𝑋 (𝑦𝐻𝑥) = 𝑈)))
66	64, 65	sylibr 234	. . 3 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ DivRingOps)
67		simp1 1136	. . 3 ⊢ ((𝐾 ∈ CRingOps ∧ 𝑈 ≠ 𝑍 ∧ (Idl‘𝐾) = {{𝑍}, 𝑋}) → 𝐾 ∈ CRingOps)
68		isfld2 38029	. . 3 ⊢ (𝐾 ∈ Fld ↔ (𝐾 ∈ DivRingOps ∧ 𝐾 ∈ CRingOps))
69	66, 67, 68	sylanbrc 583	. 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 847 ∧ w3a 1086 = wceq 1540 ∈ wcel 2108 ≠ wne 2932 ∀wral 3051 ∃wrex 3060 {crab 3415 ∖ cdif 3923 ⊆ wss 3926 {csn 4601 {cpr 4603 ran crn 5655 ‘cfv 6531 (class class class)co 7405 1^st c1st 7986 2^nd c2nd 7987 GIdcgi 30471 RingOpscrngo 37918 DivRingOpscdrng 37972 Fldcfld 38015 CRingOpsccring 38017 Idlcidl 38031 IdlGen cigen 38083

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7729

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-ral 3052 df-rex 3061 df-rmo 3359 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-op 4608 df-uni 4884 df-int 4923 df-iun 4969 df-br 5120 df-opab 5182 df-mpt 5202 df-id 5548 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-suc 6358 df-iota 6484 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-riota 7362 df-ov 7408 df-oprab 7409 df-mpo 7410 df-1st 7988 df-2nd 7989 df-1o 8480 df-en 8960 df-grpo 30474 df-gid 30475 df-ginv 30476 df-ablo 30526 df-ass 37867 df-exid 37869 df-mgmOLD 37873 df-sgrOLD 37885 df-mndo 37891 df-rngo 37919 df-drngo 37973 df-com2 38014 df-fld 38016 df-crngo 38018 df-idl 38034 df-igen 38084

This theorem is referenced by: isfldidl2 38093

W3C validator