| 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 2737 | . . 3 ⊢ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) = (Scalar‘((subringAlg ‘𝐸)‘𝐺)) | |
| 2 | fldextrspunfld.e | . . . . . 6 ⊢ 𝐸 = (𝐿 ↾s 𝐶) | |
| 3 | fldextrspunfld.2 | . . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ Field) | |
| 4 | 3 | flddrngd 20709 | . . . . . . . . 9 ⊢ (𝜑 → 𝐿 ∈ DivRing) |
| 5 | 4 | drngringd 20705 | . . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ Ring) |
| 6 | eqidd 2738 | . . . . . . . 8 ⊢ (𝜑 → (Base‘𝐿) = (Base‘𝐿)) | |
| 7 | fldextrspunfld.5 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐺 ∈ (SubDRing‘𝐿)) | |
| 8 | eqid 2737 | . . . . . . . . . . 11 ⊢ (Base‘𝐿) = (Base‘𝐿) | |
| 9 | 8 | sdrgss 20761 | . . . . . . . . . 10 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ⊆ (Base‘𝐿)) |
| 10 | 7, 9 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐿)) |
| 11 | fldextrspunfld.6 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐻 ∈ (SubDRing‘𝐿)) | |
| 12 | 8 | sdrgss 20761 | . . . . . . . . . 10 ⊢ (𝐻 ∈ (SubDRing‘𝐿) → 𝐻 ⊆ (Base‘𝐿)) |
| 13 | 11, 12 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → 𝐻 ⊆ (Base‘𝐿)) |
| 14 | 10, 13 | unssd 4133 | . . . . . . . 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 20581 | . . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ (SubRing‘𝐿)) |
| 20 | 3, 19 | subrfld 33363 | . . . . . 6 ⊢ (𝜑 → (𝐿 ↾s 𝐶) ∈ IDomn) |
| 21 | 2, 20 | eqeltrid 2841 | . . . . 5 ⊢ (𝜑 → 𝐸 ∈ IDomn) |
| 22 | 21 | idomcringd 20695 | . . . 4 ⊢ (𝜑 → 𝐸 ∈ CRing) |
| 23 | sdrgsubrg 20759 | . . . . . 6 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ∈ (SubRing‘𝐿)) | |
| 24 | 7, 23 | syl 17 | . . . . 5 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐿)) |
| 25 | 5, 6, 14, 16, 18 | rgspnssid 20582 | . . . . . 6 ⊢ (𝜑 → (𝐺 ∪ 𝐻) ⊆ 𝐶) |
| 26 | 25 | unssad 4134 | . . . . 5 ⊢ (𝜑 → 𝐺 ⊆ 𝐶) |
| 27 | 2 | subsubrg 20566 | . . . . . 6 ⊢ (𝐶 ∈ (SubRing‘𝐿) → (𝐺 ∈ (SubRing‘𝐸) ↔ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶))) |
| 28 | 27 | biimpar 477 | . . . . 5 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶)) → 𝐺 ∈ (SubRing‘𝐸)) |
| 29 | 19, 24, 26, 28 | syl12anc 837 | . . . 4 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐸)) |
| 30 | eqid 2737 | . . . . 5 ⊢ ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺) | |
| 31 | 30 | sraassa 21859 | . . . 4 ⊢ ((𝐸 ∈ CRing ∧ 𝐺 ∈ (SubRing‘𝐸)) → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg) |
| 32 | 22, 29, 31 | syl2anc 585 | . . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg) |
| 33 | eqid 2737 | . . . 4 ⊢ (Base‘𝐸) = (Base‘𝐸) | |
| 34 | 8 | subrgss 20540 | . . . . . . 7 ⊢ (𝐶 ∈ (SubRing‘𝐿) → 𝐶 ⊆ (Base‘𝐿)) |
| 35 | 19, 34 | syl 17 | . . . . . 6 ⊢ (𝜑 → 𝐶 ⊆ (Base‘𝐿)) |
| 36 | 2, 8 | ressbas2 17199 | . . . . . 6 ⊢ (𝐶 ⊆ (Base‘𝐿) → 𝐶 = (Base‘𝐸)) |
| 37 | 35, 36 | syl 17 | . . . . 5 ⊢ (𝜑 → 𝐶 = (Base‘𝐸)) |
| 38 | 26, 37 | sseqtrd 3959 | . . . 4 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐸)) |
| 39 | 30, 33, 21, 38 | sraidom 33742 | . . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ IDomn) |
| 40 | ressabs 17209 | . . . . . . 7 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶) → ((𝐿 ↾s 𝐶) ↾s 𝐺) = (𝐿 ↾s 𝐺)) | |
| 41 | 19, 26, 40 | syl2anc 585 | . . . . . 6 ⊢ (𝜑 → ((𝐿 ↾s 𝐶) ↾s 𝐺) = (𝐿 ↾s 𝐺)) |
| 42 | 2 | oveq1i 7370 | . . . . . 6 ⊢ (𝐸 ↾s 𝐺) = ((𝐿 ↾s 𝐶) ↾s 𝐺) |
| 43 | fldextrspunfld.i | . . . . . 6 ⊢ 𝐼 = (𝐿 ↾s 𝐺) | |
| 44 | 41, 42, 43 | 3eqtr4g 2797 | . . . . 5 ⊢ (𝜑 → (𝐸 ↾s 𝐺) = 𝐼) |
| 45 | eqidd 2738 | . . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺)) | |
| 46 | 45, 38 | srasca 21167 | . . . . 5 ⊢ (𝜑 → (𝐸 ↾s 𝐺) = (Scalar‘((subringAlg ‘𝐸)‘𝐺))) |
| 47 | 44, 46 | eqtr3d 2774 | . . . 4 ⊢ (𝜑 → 𝐼 = (Scalar‘((subringAlg ‘𝐸)‘𝐺))) |
| 48 | 43 | sdrgdrng 20758 | . . . . 5 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐼 ∈ DivRing) |
| 49 | 7, 48 | syl 17 | . . . 4 ⊢ (𝜑 → 𝐼 ∈ DivRing) |
| 50 | 47, 49 | eqeltrrd 2838 | . . 3 ⊢ (𝜑 → (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing) |
| 51 | 30 | sralmod 21174 | . . . . . . 7 ⊢ (𝐺 ∈ (SubRing‘𝐸) → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod) |
| 52 | 29, 51 | syl 17 | . . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod) |
| 53 | 1 | islvec 21091 | . . . . . 6 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec ↔ (((subringAlg ‘𝐸)‘𝐺) ∈ LMod ∧ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing)) |
| 54 | 52, 50, 53 | sylanbrc 584 | . . . . 5 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LVec) |
| 55 | dimcl 33762 | . . . . 5 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0*) | |
| 56 | 54, 55 | syl 17 | . . . 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 33835 | . . . 4 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) |
| 63 | xnn0lenn0nn0 13188 | . . . 4 ⊢ (((dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0* ∧ (𝐽[:]𝐾) ∈ ℕ0 ∧ (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0) | |
| 64 | 56, 57, 62, 63 | syl3anc 1374 | . . 3 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0) |
| 65 | 1, 32, 39, 50, 64 | assafld 33797 | . 2 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ Field) |
| 66 | 45, 38 | srabase 21164 | . . . 4 ⊢ (𝜑 → (Base‘𝐸) = (Base‘((subringAlg ‘𝐸)‘𝐺))) |
| 67 | 37, 66 | eqtrd 2772 | . . 3 ⊢ (𝜑 → 𝐶 = (Base‘((subringAlg ‘𝐸)‘𝐺))) |
| 68 | 45, 38 | sraaddg 21165 | . . . 4 ⊢ (𝜑 → (+g‘𝐸) = (+g‘((subringAlg ‘𝐸)‘𝐺))) |
| 69 | 68 | oveqdr 7388 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(+g‘𝐸)𝑦) = (𝑥(+g‘((subringAlg ‘𝐸)‘𝐺))𝑦)) |
| 70 | 45, 38 | sramulr 21166 | . . . 4 ⊢ (𝜑 → (.r‘𝐸) = (.r‘((subringAlg ‘𝐸)‘𝐺))) |
| 71 | 70 | oveqdr 7388 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(.r‘𝐸)𝑦) = (𝑥(.r‘((subringAlg ‘𝐸)‘𝐺))𝑦)) |
| 72 | 37, 67, 69, 71 | fldpropd 20738 | . 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 3888 ⊆ wss 3890 class class class wbr 5086 ‘cfv 6492 (class class class)co 7360 ≤ cle 11171 ℕ0cn0 12428 ℕ0*cxnn0 12501 Basecbs 17170 ↾s cress 17191 +gcplusg 17211 .rcmulr 17212 Scalarcsca 17214 CRingccrg 20206 SubRingcsubrg 20537 RingSpancrgspn 20578 IDomncidom 20661 DivRingcdr 20697 Fieldcfield 20698 SubDRingcsdrg 20754 LModclmod 20846 LVecclvec 21089 subringAlg csra 21158 AssAlgcasa 21840 dimcldim 33758 [:]cextdg 33800 |
| 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 5212 ax-sep 5231 ax-nul 5241 ax-pow 5302 ax-pr 5370 ax-un 7682 ax-reg 9500 ax-inf2 9553 ax-ac2 10376 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106 ax-pre-sup 11107 ax-addf 11108 |
| 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 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-tp 4573 df-op 4575 df-uni 4852 df-int 4891 df-iun 4936 df-iin 4937 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5519 df-eprel 5524 df-po 5532 df-so 5533 df-fr 5577 df-se 5578 df-we 5579 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-pred 6259 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-isom 6501 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-of 7624 df-rpss 7670 df-om 7811 df-1st 7935 df-2nd 7936 df-supp 8104 df-tpos 8169 df-frecs 8224 df-wrecs 8255 df-recs 8304 df-rdg 8342 df-1o 8398 df-2o 8399 df-oadd 8402 df-er 8636 df-map 8768 df-ixp 8839 df-en 8887 df-dom 8888 df-sdom 8889 df-fin 8890 df-fsupp 9268 df-sup 9348 df-inf 9349 df-oi 9418 df-r1 9679 df-rank 9680 df-dju 9816 df-card 9854 df-acn 9857 df-ac 10029 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-div 11799 df-ind 12151 df-nn 12166 df-2 12235 df-3 12236 df-4 12237 df-5 12238 df-6 12239 df-7 12240 df-8 12241 df-9 12242 df-n0 12429 df-xnn0 12502 df-z 12516 df-dec 12636 df-uz 12780 df-rp 12934 df-xadd 13055 df-fz 13453 df-fzo 13600 df-seq 13955 df-exp 14015 df-hash 14284 df-word 14467 df-lsw 14516 df-concat 14524 df-s1 14550 df-substr 14595 df-pfx 14625 df-s2 14801 df-cj 15052 df-re 15053 df-im 15054 df-sqrt 15188 df-abs 15189 df-clim 15441 df-sum 15640 df-struct 17108 df-sets 17125 df-slot 17143 df-ndx 17155 df-base 17171 df-ress 17192 df-plusg 17224 df-mulr 17225 df-starv 17226 df-sca 17227 df-vsca 17228 df-ip 17229 df-tset 17230 df-ple 17231 df-ocomp 17232 df-ds 17233 df-unif 17234 df-hom 17235 df-cco 17236 df-0g 17395 df-gsum 17396 df-prds 17401 df-pws 17403 df-mre 17539 df-mrc 17540 df-mri 17541 df-acs 17542 df-proset 18251 df-drs 18252 df-poset 18270 df-ipo 18485 df-mgm 18599 df-sgrp 18678 df-mnd 18694 df-mhm 18742 df-submnd 18743 df-grp 18903 df-minusg 18904 df-sbg 18905 df-mulg 19035 df-subg 19090 df-ghm 19179 df-cntz 19283 df-cntr 19284 df-lsm 19602 df-cmn 19748 df-abl 19749 df-mgp 20113 df-rng 20125 df-ur 20154 df-ring 20207 df-cring 20208 df-oppr 20308 df-dvdsr 20328 df-unit 20329 df-invr 20359 df-nzr 20481 df-subrng 20514 df-subrg 20538 df-rgspn 20579 df-rlreg 20662 df-domn 20663 df-idom 20664 df-drng 20699 df-field 20700 df-sdrg 20755 df-lmod 20848 df-lss 20918 df-lsp 20958 df-lmhm 21009 df-lmim 21010 df-lbs 21062 df-lvec 21090 df-sra 21160 df-rgmod 21161 df-cnfld 21345 df-zring 21437 df-dsmm 21722 df-frlm 21737 df-uvc 21773 df-lindf 21796 df-linds 21797 df-assa 21843 df-dim 33759 df-fldext 33801 df-extdg 33802 |
| This theorem is referenced by: fldextrspunlem2 33837 fldextrspundgdvdslem 33840 fldextrspundgdvds 33841 |
| Copyright terms: Public domain | W3C validator |