Metamath Proof Explorer


Theorem ntrclsiso

Description: If (pseudo-)interior and (pseudo-)closure functions are related by the duality operator then conditions equal to claiming that either is isotonic hold equally. (Contributed by RP, 3-Jun-2021)

Ref Expression
Hypotheses ntrcls.o ⊢ O = i ∈ V ⟼ k ∈ 𝒫 i 𝒫 i ⟼ j ∈ 𝒫 i ⟼ i ∖ k ⁡ i ∖ j
ntrcls.d ⊢ D = O ⁡ B
ntrcls.r ⊢ φ → I D K
Assertion ntrclsiso ⊢ φ → ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → I ⁡ s ⊆ I ⁡ t ↔ ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → K ⁡ s ⊆ K ⁡ t

Proof

Step Hyp Ref Expression
1 ntrcls.o ⊢ O = i ∈ V ⟼ k ∈ 𝒫 i 𝒫 i ⟼ j ∈ 𝒫 i ⟼ i ∖ k ⁡ i ∖ j
2 ntrcls.d ⊢ D = O ⁡ B
3 ntrcls.r ⊢ φ → I D K
4 sseq1 ⊢ s = b → s ⊆ t ↔ b ⊆ t
5 fveq2 ⊢ s = b → I ⁡ s = I ⁡ b
6 5 sseq1d ⊢ s = b → I ⁡ s ⊆ I ⁡ t ↔ I ⁡ b ⊆ I ⁡ t
7 4 6 imbi12d ⊢ s = b → s ⊆ t → I ⁡ s ⊆ I ⁡ t ↔ b ⊆ t → I ⁡ b ⊆ I ⁡ t
8 sseq2 ⊢ t = a → b ⊆ t ↔ b ⊆ a
9 fveq2 ⊢ t = a → I ⁡ t = I ⁡ a
10 9 sseq2d ⊢ t = a → I ⁡ b ⊆ I ⁡ t ↔ I ⁡ b ⊆ I ⁡ a
11 8 10 imbi12d ⊢ t = a → b ⊆ t → I ⁡ b ⊆ I ⁡ t ↔ b ⊆ a → I ⁡ b ⊆ I ⁡ a
12 7 11 cbvral2vw ⊢ ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → I ⁡ s ⊆ I ⁡ t ↔ ∀ b ∈ 𝒫 B ∀ a ∈ 𝒫 B b ⊆ a → I ⁡ b ⊆ I ⁡ a
13 ralcom ⊢ ∀ b ∈ 𝒫 B ∀ a ∈ 𝒫 B b ⊆ a → I ⁡ b ⊆ I ⁡ a ↔ ∀ a ∈ 𝒫 B ∀ b ∈ 𝒫 B b ⊆ a → I ⁡ b ⊆ I ⁡ a
14 12 13 bitri ⊢ ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → I ⁡ s ⊆ I ⁡ t ↔ ∀ a ∈ 𝒫 B ∀ b ∈ 𝒫 B b ⊆ a → I ⁡ b ⊆ I ⁡ a
15 simpl ⊢ φ ∧ s ∈ 𝒫 B → φ
16 2 3 ntrclsbex ⊢ φ → B ∈ V
17 15 16 syl ⊢ φ ∧ s ∈ 𝒫 B → B ∈ V
18 difssd ⊢ φ ∧ s ∈ 𝒫 B → B ∖ s ⊆ B
19 17 18 sselpwd ⊢ φ ∧ s ∈ 𝒫 B → B ∖ s ∈ 𝒫 B
20 elpwi ⊢ a ∈ 𝒫 B → a ⊆ B
21 simpl ⊢ B ∈ V ∧ a ⊆ B → B ∈ V
22 difssd ⊢ B ∈ V ∧ a ⊆ B → B ∖ a ⊆ B
23 21 22 sselpwd ⊢ B ∈ V ∧ a ⊆ B → B ∖ a ∈ 𝒫 B
24 simpr ⊢ B ∈ V ∧ a ⊆ B ∧ s = B ∖ a → s = B ∖ a
25 24 difeq2d ⊢ B ∈ V ∧ a ⊆ B ∧ s = B ∖ a → B ∖ s = B ∖ B ∖ a
26 25 eqeq2d ⊢ B ∈ V ∧ a ⊆ B ∧ s = B ∖ a → a = B ∖ s ↔ a = B ∖ B ∖ a
27 eqcom ⊢ a = B ∖ B ∖ a ↔ B ∖ B ∖ a = a
28 26 27 bitrdi ⊢ B ∈ V ∧ a ⊆ B ∧ s = B ∖ a → a = B ∖ s ↔ B ∖ B ∖ a = a
29 dfss4 ⊢ a ⊆ B ↔ B ∖ B ∖ a = a
30 29 bilani ⊢ B ∈ V ∧ a ⊆ B → B ∖ B ∖ a = a
31 23 28 30 rspcedvd ⊢ B ∈ V ∧ a ⊆ B → ∃ s ∈ 𝒫 B a = B ∖ s
32 16 20 31 syl2an ⊢ φ ∧ a ∈ 𝒫 B → ∃ s ∈ 𝒫 B a = B ∖ s
33 simpl1 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B → φ
34 33 16 syl ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B → B ∈ V
35 difssd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B → B ∖ t ⊆ B
36 34 35 sselpwd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B → B ∖ t ∈ 𝒫 B
37 elpwi ⊢ b ∈ 𝒫 B → b ⊆ B
38 simpl ⊢ B ∈ V ∧ b ⊆ B → B ∈ V
39 difssd ⊢ B ∈ V ∧ b ⊆ B → B ∖ b ⊆ B
40 38 39 sselpwd ⊢ B ∈ V ∧ b ⊆ B → B ∖ b ∈ 𝒫 B
41 simpr ⊢ B ∈ V ∧ b ⊆ B ∧ t = B ∖ b → t = B ∖ b
42 41 difeq2d ⊢ B ∈ V ∧ b ⊆ B ∧ t = B ∖ b → B ∖ t = B ∖ B ∖ b
43 42 eqeq2d ⊢ B ∈ V ∧ b ⊆ B ∧ t = B ∖ b → b = B ∖ t ↔ b = B ∖ B ∖ b
44 eqcom ⊢ b = B ∖ B ∖ b ↔ B ∖ B ∖ b = b
45 43 44 bitrdi ⊢ B ∈ V ∧ b ⊆ B ∧ t = B ∖ b → b = B ∖ t ↔ B ∖ B ∖ b = b
46 dfss4 ⊢ b ⊆ B ↔ B ∖ B ∖ b = b
47 46 bilani ⊢ B ∈ V ∧ b ⊆ B → B ∖ B ∖ b = b
48 40 45 47 rspcedvd ⊢ B ∈ V ∧ b ⊆ B → ∃ t ∈ 𝒫 B b = B ∖ t
49 16 37 48 syl2an ⊢ φ ∧ b ∈ 𝒫 B → ∃ t ∈ 𝒫 B b = B ∖ t
50 49 3ad2antl1 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ b ∈ 𝒫 B → ∃ t ∈ 𝒫 B b = B ∖ t
51 simp12 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → s ∈ 𝒫 B
52 51 elpwid ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → s ⊆ B
53 simp2 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → t ∈ 𝒫 B
54 53 elpwid ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → t ⊆ B
55 sscon34b ⊢ s ⊆ B ∧ t ⊆ B → s ⊆ t ↔ B ∖ t ⊆ B ∖ s
56 52 54 55 syl2anc ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → s ⊆ t ↔ B ∖ t ⊆ B ∖ s
57 56 bicomd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∖ t ⊆ B ∖ s ↔ s ⊆ t
58 simp11 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → φ
59 1 2 3 ntrclsiex ⊢ φ → I ∈ 𝒫 B 𝒫 B
60 58 59 syl ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ∈ 𝒫 B 𝒫 B
61 elmapi ⊢ I ∈ 𝒫 B 𝒫 B → I : 𝒫 B ⟶ 𝒫 B
62 60 61 syl ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I : 𝒫 B ⟶ 𝒫 B
63 58 16 syl ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∈ V
64 difssd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∖ t ⊆ B
65 63 64 sselpwd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∖ t ∈ 𝒫 B
66 62 65 ffvelcdmd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ B ∖ t ∈ 𝒫 B
67 66 elpwid ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ B ∖ t ⊆ B
68 difssd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∖ s ⊆ B
69 63 68 sselpwd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∖ s ∈ 𝒫 B
70 62 69 ffvelcdmd ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ B ∖ s ∈ 𝒫 B
71 70 elpwid ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ B ∖ s ⊆ B
72 sscon34b ⊢ I ⁡ B ∖ t ⊆ B ∧ I ⁡ B ∖ s ⊆ B → I ⁡ B ∖ t ⊆ I ⁡ B ∖ s ↔ B ∖ I ⁡ B ∖ s ⊆ B ∖ I ⁡ B ∖ t
73 67 71 72 syl2anc ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ B ∖ t ⊆ I ⁡ B ∖ s ↔ B ∖ I ⁡ B ∖ s ⊆ B ∖ I ⁡ B ∖ t
74 57 73 imbi12d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → B ∖ t ⊆ B ∖ s → I ⁡ B ∖ t ⊆ I ⁡ B ∖ s ↔ s ⊆ t → B ∖ I ⁡ B ∖ s ⊆ B ∖ I ⁡ B ∖ t
75 simp3 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → b = B ∖ t
76 simp13 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → a = B ∖ s
77 75 76 sseq12d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → b ⊆ a ↔ B ∖ t ⊆ B ∖ s
78 75 fveq2d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ b = I ⁡ B ∖ t
79 76 fveq2d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ a = I ⁡ B ∖ s
80 78 79 sseq12d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I ⁡ b ⊆ I ⁡ a ↔ I ⁡ B ∖ t ⊆ I ⁡ B ∖ s
81 77 80 imbi12d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → b ⊆ a → I ⁡ b ⊆ I ⁡ a ↔ B ∖ t ⊆ B ∖ s → I ⁡ B ∖ t ⊆ I ⁡ B ∖ s
82 1 2 3 ntrclsfv1 ⊢ φ → D ⁡ I = K
83 58 82 syl ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → D ⁡ I = K
84 83 fveq1d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → D ⁡ I ⁡ s = K ⁡ s
85 eqid ⊢ D ⁡ I = D ⁡ I
86 eqid ⊢ D ⁡ I ⁡ s = D ⁡ I ⁡ s
87 1 2 63 60 85 51 86 dssmapfv3d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → D ⁡ I ⁡ s = B ∖ I ⁡ B ∖ s
88 84 87 eqtr3d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → K ⁡ s = B ∖ I ⁡ B ∖ s
89 58 3 syl ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → I D K
90 1 2 89 ntrclsfv1 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → D ⁡ I = K
91 90 fveq1d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → D ⁡ I ⁡ t = K ⁡ t
92 eqid ⊢ D ⁡ I ⁡ t = D ⁡ I ⁡ t
93 1 2 63 60 85 53 92 dssmapfv3d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → D ⁡ I ⁡ t = B ∖ I ⁡ B ∖ t
94 91 93 eqtr3d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → K ⁡ t = B ∖ I ⁡ B ∖ t
95 88 94 sseq12d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → K ⁡ s ⊆ K ⁡ t ↔ B ∖ I ⁡ B ∖ s ⊆ B ∖ I ⁡ B ∖ t
96 95 imbi2d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → s ⊆ t → K ⁡ s ⊆ K ⁡ t ↔ s ⊆ t → B ∖ I ⁡ B ∖ s ⊆ B ∖ I ⁡ B ∖ t
97 74 81 96 3bitr4d ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s ∧ t ∈ 𝒫 B ∧ b = B ∖ t → b ⊆ a → I ⁡ b ⊆ I ⁡ a ↔ s ⊆ t → K ⁡ s ⊆ K ⁡ t
98 36 50 97 ralxfrd2 ⊢ φ ∧ s ∈ 𝒫 B ∧ a = B ∖ s → ∀ b ∈ 𝒫 B b ⊆ a → I ⁡ b ⊆ I ⁡ a ↔ ∀ t ∈ 𝒫 B s ⊆ t → K ⁡ s ⊆ K ⁡ t
99 19 32 98 ralxfrd2 ⊢ φ → ∀ a ∈ 𝒫 B ∀ b ∈ 𝒫 B b ⊆ a → I ⁡ b ⊆ I ⁡ a ↔ ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → K ⁡ s ⊆ K ⁡ t
100 14 99 bitrid ⊢ φ → ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → I ⁡ s ⊆ I ⁡ t ↔ ∀ s ∈ 𝒫 B ∀ t ∈ 𝒫 B s ⊆ t → K ⁡ s ⊆ K ⁡ t