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

Theorem neindisj2 23317
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 23267 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) → (𝑃 ∈ ((cls‘𝐽)‘𝑆) ↔ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
31isneip 23299 . . . . . . . 8 ((𝐽 ∈ Top ∧ 𝑃𝑋) → (𝑛 ∈ ((nei‘𝐽)‘{𝑃}) ↔ (𝑛𝑋 ∧ ∃𝑥𝐽 (𝑃𝑥𝑥𝑛))))
4 r19.29r 3132 . . . . . . . . . . 11 ((∃𝑥𝐽 (𝑃𝑥𝑥𝑛) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∃𝑥𝐽 ((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)))
5 pm3.35 815 . . . . . . . . . . . . . . . 16 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑆) ≠ ∅)
6 ssrin 4197 . . . . . . . . . . . . . . . . . 18 (𝑥𝑛 → (𝑥𝑆) ⊆ (𝑛𝑆))
7 sseq2 3966 . . . . . . . . . . . . . . . . . . 19 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) ↔ (𝑥𝑆) ⊆ ∅))
8 ss0 4362 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝑆) ⊆ ∅ → (𝑥𝑆) = ∅)
97, 8biimtrdi 256 . . . . . . . . . . . . . . . . . 18 ((𝑛𝑆) = ∅ → ((𝑥𝑆) ⊆ (𝑛𝑆) → (𝑥𝑆) = ∅))
106, 9syl5com 32 . . . . . . . . . . . . . . . . 17 (𝑥𝑛 → ((𝑛𝑆) = ∅ → (𝑥𝑆) = ∅))
1110necon3d 2982 . . . . . . . . . . . . . . . 16 (𝑥𝑛 → ((𝑥𝑆) ≠ ∅ → (𝑛𝑆) ≠ ∅))
125, 11syl5com 32 . . . . . . . . . . . . . . 15 ((𝑃𝑥 ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅))
1312ex 418 . . . . . . . . . . . . . 14 (𝑃𝑥 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑥𝑛 → (𝑛𝑆) ≠ ∅)))
1413com23 87 . . . . . . . . . . . . 13 (𝑃𝑥 → (𝑥𝑛 → ((𝑃𝑥 → (𝑥𝑆) ≠ ∅) → (𝑛𝑆) ≠ ∅)))
1514imp31 423 . . . . . . . . . . . 12 (((𝑃𝑥𝑥𝑛) ∧ (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → (𝑛𝑆) ≠ ∅)
1615rexlimivw 3165 . . . . . . . . . . 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 3159 . . 3 (((𝐽 ∈ Top ∧ 𝑆𝑋𝑃𝑋) ∧ ∀𝑥𝐽 (𝑃𝑥 → (𝑥𝑆) ≠ ∅)) → ∀𝑛 ∈ ((nei‘𝐽)‘{𝑃})(𝑛𝑆) ≠ ∅)
25 opnneip 23313 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ 𝑥𝐽𝑃𝑥) → 𝑥 ∈ ((nei‘𝐽)‘{𝑃}))
26 ineq1 4169 . . . . . . . . . . . . . . 15 (𝑛 = 𝑥 → (𝑛𝑆) = (𝑥𝑆))
2726neeq1d 3020 . . . . . . . . . . . . . 14 (𝑛 = 𝑥 → ((𝑛𝑆) ≠ ∅ ↔ (𝑥𝑆) ≠ ∅))
2827rspccva 3583 . . . . . . . . . . . . 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 3159 . . 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 2146  wne 2961  wral 3082  wrex 3092  cin 3907  wss 3908  c0 4289  {csn 4594   cuni 4877  cfv 6543  Topctop 23087  clsccl 23212  neicnei 23291
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 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745
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 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-int 4918  df-iun 4963  df-iin 4964  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5561  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-top 23088  df-cld 23213  df-ntr 23214  df-cls 23215  df-nei 23292
This theorem is used by:  islp2  23339  trnei  24086  flimclsi  24172
  Copyright terms: Public domain W3C validator