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

Theorem fldextrspunfld 34007
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 (𝜑 → (𝐽[:]𝐾) ∈ ℕ0)
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.
StepHypRef Expression
1 eqid 2769 . . 3 (Scalar‘((subringAlg ‘𝐸)‘𝐺)) = (Scalar‘((subringAlg ‘𝐸)‘𝐺))
2 fldextrspunfld.e . . . . . 6 𝐸 = (𝐿s 𝐶)
3 fldextrspunfld.2 . . . . . . 7 (𝜑𝐿 ∈ Field)
43flddrngd 20821 . . . . . . . . 9 (𝜑𝐿 ∈ DivRing)
54drngringd 20817 . . . . . . . 8 (𝜑𝐿 ∈ Ring)
6 eqidd 2770 . . . . . . . 8 (𝜑 → (Base‘𝐿) = (Base‘𝐿))
7 fldextrspunfld.5 . . . . . . . . . 10 (𝜑𝐺 ∈ (SubDRing‘𝐿))
8 eqid 2769 . . . . . . . . . . 11 (Base‘𝐿) = (Base‘𝐿)
98sdrgss 20870 . . . . . . . . . 10 (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ⊆ (Base‘𝐿))
107, 9syl 18 . . . . . . . . 9 (𝜑𝐺 ⊆ (Base‘𝐿))
11 fldextrspunfld.6 . . . . . . . . . 10 (𝜑𝐻 ∈ (SubDRing‘𝐿))
128sdrgss 20870 . . . . . . . . . 10 (𝐻 ∈ (SubDRing‘𝐿) → 𝐻 ⊆ (Base‘𝐿))
1311, 12syl 18 . . . . . . . . 9 (𝜑𝐻 ⊆ (Base‘𝐿))
1410, 13unssd 4153 . . . . . . . 8 (𝜑 → (𝐺𝐻) ⊆ (Base‘𝐿))
15 fldextrspunfld.n . . . . . . . . 9 𝑁 = (RingSpan‘𝐿)
1615a1i 11 . . . . . . . 8 (𝜑𝑁 = (RingSpan‘𝐿))
17 fldextrspunfld.c . . . . . . . . 9 𝐶 = (𝑁‘(𝐺𝐻))
1817a1i 11 . . . . . . . 8 (𝜑𝐶 = (𝑁‘(𝐺𝐻)))
195, 6, 14, 16, 18rgspncl 20694 . . . . . . 7 (𝜑𝐶 ∈ (SubRing‘𝐿))
203, 19subrfld 33544 . . . . . 6 (𝜑 → (𝐿s 𝐶) ∈ IDomn)
212, 20eqeltrid 2873 . . . . 5 (𝜑𝐸 ∈ IDomn)
2221idomcringd 20807 . . . 4 (𝜑𝐸 ∈ CRing)
23 sdrgsubrg 20868 . . . . . 6 (𝐺 ∈ (SubDRing‘𝐿) → 𝐺 ∈ (SubRing‘𝐿))
247, 23syl 18 . . . . 5 (𝜑𝐺 ∈ (SubRing‘𝐿))
255, 6, 14, 16, 18rgspnssid 20695 . . . . . 6 (𝜑 → (𝐺𝐻) ⊆ 𝐶)
2625unssad 4154 . . . . 5 (𝜑𝐺𝐶)
272subsubrg 20679 . . . . . 6 (𝐶 ∈ (SubRing‘𝐿) → (𝐺 ∈ (SubRing‘𝐸) ↔ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺𝐶)))
2827biimpar 482 . . . . 5 ((𝐶 ∈ (SubRing‘𝐿) ∧ (𝐺 ∈ (SubRing‘𝐿) ∧ 𝐺𝐶)) → 𝐺 ∈ (SubRing‘𝐸))
2919, 24, 26, 28syl12anc 849 . . . 4 (𝜑𝐺 ∈ (SubRing‘𝐸))
30 eqid 2769 . . . . 5 ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺)
3130sraassa 21984 . . . 4 ((𝐸 ∈ CRing ∧ 𝐺 ∈ (SubRing‘𝐸)) → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg)
3222, 29, 31syl2anc 595 . . 3 (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ AssAlg)
33 eqid 2769 . . . 4 (Base‘𝐸) = (Base‘𝐸)
348subrgss 20653 . . . . . . 7 (𝐶 ∈ (SubRing‘𝐿) → 𝐶 ⊆ (Base‘𝐿))
3519, 34syl 18 . . . . . 6 (𝜑𝐶 ⊆ (Base‘𝐿))
362, 8ressbas2 17294 . . . . . 6 (𝐶 ⊆ (Base‘𝐿) → 𝐶 = (Base‘𝐸))
3735, 36syl 18 . . . . 5 (𝜑𝐶 = (Base‘𝐸))
3826, 37sseqtrd 3981 . . . 4 (𝜑𝐺 ⊆ (Base‘𝐸))
3930, 33, 21, 38sraidom 33914 . . 3 (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ IDomn)
40 ressabs 17304 . . . . . . 7 ((𝐶 ∈ (SubRing‘𝐿) ∧ 𝐺𝐶) → ((𝐿s 𝐶) ↾s 𝐺) = (𝐿s 𝐺))
4119, 26, 40syl2anc 595 . . . . . 6 (𝜑 → ((𝐿s 𝐶) ↾s 𝐺) = (𝐿s 𝐺))
422oveq1i 7418 . . . . . 6 (𝐸s 𝐺) = ((𝐿s 𝐶) ↾s 𝐺)
43 fldextrspunfld.i . . . . . 6 𝐼 = (𝐿s 𝐺)
4441, 42, 433eqtr4g 2829 . . . . 5 (𝜑 → (𝐸s 𝐺) = 𝐼)
45 eqidd 2770 . . . . . 6 (𝜑 → ((subringAlg ‘𝐸)‘𝐺) = ((subringAlg ‘𝐸)‘𝐺))
4645, 38srasca 21275 . . . . 5 (𝜑 → (𝐸s 𝐺) = (Scalar‘((subringAlg ‘𝐸)‘𝐺)))
4744, 46eqtr3d 2806 . . . 4 (𝜑𝐼 = (Scalar‘((subringAlg ‘𝐸)‘𝐺)))
4843sdrgdrng 20867 . . . . 5 (𝐺 ∈ (SubDRing‘𝐿) → 𝐼 ∈ DivRing)
497, 48syl 18 . . . 4 (𝜑𝐼 ∈ DivRing)
5047, 49eqeltrrd 2870 . . 3 (𝜑 → (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing)
5130sralmod 21282 . . . . . . 7 (𝐺 ∈ (SubRing‘𝐸) → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod)
5229, 51syl 18 . . . . . 6 (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LMod)
531islvec 21199 . . . . . 6 (((subringAlg ‘𝐸)‘𝐺) ∈ LVec ↔ (((subringAlg ‘𝐸)‘𝐺) ∈ LMod ∧ (Scalar‘((subringAlg ‘𝐸)‘𝐺)) ∈ DivRing))
5452, 50, 53sylanbrc 594 . . . . 5 (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ LVec)
55 dimcl 33934 . . . . 5 (((subringAlg ‘𝐸)‘𝐺) ∈ LVec → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0*)
5654, 55syl 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‘𝐽))
6258, 43, 59, 3, 60, 61, 7, 11, 57, 15, 17, 2fldextrspunlem1 34006 . . . 4 (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾))
63 xnn0lenn0nn0 13267 . . . 4 (((dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0* ∧ (𝐽[:]𝐾) ∈ ℕ0 ∧ (dim‘((subringAlg ‘𝐸)‘𝐺)) ≤ (𝐽[:]𝐾)) → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0)
6456, 57, 62, 63syl3anc 1396 . . 3 (𝜑 → (dim‘((subringAlg ‘𝐸)‘𝐺)) ∈ ℕ0)
651, 32, 39, 50, 64assafld 33968 . 2 (𝜑 → ((subringAlg ‘𝐸)‘𝐺) ∈ Field)
6645, 38srabase 21272 . . . 4 (𝜑 → (Base‘𝐸) = (Base‘((subringAlg ‘𝐸)‘𝐺)))
6737, 66eqtrd 2804 . . 3 (𝜑𝐶 = (Base‘((subringAlg ‘𝐸)‘𝐺)))
6845, 38sraaddg 21273 . . . 4 (𝜑 → (+g𝐸) = (+g‘((subringAlg ‘𝐸)‘𝐺)))
6968oveqdr 7436 . . 3 ((𝜑 ∧ (𝑥𝐶𝑦𝐶)) → (𝑥(+g𝐸)𝑦) = (𝑥(+g‘((subringAlg ‘𝐸)‘𝐺))𝑦))
7045, 38sramulr 21274 . . . 4 (𝜑 → (.r𝐸) = (.r‘((subringAlg ‘𝐸)‘𝐺)))
7170oveqdr 7436 . . 3 ((𝜑 ∧ (𝑥𝐶𝑦𝐶)) → (𝑥(.r𝐸)𝑦) = (𝑥(.r‘((subringAlg ‘𝐸)‘𝐺))𝑦))
7237, 67, 69, 71fldpropd 20848 . 2 (𝜑 → (𝐸 ∈ Field ↔ ((subringAlg ‘𝐸)‘𝐺) ∈ Field))
7365, 72mpbird 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 5110  cfv 6534  (class class class)co 7408  cle 11240  0cn0 12500  0*cxnn0 12573  Basecbs 17265  s cress 17286  +gcplusg 17306  .rcmulr 17307  Scalarcsca 17309  CRingccrg 20312  SubRingcsubrg 20650  RingSpancrgspn 20691  IDomncidom 20774  DivRingcdr 20809  Fieldcfield 20810  SubDRingcsdrg 20863  LModclmod 20955  LVecclvec 21197  subringAlg csra 21266  AssAlgcasa 21965  dimcldim 33930  [:]cextdg 33971
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 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-reg 9550  ax-inf2 9606  ax-ac2 10443  ax-cnex 11152  ax-resscn 11153  ax-1cn 11154  ax-icn 11155  ax-addcl 11156  ax-addrcl 11157  ax-mulcl 11158  ax-mulrcl 11159  ax-mulcom 11160  ax-addass 11161  ax-mulass 11162  ax-distr 11163  ax-i2m1 11164  ax-1ne0 11165  ax-1rid 11166  ax-rnegex 11167  ax-rrecex 11168  ax-cnre 11169  ax-pre-lttri 11170  ax-pre-lttrn 11171  ax-pre-ltadd 11172  ax-pre-mulgt0 11173  ax-pre-sup 11174  ax-addf 11175
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 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4874  df-int 4914  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-se 5613  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6300  df-ord 6361  df-on 6362  df-lim 6363  df-suc 6364  df-iota 6490  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-isom 6543  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-of 7672  df-rpss 7718  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 11241  df-mnf 11242  df-xr 11243  df-ltxr 11244  df-le 11245  df-sub 11439  df-neg 11440  df-div 11868  df-ind 12215  df-nn 12230  df-2 12299  df-3 12300  df-4 12301  df-5 12302  df-6 12303  df-7 12304  df-8 12305  df-9 12306  df-n0 12501  df-xnn0 12574  df-z 12588  df-dec 12708  df-uz 12859  df-rp 13013  df-xadd 13134  df-fz 13532  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 17203  df-sets 17220  df-slot 17238  df-ndx 17250  df-base 17266  df-ress 17287  df-plusg 17319  df-mulr 17320  df-starv 17321  df-sca 17322  df-vsca 17323  df-ip 17324  df-tset 17325  df-ple 17326  df-ocomp 17327  df-ds 17328  df-unif 17329  df-hom 17330  df-cco 17331  df-0g 17490  df-gsum 17491  df-prds 17496  df-pws 17498  df-mre 17634  df-mrc 17635  df-mri 17636  df-acs 17637  df-proset 18346  df-drs 18347  df-poset 18365  df-ipo 18580  df-mgm 18694  df-sgrp 18773  df-mnd 18789  df-mhm 18837  df-submnd 18838  df-grp 18999  df-minusg 19000  df-sbg 19001  df-mulg 19130  df-subg 19185  df-ghm 19280  df-cntz 19383  df-cntr 19384  df-lsm 19702  df-cmn 19848  df-abl 19849  df-mgp 20213  df-rng 20227  df-ur 20260  df-ring 20313  df-cring 20314  df-oppr 20415  df-dvdsr 20435  df-unit 20436  df-invr 20466  df-nzr 20592  df-subrng 20627  df-subrg 20651  df-rgspn 20692  df-rlreg 20775  df-domn 20776  df-idom 20777  df-drng 20811  df-field 20812  df-sdrg 20864  df-lmod 20957  df-lss 21027  df-lsp 21067  df-lmhm 21117  df-lmim 21118  df-lbs 21170  df-lvec 21198  df-sra 21268  df-rgmod 21269  df-cnfld 21488  df-zring 21562  df-dsmm 21847  df-frlm 21862  df-uvc 21898  df-lindf 21921  df-linds 21922  df-assa 21968  df-dim 33931  df-fldext 33972  df-extdg 33973
This theorem is referenced by:  fldextrspunlem2  34008  fldextrspundgdvdslem  34011  fldextrspundgdvds  34012
  Copyright terms: Public domain W3C validator