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

Theorem hauspwpwf1 24144
Description: Lemma for hauspwpwdom 24145. 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 4190 . . . . . . . . . 10 (𝑗𝐴) ⊆ 𝐴
2 vex 3459 . . . . . . . . . . . 12 𝑗 ∈ V
32inex1 5286 . . . . . . . . . . 11 (𝑗𝐴) ∈ V
43elpw 4566 . . . . . . . . . 10 ((𝑗𝐴) ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ⊆ 𝐴)
51, 4mpbir 234 . . . . . . . . 9 (𝑗𝐴) ∈ 𝒫 𝐴
6 eleq1 2851 . . . . . . . . 9 (𝑎 = (𝑗𝐴) → (𝑎 ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ∈ 𝒫 𝐴))
75, 6mpbiri 261 . . . . . . . 8 (𝑎 = (𝑗𝐴) → 𝑎 ∈ 𝒫 𝐴)
87adantl 486 . . . . . . 7 ((𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
98rexlimivw 3162 . . . . . 6 (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
109abssi 4022 . . . . 5 {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴
11 haustop 23488 . . . . . . . . 9 (𝐽 ∈ Haus → 𝐽 ∈ Top)
12 hauspwpwf1.x . . . . . . . . . 10 𝑋 = 𝐽
1312topopn 23063 . . . . . . . . 9 (𝐽 ∈ Top → 𝑋𝐽)
1411, 13syl 18 . . . . . . . 8 (𝐽 ∈ Haus → 𝑋𝐽)
15 ssexg 5290 . . . . . . . 8 ((𝐴𝑋𝑋𝐽) → 𝐴 ∈ V)
1614, 15sylan2 604 . . . . . . 7 ((𝐴𝑋𝐽 ∈ Haus) → 𝐴 ∈ V)
1716ancoms 463 . . . . . 6 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐴 ∈ V)
18 pwexg 5349 . . . . . 6 (𝐴 ∈ V → 𝒫 𝐴 ∈ V)
19 elpw2g 5304 . . . . . 6 (𝒫 𝐴 ∈ V → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2017, 18, 193syl 19 . . . . 5 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2110, 20mpbiri 261 . . . 4 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴)
2221a1d 26 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴))
23 simplll 786 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝐽 ∈ Haus)
2412clsss3 23216 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2511, 24sylan 591 . . . . . . . . . . 11 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2625ad2antrr 738 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
27 simplrl 788 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥 ∈ ((cls‘𝐽)‘𝐴))
2826, 27sseldd 3938 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑋)
29 simplrr 789 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
3026, 29sseldd 3938 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦𝑋)
31 simpr 489 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑦)
3212hausnei 23485 . . . . . . . . 9 ((𝐽 ∈ Haus ∧ (𝑥𝑋𝑦𝑋𝑥𝑦)) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
3323, 28, 30, 31, 32syl13anc 1399 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
34 simprll 790 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑘𝐽)
35 simprr1 1240 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑥𝑘)
36 eqidd 2764 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) = (𝑘𝐴))
37 elequ2 2158 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → (𝑥𝑗𝑥𝑘))
38 ineq1 4166 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑘 → (𝑗𝐴) = (𝑘𝐴))
3938eqeq2d 2774 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → ((𝑘𝐴) = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑘𝐴)))
4037, 39anbi12d 643 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)) ↔ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))))
4140rspcev 3581 . . . . . . . . . . . . 13 ((𝑘𝐽 ∧ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4234, 35, 36, 41syl12anc 849 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
43 vex 3459 . . . . . . . . . . . . . 14 𝑘 ∈ V
4443inex1 5286 . . . . . . . . . . . . 13 (𝑘𝐴) ∈ V
45 eqeq1 2767 . . . . . . . . . . . . . . 15 (𝑎 = (𝑘𝐴) → (𝑎 = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑗𝐴)))
4645anbi2d 641 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4746rexbidv 3189 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4844, 47elab 3638 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4942, 48sylibr 237 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
5011ad2antrr 738 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐽 ∈ Top)
5150ad3antrrr 742 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐽 ∈ Top)
52 simplr 780 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐴𝑋)
5352ad3antrrr 742 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐴𝑋)
54 simprr 784 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
5554ad3antrrr 742 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
56 simplr 780 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑙𝐽)
5756ad2antlr 739 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑙𝐽)
58 simprl 782 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑗𝐽)
59 inopn 23056 . . . . . . . . . . . . . . . . . . 19 ((𝐽 ∈ Top ∧ 𝑙𝐽𝑗𝐽) → (𝑙𝑗) ∈ 𝐽)
6051, 57, 58, 59syl3anc 1398 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑙𝑗) ∈ 𝐽)
61 simpr2 1214 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑦𝑙)
6261ad2antlr 739 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑙)
63 simprr 784 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑗)
6462, 63elind 4153 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ (𝑙𝑗))
6512clsndisj 23232 . . . . . . . . . . . . . . . . . 18 (((𝐽 ∈ Top ∧ 𝐴𝑋𝑦 ∈ ((cls‘𝐽)‘𝐴)) ∧ ((𝑙𝑗) ∈ 𝐽𝑦 ∈ (𝑙𝑗))) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
6651, 53, 55, 60, 64, 65syl32anc 1405 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
67 n0 4307 . . . . . . . . . . . . . . . . 17 (((𝑙𝑗) ∩ 𝐴) ≠ ∅ ↔ ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
6866, 67sylib 221 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
69 elin 3921 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ (𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴))
70 elin 3921 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (𝑙𝑗) ↔ (𝑧𝑙𝑧𝑗))
7170anbi1i 635 . . . . . . . . . . . . . . . . . . 19 ((𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
7269, 71bitri 278 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
73 elin 3921 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ (𝑗𝐴) ↔ (𝑧𝑗𝑧𝐴))
7473biimpri 231 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑗𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7574adantll 726 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7675ad2antll 741 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧 ∈ (𝑗𝐴))
77 simpll 778 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧𝑙)
7877ad2antll 741 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧𝑙)
79 simpr3 1215 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → (𝑘𝑙) = ∅)
8079ad2antlr 739 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → (𝑘𝑙) = ∅)
81 minel 4426 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧𝑘)
82 elinel1 4154 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ (𝑘𝐴) → 𝑧𝑘)
8381, 82nsyl 141 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧 ∈ (𝑘𝐴))
8478, 80, 83syl2anc 595 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ 𝑧 ∈ (𝑘𝐴))
85 nelneq2 2888 . . . . . . . . . . . . . . . . . . . . 21 ((𝑧 ∈ (𝑗𝐴) ∧ ¬ 𝑧 ∈ (𝑘𝐴)) → ¬ (𝑗𝐴) = (𝑘𝐴))
8676, 84, 85syl2anc 595 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑗𝐴) = (𝑘𝐴))
87 eqcom 2770 . . . . . . . . . . . . . . . . . . . 20 ((𝑗𝐴) = (𝑘𝐴) ↔ (𝑘𝐴) = (𝑗𝐴))
8886, 87sylnib 331 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑘𝐴) = (𝑗𝐴))
8988expr 461 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9072, 89biimtrid 245 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9190exlimdv 1963 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9268, 91mpd 16 . . . . . . . . . . . . . . 15 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ¬ (𝑘𝐴) = (𝑗𝐴))
9392anassrs 472 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴))
94 nan 842 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))) ↔ (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9593, 94mpbir 234 . . . . . . . . . . . . 13 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9695nrexdv 3160 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9745anbi2d 641 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑦𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9897rexbidv 3189 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9944, 98elab 3638 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
10096, 99sylnibr 332 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
101 nelne1 3055 . . . . . . . . . . 11 (((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∧ ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
10249, 100, 101syl2anc 595 . . . . . . . . . 10 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
103102expr 461 . . . . . . . . 9 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ (𝑘𝐽𝑙𝐽)) → ((𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
104103rexlimdvva 3222 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → (∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
10533, 104mpd 16 . . . . . . 7 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
106105ex 417 . . . . . 6 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → (𝑥𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
107106necon4d 2982 . . . . 5 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} → 𝑥 = 𝑦))
108 eleq1 2851 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝑗𝑦𝑗))
109108anbi1d 642 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗𝑎 = (𝑗𝐴))))
110109rexbidv 3189 . . . . . 6 (𝑥 = 𝑦 → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))))
111110abbidv 2829 . . . . 5 (𝑥 = 𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
112107, 111impbid1 228 . . . 4 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦))
113112ex 417 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴)) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦)))
11422, 113dom2lem 8985 . 2 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
115 hauspwpwf1.f . . 3 𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
116 f1eq1 6769 . . 3 (𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}) → (𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴 ↔ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴))
117115, 116ax-mp 5 . 2 (𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴 ↔ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
118114, 117sylibr 237 1 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1103   = wceq 1570  wex 1809  wcel 2143  {cab 2741  wne 2958  wrex 3089  Vcvv 3455  cin 3904  wss 3905  c0 4286  𝒫 cpw 4562   cuni 4872  cmpt 5192  1-1wf1 6533  cfv 6536  Topctop 23050  clsccl 23175  Hauscha 23465
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-id 5556  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-top 23051  df-cld 23176  df-ntr 23177  df-cls 23178  df-haus 23472
This theorem is referenced by:  hauspwpwdom  24145
  Copyright terms: Public domain W3C validator