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

Theorem hauspwpwf1 23266
Description: Lemma for hauspwpwdom 23267. 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 4188 . . . . . . . . . 10 (𝑗𝐴) ⊆ 𝐴
2 vex 3448 . . . . . . . . . . . 12 𝑗 ∈ V
32inex1 5273 . . . . . . . . . . 11 (𝑗𝐴) ∈ V
43elpw 4563 . . . . . . . . . 10 ((𝑗𝐴) ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ⊆ 𝐴)
51, 4mpbir 230 . . . . . . . . 9 (𝑗𝐴) ∈ 𝒫 𝐴
6 eleq1 2826 . . . . . . . . 9 (𝑎 = (𝑗𝐴) → (𝑎 ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ∈ 𝒫 𝐴))
75, 6mpbiri 258 . . . . . . . 8 (𝑎 = (𝑗𝐴) → 𝑎 ∈ 𝒫 𝐴)
87adantl 483 . . . . . . 7 ((𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
98rexlimivw 3147 . . . . . 6 (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
109abssi 4026 . . . . 5 {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴
11 haustop 22610 . . . . . . . . 9 (𝐽 ∈ Haus → 𝐽 ∈ Top)
12 hauspwpwf1.x . . . . . . . . . 10 𝑋 = 𝐽
1312topopn 22183 . . . . . . . . 9 (𝐽 ∈ Top → 𝑋𝐽)
1411, 13syl 17 . . . . . . . 8 (𝐽 ∈ Haus → 𝑋𝐽)
15 ssexg 5279 . . . . . . . 8 ((𝐴𝑋𝑋𝐽) → 𝐴 ∈ V)
1614, 15sylan2 594 . . . . . . 7 ((𝐴𝑋𝐽 ∈ Haus) → 𝐴 ∈ V)
1716ancoms 460 . . . . . 6 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐴 ∈ V)
18 pwexg 5332 . . . . . 6 (𝐴 ∈ V → 𝒫 𝐴 ∈ V)
19 elpw2g 5300 . . . . . 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 22338 . . . . . . . . . . . 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 3944 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑋)
29 simplrr 777 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
3026, 29sseldd 3944 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦𝑋)
31 simpr 486 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑦)
3212hausnei 22607 . . . . . . . . 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 2739 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) = (𝑘𝐴))
37 elequ2 2122 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → (𝑥𝑗𝑥𝑘))
38 ineq1 4164 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑘 → (𝑗𝐴) = (𝑘𝐴))
3938eqeq2d 2749 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → ((𝑘𝐴) = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑘𝐴)))
4037, 39anbi12d 632 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)) ↔ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))))
4140rspcev 3580 . . . . . . . . . . . . 13 ((𝑘𝐽 ∧ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4234, 35, 36, 41syl12anc 836 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
43 vex 3448 . . . . . . . . . . . . . 14 𝑘 ∈ V
4443inex1 5273 . . . . . . . . . . . . 13 (𝑘𝐴) ∈ V
45 eqeq1 2742 . . . . . . . . . . . . . . 15 (𝑎 = (𝑘𝐴) → (𝑎 = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑗𝐴)))
4645anbi2d 630 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4746rexbidv 3174 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4844, 47elab 3629 . . . . . . . . . . . 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 22176 . . . . . . . . . . . . . . . . . . 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 4153 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ (𝑙𝑗))
6512clsndisj 22354 . . . . . . . . . . . . . . . . . 18 (((𝐽 ∈ Top ∧ 𝐴𝑋𝑦 ∈ ((cls‘𝐽)‘𝐴)) ∧ ((𝑙𝑗) ∈ 𝐽𝑦 ∈ (𝑙𝑗))) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
6651, 53, 55, 60, 64, 65syl32anc 1379 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
67 n0 4305 . . . . . . . . . . . . . . . . 17 (((𝑙𝑗) ∩ 𝐴) ≠ ∅ ↔ ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
6866, 67sylib 217 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
69 elin 3925 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ (𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴))
70 elin 3925 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (𝑙𝑗) ↔ (𝑧𝑙𝑧𝑗))
7170anbi1i 625 . . . . . . . . . . . . . . . . . . 19 ((𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
7269, 71bitri 275 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
73 elin 3925 . . . . . . . . . . . . . . . . . . . . . . . 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 4424 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧𝑘)
82 elinel1 4154 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ (𝑘𝐴) → 𝑧𝑘)
8381, 82nsyl 140 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧 ∈ (𝑘𝐴))
8478, 80, 83syl2anc 585 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ 𝑧 ∈ (𝑘𝐴))
85 nelneq2 2864 . . . . . . . . . . . . . . . . . . . . 21 ((𝑧 ∈ (𝑗𝐴) ∧ ¬ 𝑧 ∈ (𝑘𝐴)) → ¬ (𝑗𝐴) = (𝑘𝐴))
8676, 84, 85syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑗𝐴) = (𝑘𝐴))
87 eqcom 2745 . . . . . . . . . . . . . . . . . . . 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 3145 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9745anbi2d 630 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑦𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9897rexbidv 3174 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9944, 98elab 3629 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
10096, 99sylnibr 329 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
101 nelne1 3040 . . . . . . . . . . 11 (((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∧ ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
10249, 100, 101syl2anc 585 . . . . . . . . . 10 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
103102expr 458 . . . . . . . . 9 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ (𝑘𝐽𝑙𝐽)) → ((𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
104103rexlimdvva 3204 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → (∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
10533, 104mpd 15 . . . . . . 7 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
106105ex 414 . . . . . 6 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → (𝑥𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
107106necon4d 2966 . . . . 5 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} → 𝑥 = 𝑦))
108 eleq1 2826 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝑗𝑦𝑗))
109108anbi1d 631 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗𝑎 = (𝑗𝐴))))
110109rexbidv 3174 . . . . . 6 (𝑥 = 𝑦 → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))))
111110abbidv 2807 . . . . 5 (𝑥 = 𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
112107, 111impbid1 224 . . . 4 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦))
113112ex 414 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴)) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦)))
11422, 113dom2lem 8866 . 2 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
115 hauspwpwf1.f . . 3 𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
116 f1eq1 6729 . . 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 2715  wne 2942  wrex 3072  Vcvv 3444  cin 3908  wss 3909  c0 4281  𝒫 cpw 4559   cuni 4864  cmpt 5187  1-1wf1 6489  cfv 6492  Topctop 22170  clsccl 22297  Hauscha 22587
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 2709  ax-rep 5241  ax-sep 5255  ax-nul 5262  ax-pow 5319  ax-pr 5383  ax-un 7663
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 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2888  df-ne 2943  df-ral 3064  df-rex 3073  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3739  df-csb 3855  df-dif 3912  df-un 3914  df-in 3916  df-ss 3926  df-nul 4282  df-if 4486  df-pw 4561  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4865  df-int 4907  df-iun 4955  df-iin 4956  df-br 5105  df-opab 5167  df-mpt 5188  df-id 5529  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-iota 6444  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-top 22171  df-cld 22298  df-ntr 22299  df-cls 22300  df-haus 22594
This theorem is referenced by:  hauspwpwdom  23267
  Copyright terms: Public domain W3C validator