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

Theorem neindisj2 23131
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 23081 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
31isneip 23113 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) ↔ (𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛))))
4 r19.29r 3116 . . . . . . . . . . 11 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
5 pm3.35 803 . . . . . . . . . . . . . . . 16 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑆) ≠ ∅)
6 ssrin 4242 . . . . . . . . . . . . . . . . . 18 (𝑥𝑛 → (𝑥𝑆) ⊆ (𝑛𝑆))
7 sseq2 4010 . . . . . . . . . . . . . . . . . . 19 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) ↔ (𝑥𝑆) ⊆ ∅))
8 ss0 4402 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝑆) ⊆ ∅ → (𝑥𝑆) = ∅)
97, 8biimtrdi 253 . . . . . . . . . . . . . . . . . 18 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) → (𝑥𝑆) = ∅))
106, 9syl5com 31 . . . . . . . . . . . . . . . . 17 (𝑥𝑛 → ((𝑛𝑆) = ∅ → (𝑥𝑆) = ∅))
1110necon3d 2961 . . . . . . . . . . . . . . . 16 (𝑥𝑛 → ((𝑥𝑆) ≠ ∅ → (𝑛𝑆) ≠ ∅))
125, 11syl5com 31 . . . . . . . . . . . . . . 15 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅))
1312ex 412 . . . . . . . . . . . . . 14 (𝑃𝑥 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅)))
1413com23 86 . . . . . . . . . . . . 13 (𝑃𝑥 → (𝑥𝑛 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
1514imp31 417 . . . . . . . . . . . 12 (((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1615rexlimivw 3151 . . . . . . . . . . 11 (∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
174, 16syl 17 . . . . . . . . . 10 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1817ex 412 . . . . . . . . 9 (∃𝑥𝐽 (𝑃𝑥𝑥𝑛) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
1918adantl 481 . . . . . . . 8 ((𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛)) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
203, 19biimtrdi 253 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
21203adant2 1132 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
2221com23 86 . . . . 5 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅)))
2322imp 406 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅))
2423ralrimiv 3145 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅)
25 opnneip 23127 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → 𝑥 ∈ ((nei‘𝐽)‘{𝑃}))
26 ineq1 4213 . . . . . . . . . . . . . . 15 (𝑛 = 𝑥 → (𝑛𝑆) = (𝑥𝑆))
2726neeq1d 3000 . . . . . . . . . . . . . 14 (𝑛 = 𝑥 → ((𝑛𝑆) ≠ ∅ ↔ (𝑥𝑆) ≠ ∅))
2827rspccva 3621 . . . . . . . . . . . . 13 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → (𝑥𝑆) ≠ ∅)
29 idd 24 . . . . . . . . . . . . . . 15 ((𝑃𝑋 ∧ (𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) ∧ 𝑆𝑋) → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))
30293exp 1120 . . . . . . . . . . . . . 14 (𝑃𝑋 → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))))
3130com14 96 . . . . . . . . . . . . 13 ((𝑥𝑆) ≠ ∅ → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
3228, 31syl 17 . . . . . . . . . . . 12 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
3332ex 412 . . . . . . . . . . 11 (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥 ∈ ((nei‘𝐽)‘{𝑃}) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3433com3l 89 . . . . . . . . . 10 (𝑥 ∈ ((nei‘𝐽)‘{𝑃}) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3525, 34mpcom 38 . . . . . . . . 9 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
36353expia 1122 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑥 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3736com25 99 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))))
3837ex 412 . . . . . 6 (𝐽 ∈ Top → (𝑥𝐽 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
3938com25 99 . . . . 5 (𝐽 ∈ Top → (𝑆𝑋 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
40393imp1 1348 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
4140ralrimiv 3145 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅))
4224, 41impbida 801 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
432, 42bitrd 279 1 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1540  wcel 2108  wne 2940  wral 3061  wrex 3070  cin 3950  wss 3951  c0 4333  {csn 4626   cuni 4907  cfv 6561  Topctop 22899  clsccl 23026  neicnei 23105
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5279  ax-sep 5296  ax-nul 5306  ax-pow 5365  ax-pr 5432  ax-un 7755
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-reu 3381  df-rab 3437  df-v 3482  df-sbc 3789  df-csb 3900  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-int 4947  df-iun 4993  df-iin 4994  df-br 5144  df-opab 5206  df-mpt 5226  df-id 5578  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-top 22900  df-cld 23027  df-ntr 23028  df-cls 23029  df-nei 23106
This theorem is referenced by:  islp2  23153  trnei  23900  flimclsi  23986
  Copyright terms: Public domain W3C validator