Metamath Proof Explorer


Theorem ubthlem3

Description: Lemma for ubth . Prove the reverse implication, using nmblolbi . (Contributed by Mario Carneiro, 11-Jan-2014) (New usage is discouraged.)

Ref Expression
Hypotheses ubth.1 ⊢ X = BaseSet ⁡ U
ubth.2 ⊢ N = norm CV ⁡ W
ubthlem.3 ⊢ D = IndMet ⁡ U
ubthlem.4 ⊢ J = MetOpen ⁡ D
ubthlem.5 ⊢ U ∈ CBan
ubthlem.6 ⊢ W ∈ NrmCVec
ubthlem.7 ⊢ φ → T ⊆ U BLnOp W
Assertion ubthlem3 ⊢ φ → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c ↔ ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d

Proof

Step Hyp Ref Expression
1 ubth.1 ⊢ X = BaseSet ⁡ U
2 ubth.2 ⊢ N = norm CV ⁡ W
3 ubthlem.3 ⊢ D = IndMet ⁡ U
4 ubthlem.4 ⊢ J = MetOpen ⁡ D
5 ubthlem.5 ⊢ U ∈ CBan
6 ubthlem.6 ⊢ W ∈ NrmCVec
7 ubthlem.7 ⊢ φ → T ⊆ U BLnOp W
8 fveq1 ⊢ u = t → u ⁡ z = t ⁡ z
9 8 fveq2d ⊢ u = t → N ⁡ u ⁡ z = N ⁡ t ⁡ z
10 9 breq1d ⊢ u = t → N ⁡ u ⁡ z ≤ d ↔ N ⁡ t ⁡ z ≤ d
11 10 cbvralvw ⊢ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ↔ ∀ t ∈ T N ⁡ t ⁡ z ≤ d
12 breq2 ⊢ d = c → N ⁡ t ⁡ z ≤ d ↔ N ⁡ t ⁡ z ≤ c
13 12 ralbidv ⊢ d = c → ∀ t ∈ T N ⁡ t ⁡ z ≤ d ↔ ∀ t ∈ T N ⁡ t ⁡ z ≤ c
14 11 13 bitrid ⊢ d = c → ∀ u ∈ T N ⁡ u ⁡ z ≤ d ↔ ∀ t ∈ T N ⁡ t ⁡ z ≤ c
15 14 cbvrexvw ⊢ ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ↔ ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ z ≤ c
16 2fveq3 ⊢ z = x → N ⁡ t ⁡ z = N ⁡ t ⁡ x
17 16 breq1d ⊢ z = x → N ⁡ t ⁡ z ≤ c ↔ N ⁡ t ⁡ x ≤ c
18 17 rexralbidv ⊢ z = x → ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ z ≤ c ↔ ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
19 15 18 bitrid ⊢ z = x → ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ↔ ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
20 19 cbvralvw ⊢ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ↔ ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
21 7 adantr ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d → T ⊆ U BLnOp W
22 20 bilani ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
23 fveq1 ⊢ u = t → u ⁡ d = t ⁡ d
24 23 fveq2d ⊢ u = t → N ⁡ u ⁡ d = N ⁡ t ⁡ d
25 24 breq1d ⊢ u = t → N ⁡ u ⁡ d ≤ m ↔ N ⁡ t ⁡ d ≤ m
26 25 cbvralvw ⊢ ∀ u ∈ T N ⁡ u ⁡ d ≤ m ↔ ∀ t ∈ T N ⁡ t ⁡ d ≤ m
27 2fveq3 ⊢ d = z → N ⁡ t ⁡ d = N ⁡ t ⁡ z
28 27 breq1d ⊢ d = z → N ⁡ t ⁡ d ≤ m ↔ N ⁡ t ⁡ z ≤ m
29 28 ralbidv ⊢ d = z → ∀ t ∈ T N ⁡ t ⁡ d ≤ m ↔ ∀ t ∈ T N ⁡ t ⁡ z ≤ m
30 26 29 bitrid ⊢ d = z → ∀ u ∈ T N ⁡ u ⁡ d ≤ m ↔ ∀ t ∈ T N ⁡ t ⁡ z ≤ m
31 30 cbvrabv ⊢ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m = z ∈ X | ∀ t ∈ T N ⁡ t ⁡ z ≤ m
32 breq2 ⊢ m = k → N ⁡ t ⁡ z ≤ m ↔ N ⁡ t ⁡ z ≤ k
33 32 ralbidv ⊢ m = k → ∀ t ∈ T N ⁡ t ⁡ z ≤ m ↔ ∀ t ∈ T N ⁡ t ⁡ z ≤ k
34 33 rabbidv ⊢ m = k → z ∈ X | ∀ t ∈ T N ⁡ t ⁡ z ≤ m = z ∈ X | ∀ t ∈ T N ⁡ t ⁡ z ≤ k
35 31 34 eqtrid ⊢ m = k → d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m = z ∈ X | ∀ t ∈ T N ⁡ t ⁡ z ≤ k
36 35 cbvmptv ⊢ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m = k ∈ ℕ ⟼ z ∈ X | ∀ t ∈ T N ⁡ t ⁡ z ≤ k
37 1 2 3 4 5 6 21 22 36 ubthlem1 ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d → ∃ n ∈ ℕ ∃ y ∈ X ∃ r ∈ ℝ + z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n
38 7 ad3antrrr ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → T ⊆ U BLnOp W
39 22 ad2antrr ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
40 simplrl ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → n ∈ ℕ
41 simplrr ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → y ∈ X
42 simprl ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → r ∈ ℝ +
43 simprr ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n
44 1 2 3 4 5 6 38 39 36 40 41 42 43 ubthlem2 ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + ∧ z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
45 44 expr ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X ∧ r ∈ ℝ + → z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
46 45 rexlimdva ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d ∧ n ∈ ℕ ∧ y ∈ X → ∃ r ∈ ℝ + z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
47 46 rexlimdvva ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d → ∃ n ∈ ℕ ∃ y ∈ X ∃ r ∈ ℝ + z ∈ X | y D z ≤ r ⊆ m ∈ ℕ ⟼ d ∈ X | ∀ u ∈ T N ⁡ u ⁡ d ≤ m ⁡ n → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
48 37 47 mpd ⊢ φ ∧ ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
49 48 ex ⊢ φ → ∀ z ∈ X ∃ d ∈ ℝ ∀ u ∈ T N ⁡ u ⁡ z ≤ d → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
50 20 49 biimtrrid ⊢ φ → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d
51 simpr ⊢ φ ∧ d ∈ ℝ → d ∈ ℝ
52 bnnv ⊢ U ∈ CBan → U ∈ NrmCVec
53 5 52 ax-mp ⊢ U ∈ NrmCVec
54 eqid ⊢ norm CV ⁡ U = norm CV ⁡ U
55 1 54 nvcl ⊢ U ∈ NrmCVec ∧ x ∈ X → norm CV ⁡ U ⁡ x ∈ ℝ
56 53 55 mpan ⊢ x ∈ X → norm CV ⁡ U ⁡ x ∈ ℝ
57 remulcl ⊢ d ∈ ℝ ∧ norm CV ⁡ U ⁡ x ∈ ℝ → d ⁢ norm CV ⁡ U ⁡ x ∈ ℝ
58 51 56 57 syl2an ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X → d ⁢ norm CV ⁡ U ⁡ x ∈ ℝ
59 7 sselda ⊢ φ ∧ t ∈ T → t ∈ U BLnOp W
60 59 adantlr ⊢ φ ∧ d ∈ ℝ ∧ t ∈ T → t ∈ U BLnOp W
61 60 ad2ant2r ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → t ∈ U BLnOp W
62 eqid ⊢ BaseSet ⁡ W = BaseSet ⁡ W
63 eqid ⊢ U BLnOp W = U BLnOp W
64 1 62 63 blof ⊢ U ∈ NrmCVec ∧ W ∈ NrmCVec ∧ t ∈ U BLnOp W → t : X ⟶ BaseSet ⁡ W
65 53 6 64 mp3an12 ⊢ t ∈ U BLnOp W → t : X ⟶ BaseSet ⁡ W
66 61 65 syl ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → t : X ⟶ BaseSet ⁡ W
67 simplr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → x ∈ X
68 66 67 ffvelcdmd ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → t ⁡ x ∈ BaseSet ⁡ W
69 62 2 nvcl ⊢ W ∈ NrmCVec ∧ t ⁡ x ∈ BaseSet ⁡ W → N ⁡ t ⁡ x ∈ ℝ
70 6 69 mpan ⊢ t ⁡ x ∈ BaseSet ⁡ W → N ⁡ t ⁡ x ∈ ℝ
71 68 70 syl ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → N ⁡ t ⁡ x ∈ ℝ
72 eqid ⊢ U normOp OLD W = U normOp OLD W
73 1 62 72 nmoxr ⊢ U ∈ NrmCVec ∧ W ∈ NrmCVec ∧ t : X ⟶ BaseSet ⁡ W → U normOp OLD W ⁡ t ∈ ℝ *
74 53 6 73 mp3an12 ⊢ t : X ⟶ BaseSet ⁡ W → U normOp OLD W ⁡ t ∈ ℝ *
75 66 74 syl ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ∈ ℝ *
76 simpllr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → d ∈ ℝ
77 1 62 72 nmogtmnf ⊢ U ∈ NrmCVec ∧ W ∈ NrmCVec ∧ t : X ⟶ BaseSet ⁡ W → −∞ < U normOp OLD W ⁡ t
78 53 6 77 mp3an12 ⊢ t : X ⟶ BaseSet ⁡ W → −∞ < U normOp OLD W ⁡ t
79 66 78 syl ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → −∞ < U normOp OLD W ⁡ t
80 simprr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ≤ d
81 xrre ⊢ U normOp OLD W ⁡ t ∈ ℝ * ∧ d ∈ ℝ ∧ −∞ < U normOp OLD W ⁡ t ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ∈ ℝ
82 75 76 79 80 81 syl22anc ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ∈ ℝ
83 56 ad2antlr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → norm CV ⁡ U ⁡ x ∈ ℝ
84 remulcl ⊢ U normOp OLD W ⁡ t ∈ ℝ ∧ norm CV ⁡ U ⁡ x ∈ ℝ → U normOp OLD W ⁡ t ⁢ norm CV ⁡ U ⁡ x ∈ ℝ
85 82 83 84 syl2anc ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ⁢ norm CV ⁡ U ⁡ x ∈ ℝ
86 58 adantr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → d ⁢ norm CV ⁡ U ⁡ x ∈ ℝ
87 1 54 2 72 63 53 6 nmblolbi ⊢ t ∈ U BLnOp W ∧ x ∈ X → N ⁡ t ⁡ x ≤ U normOp OLD W ⁡ t ⁢ norm CV ⁡ U ⁡ x
88 61 67 87 syl2anc ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → N ⁡ t ⁡ x ≤ U normOp OLD W ⁡ t ⁢ norm CV ⁡ U ⁡ x
89 1 54 nvge0 ⊢ U ∈ NrmCVec ∧ x ∈ X → 0 ≤ norm CV ⁡ U ⁡ x
90 53 89 mpan ⊢ x ∈ X → 0 ≤ norm CV ⁡ U ⁡ x
91 56 90 jca ⊢ x ∈ X → norm CV ⁡ U ⁡ x ∈ ℝ ∧ 0 ≤ norm CV ⁡ U ⁡ x
92 91 ad2antlr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → norm CV ⁡ U ⁡ x ∈ ℝ ∧ 0 ≤ norm CV ⁡ U ⁡ x
93 lemul1a ⊢ U normOp OLD W ⁡ t ∈ ℝ ∧ d ∈ ℝ ∧ norm CV ⁡ U ⁡ x ∈ ℝ ∧ 0 ≤ norm CV ⁡ U ⁡ x ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ⁢ norm CV ⁡ U ⁡ x ≤ d ⁢ norm CV ⁡ U ⁡ x
94 82 76 92 80 93 syl31anc ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → U normOp OLD W ⁡ t ⁢ norm CV ⁡ U ⁡ x ≤ d ⁢ norm CV ⁡ U ⁡ x
95 71 85 86 88 94 letrd ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T ∧ U normOp OLD W ⁡ t ≤ d → N ⁡ t ⁡ x ≤ d ⁢ norm CV ⁡ U ⁡ x
96 95 expr ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X ∧ t ∈ T → U normOp OLD W ⁡ t ≤ d → N ⁡ t ⁡ x ≤ d ⁢ norm CV ⁡ U ⁡ x
97 96 ralimdva ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X → ∀ t ∈ T U normOp OLD W ⁡ t ≤ d → ∀ t ∈ T N ⁡ t ⁡ x ≤ d ⁢ norm CV ⁡ U ⁡ x
98 brralrspcev ⊢ d ⁢ norm CV ⁡ U ⁡ x ∈ ℝ ∧ ∀ t ∈ T N ⁡ t ⁡ x ≤ d ⁢ norm CV ⁡ U ⁡ x → ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
99 58 97 98 syl6an ⊢ φ ∧ d ∈ ℝ ∧ x ∈ X → ∀ t ∈ T U normOp OLD W ⁡ t ≤ d → ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
100 99 ralrimdva ⊢ φ ∧ d ∈ ℝ → ∀ t ∈ T U normOp OLD W ⁡ t ≤ d → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
101 100 rexlimdva ⊢ φ → ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c
102 50 101 impbid ⊢ φ → ∀ x ∈ X ∃ c ∈ ℝ ∀ t ∈ T N ⁡ t ⁡ x ≤ c ↔ ∃ d ∈ ℝ ∀ t ∈ T U normOp OLD W ⁡ t ≤ d