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

Theorem neips 23142
Description: A neighborhood of a set is a neighborhood of every point in the set. Proposition 1 of [BourbakiTop1] p. I.2. (Contributed by FL, 16-Nov-2006.)
Hypothesis
Ref Expression
neips.1 𝑋 = 𝐽
Assertion
Ref Expression
neips ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
Distinct variable groups:   𝐽,𝑝   𝑁,𝑝   𝑆,𝑝   𝑋,𝑝

Proof of Theorem neips
Dummy variables 𝑔 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 snssi 4833 . . . . . 6 (𝑝𝑆 → {𝑝} ⊆ 𝑆)
2 neiss 23138 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑁 ∈ ((nei‘𝐽)‘𝑆) ∧ {𝑝} ⊆ 𝑆) → 𝑁 ∈ ((nei‘𝐽)‘{𝑝}))
31, 2syl3an3 1165 . . . . 5 ((𝐽 ∈ Top ∧ 𝑁 ∈ ((nei‘𝐽)‘𝑆) ∧ 𝑝𝑆) → 𝑁 ∈ ((nei‘𝐽)‘{𝑝}))
433exp 1119 . . . 4 (𝐽 ∈ Top → (𝑁 ∈ ((nei‘𝐽)‘𝑆) → (𝑝𝑆𝑁 ∈ ((nei‘𝐽)‘{𝑝}))))
54ralrimdv 3158 . . 3 (𝐽 ∈ Top → (𝑁 ∈ ((nei‘𝐽)‘𝑆) → ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
653ad2ant1 1133 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) → ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
7 r19.28zv 4524 . . . . 5 (𝑆 ≠ ∅ → (∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁)) ↔ (𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁))))
873ad2ant3 1135 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁)) ↔ (𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁))))
9 ssrab2 4103 . . . . . . . . . 10 {𝑣𝐽𝑣𝑁} ⊆ 𝐽
10 uniopn 22924 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝐽) → {𝑣𝐽𝑣𝑁} ∈ 𝐽)
119, 10mpan2 690 . . . . . . . . 9 (𝐽 ∈ Top → {𝑣𝐽𝑣𝑁} ∈ 𝐽)
1211ad2antrr 725 . . . . . . . 8 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → {𝑣𝐽𝑣𝑁} ∈ 𝐽)
13 sseq1 4034 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑔 → (𝑣𝑁𝑔𝑁))
1413elrab 3708 . . . . . . . . . . . . . . 15 (𝑔 ∈ {𝑣𝐽𝑣𝑁} ↔ (𝑔𝐽𝑔𝑁))
15 elunii 4936 . . . . . . . . . . . . . . 15 ((𝑝𝑔𝑔 ∈ {𝑣𝐽𝑣𝑁}) → 𝑝 {𝑣𝐽𝑣𝑁})
1614, 15sylan2br 594 . . . . . . . . . . . . . 14 ((𝑝𝑔 ∧ (𝑔𝐽𝑔𝑁)) → 𝑝 {𝑣𝐽𝑣𝑁})
1716an12s 648 . . . . . . . . . . . . 13 ((𝑔𝐽 ∧ (𝑝𝑔𝑔𝑁)) → 𝑝 {𝑣𝐽𝑣𝑁})
1817rexlimiva 3153 . . . . . . . . . . . 12 (∃𝑔𝐽 (𝑝𝑔𝑔𝑁) → 𝑝 {𝑣𝐽𝑣𝑁})
1918ralimi 3089 . . . . . . . . . . 11 (∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁) → ∀𝑝𝑆 𝑝 {𝑣𝐽𝑣𝑁})
20 dfss3 3997 . . . . . . . . . . 11 (𝑆 {𝑣𝐽𝑣𝑁} ↔ ∀𝑝𝑆 𝑝 {𝑣𝐽𝑣𝑁})
2119, 20sylibr 234 . . . . . . . . . 10 (∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁) → 𝑆 {𝑣𝐽𝑣𝑁})
2221adantl 481 . . . . . . . . 9 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → 𝑆 {𝑣𝐽𝑣𝑁})
23 unissb 4963 . . . . . . . . . 10 ( {𝑣𝐽𝑣𝑁} ⊆ 𝑁 ↔ ∀ ∈ {𝑣𝐽𝑣𝑁}𝑁)
24 sseq1 4034 . . . . . . . . . . . 12 (𝑣 = → (𝑣𝑁𝑁))
2524elrab 3708 . . . . . . . . . . 11 ( ∈ {𝑣𝐽𝑣𝑁} ↔ (𝐽𝑁))
2625simprbi 496 . . . . . . . . . 10 ( ∈ {𝑣𝐽𝑣𝑁} → 𝑁)
2723, 26mprgbir 3074 . . . . . . . . 9 {𝑣𝐽𝑣𝑁} ⊆ 𝑁
2822, 27jctir 520 . . . . . . . 8 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑆 {𝑣𝐽𝑣𝑁} ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝑁))
29 sseq2 4035 . . . . . . . . . 10 ( = {𝑣𝐽𝑣𝑁} → (𝑆𝑆 {𝑣𝐽𝑣𝑁}))
30 sseq1 4034 . . . . . . . . . 10 ( = {𝑣𝐽𝑣𝑁} → (𝑁 {𝑣𝐽𝑣𝑁} ⊆ 𝑁))
3129, 30anbi12d 631 . . . . . . . . 9 ( = {𝑣𝐽𝑣𝑁} → ((𝑆𝑁) ↔ (𝑆 {𝑣𝐽𝑣𝑁} ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝑁)))
3231rspcev 3635 . . . . . . . 8 (( {𝑣𝐽𝑣𝑁} ∈ 𝐽 ∧ (𝑆 {𝑣𝐽𝑣𝑁} ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝑁)) → ∃𝐽 (𝑆𝑁))
3312, 28, 32syl2anc 583 . . . . . . 7 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → ∃𝐽 (𝑆𝑁))
3433ex 412 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑆𝑋) → (∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁) → ∃𝐽 (𝑆𝑁)))
3534anim2d 611 . . . . 5 ((𝐽 ∈ Top ∧ 𝑆𝑋) → ((𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
36353adant3 1132 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → ((𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
378, 36sylbid 240 . . 3 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
38 ssel2 4003 . . . . . . 7 ((𝑆𝑋𝑝𝑆) → 𝑝𝑋)
39 neips.1 . . . . . . . 8 𝑋 = 𝐽
4039isneip 23134 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑝𝑋) → (𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4138, 40sylan2 592 . . . . . 6 ((𝐽 ∈ Top ∧ (𝑆𝑋𝑝𝑆)) → (𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4241anassrs 467 . . . . 5 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ 𝑝𝑆) → (𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4342ralbidva 3182 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋) → (∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ ∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
44433adant3 1132 . . 3 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ ∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4539isnei 23132 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
46453adant3 1132 . . 3 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
4737, 44, 463imtr4d 294 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝}) → 𝑁 ∈ ((nei‘𝐽)‘𝑆)))
486, 47impbid 212 1 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1537  wcel 2108  wne 2946  wral 3067  wrex 3076  {crab 3443  wss 3976  c0 4352  {csn 4648   cuni 4931  cfv 6573  Topctop 22920  neicnei 23126
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-id 5593  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-top 22921  df-nei 23127
This theorem is referenced by:  utop2nei  24280
  Copyright terms: Public domain W3C validator