Theorem gneispacess2 37464

Description: All supersets of a neighborhood of a point (limited to the domain of the neighborhood space) are also neighborhoods of that point. (Contributed by RP, 15-Apr-2021.)

Hypothesis

Ref	Expression
gneispace.a	⊢ 𝐴 = {𝑓 ∣ (𝑓:dom 𝑓⟶(𝒫 (𝒫 dom 𝑓 ∖ {∅}) ∖ {∅}) ∧ ∀𝑝 ∈ dom 𝑓∀𝑛 ∈ (𝑓‘𝑝)(𝑝 ∈ 𝑛 ∧ ∀𝑠 ∈ 𝒫 dom 𝑓(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝑓‘𝑝))))}

Assertion

Ref	Expression
gneispacess2	⊢ (((𝐹 ∈ 𝐴 ∧ 𝑃 ∈ dom 𝐹) ∧ (𝑁 ∈ (𝐹‘𝑃) ∧ 𝑆 ∈ 𝒫 dom 𝐹 ∧ 𝑁 ⊆ 𝑆)) → 𝑆 ∈ (𝐹‘𝑃))

Distinct variable groups:   𝑛,𝐹,𝑝,𝑓,𝑠   𝑃,𝑝,𝑛   𝑛,𝑁   𝑆,𝑠   𝑛,𝑠,𝑁   𝑠,𝑝,𝑃

Allowed substitution hints:   𝐴(𝑓,𝑛,𝑠,𝑝)   𝑃(𝑓)   𝑆(𝑓,𝑛,𝑝)   𝑁(𝑓,𝑝)

Proof of Theorem gneispacess2

Step	Hyp	Ref	Expression
1		gneispace.a	. . . . 5 ⊢ 𝐴 = {𝑓 ∣ (𝑓:dom 𝑓⟶(𝒫 (𝒫 dom 𝑓 ∖ {∅}) ∖ {∅}) ∧ ∀𝑝 ∈ dom 𝑓∀𝑛 ∈ (𝑓‘𝑝)(𝑝 ∈ 𝑛 ∧ ∀𝑠 ∈ 𝒫 dom 𝑓(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝑓‘𝑝))))}
2	1	gneispacess 37463	. . . 4 ⊢ (𝐹 ∈ 𝐴 → ∀𝑝 ∈ dom 𝐹∀𝑛 ∈ (𝐹‘𝑝)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑝)))
3		fveq2 6103	. . . . . 6 ⊢ (𝑝 = 𝑃 → (𝐹‘𝑝) = (𝐹‘𝑃))
4	3	eleq2d 2673	. . . . . . . 8 ⊢ (𝑝 = 𝑃 → (𝑠 ∈ (𝐹‘𝑝) ↔ 𝑠 ∈ (𝐹‘𝑃)))
5	4	imbi2d 329	. . . . . . 7 ⊢ (𝑝 = 𝑃 → ((𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑝)) ↔ (𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
6	5	ralbidv 2969	. . . . . 6 ⊢ (𝑝 = 𝑃 → (∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑝)) ↔ ∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
7	3, 6	raleqbidv 3129	. . . . 5 ⊢ (𝑝 = 𝑃 → (∀𝑛 ∈ (𝐹‘𝑝)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑝)) ↔ ∀𝑛 ∈ (𝐹‘𝑃)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
8	7	rspccv 3279	. . . 4 ⊢ (∀𝑝 ∈ dom 𝐹∀𝑛 ∈ (𝐹‘𝑝)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑝)) → (𝑃 ∈ dom 𝐹 → ∀𝑛 ∈ (𝐹‘𝑃)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
9	2, 8	syl 17	. . 3 ⊢ (𝐹 ∈ 𝐴 → (𝑃 ∈ dom 𝐹 → ∀𝑛 ∈ (𝐹‘𝑃)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
10		sseq1 3589	. . . . . . . 8 ⊢ (𝑛 = 𝑁 → (𝑛 ⊆ 𝑠 ↔ 𝑁 ⊆ 𝑠))
11	10	imbi1d 330	. . . . . . 7 ⊢ (𝑛 = 𝑁 → ((𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) ↔ (𝑁 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
12	11	ralbidv 2969	. . . . . 6 ⊢ (𝑛 = 𝑁 → (∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) ↔ ∀𝑠 ∈ 𝒫 dom 𝐹(𝑁 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
13	12	rspccv 3279	. . . . 5 ⊢ (∀𝑛 ∈ (𝐹‘𝑃)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) → (𝑁 ∈ (𝐹‘𝑃) → ∀𝑠 ∈ 𝒫 dom 𝐹(𝑁 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃))))
14		sseq2 3590	. . . . . . 7 ⊢ (𝑠 = 𝑆 → (𝑁 ⊆ 𝑠 ↔ 𝑁 ⊆ 𝑆))
15		eleq1 2676	. . . . . . 7 ⊢ (𝑠 = 𝑆 → (𝑠 ∈ (𝐹‘𝑃) ↔ 𝑆 ∈ (𝐹‘𝑃)))
16	14, 15	imbi12d 333	. . . . . 6 ⊢ (𝑠 = 𝑆 → ((𝑁 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) ↔ (𝑁 ⊆ 𝑆 → 𝑆 ∈ (𝐹‘𝑃))))
17	16	rspccv 3279	. . . . 5 ⊢ (∀𝑠 ∈ 𝒫 dom 𝐹(𝑁 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) → (𝑆 ∈ 𝒫 dom 𝐹 → (𝑁 ⊆ 𝑆 → 𝑆 ∈ (𝐹‘𝑃))))
18	13, 17	syl6 34	. . . 4 ⊢ (∀𝑛 ∈ (𝐹‘𝑃)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) → (𝑁 ∈ (𝐹‘𝑃) → (𝑆 ∈ 𝒫 dom 𝐹 → (𝑁 ⊆ 𝑆 → 𝑆 ∈ (𝐹‘𝑃)))))
19	18	3impd 1273	. . 3 ⊢ (∀𝑛 ∈ (𝐹‘𝑃)∀𝑠 ∈ 𝒫 dom 𝐹(𝑛 ⊆ 𝑠 → 𝑠 ∈ (𝐹‘𝑃)) → ((𝑁 ∈ (𝐹‘𝑃) ∧ 𝑆 ∈ 𝒫 dom 𝐹 ∧ 𝑁 ⊆ 𝑆) → 𝑆 ∈ (𝐹‘𝑃)))
20	9, 19	syl6 34	. 2 ⊢ (𝐹 ∈ 𝐴 → (𝑃 ∈ dom 𝐹 → ((𝑁 ∈ (𝐹‘𝑃) ∧ 𝑆 ∈ 𝒫 dom 𝐹 ∧ 𝑁 ⊆ 𝑆) → 𝑆 ∈ (𝐹‘𝑃))))
21	20	imp31 447	1 ⊢ (((𝐹 ∈ 𝐴 ∧ 𝑃 ∈ dom 𝐹) ∧ (𝑁 ∈ (𝐹‘𝑃) ∧ 𝑆 ∈ 𝒫 dom 𝐹 ∧ 𝑁 ⊆ 𝑆)) → 𝑆 ∈ (𝐹‘𝑃))

Syntax hints:   → wi 4   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977  {cab 2596  ∀wral 2896   ∖ cdif 3537   ⊆ wss 3540  ∅c0 3874  𝒫 cpw 4108  {csn 4125  dom cdm 5038  ⟶wf 5800  ‘cfv 5804

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-br 4584  df-opab 4644  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-fv 5812

This theorem is referenced by: (None)