MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  nmhmcn Structured version   Visualization version   GIF version

Theorem nmhmcn 24521
Description: A linear operator over a normed subcomplex module is bounded iff it is continuous. (Contributed by Mario Carneiro, 22-Oct-2015.)
Hypotheses
Ref Expression
nmhmcn.j 𝐽 = (TopOpenβ€˜π‘†)
nmhmcn.k 𝐾 = (TopOpenβ€˜π‘‡)
nmhmcn.g 𝐺 = (Scalarβ€˜π‘†)
nmhmcn.b 𝐡 = (Baseβ€˜πΊ)
Assertion
Ref Expression
nmhmcn ((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) β†’ (𝐹 ∈ (𝑆 NMHom 𝑇) ↔ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝐽 Cn 𝐾))))

Proof of Theorem nmhmcn
Dummy variables π‘₯ 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elinel1 4161 . . . 4 (𝑆 ∈ (NrmMod ∩ β„‚Mod) β†’ 𝑆 ∈ NrmMod)
2 elinel1 4161 . . . 4 (𝑇 ∈ (NrmMod ∩ β„‚Mod) β†’ 𝑇 ∈ NrmMod)
3 isnmhm 24148 . . . . 5 (𝐹 ∈ (𝑆 NMHom 𝑇) ↔ ((𝑆 ∈ NrmMod ∧ 𝑇 ∈ NrmMod) ∧ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝑆 NGHom 𝑇))))
43baib 537 . . . 4 ((𝑆 ∈ NrmMod ∧ 𝑇 ∈ NrmMod) β†’ (𝐹 ∈ (𝑆 NMHom 𝑇) ↔ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝑆 NGHom 𝑇))))
51, 2, 4syl2an 597 . . 3 ((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod)) β†’ (𝐹 ∈ (𝑆 NMHom 𝑇) ↔ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝑆 NGHom 𝑇))))
653adant3 1133 . 2 ((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) β†’ (𝐹 ∈ (𝑆 NMHom 𝑇) ↔ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝑆 NGHom 𝑇))))
7 nmhmcn.j . . . . 5 𝐽 = (TopOpenβ€˜π‘†)
8 nmhmcn.k . . . . 5 𝐾 = (TopOpenβ€˜π‘‡)
97, 8nghmcn 24147 . . . 4 (𝐹 ∈ (𝑆 NGHom 𝑇) β†’ 𝐹 ∈ (𝐽 Cn 𝐾))
10 simpll1 1213 . . . . . . . . . 10 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑆 ∈ (NrmMod ∩ β„‚Mod))
1110elin1d 4164 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑆 ∈ NrmMod)
12 nlmngp 24079 . . . . . . . . 9 (𝑆 ∈ NrmMod β†’ 𝑆 ∈ NrmGrp)
13 ngpms 23994 . . . . . . . . 9 (𝑆 ∈ NrmGrp β†’ 𝑆 ∈ MetSp)
1411, 12, 133syl 18 . . . . . . . 8 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑆 ∈ MetSp)
15 msxms 23845 . . . . . . . 8 (𝑆 ∈ MetSp β†’ 𝑆 ∈ ∞MetSp)
16 eqid 2732 . . . . . . . . 9 (Baseβ€˜π‘†) = (Baseβ€˜π‘†)
17 eqid 2732 . . . . . . . . 9 ((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) = ((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))
1816, 17xmsxmet 23847 . . . . . . . 8 (𝑆 ∈ ∞MetSp β†’ ((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) ∈ (∞Metβ€˜(Baseβ€˜π‘†)))
1914, 15, 183syl 18 . . . . . . 7 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ ((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) ∈ (∞Metβ€˜(Baseβ€˜π‘†)))
20 simpr 486 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐹 ∈ (𝐽 Cn 𝐾))
21 simpll2 1214 . . . . . . . . . . . . . 14 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑇 ∈ (NrmMod ∩ β„‚Mod))
2221elin1d 4164 . . . . . . . . . . . . 13 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑇 ∈ NrmMod)
23 nlmngp 24079 . . . . . . . . . . . . 13 (𝑇 ∈ NrmMod β†’ 𝑇 ∈ NrmGrp)
24 ngpms 23994 . . . . . . . . . . . . 13 (𝑇 ∈ NrmGrp β†’ 𝑇 ∈ MetSp)
2522, 23, 243syl 18 . . . . . . . . . . . 12 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑇 ∈ MetSp)
26 msxms 23845 . . . . . . . . . . . 12 (𝑇 ∈ MetSp β†’ 𝑇 ∈ ∞MetSp)
27 eqid 2732 . . . . . . . . . . . . 13 (Baseβ€˜π‘‡) = (Baseβ€˜π‘‡)
28 eqid 2732 . . . . . . . . . . . . 13 ((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) = ((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))
2927, 28xmsxmet 23847 . . . . . . . . . . . 12 (𝑇 ∈ ∞MetSp β†’ ((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)))
3025, 26, 293syl 18 . . . . . . . . . . 11 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ ((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)))
31 nlmlmod 24080 . . . . . . . . . . . 12 (𝑇 ∈ NrmMod β†’ 𝑇 ∈ LMod)
32 eqid 2732 . . . . . . . . . . . . 13 (0gβ€˜π‘‡) = (0gβ€˜π‘‡)
3327, 32lmod0vcl 20409 . . . . . . . . . . . 12 (𝑇 ∈ LMod β†’ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡))
3422, 31, 333syl 18 . . . . . . . . . . 11 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡))
35 1rp 12929 . . . . . . . . . . . 12 1 ∈ ℝ+
36 rpxr 12934 . . . . . . . . . . . 12 (1 ∈ ℝ+ β†’ 1 ∈ ℝ*)
3735, 36mp1i 13 . . . . . . . . . . 11 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 1 ∈ ℝ*)
38 eqid 2732 . . . . . . . . . . . 12 (MetOpenβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))) = (MetOpenβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))
3938blopn 23894 . . . . . . . . . . 11 ((((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)) ∧ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡) ∧ 1 ∈ ℝ*) β†’ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) ∈ (MetOpenβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))))
4030, 34, 37, 39syl3anc 1372 . . . . . . . . . 10 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) ∈ (MetOpenβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))))
418, 27, 28mstopn 23843 . . . . . . . . . . 11 (𝑇 ∈ MetSp β†’ 𝐾 = (MetOpenβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))))
4222, 23, 24, 414syl 19 . . . . . . . . . 10 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐾 = (MetOpenβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))))
4340, 42eleqtrrd 2836 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) ∈ 𝐾)
44 cnima 22654 . . . . . . . . 9 ((𝐹 ∈ (𝐽 Cn 𝐾) ∧ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) ∈ 𝐾) β†’ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ∈ 𝐽)
4520, 43, 44syl2anc 585 . . . . . . . 8 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ∈ 𝐽)
467, 16, 17mstopn 23843 . . . . . . . . 9 (𝑆 ∈ MetSp β†’ 𝐽 = (MetOpenβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))))
4711, 12, 13, 464syl 19 . . . . . . . 8 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐽 = (MetOpenβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))))
4845, 47eleqtrd 2835 . . . . . . 7 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ∈ (MetOpenβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))))
49 nlmlmod 24080 . . . . . . . . 9 (𝑆 ∈ NrmMod β†’ 𝑆 ∈ LMod)
50 eqid 2732 . . . . . . . . . 10 (0gβ€˜π‘†) = (0gβ€˜π‘†)
5116, 50lmod0vcl 20409 . . . . . . . . 9 (𝑆 ∈ LMod β†’ (0gβ€˜π‘†) ∈ (Baseβ€˜π‘†))
5211, 49, 513syl 18 . . . . . . . 8 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (0gβ€˜π‘†) ∈ (Baseβ€˜π‘†))
53 lmghm 20550 . . . . . . . . . . 11 (𝐹 ∈ (𝑆 LMHom 𝑇) β†’ 𝐹 ∈ (𝑆 GrpHom 𝑇))
5453ad2antlr 726 . . . . . . . . . 10 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐹 ∈ (𝑆 GrpHom 𝑇))
5550, 32ghmid 19029 . . . . . . . . . 10 (𝐹 ∈ (𝑆 GrpHom 𝑇) β†’ (πΉβ€˜(0gβ€˜π‘†)) = (0gβ€˜π‘‡))
5654, 55syl 17 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (πΉβ€˜(0gβ€˜π‘†)) = (0gβ€˜π‘‡))
5735a1i 11 . . . . . . . . . 10 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 1 ∈ ℝ+)
58 blcntr 23804 . . . . . . . . . 10 ((((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)) ∧ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡) ∧ 1 ∈ ℝ+) β†’ (0gβ€˜π‘‡) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))
5930, 34, 57, 58syl3anc 1372 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (0gβ€˜π‘‡) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))
6056, 59eqeltrd 2833 . . . . . . . 8 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (πΉβ€˜(0gβ€˜π‘†)) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))
6116, 27lmhmf 20553 . . . . . . . . . 10 (𝐹 ∈ (𝑆 LMHom 𝑇) β†’ 𝐹:(Baseβ€˜π‘†)⟢(Baseβ€˜π‘‡))
6261ad2antlr 726 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐹:(Baseβ€˜π‘†)⟢(Baseβ€˜π‘‡))
63 ffn 6674 . . . . . . . . 9 (𝐹:(Baseβ€˜π‘†)⟢(Baseβ€˜π‘‡) β†’ 𝐹 Fn (Baseβ€˜π‘†))
64 elpreima 7014 . . . . . . . . 9 (𝐹 Fn (Baseβ€˜π‘†) β†’ ((0gβ€˜π‘†) ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ ((0gβ€˜π‘†) ∈ (Baseβ€˜π‘†) ∧ (πΉβ€˜(0gβ€˜π‘†)) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))))
6562, 63, 643syl 18 . . . . . . . 8 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ ((0gβ€˜π‘†) ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ ((0gβ€˜π‘†) ∈ (Baseβ€˜π‘†) ∧ (πΉβ€˜(0gβ€˜π‘†)) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))))
6652, 60, 65mpbir2and 712 . . . . . . 7 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (0gβ€˜π‘†) ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)))
67 eqid 2732 . . . . . . . 8 (MetOpenβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))) = (MetOpenβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))
6867mopni2 23887 . . . . . . 7 ((((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) ∈ (∞Metβ€˜(Baseβ€˜π‘†)) ∧ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ∈ (MetOpenβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))) ∧ (0gβ€˜π‘†) ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))) β†’ βˆƒπ‘₯ ∈ ℝ+ ((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)))
6919, 48, 66, 68syl3anc 1372 . . . . . 6 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ βˆƒπ‘₯ ∈ ℝ+ ((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)))
70 simpl1 1192 . . . . . . . . . . . . . . . . . . . 20 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ 𝑆 ∈ (NrmMod ∩ β„‚Mod))
7170elin1d 4164 . . . . . . . . . . . . . . . . . . 19 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ 𝑆 ∈ NrmMod)
7271, 12syl 17 . . . . . . . . . . . . . . . . . 18 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ 𝑆 ∈ NrmGrp)
7372adantr 482 . . . . . . . . . . . . . . . . 17 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑆 ∈ NrmGrp)
7473ad2antrr 725 . . . . . . . . . . . . . . . 16 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 𝑆 ∈ NrmGrp)
75 ngpgrp 23993 . . . . . . . . . . . . . . . 16 (𝑆 ∈ NrmGrp β†’ 𝑆 ∈ Grp)
7674, 75syl 17 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 𝑆 ∈ Grp)
77 simpr 486 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 𝑦 ∈ (Baseβ€˜π‘†))
78 eqid 2732 . . . . . . . . . . . . . . . 16 (normβ€˜π‘†) = (normβ€˜π‘†)
79 eqid 2732 . . . . . . . . . . . . . . . 16 (distβ€˜π‘†) = (distβ€˜π‘†)
8078, 16, 50, 79, 17nmval2 23986 . . . . . . . . . . . . . . 15 ((𝑆 ∈ Grp ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((normβ€˜π‘†)β€˜π‘¦) = (𝑦((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))(0gβ€˜π‘†)))
8176, 77, 80syl2anc 585 . . . . . . . . . . . . . 14 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((normβ€˜π‘†)β€˜π‘¦) = (𝑦((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))(0gβ€˜π‘†)))
8219ad2antrr 725 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) ∈ (∞Metβ€˜(Baseβ€˜π‘†)))
8352ad2antrr 725 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (0gβ€˜π‘†) ∈ (Baseβ€˜π‘†))
84 xmetsym 23738 . . . . . . . . . . . . . . 15 ((((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) ∈ (∞Metβ€˜(Baseβ€˜π‘†)) ∧ 𝑦 ∈ (Baseβ€˜π‘†) ∧ (0gβ€˜π‘†) ∈ (Baseβ€˜π‘†)) β†’ (𝑦((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))(0gβ€˜π‘†)) = ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦))
8582, 77, 83, 84syl3anc 1372 . . . . . . . . . . . . . 14 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (𝑦((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))(0gβ€˜π‘†)) = ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦))
8681, 85eqtrd 2772 . . . . . . . . . . . . 13 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((normβ€˜π‘†)β€˜π‘¦) = ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦))
8786breq1d 5121 . . . . . . . . . . . 12 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((normβ€˜π‘†)β€˜π‘¦) < π‘₯ ↔ ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯))
8887biimpd 228 . . . . . . . . . . 11 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((normβ€˜π‘†)β€˜π‘¦) < π‘₯ β†’ ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯))
8962ad2antrr 725 . . . . . . . . . . . . 13 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 𝐹:(Baseβ€˜π‘†)⟢(Baseβ€˜π‘‡))
90 elpreima 7014 . . . . . . . . . . . . 13 (𝐹 Fn (Baseβ€˜π‘†) β†’ (𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ (𝑦 ∈ (Baseβ€˜π‘†) ∧ (πΉβ€˜π‘¦) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))))
9189, 63, 903syl 18 . . . . . . . . . . . 12 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ (𝑦 ∈ (Baseβ€˜π‘†) ∧ (πΉβ€˜π‘¦) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))))
9230ad2antrr 725 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)))
9334ad2antrr 725 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡))
9435, 36mp1i 13 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 1 ∈ ℝ*)
95 elbl 23779 . . . . . . . . . . . . . . 15 ((((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)) ∧ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡) ∧ 1 ∈ ℝ*) β†’ ((πΉβ€˜π‘¦) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) ↔ ((πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡) ∧ ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)) < 1)))
9692, 93, 94, 95syl3anc 1372 . . . . . . . . . . . . . 14 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((πΉβ€˜π‘¦) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) ↔ ((πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡) ∧ ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)) < 1)))
97 simpl2 1193 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ 𝑇 ∈ (NrmMod ∩ β„‚Mod))
9897elin1d 4164 . . . . . . . . . . . . . . . . . . . . 21 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ 𝑇 ∈ NrmMod)
9998, 23syl 17 . . . . . . . . . . . . . . . . . . . 20 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ 𝑇 ∈ NrmGrp)
10099adantr 482 . . . . . . . . . . . . . . . . . . 19 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝑇 ∈ NrmGrp)
101100ad2antrr 725 . . . . . . . . . . . . . . . . . 18 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 𝑇 ∈ NrmGrp)
102 simplr 768 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐹 ∈ (𝑆 LMHom 𝑇))
103102adantr 482 . . . . . . . . . . . . . . . . . . . 20 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ 𝐹 ∈ (𝑆 LMHom 𝑇))
104103, 61syl 17 . . . . . . . . . . . . . . . . . . 19 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ 𝐹:(Baseβ€˜π‘†)⟢(Baseβ€˜π‘‡))
105104ffvelcdmda 7041 . . . . . . . . . . . . . . . . . 18 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡))
106 eqid 2732 . . . . . . . . . . . . . . . . . . 19 (normβ€˜π‘‡) = (normβ€˜π‘‡)
10727, 106nmcl 24010 . . . . . . . . . . . . . . . . . 18 ((𝑇 ∈ NrmGrp ∧ (πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡)) β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) ∈ ℝ)
108101, 105, 107syl2anc 585 . . . . . . . . . . . . . . . . 17 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) ∈ ℝ)
109 1re 11165 . . . . . . . . . . . . . . . . 17 1 ∈ ℝ
110 ltle 11253 . . . . . . . . . . . . . . . . 17 ((((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) ∈ ℝ ∧ 1 ∈ ℝ) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) < 1 β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) ≀ 1))
111108, 109, 110sylancl 587 . . . . . . . . . . . . . . . 16 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) < 1 β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) ≀ 1))
112 ngpgrp 23993 . . . . . . . . . . . . . . . . . . . 20 (𝑇 ∈ NrmGrp β†’ 𝑇 ∈ Grp)
113101, 112syl 17 . . . . . . . . . . . . . . . . . . 19 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 𝑇 ∈ Grp)
114 eqid 2732 . . . . . . . . . . . . . . . . . . . 20 (distβ€˜π‘‡) = (distβ€˜π‘‡)
115106, 27, 32, 114, 28nmval2 23986 . . . . . . . . . . . . . . . . . . 19 ((𝑇 ∈ Grp ∧ (πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡)) β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) = ((πΉβ€˜π‘¦)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(0gβ€˜π‘‡)))
116113, 105, 115syl2anc 585 . . . . . . . . . . . . . . . . . 18 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) = ((πΉβ€˜π‘¦)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(0gβ€˜π‘‡)))
117 xmetsym 23738 . . . . . . . . . . . . . . . . . . 19 ((((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))) ∈ (∞Metβ€˜(Baseβ€˜π‘‡)) ∧ (πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡) ∧ (0gβ€˜π‘‡) ∈ (Baseβ€˜π‘‡)) β†’ ((πΉβ€˜π‘¦)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(0gβ€˜π‘‡)) = ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)))
11892, 105, 93, 117syl3anc 1372 . . . . . . . . . . . . . . . . . 18 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((πΉβ€˜π‘¦)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(0gβ€˜π‘‡)) = ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)))
119116, 118eqtrd 2772 . . . . . . . . . . . . . . . . 17 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) = ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)))
120119breq1d 5121 . . . . . . . . . . . . . . . 16 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) < 1 ↔ ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)) < 1))
121 1red 11166 . . . . . . . . . . . . . . . . 17 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ 1 ∈ ℝ)
122 simplr 768 . . . . . . . . . . . . . . . . 17 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ π‘₯ ∈ ℝ+)
123108, 121, 122lediv1d 13013 . . . . . . . . . . . . . . . 16 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) ≀ 1 ↔ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯)))
124111, 120, 1233imtr3d 293 . . . . . . . . . . . . . . 15 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)) < 1 β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯)))
125124adantld 492 . . . . . . . . . . . . . 14 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (((πΉβ€˜π‘¦) ∈ (Baseβ€˜π‘‡) ∧ ((0gβ€˜π‘‡)((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡)))(πΉβ€˜π‘¦)) < 1) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯)))
12696, 125sylbid 239 . . . . . . . . . . . . 13 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((πΉβ€˜π‘¦) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯)))
127126adantld 492 . . . . . . . . . . . 12 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((𝑦 ∈ (Baseβ€˜π‘†) ∧ (πΉβ€˜π‘¦) ∈ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯)))
12891, 127sylbid 239 . . . . . . . . . . 11 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ (𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯)))
12988, 128imim12d 81 . . . . . . . . . 10 ((((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) ∧ 𝑦 ∈ (Baseβ€˜π‘†)) β†’ ((((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯ β†’ 𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))) β†’ (((normβ€˜π‘†)β€˜π‘¦) < π‘₯ β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯))))
130129ralimdva 3161 . . . . . . . . 9 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (βˆ€π‘¦ ∈ (Baseβ€˜π‘†)(((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯ β†’ 𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))) β†’ βˆ€π‘¦ ∈ (Baseβ€˜π‘†)(((normβ€˜π‘†)β€˜π‘¦) < π‘₯ β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯))))
131 rpxr 12934 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ β†’ π‘₯ ∈ ℝ*)
132 blval 23777 . . . . . . . . . . . 12 ((((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))) ∈ (∞Metβ€˜(Baseβ€˜π‘†)) ∧ (0gβ€˜π‘†) ∈ (Baseβ€˜π‘†) ∧ π‘₯ ∈ ℝ*) β†’ ((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) = {𝑦 ∈ (Baseβ€˜π‘†) ∣ ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯})
13319, 52, 131, 132syl2an3an 1423 . . . . . . . . . . 11 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ ((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) = {𝑦 ∈ (Baseβ€˜π‘†) ∣ ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯})
134133sseq1d 3979 . . . . . . . . . 10 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ {𝑦 ∈ (Baseβ€˜π‘†) ∣ ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯} βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))))
135 rabss 4035 . . . . . . . . . 10 ({𝑦 ∈ (Baseβ€˜π‘†) ∣ ((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯} βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ βˆ€π‘¦ ∈ (Baseβ€˜π‘†)(((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯ β†’ 𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1))))
136134, 135bitrdi 287 . . . . . . . . 9 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) ↔ βˆ€π‘¦ ∈ (Baseβ€˜π‘†)(((0gβ€˜π‘†)((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†)))𝑦) < π‘₯ β†’ 𝑦 ∈ (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)))))
137 eqid 2732 . . . . . . . . . 10 (𝑆 normOp 𝑇) = (𝑆 normOp 𝑇)
138 nmhmcn.g . . . . . . . . . 10 𝐺 = (Scalarβ€˜π‘†)
139 nmhmcn.b . . . . . . . . . 10 𝐡 = (Baseβ€˜πΊ)
14010adantr 482 . . . . . . . . . 10 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ 𝑆 ∈ (NrmMod ∩ β„‚Mod))
14121adantr 482 . . . . . . . . . 10 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ 𝑇 ∈ (NrmMod ∩ β„‚Mod))
142 rpreccl 12951 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ+ β†’ (1 / π‘₯) ∈ ℝ+)
143142adantl 483 . . . . . . . . . . 11 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (1 / π‘₯) ∈ ℝ+)
144143rpxrd 12968 . . . . . . . . . 10 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (1 / π‘₯) ∈ ℝ*)
145 simpr 486 . . . . . . . . . 10 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ π‘₯ ∈ ℝ+)
146 simpl3 1194 . . . . . . . . . . 11 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ β„š βŠ† 𝐡)
147146ad2antrr 725 . . . . . . . . . 10 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ β„š βŠ† 𝐡)
148137, 16, 78, 106, 138, 139, 140, 141, 103, 144, 145, 147nmoleub2b 24519 . . . . . . . . 9 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (((𝑆 normOp 𝑇)β€˜πΉ) ≀ (1 / π‘₯) ↔ βˆ€π‘¦ ∈ (Baseβ€˜π‘†)(((normβ€˜π‘†)β€˜π‘¦) < π‘₯ β†’ (((normβ€˜π‘‡)β€˜(πΉβ€˜π‘¦)) / π‘₯) ≀ (1 / π‘₯))))
149130, 136, 1483imtr4d 294 . . . . . . . 8 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) β†’ ((𝑆 normOp 𝑇)β€˜πΉ) ≀ (1 / π‘₯)))
15073, 100, 543jca 1129 . . . . . . . . 9 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (𝑆 ∈ NrmGrp ∧ 𝑇 ∈ NrmGrp ∧ 𝐹 ∈ (𝑆 GrpHom 𝑇)))
151142rpred 12967 . . . . . . . . 9 (π‘₯ ∈ ℝ+ β†’ (1 / π‘₯) ∈ ℝ)
152137bddnghm 24128 . . . . . . . . . 10 (((𝑆 ∈ NrmGrp ∧ 𝑇 ∈ NrmGrp ∧ 𝐹 ∈ (𝑆 GrpHom 𝑇)) ∧ ((1 / π‘₯) ∈ ℝ ∧ ((𝑆 normOp 𝑇)β€˜πΉ) ≀ (1 / π‘₯))) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇))
153152expr 458 . . . . . . . . 9 (((𝑆 ∈ NrmGrp ∧ 𝑇 ∈ NrmGrp ∧ 𝐹 ∈ (𝑆 GrpHom 𝑇)) ∧ (1 / π‘₯) ∈ ℝ) β†’ (((𝑆 normOp 𝑇)β€˜πΉ) ≀ (1 / π‘₯) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇)))
154150, 151, 153syl2an 597 . . . . . . . 8 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (((𝑆 normOp 𝑇)β€˜πΉ) ≀ (1 / π‘₯) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇)))
155149, 154syld 47 . . . . . . 7 (((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) ∧ π‘₯ ∈ ℝ+) β†’ (((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇)))
156155rexlimdva 3149 . . . . . 6 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ (βˆƒπ‘₯ ∈ ℝ+ ((0gβ€˜π‘†)(ballβ€˜((distβ€˜π‘†) β†Ύ ((Baseβ€˜π‘†) Γ— (Baseβ€˜π‘†))))π‘₯) βŠ† (◑𝐹 β€œ ((0gβ€˜π‘‡)(ballβ€˜((distβ€˜π‘‡) β†Ύ ((Baseβ€˜π‘‡) Γ— (Baseβ€˜π‘‡))))1)) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇)))
15769, 156mpd 15 . . . . 5 ((((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇))
158157ex 414 . . . 4 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ (𝐹 ∈ (𝐽 Cn 𝐾) β†’ 𝐹 ∈ (𝑆 NGHom 𝑇)))
1599, 158impbid2 225 . . 3 (((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) ∧ 𝐹 ∈ (𝑆 LMHom 𝑇)) β†’ (𝐹 ∈ (𝑆 NGHom 𝑇) ↔ 𝐹 ∈ (𝐽 Cn 𝐾)))
160159pm5.32da 580 . 2 ((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) β†’ ((𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝑆 NGHom 𝑇)) ↔ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝐽 Cn 𝐾))))
1616, 160bitrd 279 1 ((𝑆 ∈ (NrmMod ∩ β„‚Mod) ∧ 𝑇 ∈ (NrmMod ∩ β„‚Mod) ∧ β„š βŠ† 𝐡) β†’ (𝐹 ∈ (𝑆 NMHom 𝑇) ↔ (𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝐹 ∈ (𝐽 Cn 𝐾))))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107  βˆ€wral 3061  βˆƒwrex 3070  {crab 3406   ∩ cin 3913   βŠ† wss 3914   class class class wbr 5111   Γ— cxp 5637  β—‘ccnv 5638   β†Ύ cres 5641   β€œ cima 5642   Fn wfn 6497  βŸΆwf 6498  β€˜cfv 6502  (class class class)co 7363  β„cr 11060  1c1 11062  β„*cxr 11198   < clt 11199   ≀ cle 11200   / cdiv 11822  β„šcq 12883  β„+crp 12925  Basecbs 17095  Scalarcsca 17151  distcds 17157  TopOpenctopn 17318  0gc0g 17336  Grpcgrp 18763   GrpHom cghm 19020  LModclmod 20379   LMHom clmhm 20538  βˆžMetcxmet 20819  ballcbl 20821  MetOpencmopn 20824   Cn ccn 22613  βˆžMetSpcxms 23708  MetSpcms 23709  normcnm 23970  NrmGrpcngp 23971  NrmModcnlm 23974   normOp cnmo 24107   NGHom cnghm 24108   NMHom cnmhm 24109  β„‚Modcclm 24463
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2703  ax-rep 5248  ax-sep 5262  ax-nul 5269  ax-pow 5326  ax-pr 5390  ax-un 7678  ax-cnex 11117  ax-resscn 11118  ax-1cn 11119  ax-icn 11120  ax-addcl 11121  ax-addrcl 11122  ax-mulcl 11123  ax-mulrcl 11124  ax-mulcom 11125  ax-addass 11126  ax-mulass 11127  ax-distr 11128  ax-i2m1 11129  ax-1ne0 11130  ax-1rid 11131  ax-rnegex 11132  ax-rrecex 11133  ax-cnre 11134  ax-pre-lttri 11135  ax-pre-lttrn 11136  ax-pre-ltadd 11137  ax-pre-mulgt0 11138  ax-pre-sup 11139  ax-addf 11140  ax-mulf 11141
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3352  df-reu 3353  df-rab 3407  df-v 3449  df-sbc 3744  df-csb 3860  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3933  df-nul 4289  df-if 4493  df-pw 4568  df-sn 4593  df-pr 4595  df-tp 4597  df-op 4599  df-uni 4872  df-iun 4962  df-br 5112  df-opab 5174  df-mpt 5195  df-tr 5229  df-id 5537  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5594  df-we 5596  df-xp 5645  df-rel 5646  df-cnv 5647  df-co 5648  df-dm 5649  df-rn 5650  df-res 5651  df-ima 5652  df-pred 6259  df-ord 6326  df-on 6327  df-lim 6328  df-suc 6329  df-iota 6454  df-fun 6504  df-fn 6505  df-f 6506  df-f1 6507  df-fo 6508  df-f1o 6509  df-fv 6510  df-riota 7319  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7809  df-1st 7927  df-2nd 7928  df-frecs 8218  df-wrecs 8249  df-recs 8323  df-rdg 8362  df-1o 8418  df-er 8656  df-map 8775  df-en 8892  df-dom 8893  df-sdom 8894  df-fin 8895  df-sup 9388  df-inf 9389  df-pnf 11201  df-mnf 11202  df-xr 11203  df-ltxr 11204  df-le 11205  df-sub 11397  df-neg 11398  df-div 11823  df-nn 12164  df-2 12226  df-3 12227  df-4 12228  df-5 12229  df-6 12230  df-7 12231  df-8 12232  df-9 12233  df-n0 12424  df-z 12510  df-dec 12629  df-uz 12774  df-q 12884  df-rp 12926  df-xneg 13043  df-xadd 13044  df-xmul 13045  df-ico 13281  df-fz 13436  df-seq 13918  df-exp 13979  df-cj 14997  df-re 14998  df-im 14999  df-sqrt 15133  df-abs 15134  df-struct 17031  df-sets 17048  df-slot 17066  df-ndx 17078  df-base 17096  df-ress 17125  df-plusg 17161  df-mulr 17162  df-starv 17163  df-tset 17167  df-ple 17168  df-ds 17170  df-unif 17171  df-0g 17338  df-topgen 17340  df-mgm 18512  df-sgrp 18561  df-mnd 18572  df-grp 18766  df-minusg 18767  df-sbg 18768  df-subg 18940  df-ghm 19021  df-cmn 19579  df-mgp 19912  df-ring 19981  df-cring 19982  df-subrg 20269  df-lmod 20381  df-lmhm 20541  df-psmet 20826  df-xmet 20827  df-met 20828  df-bl 20829  df-mopn 20830  df-cnfld 20835  df-top 22281  df-topon 22298  df-topsp 22320  df-bases 22334  df-cn 22616  df-cnp 22617  df-xms 23711  df-ms 23712  df-nm 23976  df-ngp 23977  df-nlm 23980  df-nmo 24110  df-nghm 24111  df-nmhm 24112  df-clm 24464
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator