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 fvmptelcdm ⊢ φ ∧ 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 fvmptelcdm ⊢ φ ∧ 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