Metamath Proof Explorer


Theorem ntrneik3

Description: The intersection of interiors of any pair is a subset of the interior of the intersection if and only if the intersection of any two neighborhoods of a point is also a neighborhood. (Contributed by RP, 19-Jun-2021)

Ref Expression
Hypotheses ntrnei.o 𝑂 = ( 𝑖 ∈ V , 𝑗 ∈ V ↦ ( 𝑘 ∈ ( 𝒫 𝑗m 𝑖 ) ↦ ( 𝑙𝑗 ↦ { 𝑚𝑖𝑙 ∈ ( 𝑘𝑚 ) } ) ) )
ntrnei.f 𝐹 = ( 𝒫 𝐵 𝑂 𝐵 )
ntrnei.r ( 𝜑𝐼 𝐹 𝑁 )
Assertion ntrneik3 ( 𝜑 → ( ∀ 𝑠 ∈ 𝒫 𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵𝑠 ∈ 𝒫 𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )

Proof

Step Hyp Ref Expression
1 ntrnei.o 𝑂 = ( 𝑖 ∈ V , 𝑗 ∈ V ↦ ( 𝑘 ∈ ( 𝒫 𝑗m 𝑖 ) ↦ ( 𝑙𝑗 ↦ { 𝑚𝑖𝑙 ∈ ( 𝑘𝑚 ) } ) ) )
2 ntrnei.f 𝐹 = ( 𝒫 𝐵 𝑂 𝐵 )
3 ntrnei.r ( 𝜑𝐼 𝐹 𝑁 )
4 dfss3 ( ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) )
5 1 2 3 ntrneiiex ( 𝜑𝐼 ∈ ( 𝒫 𝐵m 𝒫 𝐵 ) )
6 elmapi ( 𝐼 ∈ ( 𝒫 𝐵m 𝒫 𝐵 ) → 𝐼 : 𝒫 𝐵 ⟶ 𝒫 𝐵 )
7 5 6 syl ( 𝜑𝐼 : 𝒫 𝐵 ⟶ 𝒫 𝐵 )
8 7 ffvelrnda ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) → ( 𝐼𝑠 ) ∈ 𝒫 𝐵 )
9 8 elpwid ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) → ( 𝐼𝑠 ) ⊆ 𝐵 )
10 ssinss1 ( ( 𝐼𝑠 ) ⊆ 𝐵 → ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ 𝐵 )
11 9 10 syl ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) → ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ 𝐵 )
12 11 adantr ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) → ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ 𝐵 )
13 ralss ( ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ 𝐵 → ( ∀ 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵 ( 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) → 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ) ) )
14 12 13 syl ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) → ( ∀ 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵 ( 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) → 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ) ) )
15 elin ( 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ↔ ( 𝑥 ∈ ( 𝐼𝑠 ) ∧ 𝑥 ∈ ( 𝐼𝑡 ) ) )
16 3 ad3antrrr ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → 𝐼 𝐹 𝑁 )
17 simpr ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → 𝑥𝐵 )
18 simpllr ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → 𝑠 ∈ 𝒫 𝐵 )
19 1 2 16 17 18 ntrneiel ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( 𝑥 ∈ ( 𝐼𝑠 ) ↔ 𝑠 ∈ ( 𝑁𝑥 ) ) )
20 simplr ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → 𝑡 ∈ 𝒫 𝐵 )
21 1 2 16 17 20 ntrneiel ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( 𝑥 ∈ ( 𝐼𝑡 ) ↔ 𝑡 ∈ ( 𝑁𝑥 ) ) )
22 19 21 anbi12d ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( ( 𝑥 ∈ ( 𝐼𝑠 ) ∧ 𝑥 ∈ ( 𝐼𝑡 ) ) ↔ ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) ) )
23 15 22 syl5bb ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ↔ ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) ) )
24 1 2 3 ntrneibex ( 𝜑𝐵 ∈ V )
25 24 ad3antrrr ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → 𝐵 ∈ V )
26 18 elpwid ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → 𝑠𝐵 )
27 ssinss1 ( 𝑠𝐵 → ( 𝑠𝑡 ) ⊆ 𝐵 )
28 26 27 syl ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( 𝑠𝑡 ) ⊆ 𝐵 )
29 25 28 sselpwd ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( 𝑠𝑡 ) ∈ 𝒫 𝐵 )
30 1 2 16 17 29 ntrneiel ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) )
31 23 30 imbi12d ( ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) ∧ 𝑥𝐵 ) → ( ( 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) → 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ) ↔ ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
32 31 ralbidva ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) → ( ∀ 𝑥𝐵 ( 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) → 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ) ↔ ∀ 𝑥𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
33 14 32 bitrd ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) → ( ∀ 𝑥 ∈ ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) 𝑥 ∈ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
34 4 33 syl5bb ( ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) ∧ 𝑡 ∈ 𝒫 𝐵 ) → ( ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
35 34 ralbidva ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) → ( ∀ 𝑡 ∈ 𝒫 𝐵 ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑡 ∈ 𝒫 𝐵𝑥𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
36 ralcom ( ∀ 𝑡 ∈ 𝒫 𝐵𝑥𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ↔ ∀ 𝑥𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) )
37 35 36 bitrdi ( ( 𝜑𝑠 ∈ 𝒫 𝐵 ) → ( ∀ 𝑡 ∈ 𝒫 𝐵 ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
38 37 ralbidva ( 𝜑 → ( ∀ 𝑠 ∈ 𝒫 𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑠 ∈ 𝒫 𝐵𝑥𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )
39 ralcom ( ∀ 𝑠 ∈ 𝒫 𝐵𝑥𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ↔ ∀ 𝑥𝐵𝑠 ∈ 𝒫 𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) )
40 38 39 bitrdi ( 𝜑 → ( ∀ 𝑠 ∈ 𝒫 𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝐼𝑠 ) ∩ ( 𝐼𝑡 ) ) ⊆ ( 𝐼 ‘ ( 𝑠𝑡 ) ) ↔ ∀ 𝑥𝐵𝑠 ∈ 𝒫 𝐵𝑡 ∈ 𝒫 𝐵 ( ( 𝑠 ∈ ( 𝑁𝑥 ) ∧ 𝑡 ∈ ( 𝑁𝑥 ) ) → ( 𝑠𝑡 ) ∈ ( 𝑁𝑥 ) ) ) )