Theorem cmscsscms 25342

Description: A closed subspace of a complete metric space which is also a subcomplex pre-Hilbert space is a complete metric space. Remark: the assumption that the Banach space must be a (subcomplex) pre-Hilbert space is required because the definition of ClSubSp is based on an inner product. If ClSubSp was generalized to arbitrary topological spaces (or at least topological modules), this assumption could be omitted. (Contributed by AV, 8-Oct-2022.)

Hypotheses

Ref	Expression
cmslssbn.x	⊢ 𝑋 = (𝑊 ↾s 𝑈)
cmscsscms.s	⊢ 𝑆 = (ClSubSp‘𝑊)

Assertion

Ref	Expression
cmscsscms	⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑋 ∈ CMetSp)

Proof of Theorem cmscsscms

Step	Hyp	Ref	Expression
1		cmslssbn.x	. . 3 ⊢ 𝑋 = (𝑊 ↾s 𝑈)
2		cmsms 25317	. . . . 5 ⊢ (𝑊 ∈ CMetSp → 𝑊 ∈ MetSp)
3	2	adantr 480	. . . 4 ⊢ ((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) → 𝑊 ∈ MetSp)
4		ressms 24482	. . . 4 ⊢ ((𝑊 ∈ MetSp ∧ 𝑈 ∈ 𝑆) → (𝑊 ↾s 𝑈) ∈ MetSp)
5	3, 4	sylan 580	. . 3 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (𝑊 ↾s 𝑈) ∈ MetSp)
6	1, 5	eqeltrid 2837	. 2 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑋 ∈ MetSp)
7		cphlmod 25143	. . . . . . . 8 ⊢ (𝑊 ∈ ℂPreHil → 𝑊 ∈ LMod)
8	7	adantl 481	. . . . . . 7 ⊢ ((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) → 𝑊 ∈ LMod)
9	8	adantr 480	. . . . . 6 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑊 ∈ LMod)
10		cphphl 25140	. . . . . . . 8 ⊢ (𝑊 ∈ ℂPreHil → 𝑊 ∈ PreHil)
11	10	adantl 481	. . . . . . 7 ⊢ ((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) → 𝑊 ∈ PreHil)
12		cmscsscms.s	. . . . . . . 8 ⊢ 𝑆 = (ClSubSp‘𝑊)
13		eqid 2734	. . . . . . . 8 ⊢ (LSubSp‘𝑊) = (LSubSp‘𝑊)
14	12, 13	csslss 21662	. . . . . . 7 ⊢ ((𝑊 ∈ PreHil ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (LSubSp‘𝑊))
15	11, 14	sylan 580	. . . . . 6 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (LSubSp‘𝑊))
16	13	lsssubg 20922	. . . . . 6 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ (LSubSp‘𝑊)) → 𝑈 ∈ (SubGrp‘𝑊))
17	9, 15, 16	syl2anc 584	. . . . 5 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (SubGrp‘𝑊))
18	1	subgbas 19116	. . . . 5 ⊢ (𝑈 ∈ (SubGrp‘𝑊) → 𝑈 = (Base‘𝑋))
19	17, 18	syl 17	. . . 4 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑈 = (Base‘𝑋))
20		eqid 2734	. . . . . 6 ⊢ (TopOpen‘𝑊) = (TopOpen‘𝑊)
21	12, 20	csscld 25218	. . . . 5 ⊢ ((𝑊 ∈ ℂPreHil ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (Clsd‘(TopOpen‘𝑊)))
22	21	adantll 714	. . . 4 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (Clsd‘(TopOpen‘𝑊)))
23	19, 22	eqeltrrd 2834	. . 3 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (Base‘𝑋) ∈ (Clsd‘(TopOpen‘𝑊)))
24		eqid 2734	. . . . . . . . . 10 ⊢ (dist‘𝑊) = (dist‘𝑊)
25	1, 24	ressds 17425	. . . . . . . . 9 ⊢ (𝑈 ∈ 𝑆 → (dist‘𝑊) = (dist‘𝑋))
26	25	adantl 481	. . . . . . . 8 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (dist‘𝑊) = (dist‘𝑋))
27	26	eqcomd 2740	. . . . . . 7 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (dist‘𝑋) = (dist‘𝑊))
28	27	reseq1d 5976	. . . . . 6 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) = ((dist‘𝑊) ↾ ((Base‘𝑋) × (Base‘𝑋))))
29	19, 17	eqeltrrd 2834	. . . . . . . . 9 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (Base‘𝑋) ∈ (SubGrp‘𝑊))
30		eqid 2734	. . . . . . . . . 10 ⊢ (Base‘𝑊) = (Base‘𝑊)
31	30	subgss 19113	. . . . . . . . 9 ⊢ ((Base‘𝑋) ∈ (SubGrp‘𝑊) → (Base‘𝑋) ⊆ (Base‘𝑊))
32	29, 31	syl 17	. . . . . . . 8 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (Base‘𝑋) ⊆ (Base‘𝑊))
33		xpss12 5680	. . . . . . . 8 ⊢ (((Base‘𝑋) ⊆ (Base‘𝑊) ∧ (Base‘𝑋) ⊆ (Base‘𝑊)) → ((Base‘𝑋) × (Base‘𝑋)) ⊆ ((Base‘𝑊) × (Base‘𝑊)))
34	32, 32, 33	syl2anc 584	. . . . . . 7 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((Base‘𝑋) × (Base‘𝑋)) ⊆ ((Base‘𝑊) × (Base‘𝑊)))
35	34	resabs1d 6006	. . . . . 6 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ↾ ((Base‘𝑋) × (Base‘𝑋))) = ((dist‘𝑊) ↾ ((Base‘𝑋) × (Base‘𝑋))))
36	28, 35	eqtr4d 2772	. . . . 5 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) = (((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ↾ ((Base‘𝑋) × (Base‘𝑋))))
37	36	eleq1d 2818	. . . 4 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋)) ↔ (((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋))))
38		eqid 2734	. . . . . . . 8 ⊢ ((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) = ((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))
39	30, 38	cmscmet 25315	. . . . . . 7 ⊢ (𝑊 ∈ CMetSp → ((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ∈ (CMet‘(Base‘𝑊)))
40	39	adantr 480	. . . . . 6 ⊢ ((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) → ((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ∈ (CMet‘(Base‘𝑊)))
41	40	adantr 480	. . . . 5 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ∈ (CMet‘(Base‘𝑊)))
42		eqid 2734	. . . . . 6 ⊢ (MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))) = (MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))))
43	42	cmetss 25285	. . . . 5 ⊢ (((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ∈ (CMet‘(Base‘𝑊)) → ((((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋)) ↔ (Base‘𝑋) ∈ (Clsd‘(MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))))))
44	41, 43	syl 17	. . . 4 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋)) ↔ (Base‘𝑋) ∈ (Clsd‘(MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))))))
45	3	adantr 480	. . . . . . . 8 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑊 ∈ MetSp)
46	20, 30, 38	mstopn 24406	. . . . . . . 8 ⊢ (𝑊 ∈ MetSp → (TopOpen‘𝑊) = (MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))))
47	45, 46	syl 17	. . . . . . 7 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (TopOpen‘𝑊) = (MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))))
48	47	eqcomd 2740	. . . . . 6 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊)))) = (TopOpen‘𝑊))
49	48	fveq2d 6889	. . . . 5 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (Clsd‘(MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))))) = (Clsd‘(TopOpen‘𝑊)))
50	49	eleq2d 2819	. . . 4 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((Base‘𝑋) ∈ (Clsd‘(MetOpen‘((dist‘𝑊) ↾ ((Base‘𝑊) × (Base‘𝑊))))) ↔ (Base‘𝑋) ∈ (Clsd‘(TopOpen‘𝑊))))
51	37, 44, 50	3bitrd 305	. . 3 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → (((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋)) ↔ (Base‘𝑋) ∈ (Clsd‘(TopOpen‘𝑊))))
52	23, 51	mpbird 257	. 2 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → ((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋)))
53		eqid 2734	. . 3 ⊢ (Base‘𝑋) = (Base‘𝑋)
54		eqid 2734	. . 3 ⊢ ((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) = ((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋)))
55	53, 54	iscms 25314	. 2 ⊢ (𝑋 ∈ CMetSp ↔ (𝑋 ∈ MetSp ∧ ((dist‘𝑋) ↾ ((Base‘𝑋) × (Base‘𝑋))) ∈ (CMet‘(Base‘𝑋))))
56	6, 52, 55	sylanbrc 583	1 ⊢ (((𝑊 ∈ CMetSp ∧ 𝑊 ∈ ℂPreHil) ∧ 𝑈 ∈ 𝑆) → 𝑋 ∈ CMetSp)

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1539   ∈ wcel 2107   ⊆ wss 3931   × cxp 5663   ↾ cres 5667  ‘cfv 6540  (class class class)co 7412  Basecbs 17228   ↾_s cress 17251  distcds 17281  TopOpenctopn 17436  SubGrpcsubg 19106  LModclmod 20825  LSubSpclss 20896  MetOpencmopn 21315  PreHilcphl 21595  ClSubSpccss 21632  Clsdccld 22969  MetSpcms 24272  ℂPreHilccph 25135  CMetccmet 25223  CMetSpccms 25301

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2706  ax-rep 5259  ax-sep 5276  ax-nul 5286  ax-pow 5345  ax-pr 5412  ax-un 7736  ax-cnex 11192  ax-resscn 11193  ax-1cn 11194  ax-icn 11195  ax-addcl 11196  ax-addrcl 11197  ax-mulcl 11198  ax-mulrcl 11199  ax-mulcom 11200  ax-addass 11201  ax-mulass 11202  ax-distr 11203  ax-i2m1 11204  ax-1ne0 11205  ax-1rid 11206  ax-rnegex 11207  ax-rrecex 11208  ax-cnre 11209  ax-pre-lttri 11210  ax-pre-lttrn 11211  ax-pre-ltadd 11212  ax-pre-mulgt0 11213  ax-pre-sup 11214  ax-addf 11215  ax-mulf 11216

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2808  df-nfc 2884  df-ne 2932  df-nel 3036  df-ral 3051  df-rex 3060  df-rmo 3363  df-reu 3364  df-rab 3420  df-v 3465  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-tp 4611  df-op 4613  df-uni 4888  df-int 4927  df-iun 4973  df-iin 4974  df-br 5124  df-opab 5186  df-mpt 5206  df-tr 5240  df-id 5558  df-eprel 5564  df-po 5572  df-so 5573  df-fr 5617  df-se 5618  df-we 5619  df-xp 5671  df-rel 5672  df-cnv 5673  df-co 5674  df-dm 5675  df-rn 5676  df-res 5677  df-ima 5678  df-pred 6301  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6493  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7678  df-om 7869  df-1st 7995  df-2nd 7996  df-supp 8167  df-tpos 8232  df-frecs 8287  df-wrecs 8318  df-recs 8392  df-rdg 8431  df-1o 8487  df-2o 8488  df-er 8726  df-map 8849  df-ixp 8919  df-en 8967  df-dom 8968  df-sdom 8969  df-fin 8970  df-fsupp 9383  df-fi 9432  df-sup 9463  df-inf 9464  df-oi 9531  df-card 9960  df-pnf 11278  df-mnf 11279  df-xr 11280  df-ltxr 11281  df-le 11282  df-sub 11475  df-neg 11476  df-div 11902  df-nn 12248  df-2 12310  df-3 12311  df-4 12312  df-5 12313  df-6 12314  df-7 12315  df-8 12316  df-9 12317  df-n0 12509  df-z 12596  df-dec 12716  df-uz 12860  df-q 12972  df-rp 13016  df-xneg 13135  df-xadd 13136  df-xmul 13137  df-ico 13374  df-icc 13375  df-fz 13529  df-fzo 13676  df-seq 14024  df-exp 14084  df-hash 14351  df-cj 15119  df-re 15120  df-im 15121  df-sqrt 15255  df-abs 15256  df-struct 17165  df-sets 17182  df-slot 17200  df-ndx 17212  df-base 17229  df-ress 17252  df-plusg 17285  df-mulr 17286  df-starv 17287  df-sca 17288  df-vsca 17289  df-ip 17290  df-tset 17291  df-ple 17292  df-ds 17294  df-unif 17295  df-hom 17296  df-cco 17297  df-rest 17437  df-topn 17438  df-0g 17456  df-gsum 17457  df-topgen 17458  df-pt 17459  df-prds 17462  df-xrs 17517  df-qtop 17522  df-imas 17523  df-xps 17525  df-mre 17599  df-mrc 17600  df-acs 17602  df-mgm 18621  df-sgrp 18700  df-mnd 18716  df-mhm 18764  df-submnd 18765  df-grp 18922  df-minusg 18923  df-sbg 18924  df-mulg 19054  df-subg 19109  df-ghm 19199  df-cntz 19303  df-cmn 19767  df-abl 19768  df-mgp 20105  df-rng 20117  df-ur 20146  df-ring 20199  df-cring 20200  df-oppr 20301  df-dvdsr 20324  df-unit 20325  df-invr 20355  df-dvr 20368  df-rhm 20439  df-subrng 20513  df-subrg 20537  df-drng 20698  df-staf 20807  df-srng 20808  df-lmod 20827  df-lss 20897  df-lmhm 20988  df-lvec 21069  df-sra 21139  df-rgmod 21140  df-psmet 21317  df-xmet 21318  df-met 21319  df-bl 21320  df-mopn 21321  df-fbas 21322  df-fg 21323  df-cnfld 21326  df-phl 21597  df-ipf 21598  df-ocv 21634  df-css 21635  df-top 22847  df-topon 22864  df-topsp 22886  df-bases 22899  df-cld 22972  df-ntr 22973  df-cls 22974  df-nei 23051  df-cn 23180  df-cnp 23181  df-t1 23267  df-haus 23268  df-tx 23515  df-hmeo 23708  df-fil 23799  df-flim 23892  df-xms 24274  df-ms 24275  df-tms 24276  df-nm 24538  df-ngp 24539  df-tng 24540  df-nlm 24542  df-clm 25031  df-cph 25137  df-tcph 25138  df-cfil 25224  df-cmet 25226  df-cms 25304

This theorem is referenced by:  bncssbn  25343