Theorem ntrclsiso 42329

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.)

Hypotheses

Ref	Expression
ntrcls.o	⊢ 𝑂 = (𝑖 ∈ V ↦ (𝑘 ∈ (𝒫 𝑖 ↑m 𝒫 𝑖) ↦ (𝑗 ∈ 𝒫 𝑖 ↦ (𝑖 ∖ (𝑘‘(𝑖 ∖ 𝑗))))))
ntrcls.d	⊢ 𝐷 = (𝑂‘𝐵)
ntrcls.r	⊢ (𝜑 → 𝐼𝐷𝐾)

Assertion

Ref	Expression
ntrclsiso	⊢ (𝜑 → (∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐼‘𝑠) ⊆ (𝐼‘𝑡)) ↔ ∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐾‘𝑠) ⊆ (𝐾‘𝑡))))

Distinct variable groups:   𝐵,𝑖,𝑗,𝑘,𝑠,𝑡   𝑗,𝐼,𝑘,𝑠,𝑡   𝜑,𝑖,𝑗,𝑘,𝑠,𝑡

Allowed substitution hints:   𝐷(𝑡,𝑖,𝑗,𝑘,𝑠)   𝐼(𝑖)   𝐾(𝑡,𝑖,𝑗,𝑘,𝑠)   𝑂(𝑡,𝑖,𝑗,𝑘,𝑠)

Proof of Theorem ntrclsiso

Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sseq1 3969	. . . . 5 ⊢ (𝑠 = 𝑏 → (𝑠 ⊆ 𝑡 ↔ 𝑏 ⊆ 𝑡))
2		fveq2 6842	. . . . . 6 ⊢ (𝑠 = 𝑏 → (𝐼‘𝑠) = (𝐼‘𝑏))
3	2	sseq1d 3975	. . . . 5 ⊢ (𝑠 = 𝑏 → ((𝐼‘𝑠) ⊆ (𝐼‘𝑡) ↔ (𝐼‘𝑏) ⊆ (𝐼‘𝑡)))
4	1, 3	imbi12d 344	. . . 4 ⊢ (𝑠 = 𝑏 → ((𝑠 ⊆ 𝑡 → (𝐼‘𝑠) ⊆ (𝐼‘𝑡)) ↔ (𝑏 ⊆ 𝑡 → (𝐼‘𝑏) ⊆ (𝐼‘𝑡))))
5		sseq2 3970	. . . . 5 ⊢ (𝑡 = 𝑎 → (𝑏 ⊆ 𝑡 ↔ 𝑏 ⊆ 𝑎))
6		fveq2 6842	. . . . . 6 ⊢ (𝑡 = 𝑎 → (𝐼‘𝑡) = (𝐼‘𝑎))
7	6	sseq2d 3976	. . . . 5 ⊢ (𝑡 = 𝑎 → ((𝐼‘𝑏) ⊆ (𝐼‘𝑡) ↔ (𝐼‘𝑏) ⊆ (𝐼‘𝑎)))
8	5, 7	imbi12d 344	. . . 4 ⊢ (𝑡 = 𝑎 → ((𝑏 ⊆ 𝑡 → (𝐼‘𝑏) ⊆ (𝐼‘𝑡)) ↔ (𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎))))
9	4, 8	cbvral2vw 3227	. . 3 ⊢ (∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐼‘𝑠) ⊆ (𝐼‘𝑡)) ↔ ∀𝑏 ∈ 𝒫 𝐵∀𝑎 ∈ 𝒫 𝐵(𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)))
10		ralcom 3272	. . 3 ⊢ (∀𝑏 ∈ 𝒫 𝐵∀𝑎 ∈ 𝒫 𝐵(𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)) ↔ ∀𝑎 ∈ 𝒫 𝐵∀𝑏 ∈ 𝒫 𝐵(𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)))
11	9, 10	bitri 274	. 2 ⊢ (∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐼‘𝑠) ⊆ (𝐼‘𝑡)) ↔ ∀𝑎 ∈ 𝒫 𝐵∀𝑏 ∈ 𝒫 𝐵(𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)))
12		simpl 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵) → 𝜑)
13		ntrcls.d	. . . . . 6 ⊢ 𝐷 = (𝑂‘𝐵)
14		ntrcls.r	. . . . . 6 ⊢ (𝜑 → 𝐼𝐷𝐾)
15	13, 14	ntrclsbex 42296	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ V)
16	12, 15	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵) → 𝐵 ∈ V)
17		difssd 4092	. . . 4 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵) → (𝐵 ∖ 𝑠) ⊆ 𝐵)
18	16, 17	sselpwd 5283	. . 3 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵) → (𝐵 ∖ 𝑠) ∈ 𝒫 𝐵)
19		elpwi 4567	. . . 4 ⊢ (𝑎 ∈ 𝒫 𝐵 → 𝑎 ⊆ 𝐵)
20		simpl 483	. . . . . 6 ⊢ ((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) → 𝐵 ∈ V)
21		difssd 4092	. . . . . 6 ⊢ ((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) → (𝐵 ∖ 𝑎) ⊆ 𝐵)
22	20, 21	sselpwd 5283	. . . . 5 ⊢ ((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) → (𝐵 ∖ 𝑎) ∈ 𝒫 𝐵)
23		simpr 485	. . . . . . . 8 ⊢ (((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) ∧ 𝑠 = (𝐵 ∖ 𝑎)) → 𝑠 = (𝐵 ∖ 𝑎))
24	23	difeq2d 4082	. . . . . . 7 ⊢ (((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) ∧ 𝑠 = (𝐵 ∖ 𝑎)) → (𝐵 ∖ 𝑠) = (𝐵 ∖ (𝐵 ∖ 𝑎)))
25	24	eqeq2d 2747	. . . . . 6 ⊢ (((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) ∧ 𝑠 = (𝐵 ∖ 𝑎)) → (𝑎 = (𝐵 ∖ 𝑠) ↔ 𝑎 = (𝐵 ∖ (𝐵 ∖ 𝑎))))
26		eqcom 2743	. . . . . 6 ⊢ (𝑎 = (𝐵 ∖ (𝐵 ∖ 𝑎)) ↔ (𝐵 ∖ (𝐵 ∖ 𝑎)) = 𝑎)
27	25, 26	bitrdi 286	. . . . 5 ⊢ (((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) ∧ 𝑠 = (𝐵 ∖ 𝑎)) → (𝑎 = (𝐵 ∖ 𝑠) ↔ (𝐵 ∖ (𝐵 ∖ 𝑎)) = 𝑎))
28		dfss4 4218	. . . . . . 7 ⊢ (𝑎 ⊆ 𝐵 ↔ (𝐵 ∖ (𝐵 ∖ 𝑎)) = 𝑎)
29	28	biimpi 215	. . . . . 6 ⊢ (𝑎 ⊆ 𝐵 → (𝐵 ∖ (𝐵 ∖ 𝑎)) = 𝑎)
30	29	adantl 482	. . . . 5 ⊢ ((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) → (𝐵 ∖ (𝐵 ∖ 𝑎)) = 𝑎)
31	22, 27, 30	rspcedvd 3583	. . . 4 ⊢ ((𝐵 ∈ V ∧ 𝑎 ⊆ 𝐵) → ∃𝑠 ∈ 𝒫 𝐵𝑎 = (𝐵 ∖ 𝑠))
32	15, 19, 31	syl2an 596	. . 3 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝒫 𝐵) → ∃𝑠 ∈ 𝒫 𝐵𝑎 = (𝐵 ∖ 𝑠))
33		simpl1 1191	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵) → 𝜑)
34	33, 15	syl 17	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵) → 𝐵 ∈ V)
35		difssd 4092	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ 𝑡) ⊆ 𝐵)
36	34, 35	sselpwd 5283	. . . 4 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ 𝑡) ∈ 𝒫 𝐵)
37		elpwi 4567	. . . . . 6 ⊢ (𝑏 ∈ 𝒫 𝐵 → 𝑏 ⊆ 𝐵)
38		simpl 483	. . . . . . . 8 ⊢ ((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) → 𝐵 ∈ V)
39		difssd 4092	. . . . . . . 8 ⊢ ((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) → (𝐵 ∖ 𝑏) ⊆ 𝐵)
40	38, 39	sselpwd 5283	. . . . . . 7 ⊢ ((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) → (𝐵 ∖ 𝑏) ∈ 𝒫 𝐵)
41		simpr 485	. . . . . . . . . 10 ⊢ (((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) ∧ 𝑡 = (𝐵 ∖ 𝑏)) → 𝑡 = (𝐵 ∖ 𝑏))
42	41	difeq2d 4082	. . . . . . . . 9 ⊢ (((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) ∧ 𝑡 = (𝐵 ∖ 𝑏)) → (𝐵 ∖ 𝑡) = (𝐵 ∖ (𝐵 ∖ 𝑏)))
43	42	eqeq2d 2747	. . . . . . . 8 ⊢ (((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) ∧ 𝑡 = (𝐵 ∖ 𝑏)) → (𝑏 = (𝐵 ∖ 𝑡) ↔ 𝑏 = (𝐵 ∖ (𝐵 ∖ 𝑏))))
44		eqcom 2743	. . . . . . . 8 ⊢ (𝑏 = (𝐵 ∖ (𝐵 ∖ 𝑏)) ↔ (𝐵 ∖ (𝐵 ∖ 𝑏)) = 𝑏)
45	43, 44	bitrdi 286	. . . . . . 7 ⊢ (((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) ∧ 𝑡 = (𝐵 ∖ 𝑏)) → (𝑏 = (𝐵 ∖ 𝑡) ↔ (𝐵 ∖ (𝐵 ∖ 𝑏)) = 𝑏))
46		dfss4 4218	. . . . . . . . 9 ⊢ (𝑏 ⊆ 𝐵 ↔ (𝐵 ∖ (𝐵 ∖ 𝑏)) = 𝑏)
47	46	biimpi 215	. . . . . . . 8 ⊢ (𝑏 ⊆ 𝐵 → (𝐵 ∖ (𝐵 ∖ 𝑏)) = 𝑏)
48	47	adantl 482	. . . . . . 7 ⊢ ((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) → (𝐵 ∖ (𝐵 ∖ 𝑏)) = 𝑏)
49	40, 45, 48	rspcedvd 3583	. . . . . 6 ⊢ ((𝐵 ∈ V ∧ 𝑏 ⊆ 𝐵) → ∃𝑡 ∈ 𝒫 𝐵𝑏 = (𝐵 ∖ 𝑡))
50	15, 37, 49	syl2an 596	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝒫 𝐵) → ∃𝑡 ∈ 𝒫 𝐵𝑏 = (𝐵 ∖ 𝑡))
51	50	3ad2antl1 1185	. . . 4 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑏 ∈ 𝒫 𝐵) → ∃𝑡 ∈ 𝒫 𝐵𝑏 = (𝐵 ∖ 𝑡))
52		simp12 1204	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝑠 ∈ 𝒫 𝐵)
53	52	elpwid 4569	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝑠 ⊆ 𝐵)
54		simp2 1137	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝑡 ∈ 𝒫 𝐵)
55	54	elpwid 4569	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝑡 ⊆ 𝐵)
56		sscon34b 4254	. . . . . . . 8 ⊢ ((𝑠 ⊆ 𝐵 ∧ 𝑡 ⊆ 𝐵) → (𝑠 ⊆ 𝑡 ↔ (𝐵 ∖ 𝑡) ⊆ (𝐵 ∖ 𝑠)))
57	53, 55, 56	syl2anc 584	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝑠 ⊆ 𝑡 ↔ (𝐵 ∖ 𝑡) ⊆ (𝐵 ∖ 𝑠)))
58	57	bicomd 222	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐵 ∖ 𝑡) ⊆ (𝐵 ∖ 𝑠) ↔ 𝑠 ⊆ 𝑡))
59		simp11 1203	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝜑)
60		ntrcls.o	. . . . . . . . . . . 12 ⊢ 𝑂 = (𝑖 ∈ V ↦ (𝑘 ∈ (𝒫 𝑖 ↑m 𝒫 𝑖) ↦ (𝑗 ∈ 𝒫 𝑖 ↦ (𝑖 ∖ (𝑘‘(𝑖 ∖ 𝑗))))))
61	60, 13, 14	ntrclsiex 42315	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐼 ∈ (𝒫 𝐵 ↑m 𝒫 𝐵))
62	59, 61	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝐼 ∈ (𝒫 𝐵 ↑m 𝒫 𝐵))
63		elmapi 8787	. . . . . . . . . 10 ⊢ (𝐼 ∈ (𝒫 𝐵 ↑m 𝒫 𝐵) → 𝐼:𝒫 𝐵⟶𝒫 𝐵)
64	62, 63	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝐼:𝒫 𝐵⟶𝒫 𝐵)
65	59, 15	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝐵 ∈ V)
66		difssd 4092	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐵 ∖ 𝑡) ⊆ 𝐵)
67	65, 66	sselpwd 5283	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐵 ∖ 𝑡) ∈ 𝒫 𝐵)
68	64, 67	ffvelcdmd 7036	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐼‘(𝐵 ∖ 𝑡)) ∈ 𝒫 𝐵)
69	68	elpwid 4569	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐼‘(𝐵 ∖ 𝑡)) ⊆ 𝐵)
70		difssd 4092	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐵 ∖ 𝑠) ⊆ 𝐵)
71	65, 70	sselpwd 5283	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐵 ∖ 𝑠) ∈ 𝒫 𝐵)
72	64, 71	ffvelcdmd 7036	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐼‘(𝐵 ∖ 𝑠)) ∈ 𝒫 𝐵)
73	72	elpwid 4569	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐼‘(𝐵 ∖ 𝑠)) ⊆ 𝐵)
74		sscon34b 4254	. . . . . . 7 ⊢ (((𝐼‘(𝐵 ∖ 𝑡)) ⊆ 𝐵 ∧ (𝐼‘(𝐵 ∖ 𝑠)) ⊆ 𝐵) → ((𝐼‘(𝐵 ∖ 𝑡)) ⊆ (𝐼‘(𝐵 ∖ 𝑠)) ↔ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))) ⊆ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡)))))
75	69, 73, 74	syl2anc 584	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐼‘(𝐵 ∖ 𝑡)) ⊆ (𝐼‘(𝐵 ∖ 𝑠)) ↔ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))) ⊆ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡)))))
76	58, 75	imbi12d 344	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (((𝐵 ∖ 𝑡) ⊆ (𝐵 ∖ 𝑠) → (𝐼‘(𝐵 ∖ 𝑡)) ⊆ (𝐼‘(𝐵 ∖ 𝑠))) ↔ (𝑠 ⊆ 𝑡 → (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))) ⊆ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡))))))
77		simp3 1138	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝑏 = (𝐵 ∖ 𝑡))
78		simp13 1205	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝑎 = (𝐵 ∖ 𝑠))
79	77, 78	sseq12d 3977	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝑏 ⊆ 𝑎 ↔ (𝐵 ∖ 𝑡) ⊆ (𝐵 ∖ 𝑠)))
80	77	fveq2d 6846	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐼‘𝑏) = (𝐼‘(𝐵 ∖ 𝑡)))
81	78	fveq2d 6846	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐼‘𝑎) = (𝐼‘(𝐵 ∖ 𝑠)))
82	80, 81	sseq12d 3977	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐼‘𝑏) ⊆ (𝐼‘𝑎) ↔ (𝐼‘(𝐵 ∖ 𝑡)) ⊆ (𝐼‘(𝐵 ∖ 𝑠))))
83	79, 82	imbi12d 344	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)) ↔ ((𝐵 ∖ 𝑡) ⊆ (𝐵 ∖ 𝑠) → (𝐼‘(𝐵 ∖ 𝑡)) ⊆ (𝐼‘(𝐵 ∖ 𝑠)))))
84	60, 13, 14	ntrclsfv1 42317	. . . . . . . . . 10 ⊢ (𝜑 → (𝐷‘𝐼) = 𝐾)
85	59, 84	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐷‘𝐼) = 𝐾)
86	85	fveq1d 6844	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐷‘𝐼)‘𝑠) = (𝐾‘𝑠))
87		eqid 2736	. . . . . . . . 9 ⊢ (𝐷‘𝐼) = (𝐷‘𝐼)
88		eqid 2736	. . . . . . . . 9 ⊢ ((𝐷‘𝐼)‘𝑠) = ((𝐷‘𝐼)‘𝑠)
89	60, 13, 65, 62, 87, 52, 88	dssmapfv3d 42281	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐷‘𝐼)‘𝑠) = (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))))
90	86, 89	eqtr3d 2778	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐾‘𝑠) = (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))))
91	59, 14	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → 𝐼𝐷𝐾)
92	60, 13, 91	ntrclsfv1 42317	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐷‘𝐼) = 𝐾)
93	92	fveq1d 6844	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐷‘𝐼)‘𝑡) = (𝐾‘𝑡))
94		eqid 2736	. . . . . . . . 9 ⊢ ((𝐷‘𝐼)‘𝑡) = ((𝐷‘𝐼)‘𝑡)
95	60, 13, 65, 62, 87, 54, 94	dssmapfv3d 42281	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐷‘𝐼)‘𝑡) = (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡))))
96	93, 95	eqtr3d 2778	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → (𝐾‘𝑡) = (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡))))
97	90, 96	sseq12d 3977	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝐾‘𝑠) ⊆ (𝐾‘𝑡) ↔ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))) ⊆ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡)))))
98	97	imbi2d 340	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝑠 ⊆ 𝑡 → (𝐾‘𝑠) ⊆ (𝐾‘𝑡)) ↔ (𝑠 ⊆ 𝑡 → (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑠))) ⊆ (𝐵 ∖ (𝐼‘(𝐵 ∖ 𝑡))))))
99	76, 83, 98	3bitr4d 310	. . . 4 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) ∧ 𝑡 ∈ 𝒫 𝐵 ∧ 𝑏 = (𝐵 ∖ 𝑡)) → ((𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)) ↔ (𝑠 ⊆ 𝑡 → (𝐾‘𝑠) ⊆ (𝐾‘𝑡))))
100	36, 51, 99	ralxfrd2 5367	. . 3 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝒫 𝐵 ∧ 𝑎 = (𝐵 ∖ 𝑠)) → (∀𝑏 ∈ 𝒫 𝐵(𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)) ↔ ∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐾‘𝑠) ⊆ (𝐾‘𝑡))))
101	18, 32, 100	ralxfrd2 5367	. 2 ⊢ (𝜑 → (∀𝑎 ∈ 𝒫 𝐵∀𝑏 ∈ 𝒫 𝐵(𝑏 ⊆ 𝑎 → (𝐼‘𝑏) ⊆ (𝐼‘𝑎)) ↔ ∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐾‘𝑠) ⊆ (𝐾‘𝑡))))
102	11, 101	bitrid 282	1 ⊢ (𝜑 → (∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐼‘𝑠) ⊆ (𝐼‘𝑡)) ↔ ∀𝑠 ∈ 𝒫 𝐵∀𝑡 ∈ 𝒫 𝐵(𝑠 ⊆ 𝑡 → (𝐾‘𝑠) ⊆ (𝐾‘𝑡))))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106  ∀wral 3064  ∃wrex 3073  Vcvv 3445   ∖ cdif 3907   ⊆ wss 3910  𝒫 cpw 4560   class class class wbr 5105   ↦ cmpt 5188  ⟶wf 6492  ‘cfv 6496  (class class class)co 7357   ↑_m cmap 8765

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-id 5531  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-ov 7360  df-oprab 7361  df-mpo 7362  df-1st 7921  df-2nd 7922  df-map 8767

This theorem is referenced by: (None)