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

Theorem hauspwpwf1 23354
Description: Lemma for hauspwpwdom 23355. Points in the closure of a set in a Hausdorff space are characterized by the open neighborhoods they extend into the generating set. (Contributed by Mario Carneiro, 28-Jul-2015.)
Hypotheses
Ref Expression
hauspwpwf1.x 𝑋 = 𝐽
hauspwpwf1.f 𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
Assertion
Ref Expression
hauspwpwf1 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
Distinct variable groups:   𝑗,𝑎,𝑥,𝐴   𝐽,𝑎,𝑗,𝑥   𝑗,𝑋,𝑥
Allowed substitution hints:   𝐹(𝑥,𝑗,𝑎)   𝑋(𝑎)

Proof of Theorem hauspwpwf1
Dummy variables 𝑘 𝑙 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 inss2 4194 . . . . . . . . . 10 (𝑗𝐴) ⊆ 𝐴
2 vex 3452 . . . . . . . . . . . 12 𝑗 ∈ V
32inex1 5279 . . . . . . . . . . 11 (𝑗𝐴) ∈ V
43elpw 4569 . . . . . . . . . 10 ((𝑗𝐴) ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ⊆ 𝐴)
51, 4mpbir 230 . . . . . . . . 9 (𝑗𝐴) ∈ 𝒫 𝐴
6 eleq1 2826 . . . . . . . . 9 (𝑎 = (𝑗𝐴) → (𝑎 ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ∈ 𝒫 𝐴))
75, 6mpbiri 258 . . . . . . . 8 (𝑎 = (𝑗𝐴) → 𝑎 ∈ 𝒫 𝐴)
87adantl 483 . . . . . . 7 ((𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
98rexlimivw 3149 . . . . . 6 (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
109abssi 4032 . . . . 5 {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴
11 haustop 22698 . . . . . . . . 9 (𝐽 ∈ Haus → 𝐽 ∈ Top)
12 hauspwpwf1.x . . . . . . . . . 10 𝑋 = 𝐽
1312topopn 22271 . . . . . . . . 9 (𝐽 ∈ Top → 𝑋𝐽)
1411, 13syl 17 . . . . . . . 8 (𝐽 ∈ Haus → 𝑋𝐽)
15 ssexg 5285 . . . . . . . 8 ((𝐴𝑋𝑋𝐽) → 𝐴 ∈ V)
1614, 15sylan2 594 . . . . . . 7 ((𝐴𝑋𝐽 ∈ Haus) → 𝐴 ∈ V)
1716ancoms 460 . . . . . 6 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐴 ∈ V)
18 pwexg 5338 . . . . . 6 (𝐴 ∈ V → 𝒫 𝐴 ∈ V)
19 elpw2g 5306 . . . . . 6 (𝒫 𝐴 ∈ V → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2017, 18, 193syl 18 . . . . 5 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2110, 20mpbiri 258 . . . 4 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴)
2221a1d 25 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴))
23 simplll 774 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝐽 ∈ Haus)
2412clsss3 22426 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2511, 24sylan 581 . . . . . . . . . . 11 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2625ad2antrr 725 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
27 simplrl 776 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥 ∈ ((cls‘𝐽)‘𝐴))
2826, 27sseldd 3950 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑋)
29 simplrr 777 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
3026, 29sseldd 3950 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦𝑋)
31 simpr 486 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑦)
3212hausnei 22695 . . . . . . . . 9 ((𝐽 ∈ Haus ∧ (𝑥𝑋𝑦𝑋𝑥𝑦)) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
3323, 28, 30, 31, 32syl13anc 1373 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
34 simprll 778 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑘𝐽)
35 simprr1 1222 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑥𝑘)
36 eqidd 2738 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) = (𝑘𝐴))
37 elequ2 2122 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → (𝑥𝑗𝑥𝑘))
38 ineq1 4170 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑘 → (𝑗𝐴) = (𝑘𝐴))
3938eqeq2d 2748 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → ((𝑘𝐴) = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑘𝐴)))
4037, 39anbi12d 632 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)) ↔ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))))
4140rspcev 3584 . . . . . . . . . . . . 13 ((𝑘𝐽 ∧ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4234, 35, 36, 41syl12anc 836 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
43 vex 3452 . . . . . . . . . . . . . 14 𝑘 ∈ V
4443inex1 5279 . . . . . . . . . . . . 13 (𝑘𝐴) ∈ V
45 eqeq1 2741 . . . . . . . . . . . . . . 15 (𝑎 = (𝑘𝐴) → (𝑎 = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑗𝐴)))
4645anbi2d 630 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4746rexbidv 3176 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4844, 47elab 3635 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4942, 48sylibr 233 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
5011ad2antrr 725 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐽 ∈ Top)
5150ad3antrrr 729 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐽 ∈ Top)
52 simplr 768 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐴𝑋)
5352ad3antrrr 729 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐴𝑋)
54 simprr 772 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
5554ad3antrrr 729 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
56 simplr 768 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑙𝐽)
5756ad2antlr 726 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑙𝐽)
58 simprl 770 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑗𝐽)
59 inopn 22264 . . . . . . . . . . . . . . . . . . 19 ((𝐽 ∈ Top ∧ 𝑙𝐽𝑗𝐽) → (𝑙𝑗) ∈ 𝐽)
6051, 57, 58, 59syl3anc 1372 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑙𝑗) ∈ 𝐽)
61 simpr2 1196 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑦𝑙)
6261ad2antlr 726 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑙)
63 simprr 772 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑗)
6462, 63elind 4159 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ (𝑙𝑗))
6512clsndisj 22442 . . . . . . . . . . . . . . . . . 18 (((𝐽 ∈ Top ∧ 𝐴𝑋𝑦 ∈ ((cls‘𝐽)‘𝐴)) ∧ ((𝑙𝑗) ∈ 𝐽𝑦 ∈ (𝑙𝑗))) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
6651, 53, 55, 60, 64, 65syl32anc 1379 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
67 n0 4311 . . . . . . . . . . . . . . . . 17 (((𝑙𝑗) ∩ 𝐴) ≠ ∅ ↔ ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
6866, 67sylib 217 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
69 elin 3931 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ (𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴))
70 elin 3931 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (𝑙𝑗) ↔ (𝑧𝑙𝑧𝑗))
7170anbi1i 625 . . . . . . . . . . . . . . . . . . 19 ((𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
7269, 71bitri 275 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
73 elin 3931 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ (𝑗𝐴) ↔ (𝑧𝑗𝑧𝐴))
7473biimpri 227 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑗𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7574adantll 713 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7675ad2antll 728 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧 ∈ (𝑗𝐴))
77 simpll 766 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧𝑙)
7877ad2antll 728 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧𝑙)
79 simpr3 1197 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → (𝑘𝑙) = ∅)
8079ad2antlr 726 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → (𝑘𝑙) = ∅)
81 minel 4430 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧𝑘)
82 elinel1 4160 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ (𝑘𝐴) → 𝑧𝑘)
8381, 82nsyl 140 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧 ∈ (𝑘𝐴))
8478, 80, 83syl2anc 585 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ 𝑧 ∈ (𝑘𝐴))
85 nelneq2 2863 . . . . . . . . . . . . . . . . . . . . 21 ((𝑧 ∈ (𝑗𝐴) ∧ ¬ 𝑧 ∈ (𝑘𝐴)) → ¬ (𝑗𝐴) = (𝑘𝐴))
8676, 84, 85syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑗𝐴) = (𝑘𝐴))
87 eqcom 2744 . . . . . . . . . . . . . . . . . . . 20 ((𝑗𝐴) = (𝑘𝐴) ↔ (𝑘𝐴) = (𝑗𝐴))
8886, 87sylnib 328 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑘𝐴) = (𝑗𝐴))
8988expr 458 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9072, 89biimtrid 241 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9190exlimdv 1937 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9268, 91mpd 15 . . . . . . . . . . . . . . 15 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ¬ (𝑘𝐴) = (𝑗𝐴))
9392anassrs 469 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴))
94 nan 829 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))) ↔ (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9593, 94mpbir 230 . . . . . . . . . . . . 13 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9695nrexdv 3147 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9745anbi2d 630 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑦𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9897rexbidv 3176 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9944, 98elab 3635 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
10096, 99sylnibr 329 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
101 nelne1 3042 . . . . . . . . . . 11 (((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∧ ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
10249, 100, 101syl2anc 585 . . . . . . . . . 10 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
103102expr 458 . . . . . . . . 9 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ (𝑘𝐽𝑙𝐽)) → ((𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
104103rexlimdvva 3206 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → (∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
10533, 104mpd 15 . . . . . . 7 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
106105ex 414 . . . . . 6 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → (𝑥𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
107106necon4d 2968 . . . . 5 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} → 𝑥 = 𝑦))
108 eleq1 2826 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝑗𝑦𝑗))
109108anbi1d 631 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗𝑎 = (𝑗𝐴))))
110109rexbidv 3176 . . . . . 6 (𝑥 = 𝑦 → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))))
111110abbidv 2806 . . . . 5 (𝑥 = 𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
112107, 111impbid1 224 . . . 4 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦))
113112ex 414 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴)) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦)))
11422, 113dom2lem 8939 . 2 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
115 hauspwpwf1.f . . 3 𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
116 f1eq1 6738 . . 3 (𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}) → (𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴 ↔ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴))
117115, 116ax-mp 5 . 2 (𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴 ↔ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
118114, 117sylibr 233 1 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  w3a 1088   = wceq 1542  wex 1782  wcel 2107  {cab 2714  wne 2944  wrex 3074  Vcvv 3448  cin 3914  wss 3915  c0 4287  𝒫 cpw 4565   cuni 4870  cmpt 5193  1-1wf1 6498  cfv 6501  Topctop 22258  clsccl 22385  Hauscha 22675
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-ral 3066  df-rex 3075  df-reu 3357  df-rab 3411  df-v 3450  df-sbc 3745  df-csb 3861  df-dif 3918  df-un 3920  df-in 3922  df-ss 3932  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-int 4913  df-iun 4961  df-iin 4962  df-br 5111  df-opab 5173  df-mpt 5194  df-id 5536  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-top 22259  df-cld 22386  df-ntr 22387  df-cls 22388  df-haus 22682
This theorem is referenced by:  hauspwpwdom  23355
  Copyright terms: Public domain W3C validator