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