Metamath Proof Explorer


Theorem cnmptk1p

Description: The evaluation of a curried function by a one-arg function is jointly continuous. (Contributed by Mario Carneiro, 23-Mar-2015) (Revised by Mario Carneiro, 22-Aug-2015)

Ref Expression
Hypotheses cnmptk1p.j φ J TopOn X
cnmptk1p.k φ K TopOn Y
cnmptk1p.l φ L TopOn Z
cnmptk1p.n φ K N-Locally Comp
cnmptk1p.a φ x X y Y A J Cn L ^ ko K
cnmptk1p.b φ x X B J Cn K
cnmptk1p.c y = B A = C
Assertion cnmptk1p φ x X C J Cn L

Proof

Step Hyp Ref Expression
1 cnmptk1p.j φ J TopOn X
2 cnmptk1p.k φ K TopOn Y
3 cnmptk1p.l φ L TopOn Z
4 cnmptk1p.n φ K N-Locally Comp
5 cnmptk1p.a φ x X y Y A J Cn L ^ ko K
6 cnmptk1p.b φ x X B J Cn K
7 cnmptk1p.c y = B A = C
8 eqid y Y A = y Y A
9 cnf2 J TopOn X K TopOn Y x X B J Cn K x X B : X Y
10 1 2 6 9 syl3anc φ x X B : X Y
11 10 fvmptelrn φ x X B Y
12 7 eleq1d y = B A Z C Z
13 2 adantr φ x X K TopOn Y
14 3 adantr φ x X L TopOn Z
15 nllytop K N-Locally Comp K Top
16 4 15 syl φ K Top
17 topontop L TopOn Z L Top
18 3 17 syl φ L Top
19 eqid L ^ ko K = L ^ ko K
20 19 xkotopon K Top L Top L ^ ko K TopOn K Cn L
21 16 18 20 syl2anc φ L ^ ko K TopOn K Cn L
22 cnf2 J TopOn X L ^ ko K TopOn K Cn L x X y Y A J Cn L ^ ko K x X y Y A : X K Cn L
23 1 21 5 22 syl3anc φ x X y Y A : X K Cn L
24 23 fvmptelrn φ x X y Y A K Cn L
25 cnf2 K TopOn Y L TopOn Z y Y A K Cn L y Y A : Y Z
26 13 14 24 25 syl3anc φ x X y Y A : Y Z
27 8 fmpt y Y A Z y Y A : Y Z
28 26 27 sylibr φ x X y Y A Z
29 12 28 11 rspcdva φ x X C Z
30 8 7 11 29 fvmptd3 φ x X y Y A B = C
31 30 mpteq2dva φ x X y Y A B = x X C
32 eqid K Cn L = K Cn L
33 toponuni K TopOn Y Y = K
34 2 33 syl φ Y = K
35 mpoeq12 K Cn L = K Cn L Y = K f K Cn L , z Y f z = f K Cn L , z K f z
36 32 34 35 sylancr φ f K Cn L , z Y f z = f K Cn L , z K f z
37 eqid K = K
38 eqid f K Cn L , z K f z = f K Cn L , z K f z
39 37 38 xkofvcn K N-Locally Comp L Top f K Cn L , z K f z L ^ ko K × t K Cn L
40 4 18 39 syl2anc φ f K Cn L , z K f z L ^ ko K × t K Cn L
41 36 40 eqeltrd φ f K Cn L , z Y f z L ^ ko K × t K Cn L
42 fveq1 f = y Y A f z = y Y A z
43 fveq2 z = B y Y A z = y Y A B
44 42 43 sylan9eq f = y Y A z = B f z = y Y A B
45 1 5 6 21 2 41 44 cnmpt12 φ x X y Y A B J Cn L
46 31 45 eqeltrrd φ x X C J Cn L