Metamath Proof Explorer


Theorem opnssneib

Description: Any superset of an open set is a neighborhood of it. (Contributed by NM, 14-Feb-2007)

Ref Expression
Hypothesis neips.1 𝑋 = 𝐽
Assertion opnssneib ( ( 𝐽 ∈ Top ∧ 𝑆𝐽𝑁𝑋 ) → ( 𝑆𝑁𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ) )

Proof

Step Hyp Ref Expression
1 neips.1 𝑋 = 𝐽
2 simplr ( ( ( 𝑆𝐽𝑁𝑋 ) ∧ 𝑆𝑁 ) → 𝑁𝑋 )
3 sseq2 ( 𝑔 = 𝑆 → ( 𝑆𝑔𝑆𝑆 ) )
4 sseq1 ( 𝑔 = 𝑆 → ( 𝑔𝑁𝑆𝑁 ) )
5 3 4 anbi12d ( 𝑔 = 𝑆 → ( ( 𝑆𝑔𝑔𝑁 ) ↔ ( 𝑆𝑆𝑆𝑁 ) ) )
6 ssid 𝑆𝑆
7 6 biantrur ( 𝑆𝑁 ↔ ( 𝑆𝑆𝑆𝑁 ) )
8 5 7 bitr4di ( 𝑔 = 𝑆 → ( ( 𝑆𝑔𝑔𝑁 ) ↔ 𝑆𝑁 ) )
9 8 rspcev ( ( 𝑆𝐽𝑆𝑁 ) → ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) )
10 9 adantlr ( ( ( 𝑆𝐽𝑁𝑋 ) ∧ 𝑆𝑁 ) → ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) )
11 2 10 jca ( ( ( 𝑆𝐽𝑁𝑋 ) ∧ 𝑆𝑁 ) → ( 𝑁𝑋 ∧ ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) ) )
12 11 ex ( ( 𝑆𝐽𝑁𝑋 ) → ( 𝑆𝑁 → ( 𝑁𝑋 ∧ ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) ) ) )
13 12 3adant1 ( ( 𝐽 ∈ Top ∧ 𝑆𝐽𝑁𝑋 ) → ( 𝑆𝑁 → ( 𝑁𝑋 ∧ ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) ) ) )
14 1 eltopss ( ( 𝐽 ∈ Top ∧ 𝑆𝐽 ) → 𝑆𝑋 )
15 1 isnei ( ( 𝐽 ∈ Top ∧ 𝑆𝑋 ) → ( 𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ↔ ( 𝑁𝑋 ∧ ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) ) ) )
16 14 15 syldan ( ( 𝐽 ∈ Top ∧ 𝑆𝐽 ) → ( 𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ↔ ( 𝑁𝑋 ∧ ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) ) ) )
17 16 3adant3 ( ( 𝐽 ∈ Top ∧ 𝑆𝐽𝑁𝑋 ) → ( 𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ↔ ( 𝑁𝑋 ∧ ∃ 𝑔𝐽 ( 𝑆𝑔𝑔𝑁 ) ) ) )
18 13 17 sylibrd ( ( 𝐽 ∈ Top ∧ 𝑆𝐽𝑁𝑋 ) → ( 𝑆𝑁𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ) )
19 ssnei ( ( 𝐽 ∈ Top ∧ 𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ) → 𝑆𝑁 )
20 19 ex ( 𝐽 ∈ Top → ( 𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) → 𝑆𝑁 ) )
21 20 3ad2ant1 ( ( 𝐽 ∈ Top ∧ 𝑆𝐽𝑁𝑋 ) → ( 𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) → 𝑆𝑁 ) )
22 18 21 impbid ( ( 𝐽 ∈ Top ∧ 𝑆𝐽𝑁𝑋 ) → ( 𝑆𝑁𝑁 ∈ ( ( nei ‘ 𝐽 ) ‘ 𝑆 ) ) )