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

Theorem hauspwpwf1 21704
Description: Lemma for hauspwpwdom 21705. 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 3814 . . . . . . . . . 10 (𝑗𝐴) ⊆ 𝐴
2 vex 3189 . . . . . . . . . . . 12 𝑗 ∈ V
32inex1 4761 . . . . . . . . . . 11 (𝑗𝐴) ∈ V
43elpw 4138 . . . . . . . . . 10 ((𝑗𝐴) ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ⊆ 𝐴)
51, 4mpbir 221 . . . . . . . . 9 (𝑗𝐴) ∈ 𝒫 𝐴
6 eleq1 2686 . . . . . . . . 9 (𝑎 = (𝑗𝐴) → (𝑎 ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ∈ 𝒫 𝐴))
75, 6mpbiri 248 . . . . . . . 8 (𝑎 = (𝑗𝐴) → 𝑎 ∈ 𝒫 𝐴)
87adantl 482 . . . . . . 7 ((𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
98rexlimivw 3022 . . . . . 6 (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
109abssi 3658 . . . . 5 {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴
11 haustop 21048 . . . . . . . . 9 (𝐽 ∈ Haus → 𝐽 ∈ Top)
12 hauspwpwf1.x . . . . . . . . . 10 𝑋 = 𝐽
1312topopn 20633 . . . . . . . . 9 (𝐽 ∈ Top → 𝑋𝐽)
1411, 13syl 17 . . . . . . . 8 (𝐽 ∈ Haus → 𝑋𝐽)
15 ssexg 4766 . . . . . . . 8 ((𝐴𝑋𝑋𝐽) → 𝐴 ∈ V)
1614, 15sylan2 491 . . . . . . 7 ((𝐴𝑋𝐽 ∈ Haus) → 𝐴 ∈ V)
1716ancoms 469 . . . . . 6 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐴 ∈ V)
18 pwexg 4812 . . . . . 6 (𝐴 ∈ V → 𝒫 𝐴 ∈ V)
19 elpw2g 4789 . . . . . 6 (𝒫 𝐴 ∈ V → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2017, 18, 193syl 18 . . . . 5 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2110, 20mpbiri 248 . . . 4 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴)
2221a1d 25 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴))
23 simplll 797 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝐽 ∈ Haus)
2412clsss3 20776 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2511, 24sylan 488 . . . . . . . . . . 11 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2625ad2antrr 761 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
27 simplrl 799 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥 ∈ ((cls‘𝐽)‘𝐴))
2826, 27sseldd 3585 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑋)
29 simplrr 800 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
3026, 29sseldd 3585 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦𝑋)
31 simpr 477 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑦)
3212hausnei 21045 . . . . . . . . 9 ((𝐽 ∈ Haus ∧ (𝑥𝑋𝑦𝑋𝑥𝑦)) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
3323, 28, 30, 31, 32syl13anc 1325 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
34 simprll 801 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑘𝐽)
35 simprr1 1107 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑥𝑘)
36 eqidd 2622 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) = (𝑘𝐴))
37 elequ2 2001 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → (𝑥𝑗𝑥𝑘))
38 ineq1 3787 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑘 → (𝑗𝐴) = (𝑘𝐴))
3938eqeq2d 2631 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → ((𝑘𝐴) = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑘𝐴)))
4037, 39anbi12d 746 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)) ↔ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))))
4140rspcev 3295 . . . . . . . . . . . . 13 ((𝑘𝐽 ∧ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4234, 35, 36, 41syl12anc 1321 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
43 vex 3189 . . . . . . . . . . . . . 14 𝑘 ∈ V
4443inex1 4761 . . . . . . . . . . . . 13 (𝑘𝐴) ∈ V
45 eqeq1 2625 . . . . . . . . . . . . . . 15 (𝑎 = (𝑘𝐴) → (𝑎 = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑗𝐴)))
4645anbi2d 739 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4746rexbidv 3045 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4844, 47elab 3334 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4942, 48sylibr 224 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
5011ad2antrr 761 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐽 ∈ Top)
5150ad3antrrr 765 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐽 ∈ Top)
52 simplr 791 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐴𝑋)
5352ad3antrrr 765 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐴𝑋)
54 simprr 795 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
5554ad3antrrr 765 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
56 simplr 791 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑙𝐽)
5756ad2antlr 762 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑙𝐽)
58 simprl 793 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑗𝐽)
59 inopn 20626 . . . . . . . . . . . . . . . . . . 19 ((𝐽 ∈ Top ∧ 𝑙𝐽𝑗𝐽) → (𝑙𝑗) ∈ 𝐽)
6051, 57, 58, 59syl3anc 1323 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑙𝑗) ∈ 𝐽)
61 simpr2 1066 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑦𝑙)
6261ad2antlr 762 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑙)
63 simprr 795 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑗)
6462, 63elind 3778 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ (𝑙𝑗))
6512clsndisj 20792 . . . . . . . . . . . . . . . . . 18 (((𝐽 ∈ Top ∧ 𝐴𝑋𝑦 ∈ ((cls‘𝐽)‘𝐴)) ∧ ((𝑙𝑗) ∈ 𝐽𝑦 ∈ (𝑙𝑗))) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
6651, 53, 55, 60, 64, 65syl32anc 1331 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
67 n0 3909 . . . . . . . . . . . . . . . . 17 (((𝑙𝑗) ∩ 𝐴) ≠ ∅ ↔ ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
6866, 67sylib 208 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
69 elin 3776 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ (𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴))
70 elin 3776 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (𝑙𝑗) ↔ (𝑧𝑙𝑧𝑗))
7170anbi1i 730 . . . . . . . . . . . . . . . . . . 19 ((𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
7269, 71bitri 264 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
73 elin 3776 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ (𝑗𝐴) ↔ (𝑧𝑗𝑧𝐴))
7473biimpri 218 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑗𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7574adantll 749 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7675ad2antll 764 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧 ∈ (𝑗𝐴))
77 simpll 789 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧𝑙)
7877ad2antll 764 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧𝑙)
79 simpr3 1067 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → (𝑘𝑙) = ∅)
8079ad2antlr 762 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → (𝑘𝑙) = ∅)
81 minel 4007 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧𝑘)
82 inss1 3813 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘𝐴) ⊆ 𝑘
8382sseli 3580 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ (𝑘𝐴) → 𝑧𝑘)
8481, 83nsyl 135 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧 ∈ (𝑘𝐴))
8578, 80, 84syl2anc 692 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ 𝑧 ∈ (𝑘𝐴))
86 nelneq2 2723 . . . . . . . . . . . . . . . . . . . . 21 ((𝑧 ∈ (𝑗𝐴) ∧ ¬ 𝑧 ∈ (𝑘𝐴)) → ¬ (𝑗𝐴) = (𝑘𝐴))
8776, 85, 86syl2anc 692 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑗𝐴) = (𝑘𝐴))
88 eqcom 2628 . . . . . . . . . . . . . . . . . . . 20 ((𝑗𝐴) = (𝑘𝐴) ↔ (𝑘𝐴) = (𝑗𝐴))
8987, 88sylnib 318 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑘𝐴) = (𝑗𝐴))
9089expr 642 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9172, 90syl5bi 232 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9291exlimdv 1858 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9368, 92mpd 15 . . . . . . . . . . . . . . 15 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ¬ (𝑘𝐴) = (𝑗𝐴))
9493anassrs 679 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴))
95 nan 603 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))) ↔ (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9694, 95mpbir 221 . . . . . . . . . . . . 13 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9796nrexdv 2995 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9845anbi2d 739 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑦𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9998rexbidv 3045 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
10044, 99elab 3334 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
10197, 100sylnibr 319 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
102 nelne1 2886 . . . . . . . . . . 11 (((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∧ ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
10349, 101, 102syl2anc 692 . . . . . . . . . 10 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
104103expr 642 . . . . . . . . 9 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ (𝑘𝐽𝑙𝐽)) → ((𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
105104rexlimdvva 3031 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → (∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
10633, 105mpd 15 . . . . . . 7 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
107106ex 450 . . . . . 6 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → (𝑥𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
108107necon4d 2814 . . . . 5 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} → 𝑥 = 𝑦))
109 eleq1 2686 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝑗𝑦𝑗))
110109anbi1d 740 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗𝑎 = (𝑗𝐴))))
111110rexbidv 3045 . . . . . 6 (𝑥 = 𝑦 → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))))
112111abbidv 2738 . . . . 5 (𝑥 = 𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
113108, 112impbid1 215 . . . 4 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦))
114113ex 450 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴)) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦)))
11522, 114dom2lem 7942 . 2 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
116 hauspwpwf1.f . . 3 𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
117 f1eq1 6055 . . 3 (𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}) → (𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴 ↔ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴))
118116, 117ax-mp 5 . 2 (𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴 ↔ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
119115, 118sylibr 224 1 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐹:((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 384  w3a 1036   = wceq 1480  wex 1701  wcel 1987  {cab 2607  wne 2790  wrex 2908  Vcvv 3186  cin 3555  wss 3556  c0 3893  𝒫 cpw 4132   cuni 4404  cmpt 4675  1-1wf1 5846  cfv 5849  Topctop 20620  clsccl 20735  Hauscha 21025
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4733  ax-sep 4743  ax-nul 4751  ax-pow 4805  ax-pr 4869  ax-un 6905
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-ral 2912  df-rex 2913  df-reu 2914  df-rab 2916  df-v 3188  df-sbc 3419  df-csb 3516  df-dif 3559  df-un 3561  df-in 3563  df-ss 3570  df-nul 3894  df-if 4061  df-pw 4134  df-sn 4151  df-pr 4153  df-op 4157  df-uni 4405  df-int 4443  df-iun 4489  df-iin 4490  df-br 4616  df-opab 4676  df-mpt 4677  df-id 4991  df-xp 5082  df-rel 5083  df-cnv 5084  df-co 5085  df-dm 5086  df-rn 5087  df-res 5088  df-ima 5089  df-iota 5812  df-fun 5851  df-fn 5852  df-f 5853  df-f1 5854  df-fo 5855  df-f1o 5856  df-fv 5857  df-top 20621  df-cld 20736  df-ntr 20737  df-cls 20738  df-haus 21032
This theorem is referenced by:  hauspwpwdom  21705
  Copyright terms: Public domain W3C validator