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

Theorem hauspwpwf1 23147
Description: Lemma for hauspwpwdom 23148. 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 4164 . . . . . . . . . 10 (𝑗𝐴) ⊆ 𝐴
2 vex 3437 . . . . . . . . . . . 12 𝑗 ∈ V
32inex1 5242 . . . . . . . . . . 11 (𝑗𝐴) ∈ V
43elpw 4538 . . . . . . . . . 10 ((𝑗𝐴) ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ⊆ 𝐴)
51, 4mpbir 230 . . . . . . . . 9 (𝑗𝐴) ∈ 𝒫 𝐴
6 eleq1 2827 . . . . . . . . 9 (𝑎 = (𝑗𝐴) → (𝑎 ∈ 𝒫 𝐴 ↔ (𝑗𝐴) ∈ 𝒫 𝐴))
75, 6mpbiri 257 . . . . . . . 8 (𝑎 = (𝑗𝐴) → 𝑎 ∈ 𝒫 𝐴)
87adantl 482 . . . . . . 7 ((𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
98rexlimivw 3212 . . . . . 6 (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) → 𝑎 ∈ 𝒫 𝐴)
109abssi 4004 . . . . 5 {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴
11 haustop 22491 . . . . . . . . 9 (𝐽 ∈ Haus → 𝐽 ∈ Top)
12 hauspwpwf1.x . . . . . . . . . 10 𝑋 = 𝐽
1312topopn 22064 . . . . . . . . 9 (𝐽 ∈ Top → 𝑋𝐽)
1411, 13syl 17 . . . . . . . 8 (𝐽 ∈ Haus → 𝑋𝐽)
15 ssexg 5248 . . . . . . . 8 ((𝐴𝑋𝑋𝐽) → 𝐴 ∈ V)
1614, 15sylan2 593 . . . . . . 7 ((𝐴𝑋𝐽 ∈ Haus) → 𝐴 ∈ V)
1716ancoms 459 . . . . . 6 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → 𝐴 ∈ V)
18 pwexg 5302 . . . . . 6 (𝐴 ∈ V → 𝒫 𝐴 ∈ V)
19 elpw2g 5269 . . . . . 6 (𝒫 𝐴 ∈ V → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2017, 18, 193syl 18 . . . . 5 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴 ↔ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ⊆ 𝒫 𝐴))
2110, 20mpbiri 257 . . . 4 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴)
2221a1d 25 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∈ 𝒫 𝒫 𝐴))
23 simplll 772 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝐽 ∈ Haus)
2412clsss3 22219 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2511, 24sylan 580 . . . . . . . . . . 11 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
2625ad2antrr 723 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ((cls‘𝐽)‘𝐴) ⊆ 𝑋)
27 simplrl 774 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥 ∈ ((cls‘𝐽)‘𝐴))
2826, 27sseldd 3923 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑋)
29 simplrr 775 . . . . . . . . . 10 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
3026, 29sseldd 3923 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑦𝑋)
31 simpr 485 . . . . . . . . 9 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → 𝑥𝑦)
3212hausnei 22488 . . . . . . . . 9 ((𝐽 ∈ Haus ∧ (𝑥𝑋𝑦𝑋𝑥𝑦)) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
3323, 28, 30, 31, 32syl13anc 1371 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → ∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))
34 simprll 776 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑘𝐽)
35 simprr1 1220 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → 𝑥𝑘)
36 eqidd 2740 . . . . . . . . . . . . 13 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) = (𝑘𝐴))
37 elequ2 2122 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → (𝑥𝑗𝑥𝑘))
38 ineq1 4140 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑘 → (𝑗𝐴) = (𝑘𝐴))
3938eqeq2d 2750 . . . . . . . . . . . . . . 15 (𝑗 = 𝑘 → ((𝑘𝐴) = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑘𝐴)))
4037, 39anbi12d 631 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)) ↔ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))))
4140rspcev 3562 . . . . . . . . . . . . 13 ((𝑘𝐽 ∧ (𝑥𝑘 ∧ (𝑘𝐴) = (𝑘𝐴))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4234, 35, 36, 41syl12anc 834 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
43 vex 3437 . . . . . . . . . . . . . 14 𝑘 ∈ V
4443inex1 5242 . . . . . . . . . . . . 13 (𝑘𝐴) ∈ V
45 eqeq1 2743 . . . . . . . . . . . . . . 15 (𝑎 = (𝑘𝐴) → (𝑎 = (𝑗𝐴) ↔ (𝑘𝐴) = (𝑗𝐴)))
4645anbi2d 629 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4746rexbidv 3227 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
4844, 47elab 3610 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑥𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
4942, 48sylibr 233 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
5011ad2antrr 723 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐽 ∈ Top)
5150ad3antrrr 727 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐽 ∈ Top)
52 simplr 766 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝐴𝑋)
5352ad3antrrr 727 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝐴𝑋)
54 simprr 770 . . . . . . . . . . . . . . . . . . 19 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
5554ad3antrrr 727 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ ((cls‘𝐽)‘𝐴))
56 simplr 766 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑙𝐽)
5756ad2antlr 724 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑙𝐽)
58 simprl 768 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑗𝐽)
59 inopn 22057 . . . . . . . . . . . . . . . . . . 19 ((𝐽 ∈ Top ∧ 𝑙𝐽𝑗𝐽) → (𝑙𝑗) ∈ 𝐽)
6051, 57, 58, 59syl3anc 1370 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑙𝑗) ∈ 𝐽)
61 simpr2 1194 . . . . . . . . . . . . . . . . . . . 20 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → 𝑦𝑙)
6261ad2antlr 724 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑙)
63 simprr 770 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦𝑗)
6462, 63elind 4129 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → 𝑦 ∈ (𝑙𝑗))
6512clsndisj 22235 . . . . . . . . . . . . . . . . . 18 (((𝐽 ∈ Top ∧ 𝐴𝑋𝑦 ∈ ((cls‘𝐽)‘𝐴)) ∧ ((𝑙𝑗) ∈ 𝐽𝑦 ∈ (𝑙𝑗))) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
6651, 53, 55, 60, 64, 65syl32anc 1377 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ((𝑙𝑗) ∩ 𝐴) ≠ ∅)
67 n0 4281 . . . . . . . . . . . . . . . . 17 (((𝑙𝑗) ∩ 𝐴) ≠ ∅ ↔ ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
6866, 67sylib 217 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴))
69 elin 3904 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ (𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴))
70 elin 3904 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (𝑙𝑗) ↔ (𝑧𝑙𝑧𝑗))
7170anbi1i 624 . . . . . . . . . . . . . . . . . . 19 ((𝑧 ∈ (𝑙𝑗) ∧ 𝑧𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
7269, 71bitri 274 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) ↔ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))
73 elin 3904 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ (𝑗𝐴) ↔ (𝑧𝑗𝑧𝐴))
7473biimpri 227 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑗𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7574adantll 711 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧 ∈ (𝑗𝐴))
7675ad2antll 726 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧 ∈ (𝑗𝐴))
77 simpll 764 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → 𝑧𝑙)
7877ad2antll 726 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → 𝑧𝑙)
79 simpr3 1195 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅)) → (𝑘𝑙) = ∅)
8079ad2antlr 724 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → (𝑘𝑙) = ∅)
81 minel 4400 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧𝑘)
82 elinel1 4130 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ (𝑘𝐴) → 𝑧𝑘)
8381, 82nsyl 140 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧𝑙 ∧ (𝑘𝑙) = ∅) → ¬ 𝑧 ∈ (𝑘𝐴))
8478, 80, 83syl2anc 584 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ 𝑧 ∈ (𝑘𝐴))
85 nelneq2 2865 . . . . . . . . . . . . . . . . . . . . 21 ((𝑧 ∈ (𝑗𝐴) ∧ ¬ 𝑧 ∈ (𝑘𝐴)) → ¬ (𝑗𝐴) = (𝑘𝐴))
8676, 84, 85syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑗𝐴) = (𝑘𝐴))
87 eqcom 2746 . . . . . . . . . . . . . . . . . . . 20 ((𝑗𝐴) = (𝑘𝐴) ↔ (𝑘𝐴) = (𝑗𝐴))
8886, 87sylnib 328 . . . . . . . . . . . . . . . . . . 19 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ ((𝑗𝐽𝑦𝑗) ∧ ((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴))) → ¬ (𝑘𝐴) = (𝑗𝐴))
8988expr 457 . . . . . . . . . . . . . . . . . 18 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (((𝑧𝑙𝑧𝑗) ∧ 𝑧𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9072, 89syl5bi 241 . . . . . . . . . . . . . . . . 17 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9190exlimdv 1937 . . . . . . . . . . . . . . . 16 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → (∃𝑧 𝑧 ∈ ((𝑙𝑗) ∩ 𝐴) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9268, 91mpd 15 . . . . . . . . . . . . . . 15 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ (𝑗𝐽𝑦𝑗)) → ¬ (𝑘𝐴) = (𝑗𝐴))
9392anassrs 468 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴))
94 nan 827 . . . . . . . . . . . . . 14 (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))) ↔ (((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) ∧ 𝑦𝑗) → ¬ (𝑘𝐴) = (𝑗𝐴)))
9593, 94mpbir 230 . . . . . . . . . . . . 13 ((((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) ∧ 𝑗𝐽) → ¬ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9695nrexdv 3199 . . . . . . . . . . . 12 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
9745anbi2d 629 . . . . . . . . . . . . . 14 (𝑎 = (𝑘𝐴) → ((𝑦𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9897rexbidv 3227 . . . . . . . . . . . . 13 (𝑎 = (𝑘𝐴) → (∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴))))
9944, 98elab 3610 . . . . . . . . . . . 12 ((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ ∃𝑗𝐽 (𝑦𝑗 ∧ (𝑘𝐴) = (𝑗𝐴)))
10096, 99sylnibr 329 . . . . . . . . . . 11 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
101 nelne1 3042 . . . . . . . . . . 11 (((𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ∧ ¬ (𝑘𝐴) ∈ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
10249, 100, 101syl2anc 584 . . . . . . . . . 10 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ ((𝑘𝐽𝑙𝐽) ∧ (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅))) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
103102expr 457 . . . . . . . . 9 (((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) ∧ (𝑘𝐽𝑙𝐽)) → ((𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
104103rexlimdvva 3224 . . . . . . . 8 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → (∃𝑘𝐽𝑙𝐽 (𝑥𝑘𝑦𝑙 ∧ (𝑘𝑙) = ∅) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
10533, 104mpd 15 . . . . . . 7 ((((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) ∧ 𝑥𝑦) → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
106105ex 413 . . . . . 6 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → (𝑥𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} ≠ {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))}))
107106necon4d 2968 . . . . 5 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} → 𝑥 = 𝑦))
108 eleq1 2827 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝑗𝑦𝑗))
109108anbi1d 630 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝑗𝑎 = (𝑗𝐴)) ↔ (𝑦𝑗𝑎 = (𝑗𝐴))))
110109rexbidv 3227 . . . . . 6 (𝑥 = 𝑦 → (∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴)) ↔ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))))
111110abbidv 2808 . . . . 5 (𝑥 = 𝑦 → {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))})
112107, 111impbid1 224 . . . 4 (((𝐽 ∈ Haus ∧ 𝐴𝑋) ∧ (𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴))) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦))
113112ex 413 . . 3 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → ((𝑥 ∈ ((cls‘𝐽)‘𝐴) ∧ 𝑦 ∈ ((cls‘𝐽)‘𝐴)) → ({𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))} = {𝑎 ∣ ∃𝑗𝐽 (𝑦𝑗𝑎 = (𝑗𝐴))} ↔ 𝑥 = 𝑦)))
11422, 113dom2lem 8789 . 2 ((𝐽 ∈ Haus ∧ 𝐴𝑋) → (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))}):((cls‘𝐽)‘𝐴)–1-1→𝒫 𝒫 𝐴)
115 hauspwpwf1.f . . 3 𝐹 = (𝑥 ∈ ((cls‘𝐽)‘𝐴) ↦ {𝑎 ∣ ∃𝑗𝐽 (𝑥𝑗𝑎 = (𝑗𝐴))})
116 f1eq1 6674 . . 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 396  w3a 1086   = wceq 1539  wex 1782  wcel 2107  {cab 2716  wne 2944  wrex 3066  Vcvv 3433  cin 3887  wss 3888  c0 4257  𝒫 cpw 4534   cuni 4840  cmpt 5158  1-1wf1 6434  cfv 6437  Topctop 22051  clsccl 22178  Hauscha 22468
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 2710  ax-rep 5210  ax-sep 5224  ax-nul 5231  ax-pow 5289  ax-pr 5353  ax-un 7597
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2541  df-eu 2570  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-ral 3070  df-rex 3071  df-reu 3073  df-rab 3074  df-v 3435  df-sbc 3718  df-csb 3834  df-dif 3891  df-un 3893  df-in 3895  df-ss 3905  df-nul 4258  df-if 4461  df-pw 4536  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4841  df-int 4881  df-iun 4927  df-iin 4928  df-br 5076  df-opab 5138  df-mpt 5159  df-id 5490  df-xp 5596  df-rel 5597  df-cnv 5598  df-co 5599  df-dm 5600  df-rn 5601  df-res 5602  df-ima 5603  df-iota 6395  df-fun 6439  df-fn 6440  df-f 6441  df-f1 6442  df-fo 6443  df-f1o 6444  df-fv 6445  df-top 22052  df-cld 22179  df-ntr 22180  df-cls 22181  df-haus 22475
This theorem is referenced by:  hauspwpwdom  23148
  Copyright terms: Public domain W3C validator