Metamath Proof Explorer


Theorem cnmptkp

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

Ref Expression
Hypotheses cnmptk1.j ⊢ φ → J ∈ TopOn ⁡ X
cnmptk1.k ⊢ φ → K ∈ TopOn ⁡ Y
cnmptk1.l ⊢ φ → L ∈ TopOn ⁡ Z
cnmptkp.a ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A ∈ J Cn L ^ ko K
cnmptkp.b ⊢ φ → B ∈ Y
cnmptkp.c ⊢ y = B → A = C
Assertion cnmptkp ⊢ φ → x ∈ X ⟼ C ∈ J Cn L

Proof

Step Hyp Ref Expression
1 cnmptk1.j ⊢ φ → J ∈ TopOn ⁡ X
2 cnmptk1.k ⊢ φ → K ∈ TopOn ⁡ Y
3 cnmptk1.l ⊢ φ → L ∈ TopOn ⁡ Z
4 cnmptkp.a ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A ∈ J Cn L ^ ko K
5 cnmptkp.b ⊢ φ → B ∈ Y
6 cnmptkp.c ⊢ y = B → A = C
7 eqid ⊢ y ∈ Y ⟼ A = y ∈ Y ⟼ A
8 5 adantr ⊢ φ ∧ x ∈ X → B ∈ Y
9 6 eleq1d ⊢ y = B → A ∈ ⋃ L ↔ C ∈ ⋃ L
10 2 adantr ⊢ φ ∧ x ∈ X → K ∈ TopOn ⁡ Y
11 topontop ⊢ L ∈ TopOn ⁡ Z → L ∈ Top
12 3 11 syl ⊢ φ → L ∈ Top
13 12 adantr ⊢ φ ∧ x ∈ X → L ∈ Top
14 toptopon2 ⊢ L ∈ Top ↔ L ∈ TopOn ⁡ ⋃ L
15 13 14 sylib ⊢ φ ∧ x ∈ X → L ∈ TopOn ⁡ ⋃ L
16 topontop ⊢ K ∈ TopOn ⁡ Y → K ∈ Top
17 2 16 syl ⊢ φ → K ∈ Top
18 eqid ⊢ L ^ ko K = L ^ ko K
19 18 xkotopon ⊢ K ∈ Top ∧ L ∈ Top → L ^ ko K ∈ TopOn ⁡ K Cn L
20 17 12 19 syl2anc ⊢ φ → L ^ ko K ∈ TopOn ⁡ K Cn L
21 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
22 1 20 4 21 syl3anc ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A : X ⟶ K Cn L
23 22 fvmptelcdm ⊢ φ ∧ x ∈ X → y ∈ Y ⟼ A ∈ K Cn L
24 cnf2 ⊢ K ∈ TopOn ⁡ Y ∧ L ∈ TopOn ⁡ ⋃ L ∧ y ∈ Y ⟼ A ∈ K Cn L → y ∈ Y ⟼ A : Y ⟶ ⋃ L
25 10 15 23 24 syl3anc ⊢ φ ∧ x ∈ X → y ∈ Y ⟼ A : Y ⟶ ⋃ L
26 7 fmpt ⊢ ∀ y ∈ Y A ∈ ⋃ L ↔ y ∈ Y ⟼ A : Y ⟶ ⋃ L
27 25 26 sylibr ⊢ φ ∧ x ∈ X → ∀ y ∈ Y A ∈ ⋃ L
28 9 27 8 rspcdva ⊢ φ ∧ x ∈ X → C ∈ ⋃ L
29 7 6 8 28 fvmptd3 ⊢ φ ∧ x ∈ X → y ∈ Y ⟼ A ⁡ B = C
30 29 mpteq2dva ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A ⁡ B = x ∈ X ⟼ C
31 toponuni ⊢ K ∈ TopOn ⁡ Y → Y = ⋃ K
32 2 31 syl ⊢ φ → Y = ⋃ K
33 5 32 eleqtrd ⊢ φ → B ∈ ⋃ K
34 eqid ⊢ ⋃ K = ⋃ K
35 34 xkopjcn ⊢ K ∈ Top ∧ L ∈ Top ∧ B ∈ ⋃ K → w ∈ K Cn L ⟼ w ⁡ B ∈ L ^ ko K Cn L
36 17 12 33 35 syl3anc ⊢ φ → w ∈ K Cn L ⟼ w ⁡ B ∈ L ^ ko K Cn L
37 fveq1 ⊢ w = y ∈ Y ⟼ A → w ⁡ B = y ∈ Y ⟼ A ⁡ B
38 1 4 20 36 37 cnmpt11 ⊢ φ → x ∈ X ⟼ y ∈ Y ⟼ A ⁡ B ∈ J Cn L
39 30 38 eqeltrrd ⊢ φ → x ∈ X ⟼ C ∈ J Cn L