Theorem srabn 25352

Description: The subring algebra over a complete normed ring is a Banach space iff the subring is a closed division ring. (Contributed by Mario Carneiro, 15-Oct-2015.)

Hypotheses

Ref	Expression
srabn.a	⊢ 𝐴 = ((subringAlg ‘𝑊)‘𝑆)
srabn.j	⊢ 𝐽 = (TopOpen‘𝑊)

Assertion

Ref	Expression
srabn	⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝐴 ∈ Ban ↔ (𝑆 ∈ (Clsd‘𝐽) ∧ (𝑊 ↾s 𝑆) ∈ DivRing)))

Proof of Theorem srabn

Step	Hyp	Ref	Expression
1		simp2 1143	. . . 4 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → 𝑊 ∈ CMetSp)
2		eqidd 2741	. . . . 5 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (Base‘𝑊) = (Base‘𝑊))
3		srabn.a	. . . . . . 7 ⊢ 𝐴 = ((subringAlg ‘𝑊)‘𝑆)
4	3	a1i 11	. . . . . 6 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → 𝐴 = ((subringAlg ‘𝑊)‘𝑆))
5		eqid 2740	. . . . . . . 8 ⊢ (Base‘𝑊) = (Base‘𝑊)
6	5	subrgss 20551	. . . . . . 7 ⊢ (𝑆 ∈ (SubRing‘𝑊) → 𝑆 ⊆ (Base‘𝑊))
7	6	3ad2ant3 1141	. . . . . 6 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → 𝑆 ⊆ (Base‘𝑊))
8	4, 7	srabase 21174	. . . . 5 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (Base‘𝑊) = (Base‘𝐴))
9	4, 7	srads 21182	. . . . . 6 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (dist‘𝑊) = (dist‘𝐴))
10	9	reseq1d 5937	. . . . 5 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → ((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) = ((dist‘𝐴) ↾ ((Base‘𝑊) × (Base‘𝑊))))
11	4, 7	sratopn 21181	. . . . 5 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (TopOpen‘𝑊) = (TopOpen‘𝐴))
12	2, 8, 10, 11	cmspropd 25341	. . . 4 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝑊 ∈ CMetSp ↔ 𝐴 ∈ CMetSp))
13	1, 12	mpbid 233	. . 3 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → 𝐴 ∈ CMetSp)
14		eqid 2740	. . . . . 6 ⊢ (Scalar‘𝐴) = (Scalar‘𝐴)
15	14	isbn 25330	. . . . 5 ⊢ (𝐴 ∈ Ban ↔ (𝐴 ∈ NrmVec ∧ 𝐴 ∈ CMetSp ∧ (Scalar‘𝐴) ∈ CMetSp))
16		3anrot 1105	. . . . 5 ⊢ ((𝐴 ∈ NrmVec ∧ 𝐴 ∈ CMetSp ∧ (Scalar‘𝐴) ∈ CMetSp) ↔ (𝐴 ∈ CMetSp ∧ (Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec))
17		3anass 1100	. . . . 5 ⊢ ((𝐴 ∈ CMetSp ∧ (Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec) ↔ (𝐴 ∈ CMetSp ∧ ((Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec)))
18	15, 16, 17	3bitri 298	. . . 4 ⊢ (𝐴 ∈ Ban ↔ (𝐴 ∈ CMetSp ∧ ((Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec)))
19	18	baib 540	. . 3 ⊢ (𝐴 ∈ CMetSp → (𝐴 ∈ Ban ↔ ((Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec)))
20	13, 19	syl 17	. 2 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝐴 ∈ Ban ↔ ((Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec)))
21	4, 7	srasca 21177	. . . . 5 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝑊 ↾s 𝑆) = (Scalar‘𝐴))
22	21	eleq1d 2825	. . . 4 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → ((𝑊 ↾s 𝑆) ∈ CMetSp ↔ (Scalar‘𝐴) ∈ CMetSp))
23		eqid 2740	. . . . . 6 ⊢ (𝑊 ↾s 𝑆) = (𝑊 ↾s 𝑆)
24		srabn.j	. . . . . 6 ⊢ 𝐽 = (TopOpen‘𝑊)
25	23, 5, 24	cmsss 25343	. . . . 5 ⊢ ((𝑊 ∈ CMetSp ∧ 𝑆 ⊆ (Base‘𝑊)) → ((𝑊 ↾s 𝑆) ∈ CMetSp ↔ 𝑆 ∈ (Clsd‘𝐽)))
26	1, 7, 25	syl2anc 590	. . . 4 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → ((𝑊 ↾s 𝑆) ∈ CMetSp ↔ 𝑆 ∈ (Clsd‘𝐽)))
27	22, 26	bitr3d 282	. . 3 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → ((Scalar‘𝐴) ∈ CMetSp ↔ 𝑆 ∈ (Clsd‘𝐽)))
28	3	sranlm 24674	. . . . . 6 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑆 ∈ (SubRing‘𝑊)) → 𝐴 ∈ NrmMod)
29	28	3adant2 1137	. . . . 5 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → 𝐴 ∈ NrmMod)
30	14	isnvc2 24689	. . . . . 6 ⊢ (𝐴 ∈ NrmVec ↔ (𝐴 ∈ NrmMod ∧ (Scalar‘𝐴) ∈ DivRing))
31	30	baib 540	. . . . 5 ⊢ (𝐴 ∈ NrmMod → (𝐴 ∈ NrmVec ↔ (Scalar‘𝐴) ∈ DivRing))
32	29, 31	syl 17	. . . 4 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝐴 ∈ NrmVec ↔ (Scalar‘𝐴) ∈ DivRing))
33	21	eleq1d 2825	. . . 4 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → ((𝑊 ↾s 𝑆) ∈ DivRing ↔ (Scalar‘𝐴) ∈ DivRing))
34	32, 33	bitr4d 283	. . 3 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝐴 ∈ NrmVec ↔ (𝑊 ↾s 𝑆) ∈ DivRing))
35	27, 34	anbi12d 638	. 2 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (((Scalar‘𝐴) ∈ CMetSp ∧ 𝐴 ∈ NrmVec) ↔ (𝑆 ∈ (Clsd‘𝐽) ∧ (𝑊 ↾s 𝑆) ∈ DivRing)))
36	20, 35	bitrd 280	1 ⊢ ((𝑊 ∈ NrmRing ∧ 𝑊 ∈ CMetSp ∧ 𝑆 ∈ (SubRing‘𝑊)) → (𝐴 ∈ Ban ↔ (𝑆 ∈ (Clsd‘𝐽) ∧ (𝑊 ↾s 𝑆) ∈ DivRing)))

Syntax hints:   → wi 4   ↔ wb 207   ∧ wa 396   ∧ w3a 1092   = wceq 1547   ∈ wcel 2119   ⊆ wss 3890   × cxp 5623  ‘cfv 6492  (class class class)co 7363  Basecbs 17177   ↾_s cress 17198  Scalarcsca 17221  distcds 17227  TopOpenctopn 17382  SubRingcsubrg 20548  DivRingcdr 20708  subringAlg csra 21168  Clsdccld 23006  NrmRingcnrg 24569  NrmModcnlm 24570  NrmVeccnvc 24571  CMetSpccms 25324  Bancbn 25325

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113  ax-pre-sup 11114

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-iin 4931  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  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-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-2o 8403  df-er 8640  df-map 8772  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-fi 9321  df-sup 9352  df-inf 9353  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-div 11806  df-nn 12173  df-2 12242  df-3 12243  df-4 12244  df-5 12245  df-6 12246  df-7 12247  df-8 12248  df-9 12249  df-n0 12436  df-z 12523  df-dec 12643  df-uz 12787  df-q 12897  df-rp 12941  df-xneg 13061  df-xadd 13062  df-xmul 13063  df-ico 13302  df-icc 13303  df-sets 17132  df-slot 17150  df-ndx 17162  df-base 17178  df-ress 17199  df-plusg 17231  df-mulr 17232  df-sca 17234  df-vsca 17235  df-ip 17236  df-tset 17237  df-ds 17240  df-rest 17383  df-topn 17384  df-0g 17402  df-topgen 17404  df-mgm 18606  df-sgrp 18685  df-mnd 18701  df-grp 18910  df-minusg 18911  df-sbg 18912  df-subg 19097  df-cmn 19755  df-abl 19756  df-mgp 20120  df-rng 20132  df-ur 20161  df-ring 20214  df-subrng 20525  df-subrg 20549  df-abv 20788  df-lmod 20859  df-lvec 21100  df-sra 21170  df-psmet 21346  df-xmet 21347  df-met 21348  df-bl 21349  df-mopn 21350  df-fbas 21351  df-fg 21352  df-top 22884  df-topon 22901  df-topsp 22923  df-bases 22936  df-cld 23009  df-ntr 23010  df-cls 23011  df-nei 23088  df-haus 23305  df-fil 23836  df-flim 23929  df-xms 24310  df-ms 24311  df-nm 24572  df-ngp 24573  df-nrg 24575  df-nlm 24576  df-nvc 24577  df-cfil 25247  df-cmet 25249  df-cms 25327  df-bn 25328

This theorem is referenced by:  rlmbn  25353