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

Theorem neindisj2 23163
Description: A point 𝑃 belongs to the closure of a set 𝑆 iff every neighborhood of 𝑃 meets 𝑆. (Contributed by FL, 15-Sep-2013.)
Hypothesis
Ref Expression
tpnei.1 𝑋 = 𝐽
Assertion
Ref Expression
neindisj2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
Distinct variable groups:   𝑛,𝐽   𝑃,𝑛   𝑆,𝑛   𝑛,𝑋

Proof of Theorem neindisj2
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 tpnei.1 . . 3 𝑋 = 𝐽
21elcls 23113 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
31isneip 23145 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) ↔ (𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛))))
4 r19.29r 3125 . . . . . . . . . . 11 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
5 pm3.35 812 . . . . . . . . . . . . . . . 16 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑆) ≠ ∅)
6 ssrin 4193 . . . . . . . . . . . . . . . . . 18 (𝑥𝑛 → (𝑥𝑆) ⊆ (𝑛𝑆))
7 sseq2 3962 . . . . . . . . . . . . . . . . . . 19 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) ↔ (𝑥𝑆) ⊆ ∅))
8 ss0 4355 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝑆) ⊆ ∅ → (𝑥𝑆) = ∅)
97, 8biimtrdi 255 . . . . . . . . . . . . . . . . . 18 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) → (𝑥𝑆) = ∅))
106, 9syl5com 31 . . . . . . . . . . . . . . . . 17 (𝑥𝑛 → ((𝑛𝑆) = ∅ → (𝑥𝑆) = ∅))
1110necon3d 2977 . . . . . . . . . . . . . . . 16 (𝑥𝑛 → ((𝑥𝑆) ≠ ∅ → (𝑛𝑆) ≠ ∅))
125, 11syl5com 31 . . . . . . . . . . . . . . 15 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅))
1312ex 416 . . . . . . . . . . . . . 14 (𝑃𝑥 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅)))
1413com23 86 . . . . . . . . . . . . 13 (𝑃𝑥 → (𝑥𝑛 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
1514imp31 421 . . . . . . . . . . . 12 (((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1615rexlimivw 3158 . . . . . . . . . . 11 (∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
174, 16syl 17 . . . . . . . . . 10 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1817ex 416 . . . . . . . . 9 (∃𝑥𝐽 (𝑃𝑥𝑥𝑛) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
1918adantl 485 . . . . . . . 8 ((𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛)) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
203, 19biimtrdi 255 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
21203adant2 1143 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
2221com23 86 . . . . 5 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅)))
2322imp 410 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅))
2423ralrimiv 3152 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅)
25 opnneip 23159 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → 𝑥 ∈ ((nei‘𝐽)‘{𝑃}))
26 ineq1 4165 . . . . . . . . . . . . . . 15 (𝑛 = 𝑥 → (𝑛𝑆) = (𝑥𝑆))
2726neeq1d 3015 . . . . . . . . . . . . . 14 (𝑛 = 𝑥 → ((𝑛𝑆) ≠ ∅ ↔ (𝑥𝑆) ≠ ∅))
2827rspccva 3580 . . . . . . . . . . . . 13 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → (𝑥𝑆) ≠ ∅)
29 idd 24 . . . . . . . . . . . . . . 15 ((𝑃𝑋 ∧ (𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) ∧ 𝑆𝑋) → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))
30293exp 1131 . . . . . . . . . . . . . 14 (𝑃𝑋 → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))))
3130com14 96 . . . . . . . . . . . . 13 ((𝑥𝑆) ≠ ∅ → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
3228, 31syl 17 . . . . . . . . . . . 12 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
3332ex 416 . . . . . . . . . . 11 (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥 ∈ ((nei‘𝐽)‘{𝑃}) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3433com3l 89 . . . . . . . . . 10 (𝑥 ∈ ((nei‘𝐽)‘{𝑃}) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3525, 34mpcom 38 . . . . . . . . 9 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
36353expia 1133 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑥 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3736com25 99 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))))
3837ex 416 . . . . . 6 (𝐽 ∈ Top → (𝑥𝐽 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
3938com25 99 . . . . 5 (𝐽 ∈ Top → (𝑆𝑋 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
40393imp1 1360 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
4140ralrimiv 3152 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅))
4224, 41impbida 810 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
432, 42bitrd 281 1 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399  w3a 1097   = wceq 1559  wcel 2141  wne 2956  wral 3075  wrex 3085  cin 3903  wss 3904  c0 4285  {csn 4581   cuni 4864  cfv 6517  Topctop 22933  clsccl 23058  neicnei 23137
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5321  ax-pr 5389  ax-un 7714
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-int 4905  df-iun 4950  df-iin 4951  df-br 5100  df-opab 5162  df-mpt 5181  df-id 5540  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-ima 5658  df-iota 6473  df-fun 6519  df-fn 6520  df-f 6521  df-f1 6522  df-fo 6523  df-f1o 6524  df-fv 6525  df-top 22934  df-cld 23059  df-ntr 23060  df-cls 23061  df-nei 23138
This theorem is referenced by:  islp2  23185  trnei  23932  flimclsi  24018
  Copyright terms: Public domain W3C validator