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

Theorem neindisj2 23017
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 22967 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
31isneip 22999 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) ↔ (𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛))))
4 r19.29r 3097 . . . . . . . . . . 11 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
5 pm3.35 802 . . . . . . . . . . . . . . . 16 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑆) ≠ ∅)
6 ssrin 4208 . . . . . . . . . . . . . . . . . 18 (𝑥𝑛 → (𝑥𝑆) ⊆ (𝑛𝑆))
7 sseq2 3976 . . . . . . . . . . . . . . . . . . 19 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) ↔ (𝑥𝑆) ⊆ ∅))
8 ss0 4368 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝑆) ⊆ ∅ → (𝑥𝑆) = ∅)
97, 8biimtrdi 253 . . . . . . . . . . . . . . . . . 18 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) → (𝑥𝑆) = ∅))
106, 9syl5com 31 . . . . . . . . . . . . . . . . 17 (𝑥𝑛 → ((𝑛𝑆) = ∅ → (𝑥𝑆) = ∅))
1110necon3d 2947 . . . . . . . . . . . . . . . 16 (𝑥𝑛 → ((𝑥𝑆) ≠ ∅ → (𝑛𝑆) ≠ ∅))
125, 11syl5com 31 . . . . . . . . . . . . . . 15 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅))
1312ex 412 . . . . . . . . . . . . . 14 (𝑃𝑥 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅)))
1413com23 86 . . . . . . . . . . . . 13 (𝑃𝑥 → (𝑥𝑛 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
1514imp31 417 . . . . . . . . . . . 12 (((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1615rexlimivw 3131 . . . . . . . . . . 11 (∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
174, 16syl 17 . . . . . . . . . 10 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1817ex 412 . . . . . . . . 9 (∃𝑥𝐽 (𝑃𝑥𝑥𝑛) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
1918adantl 481 . . . . . . . 8 ((𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛)) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
203, 19biimtrdi 253 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
21203adant2 1131 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
2221com23 86 . . . . 5 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅)))
2322imp 406 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅))
2423ralrimiv 3125 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅)
25 opnneip 23013 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → 𝑥 ∈ ((nei‘𝐽)‘{𝑃}))
26 ineq1 4179 . . . . . . . . . . . . . . 15 (𝑛 = 𝑥 → (𝑛𝑆) = (𝑥𝑆))
2726neeq1d 2985 . . . . . . . . . . . . . 14 (𝑛 = 𝑥 → ((𝑛𝑆) ≠ ∅ ↔ (𝑥𝑆) ≠ ∅))
2827rspccva 3590 . . . . . . . . . . . . 13 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → (𝑥𝑆) ≠ ∅)
29 idd 24 . . . . . . . . . . . . . . 15 ((𝑃𝑋 ∧ (𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) ∧ 𝑆𝑋) → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))
30293exp 1119 . . . . . . . . . . . . . 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 1121 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑥 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3736com25 99 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))))
3837ex 412 . . . . . 6 (𝐽 ∈ Top → (𝑥𝐽 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
3938com25 99 . . . . 5 (𝐽 ∈ Top → (𝑆𝑋 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
40393imp1 1348 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
4140ralrimiv 3125 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅))
4224, 41impbida 800 . 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 1086   = wceq 1540  wcel 2109  wne 2926  wral 3045  wrex 3054  cin 3916  wss 3917  c0 4299  {csn 4592   cuni 4874  cfv 6514  Topctop 22787  clsccl 22912  neicnei 22991
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 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-iin 4961  df-br 5111  df-opab 5173  df-mpt 5192  df-id 5536  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-top 22788  df-cld 22913  df-ntr 22914  df-cls 22915  df-nei 22992
This theorem is referenced by:  islp2  23039  trnei  23786  flimclsi  23872
  Copyright terms: Public domain W3C validator