MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ucncn Structured version   Visualization version   GIF version

Theorem ucncn 23427
Description: Uniform continuity implies continuity. Deduction form. Proposition 1 of [BourbakiTop1] p. II.6. (Contributed by Thierry Arnoux, 30-Nov-2017.)
Hypotheses
Ref Expression
ucncn.j 𝐽 = (TopOpen‘𝑅)
ucncn.k 𝐾 = (TopOpen‘𝑆)
ucncn.1 (𝜑𝑅 ∈ UnifSp)
ucncn.2 (𝜑𝑆 ∈ UnifSp)
ucncn.3 (𝜑𝑅 ∈ TopSp)
ucncn.4 (𝜑𝑆 ∈ TopSp)
ucncn.5 (𝜑𝐹 ∈ ((UnifSt‘𝑅) Cnu(UnifSt‘𝑆)))
Assertion
Ref Expression
ucncn (𝜑𝐹 ∈ (𝐽 Cn 𝐾))

Proof of Theorem ucncn
Dummy variables 𝑟 𝑎 𝑠 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ucncn.5 . . . 4 (𝜑𝐹 ∈ ((UnifSt‘𝑅) Cnu(UnifSt‘𝑆)))
2 ucncn.1 . . . . . 6 (𝜑𝑅 ∈ UnifSp)
3 eqid 2740 . . . . . . . 8 (Base‘𝑅) = (Base‘𝑅)
4 eqid 2740 . . . . . . . 8 (UnifSt‘𝑅) = (UnifSt‘𝑅)
5 ucncn.j . . . . . . . 8 𝐽 = (TopOpen‘𝑅)
63, 4, 5isusp 23403 . . . . . . 7 (𝑅 ∈ UnifSp ↔ ((UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)) ∧ 𝐽 = (unifTop‘(UnifSt‘𝑅))))
76simplbi 498 . . . . . 6 (𝑅 ∈ UnifSp → (UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)))
82, 7syl 17 . . . . 5 (𝜑 → (UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)))
9 ucncn.2 . . . . . 6 (𝜑𝑆 ∈ UnifSp)
10 eqid 2740 . . . . . . . 8 (Base‘𝑆) = (Base‘𝑆)
11 eqid 2740 . . . . . . . 8 (UnifSt‘𝑆) = (UnifSt‘𝑆)
12 ucncn.k . . . . . . . 8 𝐾 = (TopOpen‘𝑆)
1310, 11, 12isusp 23403 . . . . . . 7 (𝑆 ∈ UnifSp ↔ ((UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆)) ∧ 𝐾 = (unifTop‘(UnifSt‘𝑆))))
1413simplbi 498 . . . . . 6 (𝑆 ∈ UnifSp → (UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆)))
159, 14syl 17 . . . . 5 (𝜑 → (UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆)))
16 isucn 23420 . . . . 5 (((UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)) ∧ (UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆))) → (𝐹 ∈ ((UnifSt‘𝑅) Cnu(UnifSt‘𝑆)) ↔ (𝐹:(Base‘𝑅)⟶(Base‘𝑆) ∧ ∀𝑠 ∈ (UnifSt‘𝑆)∃𝑟 ∈ (UnifSt‘𝑅)∀𝑥 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))))
178, 15, 16syl2anc 584 . . . 4 (𝜑 → (𝐹 ∈ ((UnifSt‘𝑅) Cnu(UnifSt‘𝑆)) ↔ (𝐹:(Base‘𝑅)⟶(Base‘𝑆) ∧ ∀𝑠 ∈ (UnifSt‘𝑆)∃𝑟 ∈ (UnifSt‘𝑅)∀𝑥 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))))
181, 17mpbid 231 . . 3 (𝜑 → (𝐹:(Base‘𝑅)⟶(Base‘𝑆) ∧ ∀𝑠 ∈ (UnifSt‘𝑆)∃𝑟 ∈ (UnifSt‘𝑅)∀𝑥 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))))
1918simpld 495 . 2 (𝜑𝐹:(Base‘𝑅)⟶(Base‘𝑆))
20 cnvimass 5987 . . . . 5 (𝐹𝑎) ⊆ dom 𝐹
2119fdmd 6608 . . . . . 6 (𝜑 → dom 𝐹 = (Base‘𝑅))
2221adantr 481 . . . . 5 ((𝜑𝑎𝐾) → dom 𝐹 = (Base‘𝑅))
2320, 22sseqtrid 3978 . . . 4 ((𝜑𝑎𝐾) → (𝐹𝑎) ⊆ (Base‘𝑅))
24 simplll 772 . . . . . . . . 9 ((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → 𝜑)
25 simpr 485 . . . . . . . . 9 ((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → 𝑠 ∈ (UnifSt‘𝑆))
2623ad2antrr 723 . . . . . . . . . 10 ((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → (𝐹𝑎) ⊆ (Base‘𝑅))
27 simplr 766 . . . . . . . . . 10 ((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → 𝑥 ∈ (𝐹𝑎))
2826, 27sseldd 3927 . . . . . . . . 9 ((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → 𝑥 ∈ (Base‘𝑅))
2918simprd 496 . . . . . . . . . . . 12 (𝜑 → ∀𝑠 ∈ (UnifSt‘𝑆)∃𝑟 ∈ (UnifSt‘𝑅)∀𝑥 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
3029r19.21bi 3135 . . . . . . . . . . 11 ((𝜑𝑠 ∈ (UnifSt‘𝑆)) → ∃𝑟 ∈ (UnifSt‘𝑅)∀𝑥 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
31 r19.12 3255 . . . . . . . . . . 11 (∃𝑟 ∈ (UnifSt‘𝑅)∀𝑥 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) → ∀𝑥 ∈ (Base‘𝑅)∃𝑟 ∈ (UnifSt‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
3230, 31syl 17 . . . . . . . . . 10 ((𝜑𝑠 ∈ (UnifSt‘𝑆)) → ∀𝑥 ∈ (Base‘𝑅)∃𝑟 ∈ (UnifSt‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
3332r19.21bi 3135 . . . . . . . . 9 (((𝜑𝑠 ∈ (UnifSt‘𝑆)) ∧ 𝑥 ∈ (Base‘𝑅)) → ∃𝑟 ∈ (UnifSt‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
3424, 25, 28, 33syl21anc 835 . . . . . . . 8 ((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → ∃𝑟 ∈ (UnifSt‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
3534adantr 481 . . . . . . 7 (((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) → ∃𝑟 ∈ (UnifSt‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
3624ad3antrrr 727 . . . . . . . . . 10 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → 𝜑)
378ad5antr 731 . . . . . . . . . . . 12 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → (UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)))
38 simpr 485 . . . . . . . . . . . 12 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → 𝑟 ∈ (UnifSt‘𝑅))
39 ustrel 23353 . . . . . . . . . . . 12 (((UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → Rel 𝑟)
4037, 38, 39syl2anc 584 . . . . . . . . . . 11 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → Rel 𝑟)
4140adantr 481 . . . . . . . . . 10 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → Rel 𝑟)
4236, 8syl 17 . . . . . . . . . . 11 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → (UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)))
43 simplr 766 . . . . . . . . . . 11 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → 𝑟 ∈ (UnifSt‘𝑅))
4428ad3antrrr 727 . . . . . . . . . . 11 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → 𝑥 ∈ (Base‘𝑅))
45 ustimasn 23370 . . . . . . . . . . 11 (((UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)) ∧ 𝑟 ∈ (UnifSt‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅)) → (𝑟 “ {𝑥}) ⊆ (Base‘𝑅))
4642, 43, 44, 45syl3anc 1370 . . . . . . . . . 10 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → (𝑟 “ {𝑥}) ⊆ (Base‘𝑅))
47 simpr 485 . . . . . . . . . . 11 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)))
48 simplr 766 . . . . . . . . . . . . . . 15 ((((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ 𝑧 ∈ (Base‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → 𝑧 ∈ (Base‘𝑅))
49 simpllr 773 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎)
5015ad5antr 731 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → (UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆)))
51 simpllr 773 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → 𝑠 ∈ (UnifSt‘𝑆))
52 ustrel 23353 . . . . . . . . . . . . . . . . . . . 20 (((UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) → Rel 𝑠)
5350, 51, 52syl2anc 584 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → Rel 𝑠)
54 elrelimasn 5991 . . . . . . . . . . . . . . . . . . 19 (Rel 𝑠 → ((𝐹𝑧) ∈ (𝑠 “ {(𝐹𝑥)}) ↔ (𝐹𝑥)𝑠(𝐹𝑧)))
5553, 54syl 17 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → ((𝐹𝑧) ∈ (𝑠 “ {(𝐹𝑥)}) ↔ (𝐹𝑥)𝑠(𝐹𝑧)))
5655biimpar 478 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → (𝐹𝑧) ∈ (𝑠 “ {(𝐹𝑥)}))
5749, 56sseldd 3927 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → (𝐹𝑧) ∈ 𝑎)
5857adantlr 712 . . . . . . . . . . . . . . 15 ((((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ 𝑧 ∈ (Base‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → (𝐹𝑧) ∈ 𝑎)
59 ffn 6597 . . . . . . . . . . . . . . . . 17 (𝐹:(Base‘𝑅)⟶(Base‘𝑆) → 𝐹 Fn (Base‘𝑅))
60 elpreima 6930 . . . . . . . . . . . . . . . . 17 (𝐹 Fn (Base‘𝑅) → (𝑧 ∈ (𝐹𝑎) ↔ (𝑧 ∈ (Base‘𝑅) ∧ (𝐹𝑧) ∈ 𝑎)))
6119, 59, 603syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑧 ∈ (𝐹𝑎) ↔ (𝑧 ∈ (Base‘𝑅) ∧ (𝐹𝑧) ∈ 𝑎)))
6261ad7antr 735 . . . . . . . . . . . . . . 15 ((((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ 𝑧 ∈ (Base‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → (𝑧 ∈ (𝐹𝑎) ↔ (𝑧 ∈ (Base‘𝑅) ∧ (𝐹𝑧) ∈ 𝑎)))
6348, 58, 62mpbir2and 710 . . . . . . . . . . . . . 14 ((((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ 𝑧 ∈ (Base‘𝑅)) ∧ (𝐹𝑥)𝑠(𝐹𝑧)) → 𝑧 ∈ (𝐹𝑎))
6463ex 413 . . . . . . . . . . . . 13 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ 𝑧 ∈ (Base‘𝑅)) → ((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎)))
6564ralrimiva 3110 . . . . . . . . . . . 12 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → ∀𝑧 ∈ (Base‘𝑅)((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎)))
6665adantr 481 . . . . . . . . . . 11 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → ∀𝑧 ∈ (Base‘𝑅)((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎)))
67 r19.26 3097 . . . . . . . . . . . 12 (∀𝑧 ∈ (Base‘𝑅)((𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) ∧ ((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎))) ↔ (∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) ∧ ∀𝑧 ∈ (Base‘𝑅)((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎))))
68 pm3.33 762 . . . . . . . . . . . . 13 (((𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) ∧ ((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎))) → (𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎)))
6968ralimi 3089 . . . . . . . . . . . 12 (∀𝑧 ∈ (Base‘𝑅)((𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) ∧ ((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎))) → ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎)))
7067, 69sylbir 234 . . . . . . . . . . 11 ((∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) ∧ ∀𝑧 ∈ (Base‘𝑅)((𝐹𝑥)𝑠(𝐹𝑧) → 𝑧 ∈ (𝐹𝑎))) → ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎)))
7147, 66, 70syl2anc 584 . . . . . . . . . 10 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎)))
72 simpl2l 1225 . . . . . . . . . . . . . 14 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → Rel 𝑟)
73 simpr 485 . . . . . . . . . . . . . 14 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → 𝑦 ∈ (𝑟 “ {𝑥}))
74 elrelimasn 5991 . . . . . . . . . . . . . . 15 (Rel 𝑟 → (𝑦 ∈ (𝑟 “ {𝑥}) ↔ 𝑥𝑟𝑦))
7574biimpa 477 . . . . . . . . . . . . . 14 ((Rel 𝑟𝑦 ∈ (𝑟 “ {𝑥})) → 𝑥𝑟𝑦)
7672, 73, 75syl2anc 584 . . . . . . . . . . . . 13 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → 𝑥𝑟𝑦)
77 breq2 5083 . . . . . . . . . . . . . . 15 (𝑧 = 𝑦 → (𝑥𝑟𝑧𝑥𝑟𝑦))
78 eleq1w 2823 . . . . . . . . . . . . . . 15 (𝑧 = 𝑦 → (𝑧 ∈ (𝐹𝑎) ↔ 𝑦 ∈ (𝐹𝑎)))
7977, 78imbi12d 345 . . . . . . . . . . . . . 14 (𝑧 = 𝑦 → ((𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎)) ↔ (𝑥𝑟𝑦𝑦 ∈ (𝐹𝑎))))
80 simpl3 1192 . . . . . . . . . . . . . 14 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎)))
81 simpl2r 1226 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → (𝑟 “ {𝑥}) ⊆ (Base‘𝑅))
8281, 73sseldd 3927 . . . . . . . . . . . . . 14 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → 𝑦 ∈ (Base‘𝑅))
8379, 80, 82rspcdva 3563 . . . . . . . . . . . . 13 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → (𝑥𝑟𝑦𝑦 ∈ (𝐹𝑎)))
8476, 83mpd 15 . . . . . . . . . . . 12 (((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) ∧ 𝑦 ∈ (𝑟 “ {𝑥})) → 𝑦 ∈ (𝐹𝑎))
8584ex 413 . . . . . . . . . . 11 ((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) → (𝑦 ∈ (𝑟 “ {𝑥}) → 𝑦 ∈ (𝐹𝑎)))
8685ssrdv 3932 . . . . . . . . . 10 ((𝜑 ∧ (Rel 𝑟 ∧ (𝑟 “ {𝑥}) ⊆ (Base‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧𝑧 ∈ (𝐹𝑎))) → (𝑟 “ {𝑥}) ⊆ (𝐹𝑎))
8736, 41, 46, 71, 86syl121anc 1374 . . . . . . . . 9 (((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) ∧ ∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧))) → (𝑟 “ {𝑥}) ⊆ (𝐹𝑎))
8887ex 413 . . . . . . . 8 ((((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) ∧ 𝑟 ∈ (UnifSt‘𝑅)) → (∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) → (𝑟 “ {𝑥}) ⊆ (𝐹𝑎)))
8988reximdva 3205 . . . . . . 7 (((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) → (∃𝑟 ∈ (UnifSt‘𝑅)∀𝑧 ∈ (Base‘𝑅)(𝑥𝑟𝑧 → (𝐹𝑥)𝑠(𝐹𝑧)) → ∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎)))
9035, 89mpd 15 . . . . . 6 (((((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) ∧ 𝑠 ∈ (UnifSt‘𝑆)) ∧ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎) → ∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))
91 sneq 4577 . . . . . . . . . 10 (𝑦 = (𝐹𝑥) → {𝑦} = {(𝐹𝑥)})
9291imaeq2d 5967 . . . . . . . . 9 (𝑦 = (𝐹𝑥) → (𝑠 “ {𝑦}) = (𝑠 “ {(𝐹𝑥)}))
9392sseq1d 3957 . . . . . . . 8 (𝑦 = (𝐹𝑥) → ((𝑠 “ {𝑦}) ⊆ 𝑎 ↔ (𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎))
9493rexbidv 3228 . . . . . . 7 (𝑦 = (𝐹𝑥) → (∃𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎 ↔ ∃𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎))
95 simpr 485 . . . . . . . . . . 11 ((𝜑𝑎𝐾) → 𝑎𝐾)
9613simprbi 497 . . . . . . . . . . . . 13 (𝑆 ∈ UnifSp → 𝐾 = (unifTop‘(UnifSt‘𝑆)))
979, 96syl 17 . . . . . . . . . . . 12 (𝜑𝐾 = (unifTop‘(UnifSt‘𝑆)))
9897adantr 481 . . . . . . . . . . 11 ((𝜑𝑎𝐾) → 𝐾 = (unifTop‘(UnifSt‘𝑆)))
9995, 98eleqtrd 2843 . . . . . . . . . 10 ((𝜑𝑎𝐾) → 𝑎 ∈ (unifTop‘(UnifSt‘𝑆)))
100 elutop 23375 . . . . . . . . . . . 12 ((UnifSt‘𝑆) ∈ (UnifOn‘(Base‘𝑆)) → (𝑎 ∈ (unifTop‘(UnifSt‘𝑆)) ↔ (𝑎 ⊆ (Base‘𝑆) ∧ ∀𝑦𝑎𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎)))
10115, 100syl 17 . . . . . . . . . . 11 (𝜑 → (𝑎 ∈ (unifTop‘(UnifSt‘𝑆)) ↔ (𝑎 ⊆ (Base‘𝑆) ∧ ∀𝑦𝑎𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎)))
102101adantr 481 . . . . . . . . . 10 ((𝜑𝑎𝐾) → (𝑎 ∈ (unifTop‘(UnifSt‘𝑆)) ↔ (𝑎 ⊆ (Base‘𝑆) ∧ ∀𝑦𝑎𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎)))
10399, 102mpbid 231 . . . . . . . . 9 ((𝜑𝑎𝐾) → (𝑎 ⊆ (Base‘𝑆) ∧ ∀𝑦𝑎𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎))
104103simprd 496 . . . . . . . 8 ((𝜑𝑎𝐾) → ∀𝑦𝑎𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎)
105104adantr 481 . . . . . . 7 (((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) → ∀𝑦𝑎𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {𝑦}) ⊆ 𝑎)
106 elpreima 6930 . . . . . . . . . . 11 (𝐹 Fn (Base‘𝑅) → (𝑥 ∈ (𝐹𝑎) ↔ (𝑥 ∈ (Base‘𝑅) ∧ (𝐹𝑥) ∈ 𝑎)))
10719, 59, 1063syl 18 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (𝐹𝑎) ↔ (𝑥 ∈ (Base‘𝑅) ∧ (𝐹𝑥) ∈ 𝑎)))
108107adantr 481 . . . . . . . . 9 ((𝜑𝑎𝐾) → (𝑥 ∈ (𝐹𝑎) ↔ (𝑥 ∈ (Base‘𝑅) ∧ (𝐹𝑥) ∈ 𝑎)))
109108biimpa 477 . . . . . . . 8 (((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) → (𝑥 ∈ (Base‘𝑅) ∧ (𝐹𝑥) ∈ 𝑎))
110109simprd 496 . . . . . . 7 (((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) → (𝐹𝑥) ∈ 𝑎)
11194, 105, 110rspcdva 3563 . . . . . 6 (((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) → ∃𝑠 ∈ (UnifSt‘𝑆)(𝑠 “ {(𝐹𝑥)}) ⊆ 𝑎)
11290, 111r19.29a 3220 . . . . 5 (((𝜑𝑎𝐾) ∧ 𝑥 ∈ (𝐹𝑎)) → ∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))
113112ralrimiva 3110 . . . 4 ((𝜑𝑎𝐾) → ∀𝑥 ∈ (𝐹𝑎)∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))
1146simprbi 497 . . . . . . . 8 (𝑅 ∈ UnifSp → 𝐽 = (unifTop‘(UnifSt‘𝑅)))
1152, 114syl 17 . . . . . . 7 (𝜑𝐽 = (unifTop‘(UnifSt‘𝑅)))
116115adantr 481 . . . . . 6 ((𝜑𝑎𝐾) → 𝐽 = (unifTop‘(UnifSt‘𝑅)))
117116eleq2d 2826 . . . . 5 ((𝜑𝑎𝐾) → ((𝐹𝑎) ∈ 𝐽 ↔ (𝐹𝑎) ∈ (unifTop‘(UnifSt‘𝑅))))
118 elutop 23375 . . . . . . 7 ((UnifSt‘𝑅) ∈ (UnifOn‘(Base‘𝑅)) → ((𝐹𝑎) ∈ (unifTop‘(UnifSt‘𝑅)) ↔ ((𝐹𝑎) ⊆ (Base‘𝑅) ∧ ∀𝑥 ∈ (𝐹𝑎)∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))))
1198, 118syl 17 . . . . . 6 (𝜑 → ((𝐹𝑎) ∈ (unifTop‘(UnifSt‘𝑅)) ↔ ((𝐹𝑎) ⊆ (Base‘𝑅) ∧ ∀𝑥 ∈ (𝐹𝑎)∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))))
120119adantr 481 . . . . 5 ((𝜑𝑎𝐾) → ((𝐹𝑎) ∈ (unifTop‘(UnifSt‘𝑅)) ↔ ((𝐹𝑎) ⊆ (Base‘𝑅) ∧ ∀𝑥 ∈ (𝐹𝑎)∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))))
121117, 120bitrd 278 . . . 4 ((𝜑𝑎𝐾) → ((𝐹𝑎) ∈ 𝐽 ↔ ((𝐹𝑎) ⊆ (Base‘𝑅) ∧ ∀𝑥 ∈ (𝐹𝑎)∃𝑟 ∈ (UnifSt‘𝑅)(𝑟 “ {𝑥}) ⊆ (𝐹𝑎))))
12223, 113, 121mpbir2and 710 . . 3 ((𝜑𝑎𝐾) → (𝐹𝑎) ∈ 𝐽)
123122ralrimiva 3110 . 2 (𝜑 → ∀𝑎𝐾 (𝐹𝑎) ∈ 𝐽)
124 ucncn.3 . . . 4 (𝜑𝑅 ∈ TopSp)
1253, 5istps 22073 . . . 4 (𝑅 ∈ TopSp ↔ 𝐽 ∈ (TopOn‘(Base‘𝑅)))
126124, 125sylib 217 . . 3 (𝜑𝐽 ∈ (TopOn‘(Base‘𝑅)))
127 ucncn.4 . . . 4 (𝜑𝑆 ∈ TopSp)
12810, 12istps 22073 . . . 4 (𝑆 ∈ TopSp ↔ 𝐾 ∈ (TopOn‘(Base‘𝑆)))
129127, 128sylib 217 . . 3 (𝜑𝐾 ∈ (TopOn‘(Base‘𝑆)))
130 iscn 22376 . . 3 ((𝐽 ∈ (TopOn‘(Base‘𝑅)) ∧ 𝐾 ∈ (TopOn‘(Base‘𝑆))) → (𝐹 ∈ (𝐽 Cn 𝐾) ↔ (𝐹:(Base‘𝑅)⟶(Base‘𝑆) ∧ ∀𝑎𝐾 (𝐹𝑎) ∈ 𝐽)))
131126, 129, 130syl2anc 584 . 2 (𝜑 → (𝐹 ∈ (𝐽 Cn 𝐾) ↔ (𝐹:(Base‘𝑅)⟶(Base‘𝑆) ∧ ∀𝑎𝐾 (𝐹𝑎) ∈ 𝐽)))
13219, 123, 131mpbir2and 710 1 (𝜑𝐹 ∈ (𝐽 Cn 𝐾))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1086   = wceq 1542  wcel 2110  wral 3066  wrex 3067  wss 3892  {csn 4567   class class class wbr 5079  ccnv 5588  dom cdm 5589  cima 5592  Rel wrel 5594   Fn wfn 6426  wf 6427  cfv 6431  (class class class)co 7269  Basecbs 16902  TopOpenctopn 17122  TopOnctopon 22049  TopSpctps 22071   Cn ccn 22365  UnifOncust 23341  unifTopcutop 23372  UnifStcuss 23395  UnifSpcusp 23396   Cnucucn 23417
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2015  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2711  ax-sep 5227  ax-nul 5234  ax-pow 5292  ax-pr 5356  ax-un 7580
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2072  df-mo 2542  df-eu 2571  df-clab 2718  df-cleq 2732  df-clel 2818  df-nfc 2891  df-ne 2946  df-ral 3071  df-rex 3072  df-rab 3075  df-v 3433  df-sbc 3721  df-csb 3838  df-dif 3895  df-un 3897  df-in 3899  df-ss 3909  df-nul 4263  df-if 4466  df-pw 4541  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4846  df-br 5080  df-opab 5142  df-mpt 5163  df-id 5489  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-iota 6389  df-fun 6433  df-fn 6434  df-f 6435  df-fv 6439  df-ov 7272  df-oprab 7273  df-mpo 7274  df-map 8592  df-top 22033  df-topon 22050  df-topsp 22072  df-cn 22368  df-ust 23342  df-utop 23373  df-usp 23399  df-ucn 23418
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator