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