| Mathbox for Thierry Arnoux |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > Mathboxes > fldextrspunfld | Structured version Visualization version GIF version | ||
| 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.) |
| 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 | ⊢ (𝜑 → (𝐽[:]𝐾) ∈ ℕ0) |
| fldextrspunfld.n | ⊢ 𝑁 = (RingSpan‘𝐿) |
| fldextrspunfld.c | ⊢ 𝐶 = (𝑁‘(𝐺 ∪ 𝐻)) |
| fldextrspunfld.e | ⊢ 𝐸 = (𝐿 ↾s 𝐶) |
| Ref | Expression |
|---|---|
| fldextrspunfld | ⊢ (𝜑 → 𝐸 ∈ Field) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | eqid 2769 | . . 3 ⊢ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) = (Scalar‘((subringAlg ‘𝐸)‘𝐺)) | |
| 2 | fldextrspunfld.e | . . . . . 6 ⊢ 𝐸 = (𝐿 ↾s 𝐶) | |
| 3 | fldextrspunfld.2 | . . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ Field) | |
| 4 | 3 | flddrngd 20824 | . . . . . . . . 9 ⊢ (𝜑 → 𝐿 ∈ DivRing) |
| 5 | 4 | drngringd 20820 | . . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ Ring) |
| 6 | eqidd 2770 | . . . . . . . 8 ⊢ (𝜑 → (Base‘𝐿) = (Base‘𝐿)) | |
| 7 | fldextrspunfld.5 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐺 ∈ (SubDRing‘𝐿)) | |
| 8 | eqid 2769 | . . . . . . . . . . 11 ⊢ (Base‘𝐿) = (Base‘𝐿) | |
| 9 | 8 | sdrgss 20873 | . . . . . . . . . 10 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ⊆ (Base‘𝐿)) |
| 10 | 7, 9 | syl 18 | . . . . . . . . 9 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐿)) |
| 11 | fldextrspunfld.6 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐻 ∈ (SubDRing‘𝐿)) | |
| 12 | 8 | sdrgss 20873 | . . . . . . . . . 10 ⊢ (𝐻 ∈ (SubDRing‘𝐿) → 𝐻 ⊆ (Base‘𝐿)) |
| 13 | 11, 12 | syl 18 | . . . . . . . . 9 ⊢ (𝜑 → 𝐻 ⊆ (Base‘𝐿)) |
| 14 | 10, 13 | unssd 4153 | . . . . . . . 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 20697 | . . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ (SubRing‘𝐿)) |
| 20 | 3, 19 | subrfld 33547 | . . . . . 6 ⊢ (𝜑 → (𝐿 ↾s 𝐶) ∈ IDomn) |
| 21 | 2, 20 | eqeltrid 2873 | . . . . 5 ⊢ (𝜑 → 𝐸 ∈ IDomn) |
| 22 | 21 | idomcringd 20810 | . . . 4 ⊢ (𝜑 → 𝐸 ∈ CRing) |
| 23 | sdrgsubrg 20871 | . . . . . 6 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ∈ (SubRing‘𝐿)) | |
| 24 | 7, 23 | syl 18 | . . . . 5 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐿)) |
| 25 | 5, 6, 14, 16, 18 | rgspnssid 20698 | . . . . . 6 ⊢ (𝜑 → (𝐺 ∪ 𝐻) ⊆ 𝐶) |
| 26 | 25 | unssad 4154 | . . . . 5 ⊢ (𝜑 → 𝐺 ⊆ 𝐶) |
| 27 | 2 | subsubrg 20682 | . . . . . 6 ⊢ (𝐶 ∈ (SubRing‘𝐿) → (𝐺 ∈ (SubRing‘𝐸) ↔ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶))) |
| 28 | 27 | biimpar 482 | . . . . 5 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶)) → 𝐺 ∈ (SubRing‘𝐸)) |
| 29 | 19, 24, 26, 28 | syl12anc 849 | . . . 4 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐸)) |
| 30 | eqid 2769 | . . . . 5 ⊢ ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺) | |
| 31 | 30 | sraassa 21987 | . . . 4 ⊢ ((𝐸 ∈ CRing ∧ 𝐺 ∈ (SubRing‘𝐸)) → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg) |
| 32 | 22, 29, 31 | syl2anc 595 | . . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg) |
| 33 | eqid 2769 | . . . 4 ⊢ (Base‘𝐸) = (Base‘𝐸) | |
| 34 | 8 | subrgss 20656 | . . . . . . 7 ⊢ (𝐶 ∈ (SubRing‘𝐿) → 𝐶 ⊆ (Base‘𝐿)) |
| 35 | 19, 34 | syl 18 | . . . . . 6 ⊢ (𝜑 → 𝐶 ⊆ (Base‘𝐿)) |
| 36 | 2, 8 | ressbas2 17297 | . . . . . 6 ⊢ (𝐶 ⊆ (Base‘𝐿) → 𝐶 = (Base‘𝐸)) |
| 37 | 35, 36 | syl 18 | . . . . 5 ⊢ (𝜑 → 𝐶 = (Base‘𝐸)) |
| 38 | 26, 37 | sseqtrd 3981 | . . . 4 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐸)) |
| 39 | 30, 33, 21, 38 | sraidom 33917 | . . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ IDomn) |
| 40 | ressabs 17307 | . . . . . . 7 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶) → ((𝐿 ↾s 𝐶) ↾s 𝐺) = (𝐿 ↾s 𝐺)) | |
| 41 | 19, 26, 40 | syl2anc 595 | . . . . . 6 ⊢ (𝜑 → ((𝐿 ↾s 𝐶) ↾s 𝐺) = (𝐿 ↾s 𝐺)) |
| 42 | 2 | oveq1i 7421 | . . . . . 6 ⊢ (𝐸 ↾s 𝐺) = ((𝐿 ↾s 𝐶) ↾s 𝐺) |
| 43 | fldextrspunfld.i | . . . . . 6 ⊢ 𝐼 = (𝐿 ↾s 𝐺) | |
| 44 | 41, 42, 43 | 3eqtr4g 2829 | . . . . 5 ⊢ (𝜑 → (𝐸 ↾s 𝐺) = 𝐼) |
| 45 | eqidd 2770 | . . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺)) | |
| 46 | 45, 38 | srasca 21278 | . . . . 5 ⊢ (𝜑 → (𝐸 ↾s 𝐺) = (Scalar‘((subringAlg ‘𝐸)‘𝐺))) |
| 47 | 44, 46 | eqtr3d 2806 | . . . 4 ⊢ (𝜑 → 𝐼 = (Scalar‘((subringAlg ‘𝐸)‘𝐺))) |
| 48 | 43 | sdrgdrng 20870 | . . . . 5 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐼 ∈ DivRing) |
| 49 | 7, 48 | syl 18 | . . . 4 ⊢ (𝜑 → 𝐼 ∈ DivRing) |
| 50 | 47, 49 | eqeltrrd 2870 | . . 3 ⊢ (𝜑 → (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing) |
| 51 | 30 | sralmod 21285 | . . . . . . 7 ⊢ (𝐺 ∈ (SubRing‘𝐸) → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod) |
| 52 | 29, 51 | syl 18 | . . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod) |
| 53 | 1 | islvec 21202 | . . . . . 6 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec ↔ (((subringAlg ‘𝐸)‘𝐺) ∈ LMod ∧ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing)) |
| 54 | 52, 50, 53 | sylanbrc 594 | . . . . 5 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LVec) |
| 55 | dimcl 33937 | . . . . 5 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0*) | |
| 56 | 54, 55 | syl 18 | . . . 4 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0*) |
| 57 | fldextrspunfld.7 | . . . 4 ⊢ (𝜑 → (𝐽[:]𝐾) ∈ ℕ0) | |
| 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 34009 | . . . 4 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) |
| 63 | xnn0lenn0nn0 13270 | . . . 4 ⊢ (((dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0* ∧ (𝐽[:]𝐾) ∈ ℕ0 ∧ (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0) | |
| 64 | 56, 57, 62, 63 | syl3anc 1396 | . . 3 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0) |
| 65 | 1, 32, 39, 50, 64 | assafld 33971 | . 2 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ Field) |
| 66 | 45, 38 | srabase 21275 | . . . 4 ⊢ (𝜑 → (Base‘𝐸) = (Base‘((subringAlg ‘𝐸)‘𝐺))) |
| 67 | 37, 66 | eqtrd 2804 | . . 3 ⊢ (𝜑 → 𝐶 = (Base‘((subringAlg ‘𝐸)‘𝐺))) |
| 68 | 45, 38 | sraaddg 21276 | . . . 4 ⊢ (𝜑 → (+g‘𝐸) = (+g‘((subringAlg ‘𝐸)‘𝐺))) |
| 69 | 68 | oveqdr 7439 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(+g‘𝐸)𝑦) = (𝑥(+g‘((subringAlg ‘𝐸)‘𝐺))𝑦)) |
| 70 | 45, 38 | sramulr 21277 | . . . 4 ⊢ (𝜑 → (.r‘𝐸) = (.r‘((subringAlg ‘𝐸)‘𝐺))) |
| 71 | 70 | oveqdr 7439 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(.r‘𝐸)𝑦) = (𝑥(.r‘((subringAlg ‘𝐸)‘𝐺))𝑦)) |
| 72 | 37, 67, 69, 71 | fldpropd 20851 | . 2 ⊢ (𝜑 → (𝐸 ∈ Field ↔ ((subringAlg ‘𝐸)‘𝐺) ∈ Field)) |
| 73 | 65, 72 | mpbird 260 | 1 ⊢ (𝜑 → 𝐸 ∈ Field) |
| Colors of variables: wff setvar class |
| Syntax hints: → wi 4 ∧ wa 400 = wceq 1567 ∈ wcel 2149 ∪ cun 3911 ⊆ wss 3913 class class class wbr 5113 ‘cfv 6537 (class class class)co 7411 ≤ cle 11243 ℕ0cn0 12503 ℕ0*cxnn0 12576 Basecbs 17268 ↾s cress 17289 +gcplusg 17309 .rcmulr 17310 Scalarcsca 17312 CRingccrg 20315 SubRingcsubrg 20653 RingSpancrgspn 20694 IDomncidom 20777 DivRingcdr 20812 Fieldcfield 20813 SubDRingcsdrg 20866 LModclmod 20958 LVecclvec 21200 subringAlg csra 21269 AssAlgcasa 21968 dimcldim 33933 [:]cextdg 33974 |
| This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5242 ax-sep 5261 ax-nul 5271 ax-pow 5337 ax-pr 5405 ax-un 7733 ax-reg 9553 ax-inf2 9609 ax-ac2 10446 ax-cnex 11155 ax-resscn 11156 ax-1cn 11157 ax-icn 11158 ax-addcl 11159 ax-addrcl 11160 ax-mulcl 11161 ax-mulrcl 11162 ax-mulcom 11163 ax-addass 11164 ax-mulass 11165 ax-distr 11166 ax-i2m1 11167 ax-1ne0 11168 ax-1rid 11169 ax-rnegex 11170 ax-rrecex 11171 ax-cnre 11172 ax-pre-lttri 11173 ax-pre-lttrn 11174 ax-pre-ltadd 11175 ax-pre-mulgt0 11176 ax-pre-sup 11177 ax-addf 11178 |
| This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-rmo 3376 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-nul 4295 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-tp 4599 df-op 4601 df-uni 4877 df-int 4917 df-iun 4962 df-iin 4963 df-br 5114 df-opab 5178 df-mpt 5197 df-tr 5223 df-id 5557 df-eprel 5562 df-po 5570 df-so 5571 df-fr 5615 df-se 5616 df-we 5617 df-xp 5668 df-rel 5669 df-cnv 5670 df-co 5671 df-dm 5672 df-rn 5673 df-res 5674 df-ima 5675 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7368 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7675 df-rpss 7721 df-om 7862 df-1st 7985 df-2nd 7986 df-supp 8156 df-tpos 8221 df-frecs 8277 df-wrecs 8308 df-recs 8357 df-rdg 8396 df-1o 8452 df-2o 8453 df-oadd 8456 df-er 8693 df-map 8825 df-ixp 8895 df-en 8943 df-dom 8944 df-sdom 8945 df-fin 8946 df-fsupp 9321 df-sup 9401 df-inf 9402 df-oi 9471 df-r1 9735 df-rank 9736 df-dju 9886 df-card 9924 df-acn 9927 df-ac 10099 df-pnf 11244 df-mnf 11245 df-xr 11246 df-ltxr 11247 df-le 11248 df-sub 11442 df-neg 11443 df-div 11871 df-ind 12218 df-nn 12233 df-2 12302 df-3 12303 df-4 12304 df-5 12305 df-6 12306 df-7 12307 df-8 12308 df-9 12309 df-n0 12504 df-xnn0 12577 df-z 12591 df-dec 12711 df-uz 12862 df-rp 13016 df-xadd 13137 df-fz 13535 df-fzo 13682 df-seq 14037 df-exp 14097 df-hash 14366 df-word 14550 df-lsw 14599 df-concat 14607 df-s1 14633 df-substr 14678 df-pfx 14708 df-s2 14884 df-cj 15149 df-re 15150 df-im 15151 df-sqrt 15285 df-abs 15286 df-clim 15538 df-sum 15737 df-struct 17206 df-sets 17223 df-slot 17241 df-ndx 17253 df-base 17269 df-ress 17290 df-plusg 17322 df-mulr 17323 df-starv 17324 df-sca 17325 df-vsca 17326 df-ip 17327 df-tset 17328 df-ple 17329 df-ocomp 17330 df-ds 17331 df-unif 17332 df-hom 17333 df-cco 17334 df-0g 17493 df-gsum 17494 df-prds 17499 df-pws 17501 df-mre 17637 df-mrc 17638 df-mri 17639 df-acs 17640 df-proset 18349 df-drs 18350 df-poset 18368 df-ipo 18583 df-mgm 18697 df-sgrp 18776 df-mnd 18792 df-mhm 18840 df-submnd 18841 df-grp 19002 df-minusg 19003 df-sbg 19004 df-mulg 19133 df-subg 19188 df-ghm 19283 df-cntz 19386 df-cntr 19387 df-lsm 19705 df-cmn 19851 df-abl 19852 df-mgp 20216 df-rng 20230 df-ur 20263 df-ring 20316 df-cring 20317 df-oppr 20418 df-dvdsr 20438 df-unit 20439 df-invr 20469 df-nzr 20595 df-subrng 20630 df-subrg 20654 df-rgspn 20695 df-rlreg 20778 df-domn 20779 df-idom 20780 df-drng 20814 df-field 20815 df-sdrg 20867 df-lmod 20960 df-lss 21030 df-lsp 21070 df-lmhm 21120 df-lmim 21121 df-lbs 21173 df-lvec 21201 df-sra 21271 df-rgmod 21272 df-cnfld 21491 df-zring 21565 df-dsmm 21850 df-frlm 21865 df-uvc 21901 df-lindf 21924 df-linds 21925 df-assa 21971 df-dim 33934 df-fldext 33975 df-extdg 33976 |
| This theorem is referenced by: fldextrspunlem2 34011 fldextrspundgdvdslem 34014 fldextrspundgdvds 34015 |
| Copyright terms: Public domain | W3C validator |