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

Theorem neindisj2 23354
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 23304 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
31isneip 23336 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) ↔ (𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛))))
4 r19.29r 3128 . . . . . . . . . . 11 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
5 pm3.35 815 . . . . . . . . . . . . . . . 16 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑆) ≠ ∅)
6 ssrin 4190 . . . . . . . . . . . . . . . . . 18 (𝑥𝑛 → (𝑥𝑆) ⊆ (𝑛𝑆))
7 sseq2 3960 . . . . . . . . . . . . . . . . . . 19 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) ↔ (𝑥𝑆) ⊆ ∅))
8 ss0 4355 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝑆) ⊆ ∅ → (𝑥𝑆) = ∅)
97, 8biimtrdi 256 . . . . . . . . . . . . . . . . . 18 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) → (𝑥𝑆) = ∅))
106, 9syl5com 32 . . . . . . . . . . . . . . . . 17 (𝑥𝑛 → ((𝑛𝑆) = ∅ → (𝑥𝑆) = ∅))
1110necon3d 2978 . . . . . . . . . . . . . . . 16 (𝑥𝑛 → ((𝑥𝑆) ≠ ∅ → (𝑛𝑆) ≠ ∅))
125, 11syl5com 32 . . . . . . . . . . . . . . 15 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅))
1312ex 418 . . . . . . . . . . . . . 14 (𝑃𝑥 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅)))
1413com23 87 . . . . . . . . . . . . 13 (𝑃𝑥 → (𝑥𝑛 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
1514imp31 423 . . . . . . . . . . . 12 (((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1615rexlimivw 3161 . . . . . . . . . . 11 (∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
174, 16syl 18 . . . . . . . . . 10 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1817ex 418 . . . . . . . . 9 (∃𝑥𝐽 (𝑃𝑥𝑥𝑛) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
1918adantl 487 . . . . . . . 8 ((𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛)) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅))
203, 19biimtrdi 256 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
21203adant2 1149 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
2221com23 87 . . . . 5 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅)))
2322imp 412 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) → (𝑛𝑆) ≠ ∅))
2423ralrimiv 3155 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅)
25 opnneip 23350 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → 𝑥 ∈ ((nei‘𝐽)‘{𝑃}))
26 ineq1 4162 . . . . . . . . . . . . . . 15 (𝑛 = 𝑥 → (𝑛𝑆) = (𝑥𝑆))
2726neeq1d 3016 . . . . . . . . . . . . . 14 (𝑛 = 𝑥 → ((𝑛𝑆) ≠ ∅ ↔ (𝑥𝑆) ≠ ∅))
2827rspccva 3578 . . . . . . . . . . . . 13 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → (𝑥𝑆) ≠ ∅)
29 idd 25 . . . . . . . . . . . . . . 15 ((𝑃𝑋 ∧ (𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) ∧ 𝑆𝑋) → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))
30293exp 1137 . . . . . . . . . . . . . 14 (𝑃𝑋 → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → ((𝑥𝑆) ≠ ∅ → (𝑥𝑆) ≠ ∅))))
3130com14 97 . . . . . . . . . . . . 13 ((𝑥𝑆) ≠ ∅ → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
3228, 31syl 18 . . . . . . . . . . . 12 ((∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ ∧ 𝑥 ∈ ((nei‘𝐽)‘{𝑃})) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
3332ex 418 . . . . . . . . . . 11 (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥 ∈ ((nei‘𝐽)‘{𝑃}) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3433com3l 90 . . . . . . . . . 10 (𝑥 ∈ ((nei‘𝐽)‘{𝑃}) → ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3525, 34mpcom 39 . . . . . . . . 9 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅))))
36353expia 1139 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑥 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑋 → (𝑥𝑆) ≠ ∅)))))
3736com25 100 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑥𝐽) → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))))
3837ex 418 . . . . . 6 (𝐽 ∈ Top → (𝑥𝐽 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑆𝑋 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
3938com25 100 . . . . 5 (𝐽 ∈ Top → (𝑆𝑋 → (𝑃𝑋 → (∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅ → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅))))))
40393imp1 1366 . . . 4 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → (𝑥𝐽 → (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
4140ralrimiv 3155 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅) → ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅))
4224, 41impbida 813 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
432, 42bitrd 282 1 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2145  wne 2957  wral 3078  wrex 3088  cin 3901  wss 3902  c0 4282  {csn 4587   cuni 4870  cfv 6537  Topctop 23124  clsccl 23249  neicnei 23328
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7740
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-br 5108  df-opab 5172  df-mpt 5191  df-id 5554  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-top 23125  df-cld 23250  df-ntr 23251  df-cls 23252  df-nei 23329
This theorem is used by:  islp2  23376  trnei  24124  flimclsi  24210
  Copyright terms: Public domain W3C validator