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

Theorem neips 23231
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 4747 . . . . . 6 (𝑝𝑆 → {𝑝} ⊆ 𝑆)
2 neiss 23227 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑁 ∈ ((nei‘𝐽)‘𝑆) ∧ {𝑝} ⊆ 𝑆) → 𝑁 ∈ ((nei‘𝐽)‘{𝑝}))
31, 2syl3an3 1181 . . . . 5 ((𝐽 ∈ Top ∧ 𝑁 ∈ ((nei‘𝐽)‘𝑆) ∧ 𝑝𝑆) → 𝑁 ∈ ((nei‘𝐽)‘{𝑝}))
433exp 1135 . . . 4 (𝐽 ∈ Top → (𝑁 ∈ ((nei‘𝐽)‘𝑆) → (𝑝𝑆𝑁 ∈ ((nei‘𝐽)‘{𝑝}))))
54ralrimdv 3163 . . 3 (𝐽 ∈ Top → (𝑁 ∈ ((nei‘𝐽)‘𝑆) → ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
653ad2ant1 1149 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) → ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
7 r19.28zv 4463 . . . . 5 (𝑆 ≠ ∅ → (∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁)) ↔ (𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁))))
873ad2ant3 1151 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁)) ↔ (𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁))))
9 ssrab2 4036 . . . . . . . . . 10 {𝑣𝐽𝑣𝑁} ⊆ 𝐽
10 uniopn 23015 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝐽) → {𝑣𝐽𝑣𝑁} ∈ 𝐽)
119, 10mpan2 703 . . . . . . . . 9 (𝐽 ∈ Top → {𝑣𝐽𝑣𝑁} ∈ 𝐽)
1211ad2antrr 738 . . . . . . . 8 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → {𝑣𝐽𝑣𝑁} ∈ 𝐽)
13 sseq1 3964 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑔 → (𝑣𝑁𝑔𝑁))
1413elrab 3653 . . . . . . . . . . . . . . 15 (𝑔 ∈ {𝑣𝐽𝑣𝑁} ↔ (𝑔𝐽𝑔𝑁))
15 elunii 4873 . . . . . . . . . . . . . . 15 ((𝑝𝑔𝑔 ∈ {𝑣𝐽𝑣𝑁}) → 𝑝 {𝑣𝐽𝑣𝑁})
1614, 15sylan2br 606 . . . . . . . . . . . . . 14 ((𝑝𝑔 ∧ (𝑔𝐽𝑔𝑁)) → 𝑝 {𝑣𝐽𝑣𝑁})
1716an12s 661 . . . . . . . . . . . . 13 ((𝑔𝐽 ∧ (𝑝𝑔𝑔𝑁)) → 𝑝 {𝑣𝐽𝑣𝑁})
1817rexlimiva 3158 . . . . . . . . . . . 12 (∃𝑔𝐽 (𝑝𝑔𝑔𝑁) → 𝑝 {𝑣𝐽𝑣𝑁})
1918ralimi 3102 . . . . . . . . . . 11 (∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁) → ∀𝑝𝑆 𝑝 {𝑣𝐽𝑣𝑁})
20 dfss3 3928 . . . . . . . . . . 11 (𝑆 {𝑣𝐽𝑣𝑁} ↔ ∀𝑝𝑆 𝑝 {𝑣𝐽𝑣𝑁})
2119, 20sylibr 237 . . . . . . . . . 10 (∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁) → 𝑆 {𝑣𝐽𝑣𝑁})
2221adantl 486 . . . . . . . . 9 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → 𝑆 {𝑣𝐽𝑣𝑁})
23 unissb 4902 . . . . . . . . . 10 ( {𝑣𝐽𝑣𝑁} ⊆ 𝑁 ↔ ∀ ∈ {𝑣𝐽𝑣𝑁}𝑁)
24 sseq1 3964 . . . . . . . . . . . 12 (𝑣 = → (𝑣𝑁𝑁))
2524elrab 3653 . . . . . . . . . . 11 ( ∈ {𝑣𝐽𝑣𝑁} ↔ (𝐽𝑁))
2625simprbi 502 . . . . . . . . . 10 ( ∈ {𝑣𝐽𝑣𝑁} → 𝑁)
2723, 26mprgbir 3086 . . . . . . . . 9 {𝑣𝐽𝑣𝑁} ⊆ 𝑁
2822, 27jctir 529 . . . . . . . 8 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑆 {𝑣𝐽𝑣𝑁} ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝑁))
29 sseq2 3965 . . . . . . . . . 10 ( = {𝑣𝐽𝑣𝑁} → (𝑆𝑆 {𝑣𝐽𝑣𝑁}))
30 sseq1 3964 . . . . . . . . . 10 ( = {𝑣𝐽𝑣𝑁} → (𝑁 {𝑣𝐽𝑣𝑁} ⊆ 𝑁))
3129, 30anbi12d 643 . . . . . . . . 9 ( = {𝑣𝐽𝑣𝑁} → ((𝑆𝑁) ↔ (𝑆 {𝑣𝐽𝑣𝑁} ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝑁)))
3231rspcev 3584 . . . . . . . 8 (( {𝑣𝐽𝑣𝑁} ∈ 𝐽 ∧ (𝑆 {𝑣𝐽𝑣𝑁} ∧ {𝑣𝐽𝑣𝑁} ⊆ 𝑁)) → ∃𝐽 (𝑆𝑁))
3312, 28, 32syl2anc 595 . . . . . . 7 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → ∃𝐽 (𝑆𝑁))
3433ex 417 . . . . . 6 ((𝐽 ∈ Top ∧ 𝑆𝑋) → (∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁) → ∃𝐽 (𝑆𝑁)))
3534anim2d 623 . . . . 5 ((𝐽 ∈ Top ∧ 𝑆𝑋) → ((𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
36353adant3 1148 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → ((𝑁𝑋 ∧ ∀𝑝𝑆𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
378, 36sylbid 243 . . 3 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁)) → (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
38 ssel2 3934 . . . . . . 7 ((𝑆𝑋𝑝𝑆) → 𝑝𝑋)
39 neips.1 . . . . . . . 8 𝑋 = 𝐽
4039isneip 23223 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝑝𝑋) → (𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4138, 40sylan2 604 . . . . . 6 ((𝐽 ∈ Top ∧ (𝑆𝑋𝑝𝑆)) → (𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4241anassrs 472 . . . . 5 (((𝐽 ∈ Top ∧ 𝑆𝑋) ∧ 𝑝𝑆) → (𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4342ralbidva 3186 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋) → (∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ ∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
44433adant3 1148 . . 3 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝}) ↔ ∀𝑝𝑆 (𝑁𝑋 ∧ ∃𝑔𝐽 (𝑝𝑔𝑔𝑁))))
4539isnei 23221 . . . 4 ((𝐽 ∈ Top ∧ 𝑆𝑋) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
46453adant3 1148 . . 3 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ (𝑁𝑋 ∧ ∃𝐽 (𝑆𝑁))))
4737, 44, 463imtr4d 297 . 2 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝}) → 𝑁 ∈ ((nei‘𝐽)‘𝑆)))
486, 47impbid 215 1 ((𝐽 ∈ Top ∧ 𝑆𝑋𝑆 ≠ ∅) → (𝑁 ∈ ((nei‘𝐽)‘𝑆) ↔ ∀𝑝𝑆 𝑁 ∈ ((nei‘𝐽)‘{𝑝})))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1101   = wceq 1563  wcel 2145  wne 2960  wral 3079  wrex 3089  {crab 3417  wss 3907  c0 4288  {csn 4585   cuni 4868  cfv 6525  Topctop 23011  neicnei 23215
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5232  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4869  df-iun 4954  df-br 5106  df-opab 5168  df-mpt 5187  df-id 5547  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-top 23012  df-nei 23216
This theorem is referenced by:  utop2nei  24368
  Copyright terms: Public domain W3C validator