| 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 2763 | . . 3 ⊢ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) = (Scalar‘((subringAlg ‘𝐸)‘𝐺)) | |
| 2 | fldextrspunfld.e | . . . . . 6 ⊢ 𝐸 = (𝐿 ↾s 𝐶) | |
| 3 | fldextrspunfld.2 | . . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ Field) | |
| 4 | 3 | flddrngd 20841 | . . . . . . . . 9 ⊢ (𝜑 → 𝐿 ∈ DivRing) |
| 5 | 4 | drngringd 20835 | . . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ Ring) |
| 6 | eqidd 2764 | . . . . . . . 8 ⊢ (𝜑 → (Base‘𝐿) = (Base‘𝐿)) | |
| 7 | fldextrspunfld.5 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐺 ∈ (SubDRing‘𝐿)) | |
| 8 | eqid 2763 | . . . . . . . . . . 11 ⊢ (Base‘𝐿) = (Base‘𝐿) | |
| 9 | 8 | sdrgss 20896 | . . . . . . . . . 10 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ⊆ (Base‘𝐿)) |
| 10 | 7, 9 | syl 18 | . . . . . . . . 9 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐿)) |
| 11 | fldextrspunfld.6 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐻 ∈ (SubDRing‘𝐿)) | |
| 12 | 8 | sdrgss 20896 | . . . . . . . . . 10 ⊢ (𝐻 ∈ (SubDRing‘𝐿) → 𝐻 ⊆ (Base‘𝐿)) |
| 13 | 11, 12 | syl 18 | . . . . . . . . 9 ⊢ (𝜑 → 𝐻 ⊆ (Base‘𝐿)) |
| 14 | 10, 13 | unssd 4145 | . . . . . . . 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 20712 | . . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ (SubRing‘𝐿)) |
| 20 | 3, 19 | subrfld 33607 | . . . . . 6 ⊢ (𝜑 → (𝐿 ↾s 𝐶) ∈ IDomn) |
| 21 | 2, 20 | eqeltrid 2867 | . . . . 5 ⊢ (𝜑 → 𝐸 ∈ IDomn) |
| 22 | 21 | idomcringd 20825 | . . . 4 ⊢ (𝜑 → 𝐸 ∈ CRing) |
| 23 | sdrgsubrg 20894 | . . . . . 6 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ∈ (SubRing‘𝐿)) | |
| 24 | 7, 23 | syl 18 | . . . . 5 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐿)) |
| 25 | 5, 6, 14, 16, 18 | rgspnssid 20713 | . . . . . 6 ⊢ (𝜑 → (𝐺 ∪ 𝐻) ⊆ 𝐶) |
| 26 | 25 | unssad 4146 | . . . . 5 ⊢ (𝜑 → 𝐺 ⊆ 𝐶) |
| 27 | 2 | subsubrg 20697 | . . . . . 6 ⊢ (𝐶 ∈ (SubRing‘𝐿) → (𝐺 ∈ (SubRing‘𝐸) ↔ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶))) |
| 28 | 27 | biimpar 482 | . . . . 5 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶)) → 𝐺 ∈ (SubRing‘𝐸)) |
| 29 | 19, 24, 26, 28 | syl12anc 849 | . . . 4 ⊢ (𝜑 → 𝐺 ∈ (SubRing‘𝐸)) |
| 30 | eqid 2763 | . . . . 5 ⊢ ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺) | |
| 31 | 30 | sraassa 22019 | . . . 4 ⊢ ((𝐸 ∈ CRing ∧ 𝐺 ∈ (SubRing‘𝐸)) → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg) |
| 32 | 22, 29, 31 | syl2anc 595 | . . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg) |
| 33 | eqid 2763 | . . . 4 ⊢ (Base‘𝐸) = (Base‘𝐸) | |
| 34 | 8 | subrgss 20671 | . . . . . . 7 ⊢ (𝐶 ∈ (SubRing‘𝐿) → 𝐶 ⊆ (Base‘𝐿)) |
| 35 | 19, 34 | syl 18 | . . . . . 6 ⊢ (𝜑 → 𝐶 ⊆ (Base‘𝐿)) |
| 36 | 2, 8 | ressbas2 17293 | . . . . . 6 ⊢ (𝐶 ⊆ (Base‘𝐿) → 𝐶 = (Base‘𝐸)) |
| 37 | 35, 36 | syl 18 | . . . . 5 ⊢ (𝜑 → 𝐶 = (Base‘𝐸)) |
| 38 | 26, 37 | sseqtrd 3973 | . . . 4 ⊢ (𝜑 → 𝐺 ⊆ (Base‘𝐸)) |
| 39 | 30, 33, 21, 38 | sraidom 33973 | . . 3 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ IDomn) |
| 40 | ressabs 17303 | . . . . . . 7 ⊢ ((𝐶 ∈ (SubRing‘𝐿) ∧ 𝐺 ⊆ 𝐶) → ((𝐿 ↾s 𝐶) ↾s 𝐺) = (𝐿 ↾s 𝐺)) | |
| 41 | 19, 26, 40 | syl2anc 595 | . . . . . 6 ⊢ (𝜑 → ((𝐿 ↾s 𝐶) ↾s 𝐺) = (𝐿 ↾s 𝐺)) |
| 42 | 2 | oveq1i 7420 | . . . . . 6 ⊢ (𝐸 ↾s 𝐺) = ((𝐿 ↾s 𝐶) ↾s 𝐺) |
| 43 | fldextrspunfld.i | . . . . . 6 ⊢ 𝐼 = (𝐿 ↾s 𝐺) | |
| 44 | 41, 42, 43 | 3eqtr4g 2823 | . . . . 5 ⊢ (𝜑 → (𝐸 ↾s 𝐺) = 𝐼) |
| 45 | eqidd 2764 | . . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺)) | |
| 46 | 45, 38 | srasca 21301 | . . . . 5 ⊢ (𝜑 → (𝐸 ↾s 𝐺) = (Scalar‘((subringAlg ‘𝐸)‘𝐺))) |
| 47 | 44, 46 | eqtr3d 2800 | . . . 4 ⊢ (𝜑 → 𝐼 = (Scalar‘((subringAlg ‘𝐸)‘𝐺))) |
| 48 | 43 | sdrgdrng 20893 | . . . . 5 ⊢ (𝐺 ∈ (SubDRing‘𝐿) → 𝐼 ∈ DivRing) |
| 49 | 7, 48 | syl 18 | . . . 4 ⊢ (𝜑 → 𝐼 ∈ DivRing) |
| 50 | 47, 49 | eqeltrrd 2864 | . . 3 ⊢ (𝜑 → (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing) |
| 51 | 30 | sralmod 21308 | . . . . . . 7 ⊢ (𝐺 ∈ (SubRing‘𝐸) → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod) |
| 52 | 29, 51 | syl 18 | . . . . . 6 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod) |
| 53 | 1 | islvec 21225 | . . . . . 6 ⊢ (((subringAlg ‘𝐸)‘𝐺) ∈ LVec ↔ (((subringAlg ‘𝐸)‘𝐺) ∈ LMod ∧ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing)) |
| 54 | 52, 50, 53 | sylanbrc 594 | . . . . 5 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LVec) |
| 55 | dimcl 33993 | . . . . 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 34065 | . . . 4 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) |
| 63 | xnn0lenn0nn0 13266 | . . . 4 ⊢ (((dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0* ∧ (𝐽[:]𝐾) ∈ ℕ0 ∧ (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0) | |
| 64 | 56, 57, 62, 63 | syl3anc 1398 | . . 3 ⊢ (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0) |
| 65 | 1, 32, 39, 50, 64 | assafld 34027 | . 2 ⊢ (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ Field) |
| 66 | 45, 38 | srabase 21298 | . . . 4 ⊢ (𝜑 → (Base‘𝐸) = (Base‘((subringAlg ‘𝐸)‘𝐺))) |
| 67 | 37, 66 | eqtrd 2798 | . . 3 ⊢ (𝜑 → 𝐶 = (Base‘((subringAlg ‘𝐸)‘𝐺))) |
| 68 | 45, 38 | sraaddg 21299 | . . . 4 ⊢ (𝜑 → (+g‘𝐸) = (+g‘((subringAlg ‘𝐸)‘𝐺))) |
| 69 | 68 | oveqdr 7438 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(+g‘𝐸)𝑦) = (𝑥(+g‘((subringAlg ‘𝐸)‘𝐺))𝑦)) |
| 70 | 45, 38 | sramulr 21300 | . . . 4 ⊢ (𝜑 → (.r‘𝐸) = (.r‘((subringAlg ‘𝐸)‘𝐺))) |
| 71 | 70 | oveqdr 7438 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥(.r‘𝐸)𝑦) = (𝑥(.r‘((subringAlg ‘𝐸)‘𝐺))𝑦)) |
| 72 | 37, 67, 69, 71 | fldpropd 20874 | . 2 ⊢ (𝜑 → (𝐸 ∈ Field ↔ ((subringAlg ‘𝐸)‘𝐺) ∈ Field)) |
| 73 | 65, 72 | mpbird 260 | 1 ⊢ (𝜑 → 𝐸 ∈ Field) |
| Colors of variables: wff setvar class |
| Syntax hints: → wi 4 ∧ wa 400 = wceq 1570 ∈ wcel 2143 ∪ cun 3903 ⊆ wss 3905 class class class wbr 5109 ‘cfv 6536 (class class class)co 7410 ≤ cle 11239 ℕ0cn0 12499 ℕ0*cxnn0 12572 Basecbs 17264 ↾s cress 17285 +gcplusg 17305 .rcmulr 17306 Scalarcsca 17308 CRingccrg 20311 SubRingcsubrg 20668 RingSpancrgspn 20709 IDomncidom 20792 DivRingcdr 20827 Fieldcfield 20828 SubDRingcsdrg 20889 LModclmod 20981 LVecclvec 21223 subringAlg csra 21292 AssAlgcasa 22000 dimcldim 33989 [:]cextdg 34030 |
| This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-rep 5238 ax-sep 5257 ax-nul 5269 ax-pow 5336 ax-pr 5404 ax-un 7732 ax-reg 9550 ax-inf2 9606 ax-ac2 10442 ax-cnex 11151 ax-resscn 11152 ax-1cn 11153 ax-icn 11154 ax-addcl 11155 ax-addrcl 11156 ax-mulcl 11157 ax-mulrcl 11158 ax-mulcom 11159 ax-addass 11160 ax-mulass 11161 ax-distr 11162 ax-i2m1 11163 ax-1ne0 11164 ax-1rid 11165 ax-rnegex 11166 ax-rrecex 11167 ax-cnre 11168 ax-pre-lttri 11169 ax-pre-lttrn 11170 ax-pre-ltadd 11171 ax-pre-mulgt0 11172 ax-pre-sup 11173 ax-addf 11174 |
| This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3745 df-csb 3854 df-dif 3908 df-un 3910 df-in 3912 df-ss 3922 df-pss 3925 df-nul 4287 df-if 4488 df-pw 4564 df-sn 4590 df-pr 4592 df-tp 4594 df-op 4596 df-uni 4873 df-int 4913 df-iun 4958 df-iin 4959 df-br 5110 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5556 df-eprel 5561 df-po 5569 df-so 5570 df-fr 5614 df-se 5615 df-we 5616 df-xp 5667 df-rel 5668 df-cnv 5669 df-co 5670 df-dm 5671 df-rn 5672 df-res 5673 df-ima 5674 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-isom 6545 df-riota 7367 df-ov 7413 df-oprab 7414 df-mpo 7415 df-of 7674 df-rpss 7720 df-om 7859 df-1st 7982 df-2nd 7983 df-supp 8153 df-tpos 8218 df-frecs 8274 df-wrecs 8305 df-recs 8354 df-rdg 8393 df-1o 8449 df-2o 8450 df-oadd 8453 df-er 8690 df-map 8822 df-ixp 8892 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fsupp 9318 df-sup 9398 df-inf 9399 df-oi 9468 df-r1 9732 df-rank 9733 df-dju 9883 df-card 9921 df-acn 9924 df-ac 10096 df-pnf 11240 df-mnf 11241 df-xr 11242 df-ltxr 11243 df-le 11244 df-sub 11438 df-neg 11439 df-div 11867 df-ind 12214 df-nn 12229 df-2 12298 df-3 12299 df-4 12300 df-5 12301 df-6 12302 df-7 12303 df-8 12304 df-9 12305 df-n0 12500 df-xnn0 12573 df-z 12587 df-dec 12707 df-uz 12858 df-rp 13012 df-xadd 13133 df-fz 13531 df-fzo 13679 df-seq 14034 df-exp 14094 df-hash 14363 df-word 14547 df-lsw 14596 df-concat 14604 df-s1 14630 df-substr 14675 df-pfx 14705 df-s2 14881 df-cj 15146 df-re 15147 df-im 15148 df-sqrt 15282 df-abs 15283 df-clim 15535 df-sum 15734 df-struct 17202 df-sets 17219 df-slot 17237 df-ndx 17249 df-base 17265 df-ress 17286 df-plusg 17318 df-mulr 17319 df-starv 17320 df-sca 17321 df-vsca 17322 df-ip 17323 df-tset 17324 df-ple 17325 df-ocomp 17326 df-ds 17327 df-unif 17328 df-hom 17329 df-cco 17330 df-0g 17489 df-gsum 17490 df-prds 17495 df-pws 17497 df-mre 17633 df-mrc 17634 df-mri 17635 df-acs 17636 df-proset 18345 df-drs 18346 df-poset 18364 df-ipo 18579 df-mgm 18693 df-sgrp 18772 df-mnd 18788 df-mhm 18836 df-submnd 18837 df-grp 18998 df-minusg 18999 df-sbg 19000 df-mulg 19129 df-subg 19184 df-ghm 19279 df-cntz 19382 df-cntr 19383 df-lsm 19701 df-cmn 19847 df-abl 19848 df-mgp 20212 df-rng 20226 df-ur 20259 df-ring 20312 df-cring 20313 df-oppr 20415 df-dvdsr 20435 df-unit 20436 df-invr 20466 df-nzr 20610 df-subrng 20645 df-subrg 20669 df-rgspn 20710 df-rlreg 20793 df-domn 20794 df-idom 20795 df-drng 20829 df-field 20830 df-sdrg 20890 df-lmod 20983 df-lss 21053 df-lsp 21093 df-lmhm 21143 df-lmim 21144 df-lbs 21196 df-lvec 21224 df-sra 21294 df-rgmod 21295 df-cnfld 21523 df-zring 21597 df-dsmm 21882 df-frlm 21897 df-uvc 21933 df-lindf 21956 df-linds 21957 df-assa 22003 df-dim 33990 df-fldext 34031 df-extdg 34032 |
| This theorem is referenced by: fldextrspunlem2 34067 fldextrspundgdvdslem 34070 fldextrspundgdvds 34071 |
| Copyright terms: Public domain | W3C validator |