Metamath Proof Explorer

Theorem cau3lem

Description: Lemma for cau3 . (Contributed by Mario Carneiro, 15-Feb-2014) (Revised by Mario Carneiro, 1-May-2014)

Ref Expression
Hypotheses cau3lem.1 
|- Z C_ ZZ
cau3lem.2 
|- ( ta -> ps )
cau3lem.3 
|- ( ( F ` k ) = ( F ` j ) -> ( ps <-> ch ) )
cau3lem.4 
|- ( ( F ` k ) = ( F ` m ) -> ( ps <-> th ) )
cau3lem.5 
|- ( ( ph /\ ch /\ ps ) -> ( G ` ( ( F ` j ) D ( F ` k ) ) ) = ( G ` ( ( F ` k ) D ( F ` j ) ) ) )
cau3lem.6 
|- ( ( ph /\ th /\ ch ) -> ( G ` ( ( F ` m ) D ( F ` j ) ) ) = ( G ` ( ( F ` j ) D ( F ` m ) ) ) )
cau3lem.7 
|- ( ( ph /\ ( ps /\ th ) /\ ( ch /\ x e. RR ) ) -> ( ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) /\ ( G ` ( ( F ` j ) D ( F ` m ) ) ) < ( x / 2 ) ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
Assertion cau3lem 
|- ( ph -> ( A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) <-> A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )

Proof

Step Hyp Ref Expression
1 cau3lem.1 
 |-  Z C_ ZZ
2 cau3lem.2 
 |-  ( ta -> ps )
3 cau3lem.3 
 |-  ( ( F ` k ) = ( F ` j ) -> ( ps <-> ch ) )
4 cau3lem.4 
 |-  ( ( F ` k ) = ( F ` m ) -> ( ps <-> th ) )
5 cau3lem.5 
 |-  ( ( ph /\ ch /\ ps ) -> ( G ` ( ( F ` j ) D ( F ` k ) ) ) = ( G ` ( ( F ` k ) D ( F ` j ) ) ) )
6 cau3lem.6 
 |-  ( ( ph /\ th /\ ch ) -> ( G ` ( ( F ` m ) D ( F ` j ) ) ) = ( G ` ( ( F ` j ) D ( F ` m ) ) ) )
7 cau3lem.7 
 |-  ( ( ph /\ ( ps /\ th ) /\ ( ch /\ x e. RR ) ) -> ( ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) /\ ( G ` ( ( F ` j ) D ( F ` m ) ) ) < ( x / 2 ) ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
8 breq2 
 |-  ( x = z -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) )
9 8 anbi2d 
 |-  ( x = z -> ( ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) <-> ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) ) )
10 9 rexralbidv 
 |-  ( x = z -> ( E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) <-> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) ) )
11 10 cbvralvw 
 |-  ( A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) <-> A. z e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) )
12 rphalfcl 
 |-  ( x e. RR+ -> ( x / 2 ) e. RR+ )
13 breq2 
 |-  ( z = ( x / 2 ) -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) )
14 13 anbi2d 
 |-  ( z = ( x / 2 ) -> ( ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) <-> ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
15 14 rexralbidv 
 |-  ( z = ( x / 2 ) -> ( E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) <-> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
16 15 rspcv 
 |-  ( ( x / 2 ) e. RR+ -> ( A. z e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) -> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
17 12 16 syl 
 |-  ( x e. RR+ -> ( A. z e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) -> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
18 17 adantl 
 |-  ( ( ph /\ x e. RR+ ) -> ( A. z e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) -> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
19 2 ralimi 
 |-  ( A. k e. ( ZZ>= ` j ) ta -> A. k e. ( ZZ>= ` j ) ps )
20 r19.26 
 |-  ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) <-> ( A. k e. ( ZZ>= ` j ) ps /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) )
21 fveq2 
 |-  ( k = m -> ( F ` k ) = ( F ` m ) )
22 21 4 syl 
 |-  ( k = m -> ( ps <-> th ) )
23 21 fvoveq1d 
 |-  ( k = m -> ( G ` ( ( F ` k ) D ( F ` j ) ) ) = ( G ` ( ( F ` m ) D ( F ` j ) ) ) )
24 23 breq1d 
 |-  ( k = m -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) <-> ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) )
25 22 24 anbi12d 
 |-  ( k = m -> ( ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) <-> ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
26 25 cbvralvw 
 |-  ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) <-> A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) )
27 26 biimpi 
 |-  ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) )
28 27 a1i 
 |-  ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) -> ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
29 20 28 biimtrrid 
 |-  ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) -> ( ( A. k e. ( ZZ>= ` j ) ps /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
30 29 expdimp 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) )
31 1 sseli 
 |-  ( j e. Z -> j e. ZZ )
32 uzid 
 |-  ( j e. ZZ -> j e. ( ZZ>= ` j ) )
33 31 32 syl 
 |-  ( j e. Z -> j e. ( ZZ>= ` j ) )
34 fveq2 
 |-  ( k = j -> ( F ` k ) = ( F ` j ) )
35 34 3 syl 
 |-  ( k = j -> ( ps <-> ch ) )
36 35 rspcva 
 |-  ( ( j e. ( ZZ>= ` j ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ch )
37 33 36 sylan 
 |-  ( ( j e. Z /\ A. k e. ( ZZ>= ` j ) ps ) -> ch )
38 37 adantll 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ch )
39 30 38 jctild 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) )
40 simplll 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ph )
41 simplrr 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> th )
42 simplrl 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ch )
43 40 41 42 6 syl3anc 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ( G ` ( ( F ` m ) D ( F ` j ) ) ) = ( G ` ( ( F ` j ) D ( F ` m ) ) ) )
44 43 breq1d 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ( ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) <-> ( G ` ( ( F ` j ) D ( F ` m ) ) ) < ( x / 2 ) ) )
45 44 anbi2d 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ( ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) <-> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) /\ ( G ` ( ( F ` j ) D ( F ` m ) ) ) < ( x / 2 ) ) ) )
46 simpr 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ps )
47 simpllr 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> x e. RR+ )
48 47 rpred 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> x e. RR )
49 40 46 41 42 48 7 syl122anc 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ( ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) /\ ( G ` ( ( F ` j ) D ( F ` m ) ) ) < ( x / 2 ) ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
50 45 49 sylbid 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ( ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
51 50 expd 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ps ) -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> ( ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
52 51 impr 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ th ) ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> ( ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
53 52 an32s 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) /\ ( ch /\ th ) ) -> ( ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
54 53 anassrs 
 |-  ( ( ( ( ( ph /\ x e. RR+ ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) /\ ch ) /\ th ) -> ( ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
55 54 expimpd 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) /\ ch ) -> ( ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
56 55 ralimdv 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) /\ ch ) -> ( A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
57 56 impr 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) -> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x )
58 57 an32s 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) /\ ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x )
59 58 expr 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) /\ ps ) -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
60 uzss 
 |-  ( k e. ( ZZ>= ` j ) -> ( ZZ>= ` k ) C_ ( ZZ>= ` j ) )
61 ssralv 
 |-  ( ( ZZ>= ` k ) C_ ( ZZ>= ` j ) -> ( A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x -> A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
62 60 61 syl 
 |-  ( k e. ( ZZ>= ` j ) -> ( A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x -> A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
63 59 62 sylan9 
 |-  ( ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) /\ ps ) /\ k e. ( ZZ>= ` j ) ) -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
64 63 an32s 
 |-  ( ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) /\ k e. ( ZZ>= ` j ) ) /\ ps ) -> ( ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
65 64 expimpd 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) /\ k e. ( ZZ>= ` j ) ) -> ( ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
66 65 ralimdva 
 |-  ( ( ( ph /\ x e. RR+ ) /\ ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) ) -> ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
67 66 ex 
 |-  ( ( ph /\ x e. RR+ ) -> ( ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
68 67 com23 
 |-  ( ( ph /\ x e. RR+ ) -> ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> ( ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
69 68 adantr 
 |-  ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) -> ( A. k e. ( ZZ>= ` j ) ( ps /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> ( ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
70 20 69 biimtrrid 
 |-  ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) -> ( ( A. k e. ( ZZ>= ` j ) ps /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> ( ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
71 70 expdimp 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> ( ( ch /\ A. m e. ( ZZ>= ` j ) ( th /\ ( G ` ( ( F ` m ) D ( F ` j ) ) ) < ( x / 2 ) ) ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
72 39 71 mpdd 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
73 19 72 sylan2 
 |-  ( ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) /\ A. k e. ( ZZ>= ` j ) ta ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) -> A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
74 73 imdistanda 
 |-  ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) -> ( ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
75 r19.26 
 |-  ( A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) <-> ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) )
76 r19.26 
 |-  ( A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) <-> ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) )
77 74 75 76 3imtr4g 
 |-  ( ( ( ph /\ x e. RR+ ) /\ j e. Z ) -> ( A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
78 77 reximdva 
 |-  ( ( ph /\ x e. RR+ ) -> ( E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < ( x / 2 ) ) -> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
79 18 78 syld 
 |-  ( ( ph /\ x e. RR+ ) -> ( A. z e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) -> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
80 79 ralrimdva 
 |-  ( ph -> ( A. z e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < z ) -> A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
81 11 80 biimtrid 
 |-  ( ph -> ( A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) -> A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )
82 fveq2 
 |-  ( k = j -> ( ZZ>= ` k ) = ( ZZ>= ` j ) )
83 34 fvoveq1d 
 |-  ( k = j -> ( G ` ( ( F ` k ) D ( F ` m ) ) ) = ( G ` ( ( F ` j ) D ( F ` m ) ) ) )
84 83 breq1d 
 |-  ( k = j -> ( ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x <-> ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x ) )
85 82 84 raleqbidv 
 |-  ( k = j -> ( A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x <-> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x ) )
86 85 rspcv 
 |-  ( j e. ( ZZ>= ` j ) -> ( A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x -> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x ) )
87 86 ad2antlr 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x -> A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x ) )
88 fveq2 
 |-  ( m = k -> ( F ` m ) = ( F ` k ) )
89 88 oveq2d 
 |-  ( m = k -> ( ( F ` j ) D ( F ` m ) ) = ( ( F ` j ) D ( F ` k ) ) )
90 89 fveq2d 
 |-  ( m = k -> ( G ` ( ( F ` j ) D ( F ` m ) ) ) = ( G ` ( ( F ` j ) D ( F ` k ) ) ) )
91 90 breq1d 
 |-  ( m = k -> ( ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x <-> ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x ) )
92 91 cbvralvw 
 |-  ( A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x <-> A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x )
93 36 anim2i 
 |-  ( ( ph /\ ( j e. ( ZZ>= ` j ) /\ A. k e. ( ZZ>= ` j ) ps ) ) -> ( ph /\ ch ) )
94 93 anassrs 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( ph /\ ch ) )
95 simpr 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> A. k e. ( ZZ>= ` j ) ps )
96 5 breq1d 
 |-  ( ( ph /\ ch /\ ps ) -> ( ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
97 96 3expia 
 |-  ( ( ph /\ ch ) -> ( ps -> ( ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
98 97 ralimdv 
 |-  ( ( ph /\ ch ) -> ( A. k e. ( ZZ>= ` j ) ps -> A. k e. ( ZZ>= ` j ) ( ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
99 94 95 98 sylc 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> A. k e. ( ZZ>= ` j ) ( ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
100 ralbi 
 |-  ( A. k e. ( ZZ>= ` j ) ( ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
101 99 100 syl 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` k ) ) ) < x <-> A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
102 92 101 bitrid 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. m e. ( ZZ>= ` j ) ( G ` ( ( F ` j ) D ( F ` m ) ) ) < x <-> A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
103 87 102 sylibd 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ps ) -> ( A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x -> A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
104 19 103 sylan2 
 |-  ( ( ( ph /\ j e. ( ZZ>= ` j ) ) /\ A. k e. ( ZZ>= ` j ) ta ) -> ( A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x -> A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
105 104 imdistanda 
 |-  ( ( ph /\ j e. ( ZZ>= ` j ) ) -> ( ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) -> ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
106 33 105 sylan2 
 |-  ( ( ph /\ j e. Z ) -> ( ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) -> ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
107 r19.26 
 |-  ( A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) <-> ( A. k e. ( ZZ>= ` j ) ta /\ A. k e. ( ZZ>= ` j ) ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) )
108 106 76 107 3imtr4g 
 |-  ( ( ph /\ j e. Z ) -> ( A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) -> A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
109 108 reximdva 
 |-  ( ph -> ( E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) -> E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
110 109 ralimdv 
 |-  ( ph -> ( A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) -> A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) ) )
111 81 110 impbid 
 |-  ( ph -> ( A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ ( G ` ( ( F ` k ) D ( F ` j ) ) ) < x ) <-> A. x e. RR+ E. j e. Z A. k e. ( ZZ>= ` j ) ( ta /\ A. m e. ( ZZ>= ` k ) ( G ` ( ( F ` k ) D ( F ` m ) ) ) < x ) ) )