Metamath Proof Explorer


Theorem cnmptkk

Description: The composition of two curried functions is jointly continuous. (Contributed by Mario Carneiro, 23-Mar-2015) (Revised by Mario Carneiro, 22-Aug-2015)

Ref Expression
Hypotheses cnmptkk.j ⊢ φ → J ∈ TopOn ⁡ X
cnmptkk.k ⊢ φ → K ∈ TopOn ⁡ Y
cnmptkk.l ⊢ φ → L ∈ TopOn ⁡ Z
cnmptkk.m ⊢ φ → M ∈ TopOn ⁡ W
cnmptkk.n ⊢ φ → L ∈ N-Locally Comp
cnmptkk.a ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A ∈ J Cn L ^ ko K
cnmptkk.b ⊢ φ → x ∈ X ⟼ z ∈ Z ⟼ B ∈ J Cn M ^ ko L
cnmptkk.c ⊢ z = A → B = C
Assertion cnmptkk ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ C ∈ J Cn M ^ ko K

Proof

Step Hyp Ref Expression
1 cnmptkk.j ⊢ φ → J ∈ TopOn ⁡ X
2 cnmptkk.k ⊢ φ → K ∈ TopOn ⁡ Y
3 cnmptkk.l ⊢ φ → L ∈ TopOn ⁡ Z
4 cnmptkk.m ⊢ φ → M ∈ TopOn ⁡ W
5 cnmptkk.n ⊢ φ → L ∈ N-Locally Comp
6 cnmptkk.a ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A ∈ J Cn L ^ ko K
7 cnmptkk.b ⊢ φ → x ∈ X ⟼ z ∈ Z ⟼ B ∈ J Cn M ^ ko L
8 cnmptkk.c ⊢ z = A → B = C
9 2 adantr ⊢ φ ∧ x ∈ X → K ∈ TopOn ⁡ Y
10 3 adantr ⊢ φ ∧ x ∈ X → L ∈ TopOn ⁡ Z
11 topontop ⊢ K ∈ TopOn ⁡ Y → K ∈ Top
12 2 11 syl ⊢ φ → K ∈ Top
13 nllytop ⊢ L ∈ N-Locally Comp → L ∈ Top
14 5 13 syl ⊢ φ → L ∈ Top
15 eqid ⊢ L ^ ko K = L ^ ko K
16 15 xkotopon ⊢ K ∈ Top ∧ L ∈ Top → L ^ ko K ∈ TopOn ⁡ K Cn L
17 12 14 16 syl2anc ⊢ φ → L ^ ko K ∈ TopOn ⁡ K Cn L
18 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
19 1 17 6 18 syl3anc ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A : X ⟶ K Cn L
20 19 fvmptelcdm ⊢ φ ∧ x ∈ X → y ∈ Y ⟼ A ∈ K Cn L
21 cnf2 ⊢ K ∈ TopOn ⁡ Y ∧ L ∈ TopOn ⁡ Z ∧ y ∈ Y ⟼ A ∈ K Cn L → y ∈ Y ⟼ A : Y ⟶ Z
22 9 10 20 21 syl3anc ⊢ φ ∧ x ∈ X → y ∈ Y ⟼ A : Y ⟶ Z
23 eqid ⊢ y ∈ Y ⟼ A = y ∈ Y ⟼ A
24 23 fmpt ⊢ ∀ y ∈ Y A ∈ Z ↔ y ∈ Y ⟼ A : Y ⟶ Z
25 22 24 sylibr ⊢ φ ∧ x ∈ X → ∀ y ∈ Y A ∈ Z
26 eqidd ⊢ φ ∧ x ∈ X → y ∈ Y ⟼ A = y ∈ Y ⟼ A
27 eqidd ⊢ φ ∧ x ∈ X → z ∈ Z ⟼ B = z ∈ Z ⟼ B
28 25 26 27 8 fmptcof ⊢ φ ∧ x ∈ X → z ∈ Z ⟼ B ∘ y ∈ Y ⟼ A = y ∈ Y ⟼ C
29 28 mpteq2dva ⊢ φ → x ∈ X ⟼ z ∈ Z ⟼ B ∘ y ∈ Y ⟼ A = x ∈ X ⟼ y ∈ Y ⟼ C
30 topontop ⊢ M ∈ TopOn ⁡ W → M ∈ Top
31 4 30 syl ⊢ φ → M ∈ Top
32 eqid ⊢ M ^ ko L = M ^ ko L
33 32 xkotopon ⊢ L ∈ Top ∧ M ∈ Top → M ^ ko L ∈ TopOn ⁡ L Cn M
34 14 31 33 syl2anc ⊢ φ → M ^ ko L ∈ TopOn ⁡ L Cn M
35 eqid ⊢ f ∈ L Cn M , g ∈ K Cn L ⟼ f ∘ g = f ∈ L Cn M , g ∈ K Cn L ⟼ f ∘ g
36 35 xkococn ⊢ K ∈ Top ∧ L ∈ N-Locally Comp ∧ M ∈ Top → f ∈ L Cn M , g ∈ K Cn L ⟼ f ∘ g ∈ M ^ ko L × t L ^ ko K Cn M ^ ko K
37 12 5 31 36 syl3anc ⊢ φ → f ∈ L Cn M , g ∈ K Cn L ⟼ f ∘ g ∈ M ^ ko L × t L ^ ko K Cn M ^ ko K
38 coeq1 ⊢ f = z ∈ Z ⟼ B → f ∘ g = z ∈ Z ⟼ B ∘ g
39 coeq2 ⊢ g = y ∈ Y ⟼ A → z ∈ Z ⟼ B ∘ g = z ∈ Z ⟼ B ∘ y ∈ Y ⟼ A
40 38 39 sylan9eq ⊢ f = z ∈ Z ⟼ B ∧ g = y ∈ Y ⟼ A → f ∘ g = z ∈ Z ⟼ B ∘ y ∈ Y ⟼ A
41 1 7 6 34 17 37 40 cnmpt12 ⊢ φ → x ∈ X ⟼ z ∈ Z ⟼ B ∘ y ∈ Y ⟼ A ∈ J Cn M ^ ko K
42 29 41 eqeltrrd ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ C ∈ J Cn M ^ ko K