fldextrspunfld - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > fldextrspunfld		Structured version Visualization version GIF version

Theorem fldextrspunfld 33820

Description: The ring generated by the union of two field extensions is a field. Part of the proof of Proposition 5, Chapter 5, of [BourbakiAlg2] p. 116. (Contributed by Thierry Arnoux, 13-Oct-2025.)

**Hypotheses**
Ref	Expression
fldextrspunfld.k	⊢ 𝐾 = (𝐿 ↾_s 𝐹)
fldextrspunfld.i	⊢ 𝐼 = (𝐿 ↾_s 𝐺)
fldextrspunfld.j	⊢ 𝐽 = (𝐿 ↾_s 𝐻)
fldextrspunfld.2	⊢ (𝜑 → 𝐿 ∈ Field)
fldextrspunfld.3	⊢ (𝜑 → 𝐹 ∈ (SubDRing‘𝐼))
fldextrspunfld.4	⊢ (𝜑 → 𝐹 ∈ (SubDRing‘𝐽))
fldextrspunfld.5	⊢ (𝜑 → 𝐺 ∈ (SubDRing‘𝐿))
fldextrspunfld.6	⊢ (𝜑 → 𝐻 ∈ (SubDRing‘𝐿))
fldextrspunfld.7	⊢ (𝜑 → (𝐽[:]𝐾) ∈ ℕ₀)
fldextrspunfld.n	⊢ 𝑁 = (RingSpan‘𝐿)
fldextrspunfld.c	⊢ 𝐶 = (𝑁‘(𝐺 ∪ 𝐻))
fldextrspunfld.e	⊢ 𝐸 = (𝐿 ↾_s 𝐶)

**Assertion**
Ref	Expression
fldextrspunfld	⊢ (𝜑 → 𝐸 ∈ Field)

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

Step	Hyp	Ref	Expression
1		eqid 2736	. . 3 ⊢ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) = (Scalar‘((subringAlg ‘𝐸)‘𝐺))
2		fldextrspunfld.e	. . . . . 6 ⊢ 𝐸 = (𝐿 ↾_s 𝐶)
3		fldextrspunfld.2	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ Field)
4	3	flddrngd 20718	. . . . . . . . 9 ⊢ (𝜑 → 𝐿 ∈ DivRing)
5	4	drngringd 20714	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ Ring)
6		eqidd 2737	. . . . . . . 8 ⊢ (𝜑 → (Base‘𝐿) = (Base‘𝐿))
7		fldextrspunfld.5	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺 ∈ (SubDRing‘𝐿))
8		eqid 2736	. . . . . . . . . . 11 ⊢ (Base‘𝐿) = (Base‘𝐿)
9	8	sdrgss 20770	. . . . . . . . . 10 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ⊆ (Base‘𝐿))
10	7, 9	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐿))
11		fldextrspunfld.6	. . . . . . . . . 10 ⊢ (𝜑 → 𝐻 ∈ (SubDRing‘𝐿))
12	8	sdrgss 20770	. . . . . . . . . 10 ⊢ (𝐻 ∈ (SubDRing‘𝐿) → 𝐻 ⊆ (Base‘𝐿))
13	11, 12	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐻 ⊆ (Base‘𝐿))
14	10, 13	unssd 4132	. . . . . . . 8 ⊢ (𝜑 → (𝐺 ∪ 𝐻) ⊆ (Base‘𝐿))
15		fldextrspunfld.n	. . . . . . . . 9 ⊢ 𝑁 = (RingSpan‘𝐿)
16	15	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 𝑁 = (RingSpan‘𝐿))
17		fldextrspunfld.c	. . . . . . . . 9 ⊢ 𝐶 = (𝑁‘(𝐺 ∪ 𝐻))
18	17	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 𝐶 = (𝑁‘(𝐺 ∪ 𝐻)))
19	5, 6, 14, 16, 18	rgspncl 20590	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ (SubRing‘𝐿))
20	3, 19	subrfld 33348	. . . . . 6 ⊢ (𝜑 → (𝐿 ↾_s 𝐶) ∈ IDomn)
21	2, 20	eqeltrid 2840	. . . . 5 ⊢ (𝜑 → 𝐸 ∈ IDomn)
22	21	idomcringd 20704	. . . 4 ⊢ (𝜑 → 𝐸 ∈ CRing)
23		sdrgsubrg 20768	. . . . . 6 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ∈ (SubRing‘𝐿))
24	7, 23	syl 17	. . . . 5 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐿))
25	5, 6, 14, 16, 18	rgspnssid 20591	. . . . . 6 ⊢ (𝜑 → (𝐺 ∪ 𝐻) ⊆ 𝐶)
26	25	unssad 4133	. . . . 5 ⊢ (𝜑 → 𝐺 ⊆ 𝐶)
27	2	subsubrg 20575	. . . . . 6 ⊢ (𝐶 ∈ (SubRing‘𝐿) → (𝐺 ∈ (SubRing‘𝐸) ↔ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶)))
28	27	biimpar 477	. . . . 5 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶)) → 𝐺 ∈ (SubRing‘𝐸))
29	19, 24, 26, 28	syl12anc 837	. . . 4 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐸))
30		eqid 2736	. . . . 5 ⊢ ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺)
31	30	sraassa 21849	. . . 4 ⊢ ((𝐸 ∈ CRing ∧ 𝐺 ∈ (SubRing‘𝐸)) → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg)
32	22, 29, 31	syl2anc 585	. . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg)
33		eqid 2736	. . . 4 ⊢ (Base‘𝐸) = (Base‘𝐸)
34	8	subrgss 20549	. . . . . . 7 ⊢ (𝐶 ∈ (SubRing‘𝐿) → 𝐶 ⊆ (Base‘𝐿))
35	19, 34	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐶 ⊆ (Base‘𝐿))
36	2, 8	ressbas2 17208	. . . . . 6 ⊢ (𝐶 ⊆ (Base‘𝐿) → 𝐶 = (Base‘𝐸))
37	35, 36	syl 17	. . . . 5 ⊢ (𝜑 → 𝐶 = (Base‘𝐸))
38	26, 37	sseqtrd 3958	. . . 4 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐸))
39	30, 33, 21, 38	sraidom 33727	. . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ IDomn)
40		ressabs 17218	. . . . . . 7 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶) → ((𝐿 ↾_s 𝐶) ↾_s 𝐺) = (𝐿 ↾_s 𝐺))
41	19, 26, 40	syl2anc 585	. . . . . 6 ⊢ (𝜑 → ((𝐿 ↾_s 𝐶) ↾_s 𝐺) = (𝐿 ↾_s 𝐺))
42	2	oveq1i 7377	. . . . . 6 ⊢ (𝐸 ↾_s 𝐺) = ((𝐿 ↾_s 𝐶) ↾_s 𝐺)
43		fldextrspunfld.i	. . . . . 6 ⊢ 𝐼 = (𝐿 ↾_s 𝐺)
44	41, 42, 43	3eqtr4g 2796	. . . . 5 ⊢ (𝜑 → (𝐸 ↾_s 𝐺) = 𝐼)
45		eqidd 2737	. . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺))
46	45, 38	srasca 21175	. . . . 5 ⊢ (𝜑 → (𝐸 ↾_s 𝐺) = (Scalar‘((subringAlg ‘𝐸)‘𝐺)))
47	44, 46	eqtr3d 2773	. . . 4 ⊢ (𝜑 → 𝐼 = (Scalar‘((subringAlg ‘𝐸)‘𝐺)))
48	43	sdrgdrng 20767	. . . . 5 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐼 ∈ DivRing)
49	7, 48	syl 17	. . . 4 ⊢ (𝜑 → 𝐼 ∈ DivRing)
50	47, 49	eqeltrrd 2837	. . 3 ⊢ (𝜑 → (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing)
51	30	sralmod 21182	. . . . . . 7 ⊢ (𝐺 ∈ (SubRing‘𝐸) → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod)
52	29, 51	syl 17	. . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod)
53	1	islvec 21099	. . . . . 6 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec ↔ (((subringAlg ‘𝐸)‘𝐺) ∈ LMod ∧ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing))
54	52, 50, 53	sylanbrc 584	. . . . 5 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LVec)
55		dimcl 33747	. . . . 5 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ₀^*)
56	54, 55	syl 17	. . . 4 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ₀^*)
57		fldextrspunfld.7	. . . 4 ⊢ (𝜑 → (𝐽[:]𝐾) ∈ ℕ₀)
58		fldextrspunfld.k	. . . . 5 ⊢ 𝐾 = (𝐿 ↾_s 𝐹)
59		fldextrspunfld.j	. . . . 5 ⊢ 𝐽 = (𝐿 ↾_s 𝐻)
60		fldextrspunfld.3	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ (SubDRing‘𝐼))
61		fldextrspunfld.4	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ (SubDRing‘𝐽))
62	58, 43, 59, 3, 60, 61, 7, 11, 57, 15, 17, 2	fldextrspunlem1 33819	. . . 4 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾))
63		xnn0lenn0nn0 13197	. . . 4 ⊢ (((dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ₀^* ∧ (𝐽[:]𝐾) ∈ ℕ₀ ∧ (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ₀)
64	56, 57, 62, 63	syl3anc 1374	. . 3 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ₀)
65	1, 32, 39, 50, 64	assafld 33781	. 2 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ Field)
66	45, 38	srabase 21172	. . . 4 ⊢ (𝜑 → (Base‘𝐸) = (Base‘((subringAlg ‘𝐸)‘𝐺)))
67	37, 66	eqtrd 2771	. . 3 ⊢ (𝜑 → 𝐶 = (Base‘((subringAlg ‘𝐸)‘𝐺)))
68	45, 38	sraaddg 21173	. . . 4 ⊢ (𝜑 → (+_g‘𝐸) = (+_g‘((subringAlg ‘𝐸)‘𝐺)))
69	68	oveqdr 7395	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(+_g‘𝐸)𝑦) = (𝑥(+_g‘((subringAlg ‘𝐸)‘𝐺))𝑦))
70	45, 38	sramulr 21174	. . . 4 ⊢ (𝜑 → (._r‘𝐸) = (._r‘((subringAlg ‘𝐸)‘𝐺)))
71	70	oveqdr 7395	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(._r‘𝐸)𝑦) = (𝑥(._r‘((subringAlg ‘𝐸)‘𝐺))𝑦))
72	37, 67, 69, 71	fldpropd 20747	. 2 ⊢ (𝜑 → (𝐸 ∈ Field ↔ ((subringAlg ‘𝐸)‘𝐺) ∈ Field))
73	65, 72	mpbird 257	1 ⊢ (𝜑 → 𝐸 ∈ Field)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ∪ cun 3887 ⊆ wss 3889 class class class wbr 5085 ‘cfv 6498 (class class class)co 7367 ≤ cle 11180 ℕ₀cn0 12437 ℕ₀^*cxnn0 12510 Basecbs 17179 ↾_s cress 17200 +_gcplusg 17220 ._rcmulr 17221 Scalarcsca 17223 CRingccrg 20215 SubRingcsubrg 20546 RingSpancrgspn 20587 IDomncidom 20670 DivRingcdr 20706 Fieldcfield 20707 SubDRingcsdrg 20763 LModclmod 20855 LVecclvec 21097 subringAlg csra 21166 AssAlgcasa 21830 dimcldim 33743 [:]cextdg 33784

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 2708 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689 ax-reg 9507 ax-inf2 9562 ax-ac2 10385 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116 ax-addf 11117

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-pss 3909 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4851 df-int 4890 df-iun 4935 df-iin 4936 df-br 5086 df-opab 5148 df-mpt 5167 df-tr 5193 df-id 5526 df-eprel 5531 df-po 5539 df-so 5540 df-fr 5584 df-se 5585 df-we 5586 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-pred 6265 df-ord 6326 df-on 6327 df-lim 6328 df-suc 6329 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-isom 6507 df-riota 7324 df-ov 7370 df-oprab 7371 df-mpo 7372 df-of 7631 df-rpss 7677 df-om 7818 df-1st 7942 df-2nd 7943 df-supp 8111 df-tpos 8176 df-frecs 8231 df-wrecs 8262 df-recs 8311 df-rdg 8349 df-1o 8405 df-2o 8406 df-oadd 8409 df-er 8643 df-map 8775 df-ixp 8846 df-en 8894 df-dom 8895 df-sdom 8896 df-fin 8897 df-fsupp 9275 df-sup 9355 df-inf 9356 df-oi 9425 df-r1 9688 df-rank 9689 df-dju 9825 df-card 9863 df-acn 9866 df-ac 10038 df-pnf 11181 df-mnf 11182 df-xr 11183 df-ltxr 11184 df-le 11185 df-sub 11379 df-neg 11380 df-div 11808 df-ind 12160 df-nn 12175 df-2 12244 df-3 12245 df-4 12246 df-5 12247 df-6 12248 df-7 12249 df-8 12250 df-9 12251 df-n0 12438 df-xnn0 12511 df-z 12525 df-dec 12645 df-uz 12789 df-rp 12943 df-xadd 13064 df-fz 13462 df-fzo 13609 df-seq 13964 df-exp 14024 df-hash 14293 df-word 14476 df-lsw 14525 df-concat 14533 df-s1 14559 df-substr 14604 df-pfx 14634 df-s2 14810 df-cj 15061 df-re 15062 df-im 15063 df-sqrt 15197 df-abs 15198 df-clim 15450 df-sum 15649 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-mulr 17234 df-starv 17235 df-sca 17236 df-vsca 17237 df-ip 17238 df-tset 17239 df-ple 17240 df-ocomp 17241 df-ds 17242 df-unif 17243 df-hom 17244 df-cco 17245 df-0g 17404 df-gsum 17405 df-prds 17410 df-pws 17412 df-mre 17548 df-mrc 17549 df-mri 17550 df-acs 17551 df-proset 18260 df-drs 18261 df-poset 18279 df-ipo 18494 df-mgm 18608 df-sgrp 18687 df-mnd 18703 df-mhm 18751 df-submnd 18752 df-grp 18912 df-minusg 18913 df-sbg 18914 df-mulg 19044 df-subg 19099 df-ghm 19188 df-cntz 19292 df-cntr 19293 df-lsm 19611 df-cmn 19757 df-abl 19758 df-mgp 20122 df-rng 20134 df-ur 20163 df-ring 20216 df-cring 20217 df-oppr 20317 df-dvdsr 20337 df-unit 20338 df-invr 20368 df-nzr 20490 df-subrng 20523 df-subrg 20547 df-rgspn 20588 df-rlreg 20671 df-domn 20672 df-idom 20673 df-drng 20708 df-field 20709 df-sdrg 20764 df-lmod 20857 df-lss 20927 df-lsp 20967 df-lmhm 21017 df-lmim 21018 df-lbs 21070 df-lvec 21098 df-sra 21168 df-rgmod 21169 df-cnfld 21353 df-zring 21427 df-dsmm 21712 df-frlm 21727 df-uvc 21763 df-lindf 21786 df-linds 21787 df-assa 21833 df-dim 33744 df-fldext 33785 df-extdg 33786

This theorem is referenced by: fldextrspunlem2 33821 fldextrspundgdvdslem 33824 fldextrspundgdvds 33825

W3C validator