Theorem clsneiel1 45369

Description: If a (pseudo-)closure function and a (pseudo-)neighborhood function are related by the 𝐻 operator, then membership in the closure of a subset is equivalent to the complement of the subset not being a neighborhood of the point. (Contributed by RP, 7-Jun-2021.)

Hypotheses

Ref	Expression
clsnei.o	⊢ 𝑂 = (𝑖 ∈ V, 𝑗 ∈ V ↦ (𝑘 ∈ (𝒫 𝑗 ↑m 𝑖) ↦ (𝑙 ∈ 𝑗 ↦ {𝑚 ∈ 𝑖 ∣ 𝑙 ∈ (𝑘‘𝑚)})))
clsnei.p	⊢ 𝑃 = (𝑛 ∈ V ↦ (𝑝 ∈ (𝒫 𝑛 ↑m 𝒫 𝑛) ↦ (𝑜 ∈ 𝒫 𝑛 ↦ (𝑛 ∖ (𝑝‘(𝑛 ∖ 𝑜))))))
clsnei.d	⊢ 𝐷 = (𝑃‘𝐵)
clsnei.f	⊢ 𝐹 = (𝒫 𝐵𝑂𝐵)
clsnei.h	⊢ 𝐻 = (𝐹 ∘ 𝐷)
clsnei.r	⊢ (𝜑 → 𝐾𝐻𝑁)
clsneiel.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)
clsneiel.s	⊢ (𝜑 → 𝑆 ∈ 𝒫 𝐵)

Assertion

Ref	Expression
clsneiel1	⊢ (𝜑 → (𝑋 ∈ (𝐾‘𝑆) ↔ ¬ (𝐵 ∖ 𝑆) ∈ (𝑁‘𝑋)))

Distinct variable groups:   𝐵,𝑖,𝑗,𝑘,𝑙,𝑚   𝐵,𝑛,𝑜,𝑝   𝐷,𝑖,𝑗,𝑘,𝑙,𝑚   𝐷,𝑛,𝑜,𝑝   𝑖,𝐹,𝑗,𝑘,𝑙   𝑛,𝐹,𝑜,𝑝   𝑖,𝐾,𝑗,𝑘,𝑙,𝑚   𝑛,𝐾,𝑜,𝑝   𝑖,𝑁,𝑗,𝑘,𝑙   𝑛,𝑁,𝑜,𝑝   𝑆,𝑚   𝑆,𝑜   𝑋,𝑙,𝑚   𝜑,𝑖,𝑗,𝑘,𝑙   𝜑,𝑛,𝑜,𝑝

Allowed substitution hints:   𝜑(𝑚)   𝑃(𝑖, 𝑗, 𝑘, 𝑚, 𝑛, 𝑜, 𝑝, 𝑙)   𝑆(𝑖, 𝑗, 𝑘, 𝑛, 𝑝, 𝑙)   𝐹(𝑚)   𝐻(𝑖, 𝑗, 𝑘, 𝑚, 𝑛, 𝑜, 𝑝, 𝑙)   𝑁(𝑚)   𝑂(𝑖, 𝑗, 𝑘, 𝑚, 𝑛, 𝑜, 𝑝, 𝑙)   𝑋(𝑖, 𝑗, 𝑘, 𝑛, 𝑜, 𝑝)

Proof of Theorem clsneiel1

Step	Hyp	Ref	Expression
1		clsnei.d	. . . 4 ⊢ 𝐷 = (𝑃‘𝐵)
2		clsnei.h	. . . 4 ⊢ 𝐻 = (𝐹 ∘ 𝐷)
3		clsnei.r	. . . 4 ⊢ (𝜑 → 𝐾𝐻𝑁)
4	1, 2, 3	clsneibex 45363	. . 3 ⊢ (𝜑 → 𝐵 ∈ V)
5	4	ancli 558	. 2 ⊢ (𝜑 → (𝜑 ∧ 𝐵 ∈ V))
6		clsnei.o	. . . . 5 ⊢ 𝑂 = (𝑖 ∈ V, 𝑗 ∈ V ↦ (𝑘 ∈ (𝒫 𝑗 ↑m 𝑖) ↦ (𝑙 ∈ 𝑗 ↦ {𝑚 ∈ 𝑖 ∣ 𝑙 ∈ (𝑘‘𝑚)})))
7		simpr 490	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝐵 ∈ V)
8	7	pwexd 5348	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝒫 𝐵 ∈ V)
9		clsnei.f	. . . . 5 ⊢ 𝐹 = (𝒫 𝐵𝑂𝐵)
10	6, 8, 7, 9	fsovfd 45273	. . . 4 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝐹:(𝒫 𝐵 ↑m 𝒫 𝐵)⟶(𝒫 𝒫 𝐵 ↑m 𝐵))
11	10	ffnd 6740	. . 3 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝐹 Fn (𝒫 𝐵 ↑m 𝒫 𝐵))
12		clsnei.p	. . . . 5 ⊢ 𝑃 = (𝑛 ∈ V ↦ (𝑝 ∈ (𝒫 𝑛 ↑m 𝒫 𝑛) ↦ (𝑜 ∈ 𝒫 𝑛 ↦ (𝑛 ∖ (𝑝‘(𝑛 ∖ 𝑜))))))
13	12, 1, 7	dssmapf1od 45282	. . . 4 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝐷:(𝒫 𝐵 ↑m 𝒫 𝐵)⟶1-1onto(𝒫 𝐵 ↑m 𝒫 𝐵))
14		f1of 6854	. . . 4 ⊢ (𝐷:(𝒫 𝐵 ↑m 𝒫 𝐵)⟶1-1onto(𝒫 𝐵 ↑m 𝒫 𝐵) → 𝐷:(𝒫 𝐵 ↑m 𝒫 𝐵)⟶(𝒫 𝐵 ↑m 𝒫 𝐵))
15	13, 14	syl 18	. . 3 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝐷:(𝒫 𝐵 ↑m 𝒫 𝐵)⟶(𝒫 𝐵 ↑m 𝒫 𝐵))
16	2	breqi 5114	. . . . 5 ⊢ (𝐾𝐻𝑁 ↔ 𝐾(𝐹 ∘ 𝐷)𝑁)
17	3, 16	sylib 221	. . . 4 ⊢ (𝜑 → 𝐾(𝐹 ∘ 𝐷)𝑁)
18	17	adantr 486	. . 3 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → 𝐾(𝐹 ∘ 𝐷)𝑁)
19	11, 15, 18	brcoffn 45291	. 2 ⊢ ((𝜑 ∧ 𝐵 ∈ V) → (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁))
20		simprl 783	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → 𝐾𝐷(𝐷‘𝐾))
21		clsneiel.x	. . . . 5 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
22	21	ad2antrr 739	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → 𝑋 ∈ 𝐵)
23		clsneiel.s	. . . . 5 ⊢ (𝜑 → 𝑆 ∈ 𝒫 𝐵)
24	23	ad2antrr 739	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → 𝑆 ∈ 𝒫 𝐵)
25	12, 1, 20, 22, 24	ntrclselnel1 45318	. . 3 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (𝑋 ∈ (𝐾‘𝑆) ↔ ¬ 𝑋 ∈ ((𝐷‘𝐾)‘(𝐵 ∖ 𝑆))))
26		simprr 785	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (𝐷‘𝐾)𝐹𝑁)
27		simplr 781	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → 𝐵 ∈ V)
28		difssd 4076	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (𝐵 ∖ 𝑆) ⊆ 𝐵)
29	27, 28	sselpwd 5297	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (𝐵 ∖ 𝑆) ∈ 𝒫 𝐵)
30	6, 9, 26, 22, 29	ntrneiel 45342	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (𝑋 ∈ ((𝐷‘𝐾)‘(𝐵 ∖ 𝑆)) ↔ (𝐵 ∖ 𝑆) ∈ (𝑁‘𝑋)))
31	30	notbid 321	. . 3 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (¬ 𝑋 ∈ ((𝐷‘𝐾)‘(𝐵 ∖ 𝑆)) ↔ ¬ (𝐵 ∖ 𝑆) ∈ (𝑁‘𝑋)))
32	25, 31	bitrd 282	. 2 ⊢ (((𝜑 ∧ 𝐵 ∈ V) ∧ (𝐾𝐷(𝐷‘𝐾) ∧ (𝐷‘𝐾)𝐹𝑁)) → (𝑋 ∈ (𝐾‘𝑆) ↔ ¬ (𝐵 ∖ 𝑆) ∈ (𝑁‘𝑋)))
33	5, 19, 32	syl2anc2 597	1 ⊢ (𝜑 → (𝑋 ∈ (𝐾‘𝑆) ↔ ¬ (𝐵 ∖ 𝑆) ∈ (𝑁‘𝑋)))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2147  {crab 3416  Vcvv 3454   ∖ cdif 4048  𝒫 cpw 4560   class class class wbr 5108   ↦ cmpt 5192   ∘ ccom 5662  ⟶wf 6562  ⟶1-1ontowf1o 6565  ‘cfv 6566  (class class class)co 7451   ∈ cmpo 7453   ↑_m cmap 8885

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-id 5553  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-ov 7454  df-oprab 7455  df-mpo 7456  df-1st 8035  df-2nd 8036  df-map 8887

This theorem is used by:  clsneiel2  45370  clsneifv4  45372