Metamath Proof Explorer


Theorem cssbn

Description: A complete subspace of a normed vector space with a complete scalar field is a Banach space. Remark: In contrast to ClSubSp , a complete subspace is defined by "a linear subspace in which all Cauchy sequences converge to a point in the subspace". This is closer to the original, but deprecated definition CH ( df-ch ) of closed subspaces of a Hilbert space. It may be superseded by cmslssbn . (Contributed by NM, 10-Apr-2008) (Revised by AV, 6-Oct-2022)

Ref Expression
Hypotheses cssbn.x ⊢ X = W ↾ 𝑠 U
cssbn.s ⊢ S = LSubSp ⁡ W
cssbn.d ⊢ D = dist ⁡ W ↾ U × U
Assertion cssbn ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → X ∈ Ban

Proof

Step Hyp Ref Expression
1 cssbn.x ⊢ X = W ↾ 𝑠 U
2 cssbn.s ⊢ S = LSubSp ⁡ W
3 cssbn.d ⊢ D = dist ⁡ W ↾ U × U
4 simpl1 ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → W ∈ NrmVec
5 simpl2 ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → Scalar ⁡ W ∈ CMetSp
6 nvcnlm ⊢ W ∈ NrmVec → W ∈ NrmMod
7 nlmngp ⊢ W ∈ NrmMod → W ∈ NrmGrp
8 6 7 syl ⊢ W ∈ NrmVec → W ∈ NrmGrp
9 nvclmod ⊢ W ∈ NrmVec → W ∈ LMod
10 2 lsssubg ⊢ W ∈ LMod ∧ U ∈ S → U ∈ SubGrp ⁡ W
11 9 10 sylan ⊢ W ∈ NrmVec ∧ U ∈ S → U ∈ SubGrp ⁡ W
12 1 subgngp ⊢ W ∈ NrmGrp ∧ U ∈ SubGrp ⁡ W → X ∈ NrmGrp
13 8 11 12 syl2an2r ⊢ W ∈ NrmVec ∧ U ∈ S → X ∈ NrmGrp
14 13 3adant2 ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → X ∈ NrmGrp
15 14 adantr ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → X ∈ NrmGrp
16 ngpms ⊢ X ∈ NrmGrp → X ∈ MetSp
17 15 16 syl ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → X ∈ MetSp
18 eqid ⊢ dist ⁡ W = dist ⁡ W
19 1 18 ressds ⊢ U ∈ S → dist ⁡ W = dist ⁡ X
20 19 3ad2ant3 ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → dist ⁡ W = dist ⁡ X
21 11 3adant2 ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → U ∈ SubGrp ⁡ W
22 1 subgbas ⊢ U ∈ SubGrp ⁡ W → U = Base X
23 21 22 syl ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → U = Base X
24 23 sqxpeqd ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → U × U = Base X × Base X
25 20 24 reseq12d ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → dist ⁡ W ↾ U × U = dist ⁡ X ↾ Base X × Base X
26 3 25 eqtrid ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → D = dist ⁡ X ↾ Base X × Base X
27 26 eqcomd ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → dist ⁡ X ↾ Base X × Base X = D
28 27 adantr ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → dist ⁡ X ↾ Base X × Base X = D
29 eqid ⊢ Base X = Base X
30 eqid ⊢ dist ⁡ X ↾ Base X × Base X = dist ⁡ X ↾ Base X × Base X
31 29 30 ngpmet ⊢ X ∈ NrmGrp → dist ⁡ X ↾ Base X × Base X ∈ Met ⁡ Base X
32 14 31 syl ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → dist ⁡ X ↾ Base X × Base X ∈ Met ⁡ Base X
33 26 32 eqeltrd ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S → D ∈ Met ⁡ Base X
34 33 adantr ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → D ∈ Met ⁡ Base X
35 simpr ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D
36 eqid ⊢ MetOpen ⁡ D = MetOpen ⁡ D
37 36 iscmet2 ⊢ D ∈ CMet ⁡ Base X ↔ D ∈ Met ⁡ Base X ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D
38 34 35 37 sylanbrc ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → D ∈ CMet ⁡ Base X
39 28 38 eqeltrd ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → dist ⁡ X ↾ Base X × Base X ∈ CMet ⁡ Base X
40 29 30 iscms ⊢ X ∈ CMetSp ↔ X ∈ MetSp ∧ dist ⁡ X ↾ Base X × Base X ∈ CMet ⁡ Base X
41 17 39 40 sylanbrc ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → X ∈ CMetSp
42 simpl3 ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → U ∈ S
43 1 2 cmslssbn ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ X ∈ CMetSp ∧ U ∈ S → X ∈ Ban
44 4 5 41 42 43 syl22anc ⊢ W ∈ NrmVec ∧ Scalar ⁡ W ∈ CMetSp ∧ U ∈ S ∧ Cau ⁡ D ⊆ dom ⁡ ⇝t ⁡ MetOpen ⁡ D → X ∈ Ban