Metamath Proof Explorer


Theorem ntrss

Description: Subset relationship for interior. (Contributed by NM, 3-Oct-2007)

Ref Expression
Hypothesis clscld.1 𝑋 = 𝐽
Assertion ntrss ( ( 𝐽 ∈ Top ∧ 𝑆𝑋𝑇𝑆 ) → ( ( int ‘ 𝐽 ) ‘ 𝑇 ) ⊆ ( ( int ‘ 𝐽 ) ‘ 𝑆 ) )

Proof

Step Hyp Ref Expression
1 clscld.1 𝑋 = 𝐽
2 sscon ( 𝑇𝑆 → ( 𝑋𝑆 ) ⊆ ( 𝑋𝑇 ) )
3 2 adantl ( ( 𝑆𝑋𝑇𝑆 ) → ( 𝑋𝑆 ) ⊆ ( 𝑋𝑇 ) )
4 difss ( 𝑋𝑇 ) ⊆ 𝑋
5 3 4 jctil ( ( 𝑆𝑋𝑇𝑆 ) → ( ( 𝑋𝑇 ) ⊆ 𝑋 ∧ ( 𝑋𝑆 ) ⊆ ( 𝑋𝑇 ) ) )
6 1 clsss ( ( 𝐽 ∈ Top ∧ ( 𝑋𝑇 ) ⊆ 𝑋 ∧ ( 𝑋𝑆 ) ⊆ ( 𝑋𝑇 ) ) → ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑆 ) ) ⊆ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑇 ) ) )
7 6 3expb ( ( 𝐽 ∈ Top ∧ ( ( 𝑋𝑇 ) ⊆ 𝑋 ∧ ( 𝑋𝑆 ) ⊆ ( 𝑋𝑇 ) ) ) → ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑆 ) ) ⊆ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑇 ) ) )
8 5 7 sylan2 ( ( 𝐽 ∈ Top ∧ ( 𝑆𝑋𝑇𝑆 ) ) → ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑆 ) ) ⊆ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑇 ) ) )
9 8 sscond ( ( 𝐽 ∈ Top ∧ ( 𝑆𝑋𝑇𝑆 ) ) → ( 𝑋 ∖ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑇 ) ) ) ⊆ ( 𝑋 ∖ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑆 ) ) ) )
10 sstr2 ( 𝑇𝑆 → ( 𝑆𝑋𝑇𝑋 ) )
11 10 impcom ( ( 𝑆𝑋𝑇𝑆 ) → 𝑇𝑋 )
12 1 ntrval2 ( ( 𝐽 ∈ Top ∧ 𝑇𝑋 ) → ( ( int ‘ 𝐽 ) ‘ 𝑇 ) = ( 𝑋 ∖ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑇 ) ) ) )
13 11 12 sylan2 ( ( 𝐽 ∈ Top ∧ ( 𝑆𝑋𝑇𝑆 ) ) → ( ( int ‘ 𝐽 ) ‘ 𝑇 ) = ( 𝑋 ∖ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑇 ) ) ) )
14 1 ntrval2 ( ( 𝐽 ∈ Top ∧ 𝑆𝑋 ) → ( ( int ‘ 𝐽 ) ‘ 𝑆 ) = ( 𝑋 ∖ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑆 ) ) ) )
15 14 adantrr ( ( 𝐽 ∈ Top ∧ ( 𝑆𝑋𝑇𝑆 ) ) → ( ( int ‘ 𝐽 ) ‘ 𝑆 ) = ( 𝑋 ∖ ( ( cls ‘ 𝐽 ) ‘ ( 𝑋𝑆 ) ) ) )
16 9 13 15 3sstr4d ( ( 𝐽 ∈ Top ∧ ( 𝑆𝑋𝑇𝑆 ) ) → ( ( int ‘ 𝐽 ) ‘ 𝑇 ) ⊆ ( ( int ‘ 𝐽 ) ‘ 𝑆 ) )
17 16 3impb ( ( 𝐽 ∈ Top ∧ 𝑆𝑋𝑇𝑆 ) → ( ( int ‘ 𝐽 ) ‘ 𝑇 ) ⊆ ( ( int ‘ 𝐽 ) ‘ 𝑆 ) )