Metamath Proof Explorer

Theorem stoweidlem28

Description: There exists a δ as in Lemma 1 BrosowskiDeutsh p. 90: 0 < delta < 1 and p >= delta on T \ U . Here d is used to represent δ in the paper. (Contributed by Glauco Siliprandi, 20-Apr-2017)

Ref Expression
Hypotheses stoweidlem28.1 
|- F/_ t U
stoweidlem28.2 
|- F/ t ph
stoweidlem28.3 
|- K = ( topGen ` ran (,) )
stoweidlem28.4 
|- T = U. J
stoweidlem28.5 
|- ( ph -> J e. Comp )
stoweidlem28.6 
|- ( ph -> P e. ( J Cn K ) )
stoweidlem28.7 
|- ( ph -> A. t e. ( T \ U ) 0 < ( P ` t ) )
stoweidlem28.8 
|- ( ph -> U e. J )
Assertion stoweidlem28 
|- ( ph -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )

Proof

Step Hyp Ref Expression
1 stoweidlem28.1 
 |-  F/_ t U
2 stoweidlem28.2 
 |-  F/ t ph
3 stoweidlem28.3 
 |-  K = ( topGen ` ran (,) )
4 stoweidlem28.4 
 |-  T = U. J
5 stoweidlem28.5 
 |-  ( ph -> J e. Comp )
6 stoweidlem28.6 
 |-  ( ph -> P e. ( J Cn K ) )
7 stoweidlem28.7 
 |-  ( ph -> A. t e. ( T \ U ) 0 < ( P ` t ) )
8 stoweidlem28.8 
 |-  ( ph -> U e. J )
9 halfre 
 |-  ( 1 / 2 ) e. RR
10 halfgt0 
 |-  0 < ( 1 / 2 )
11 9 10 elrpii 
 |-  ( 1 / 2 ) e. RR+
12 11 a1i 
 |-  ( ( ph /\ ( T \ U ) = (/) ) -> ( 1 / 2 ) e. RR+ )
13 halflt1 
 |-  ( 1 / 2 ) < 1
14 13 a1i 
 |-  ( ( ph /\ ( T \ U ) = (/) ) -> ( 1 / 2 ) < 1 )
15 nfcv 
 |-  F/_ t T
16 15 1 nfdif 
 |-  F/_ t ( T \ U )
17 16 nfeq1 
 |-  F/ t ( T \ U ) = (/)
18 17 rzalf 
 |-  ( ( T \ U ) = (/) -> A. t e. ( T \ U ) ( 1 / 2 ) <_ ( P ` t ) )
19 18 adantl 
 |-  ( ( ph /\ ( T \ U ) = (/) ) -> A. t e. ( T \ U ) ( 1 / 2 ) <_ ( P ` t ) )
20 ovex 
 |-  ( 1 / 2 ) e. _V
21 eleq1 
 |-  ( d = ( 1 / 2 ) -> ( d e. RR+ <-> ( 1 / 2 ) e. RR+ ) )
22 breq1 
 |-  ( d = ( 1 / 2 ) -> ( d < 1 <-> ( 1 / 2 ) < 1 ) )
23 breq1 
 |-  ( d = ( 1 / 2 ) -> ( d <_ ( P ` t ) <-> ( 1 / 2 ) <_ ( P ` t ) ) )
24 23 ralbidv 
 |-  ( d = ( 1 / 2 ) -> ( A. t e. ( T \ U ) d <_ ( P ` t ) <-> A. t e. ( T \ U ) ( 1 / 2 ) <_ ( P ` t ) ) )
25 21 22 24 3anbi123d 
 |-  ( d = ( 1 / 2 ) -> ( ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) <-> ( ( 1 / 2 ) e. RR+ /\ ( 1 / 2 ) < 1 /\ A. t e. ( T \ U ) ( 1 / 2 ) <_ ( P ` t ) ) ) )
26 20 25 spcev 
 |-  ( ( ( 1 / 2 ) e. RR+ /\ ( 1 / 2 ) < 1 /\ A. t e. ( T \ U ) ( 1 / 2 ) <_ ( P ` t ) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
27 12 14 19 26 syl3anc 
 |-  ( ( ph /\ ( T \ U ) = (/) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
28 simplll 
 |-  ( ( ( ( ph /\ -. ( T \ U ) = (/) ) /\ x e. ( T \ U ) ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> ph )
29 simplr 
 |-  ( ( ( ( ph /\ -. ( T \ U ) = (/) ) /\ x e. ( T \ U ) ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> x e. ( T \ U ) )
30 simpr 
 |-  ( ( ( ( ph /\ -. ( T \ U ) = (/) ) /\ x e. ( T \ U ) ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
31 eqid 
 |-  ( J Cn K ) = ( J Cn K )
32 3 4 31 6 fcnre 
 |-  ( ph -> P : T --> RR )
33 32 adantr 
 |-  ( ( ph /\ x e. ( T \ U ) ) -> P : T --> RR )
34 eldifi 
 |-  ( x e. ( T \ U ) -> x e. T )
35 34 adantl 
 |-  ( ( ph /\ x e. ( T \ U ) ) -> x e. T )
36 33 35 ffvelcdmd 
 |-  ( ( ph /\ x e. ( T \ U ) ) -> ( P ` x ) e. RR )
37 nfcv 
 |-  F/_ x ( T \ U )
38 nfv 
 |-  F/ x 0 < ( P ` t )
39 nfv 
 |-  F/ t 0 < ( P ` x )
40 fveq2 
 |-  ( t = x -> ( P ` t ) = ( P ` x ) )
41 40 breq2d 
 |-  ( t = x -> ( 0 < ( P ` t ) <-> 0 < ( P ` x ) ) )
42 16 37 38 39 41 cbvralfw 
 |-  ( A. t e. ( T \ U ) 0 < ( P ` t ) <-> A. x e. ( T \ U ) 0 < ( P ` x ) )
43 42 biimpi 
 |-  ( A. t e. ( T \ U ) 0 < ( P ` t ) -> A. x e. ( T \ U ) 0 < ( P ` x ) )
44 43 r19.21bi 
 |-  ( ( A. t e. ( T \ U ) 0 < ( P ` t ) /\ x e. ( T \ U ) ) -> 0 < ( P ` x ) )
45 7 44 sylan 
 |-  ( ( ph /\ x e. ( T \ U ) ) -> 0 < ( P ` x ) )
46 36 45 elrpd 
 |-  ( ( ph /\ x e. ( T \ U ) ) -> ( P ` x ) e. RR+ )
47 46 3adant3 
 |-  ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> ( P ` x ) e. RR+ )
48 16 nfcri 
 |-  F/ t x e. ( T \ U )
49 nfra1 
 |-  F/ t A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t )
50 2 48 49 nf3an 
 |-  F/ t ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
51 rspa 
 |-  ( ( A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) /\ t e. ( T \ U ) ) -> ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
52 51 3ad2antl3 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ t e. ( T \ U ) ) -> ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
53 simpl2 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ t e. ( T \ U ) ) -> x e. ( T \ U ) )
54 fvres 
 |-  ( x e. ( T \ U ) -> ( ( P |` ( T \ U ) ) ` x ) = ( P ` x ) )
55 53 54 syl 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ t e. ( T \ U ) ) -> ( ( P |` ( T \ U ) ) ` x ) = ( P ` x ) )
56 fvres 
 |-  ( t e. ( T \ U ) -> ( ( P |` ( T \ U ) ) ` t ) = ( P ` t ) )
57 56 adantl 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ t e. ( T \ U ) ) -> ( ( P |` ( T \ U ) ) ` t ) = ( P ` t ) )
58 52 55 57 3brtr3d 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ t e. ( T \ U ) ) -> ( P ` x ) <_ ( P ` t ) )
59 58 ex 
 |-  ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> ( t e. ( T \ U ) -> ( P ` x ) <_ ( P ` t ) ) )
60 50 59 ralrimi 
 |-  ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> A. t e. ( T \ U ) ( P ` x ) <_ ( P ` t ) )
61 eleq1 
 |-  ( c = ( P ` x ) -> ( c e. RR+ <-> ( P ` x ) e. RR+ ) )
62 breq1 
 |-  ( c = ( P ` x ) -> ( c <_ ( P ` t ) <-> ( P ` x ) <_ ( P ` t ) ) )
63 62 ralbidv 
 |-  ( c = ( P ` x ) -> ( A. t e. ( T \ U ) c <_ ( P ` t ) <-> A. t e. ( T \ U ) ( P ` x ) <_ ( P ` t ) ) )
64 61 63 anbi12d 
 |-  ( c = ( P ` x ) -> ( ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) <-> ( ( P ` x ) e. RR+ /\ A. t e. ( T \ U ) ( P ` x ) <_ ( P ` t ) ) ) )
65 64 spcegv 
 |-  ( ( P ` x ) e. RR+ -> ( ( ( P ` x ) e. RR+ /\ A. t e. ( T \ U ) ( P ` x ) <_ ( P ` t ) ) -> E. c ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) ) )
66 47 65 syl 
 |-  ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> ( ( ( P ` x ) e. RR+ /\ A. t e. ( T \ U ) ( P ` x ) <_ ( P ` t ) ) -> E. c ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) ) )
67 47 60 66 mp2and 
 |-  ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> E. c ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) )
68 simpl1 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) ) -> ph )
69 simprl 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) ) -> c e. RR+ )
70 simprr 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) ) -> A. t e. ( T \ U ) c <_ ( P ` t ) )
71 nfv 
 |-  F/ t c e. RR+
72 nfra1 
 |-  F/ t A. t e. ( T \ U ) c <_ ( P ` t )
73 2 71 72 nf3an 
 |-  F/ t ( ph /\ c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) )
74 eqid 
 |-  if ( c <_ ( 1 / 2 ) , c , ( 1 / 2 ) ) = if ( c <_ ( 1 / 2 ) , c , ( 1 / 2 ) )
75 32 3ad2ant1 
 |-  ( ( ph /\ c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) -> P : T --> RR )
76 difssd 
 |-  ( ( ph /\ c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) -> ( T \ U ) C_ T )
77 simp2 
 |-  ( ( ph /\ c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) -> c e. RR+ )
78 simp3 
 |-  ( ( ph /\ c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) -> A. t e. ( T \ U ) c <_ ( P ` t ) )
79 73 74 75 76 77 78 stoweidlem5 
 |-  ( ( ph /\ c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
80 68 69 70 79 syl3anc 
 |-  ( ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) /\ ( c e. RR+ /\ A. t e. ( T \ U ) c <_ ( P ` t ) ) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
81 67 80 exlimddv 
 |-  ( ( ph /\ x e. ( T \ U ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
82 28 29 30 81 syl3anc 
 |-  ( ( ( ( ph /\ -. ( T \ U ) = (/) ) /\ x e. ( T \ U ) ) /\ A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
83 eqid 
 |-  U. ( J |`t ( T \ U ) ) = U. ( J |`t ( T \ U ) )
84 cmptop 
 |-  ( J e. Comp -> J e. Top )
85 5 84 syl 
 |-  ( ph -> J e. Top )
86 elssuni 
 |-  ( U e. J -> U C_ U. J )
87 8 86 syl 
 |-  ( ph -> U C_ U. J )
88 87 4 sseqtrrdi 
 |-  ( ph -> U C_ T )
89 4 isopn2 
 |-  ( ( J e. Top /\ U C_ T ) -> ( U e. J <-> ( T \ U ) e. ( Clsd ` J ) ) )
90 85 88 89 syl2anc 
 |-  ( ph -> ( U e. J <-> ( T \ U ) e. ( Clsd ` J ) ) )
91 8 90 mpbid 
 |-  ( ph -> ( T \ U ) e. ( Clsd ` J ) )
92 cmpcld 
 |-  ( ( J e. Comp /\ ( T \ U ) e. ( Clsd ` J ) ) -> ( J |`t ( T \ U ) ) e. Comp )
93 5 91 92 syl2anc 
 |-  ( ph -> ( J |`t ( T \ U ) ) e. Comp )
94 93 adantr 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> ( J |`t ( T \ U ) ) e. Comp )
95 6 adantr 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> P e. ( J Cn K ) )
96 difssd 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> ( T \ U ) C_ T )
97 4 cnrest 
 |-  ( ( P e. ( J Cn K ) /\ ( T \ U ) C_ T ) -> ( P |` ( T \ U ) ) e. ( ( J |`t ( T \ U ) ) Cn K ) )
98 95 96 97 syl2anc 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> ( P |` ( T \ U ) ) e. ( ( J |`t ( T \ U ) ) Cn K ) )
99 difssd 
 |-  ( ph -> ( T \ U ) C_ T )
100 4 restuni 
 |-  ( ( J e. Top /\ ( T \ U ) C_ T ) -> ( T \ U ) = U. ( J |`t ( T \ U ) ) )
101 85 99 100 syl2anc 
 |-  ( ph -> ( T \ U ) = U. ( J |`t ( T \ U ) ) )
102 101 neeq1d 
 |-  ( ph -> ( ( T \ U ) =/= (/) <-> U. ( J |`t ( T \ U ) ) =/= (/) ) )
103 df-ne 
 |-  ( ( T \ U ) =/= (/) <-> -. ( T \ U ) = (/) )
104 102 103 bitr3di 
 |-  ( ph -> ( U. ( J |`t ( T \ U ) ) =/= (/) <-> -. ( T \ U ) = (/) ) )
105 104 biimpar 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> U. ( J |`t ( T \ U ) ) =/= (/) )
106 83 3 94 98 105 evth2 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> E. x e. U. ( J |`t ( T \ U ) ) A. s e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` s ) )
107 nfcv 
 |-  F/_ s U. ( J |`t ( T \ U ) )
108 nfcv 
 |-  F/_ t J
109 nfcv 
 |-  F/_ t |`t
110 108 109 16 nfov 
 |-  F/_ t ( J |`t ( T \ U ) )
111 110 nfuni 
 |-  F/_ t U. ( J |`t ( T \ U ) )
112 nfcv 
 |-  F/_ t P
113 112 16 nfres 
 |-  F/_ t ( P |` ( T \ U ) )
114 nfcv 
 |-  F/_ t x
115 113 114 nffv 
 |-  F/_ t ( ( P |` ( T \ U ) ) ` x )
116 nfcv 
 |-  F/_ t <_
117 nfcv 
 |-  F/_ t s
118 113 117 nffv 
 |-  F/_ t ( ( P |` ( T \ U ) ) ` s )
119 115 116 118 nfbr 
 |-  F/ t ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` s )
120 nfv 
 |-  F/ s ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t )
121 fveq2 
 |-  ( s = t -> ( ( P |` ( T \ U ) ) ` s ) = ( ( P |` ( T \ U ) ) ` t ) )
122 121 breq2d 
 |-  ( s = t -> ( ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` s ) <-> ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) )
123 107 111 119 120 122 cbvralfw 
 |-  ( A. s e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` s ) <-> A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
124 123 rexbii 
 |-  ( E. x e. U. ( J |`t ( T \ U ) ) A. s e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` s ) <-> E. x e. U. ( J |`t ( T \ U ) ) A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
125 106 124 sylib 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> E. x e. U. ( J |`t ( T \ U ) ) A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
126 16 111 raleqf 
 |-  ( ( T \ U ) = U. ( J |`t ( T \ U ) ) -> ( A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) <-> A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) )
127 126 rexeqbi1dv 
 |-  ( ( T \ U ) = U. ( J |`t ( T \ U ) ) -> ( E. x e. ( T \ U ) A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) <-> E. x e. U. ( J |`t ( T \ U ) ) A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) )
128 101 127 syl 
 |-  ( ph -> ( E. x e. ( T \ U ) A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) <-> E. x e. U. ( J |`t ( T \ U ) ) A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) )
129 128 adantr 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> ( E. x e. ( T \ U ) A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) <-> E. x e. U. ( J |`t ( T \ U ) ) A. t e. U. ( J |`t ( T \ U ) ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) ) )
130 125 129 mpbird 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> E. x e. ( T \ U ) A. t e. ( T \ U ) ( ( P |` ( T \ U ) ) ` x ) <_ ( ( P |` ( T \ U ) ) ` t ) )
131 82 130 r19.29a 
 |-  ( ( ph /\ -. ( T \ U ) = (/) ) -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )
132 27 131 pm2.61dan 
 |-  ( ph -> E. d ( d e. RR+ /\ d < 1 /\ A. t e. ( T \ U ) d <_ ( P ` t ) ) )