Metamath Proof Explorer


Theorem isucn2

Description: The predicate " F is a uniformly continuous function from uniform space U to uniform space V ", expressed with filter bases for the entourages. (Contributed by Thierry Arnoux, 26-Jan-2018)

Ref Expression
Hypotheses isucn2.u U=X×XfilGenR
isucn2.v V=Y×YfilGenS
isucn2.1 φUUnifOnX
isucn2.2 φVUnifOnY
isucn2.3 φRfBasX×X
isucn2.4 φSfBasY×Y
Assertion isucn2 φFUuCnVF:XYsSrRxXyXxryFxsFy

Proof

Step Hyp Ref Expression
1 isucn2.u U=X×XfilGenR
2 isucn2.v V=Y×YfilGenS
3 isucn2.1 φUUnifOnX
4 isucn2.2 φVUnifOnY
5 isucn2.3 φRfBasX×X
6 isucn2.4 φSfBasY×Y
7 isucn UUnifOnXVUnifOnYFUuCnVF:XYvVuUxXyXxuyFxvFy
8 3 4 7 syl2anc φFUuCnVF:XYvVuUxXyXxuyFxvFy
9 breq v=sFxvFyFxsFy
10 9 imbi2d v=sxuyFxvFyxuyFxsFy
11 10 ralbidv v=syXxuyFxvFyyXxuyFxsFy
12 11 rexralbidv v=suUxXyXxuyFxvFyuUxXyXxuyFxsFy
13 simplr φF:XYvVuUxXyXxuyFxvFysSvVuUxXyXxuyFxvFy
14 ssfg SfBasY×YSY×YfilGenS
15 6 14 syl φSY×YfilGenS
16 15 2 sseqtrrdi φSV
17 16 adantr φF:XYSV
18 17 adantr φF:XYvVuUxXyXxuyFxvFySV
19 18 sselda φF:XYvVuUxXyXxuyFxvFysSsV
20 12 13 19 rspcdva φF:XYvVuUxXyXxuyFxvFysSuUxXyXxuyFxsFy
21 simpr φuUuU
22 21 1 eleqtrdi φuUuX×XfilGenR
23 elfg RfBasX×XuX×XfilGenRuX×XrRru
24 5 23 syl φuX×XfilGenRuX×XrRru
25 24 simplbda φuX×XfilGenRrRru
26 22 25 syldan φuUrRru
27 ssbr ruxryxuy
28 27 imim1d ruxuyFxsFyxryFxsFy
29 28 adantl φrRruxuyFxsFyxryFxsFy
30 29 ralrimivw φrRruyXxuyFxsFyxryFxsFy
31 30 ralrimivw φrRruxXyXxuyFxsFyxryFxsFy
32 ralim yXxuyFxsFyxryFxsFyyXxuyFxsFyyXxryFxsFy
33 32 ralimi xXyXxuyFxsFyxryFxsFyxXyXxuyFxsFyyXxryFxsFy
34 ralim xXyXxuyFxsFyyXxryFxsFyxXyXxuyFxsFyxXyXxryFxsFy
35 31 33 34 3syl φrRruxXyXxuyFxsFyxXyXxryFxsFy
36 35 ex φrRruxXyXxuyFxsFyxXyXxryFxsFy
37 36 reximdva φrRrurRxXyXxuyFxsFyxXyXxryFxsFy
38 37 adantr φuUrRrurRxXyXxuyFxsFyxXyXxryFxsFy
39 26 38 mpd φuUrRxXyXxuyFxsFyxXyXxryFxsFy
40 r19.37v rRxXyXxuyFxsFyxXyXxryFxsFyxXyXxuyFxsFyrRxXyXxryFxsFy
41 39 40 syl φuUxXyXxuyFxsFyrRxXyXxryFxsFy
42 41 rexlimdva φuUxXyXxuyFxsFyrRxXyXxryFxsFy
43 42 ad3antrrr φF:XYvVuUxXyXxuyFxvFysSuUxXyXxuyFxsFyrRxXyXxryFxsFy
44 20 43 mpd φF:XYvVuUxXyXxuyFxvFysSrRxXyXxryFxsFy
45 44 ralrimiva φF:XYvVuUxXyXxuyFxvFysSrRxXyXxryFxsFy
46 ssfg RfBasX×XRX×XfilGenR
47 5 46 syl φRX×XfilGenR
48 47 1 sseqtrrdi φRU
49 ssrexv RUrRxXyXxryFxsFyrUxXyXxryFxsFy
50 breq r=uxryxuy
51 50 imbi1d r=uxryFxsFyxuyFxsFy
52 51 2ralbidv r=uxXyXxryFxsFyxXyXxuyFxsFy
53 52 cbvrexvw rUxXyXxryFxsFyuUxXyXxuyFxsFy
54 49 53 syl6ib RUrRxXyXxryFxsFyuUxXyXxuyFxsFy
55 48 54 syl φrRxXyXxryFxsFyuUxXyXxuyFxsFy
56 55 ralimdv φsSrRxXyXxryFxsFysSuUxXyXxuyFxsFy
57 56 adantr φF:XYsSrRxXyXxryFxsFysSuUxXyXxuyFxsFy
58 nfv sφF:XY
59 nfra1 ssSuUxXyXxuyFxsFy
60 58 59 nfan sφF:XYsSuUxXyXxuyFxsFy
61 nfv svV
62 60 61 nfan sφF:XYsSuUxXyXxuyFxsFyvV
63 rspa sSuUxXyXxuyFxsFysSuUxXyXxuyFxsFy
64 63 ad5ant24 φF:XYsSuUxXyXxuyFxsFyvVsSsvuUxXyXxuyFxsFy
65 simp-4l φF:XYsSuUxXyXxuyFxsFyvVsSsvφF:XY
66 simplr φF:XYsSuUxXyXxuyFxsFyvVsSsvsS
67 simpr φF:XYsSuUxXyXxuyFxsFyvVsSsvsv
68 ssbr svFxsFyFxvFy
69 68 adantl φF:XYsSsvFxsFyFxvFy
70 69 imim2d φF:XYsSsvxuyFxsFyxuyFxvFy
71 70 ralimdv φF:XYsSsvyXxuyFxsFyyXxuyFxvFy
72 71 ralimdv φF:XYsSsvxXyXxuyFxsFyxXyXxuyFxvFy
73 72 reximdv φF:XYsSsvuUxXyXxuyFxsFyuUxXyXxuyFxvFy
74 65 66 67 73 syl21anc φF:XYsSuUxXyXxuyFxsFyvVsSsvuUxXyXxuyFxsFyuUxXyXxuyFxvFy
75 64 74 mpd φF:XYsSuUxXyXxuyFxsFyvVsSsvuUxXyXxuyFxvFy
76 6 ad3antrrr φF:XYsSuUxXyXxuyFxsFyvVSfBasY×Y
77 simpr φF:XYsSuUxXyXxuyFxsFyvVvV
78 77 2 eleqtrdi φF:XYsSuUxXyXxuyFxsFyvVvY×YfilGenS
79 elfg SfBasY×YvY×YfilGenSvY×YsSsv
80 79 simplbda SfBasY×YvY×YfilGenSsSsv
81 76 78 80 syl2anc φF:XYsSuUxXyXxuyFxsFyvVsSsv
82 62 75 81 r19.29af φF:XYsSuUxXyXxuyFxsFyvVuUxXyXxuyFxvFy
83 82 ralrimiva φF:XYsSuUxXyXxuyFxsFyvVuUxXyXxuyFxvFy
84 83 ex φF:XYsSuUxXyXxuyFxsFyvVuUxXyXxuyFxvFy
85 57 84 syld φF:XYsSrRxXyXxryFxsFyvVuUxXyXxuyFxvFy
86 85 imp φF:XYsSrRxXyXxryFxsFyvVuUxXyXxuyFxvFy
87 45 86 impbida φF:XYvVuUxXyXxuyFxvFysSrRxXyXxryFxsFy
88 87 pm5.32da φF:XYvVuUxXyXxuyFxvFyF:XYsSrRxXyXxryFxsFy
89 8 88 bitrd φFUuCnVF:XYsSrRxXyXxryFxsFy