MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  neiptopreu Structured version   Visualization version   GIF version

Theorem neiptopreu 23193
Description: If, to each element 𝑃 of a set 𝑋, we associate a set (𝑁𝑃) fulfilling Properties Vi, Vii, Viii and Property Viv of [BourbakiTop1] p. I.2. , corresponding to ssnei 23170, innei 23185, elnei 23171 and neissex 23187, then there is a unique topology 𝑗 such that for any point 𝑝, (𝑁𝑝) is the set of neighborhoods of 𝑝. Proposition 2 of [BourbakiTop1] p. I.3. This can be used to build a topology from a set of neighborhoods. Note that innei 23185 uses binary intersections whereas Property Vii mentions finite intersections (which includes the empty intersection of subsets of 𝑋, which is equal to 𝑋), so we add the hypothesis that 𝑋 is a neighborhood of all points. TODO: when df-fi 9357 includes the empty intersection, remove that extra hypothesis. (Contributed by Thierry Arnoux, 6-Jan-2018.)
Hypotheses
Ref Expression
neiptop.o 𝐽 = {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑝𝑎 𝑎 ∈ (𝑁𝑝)}
neiptop.0 (𝜑𝑁:𝑋⟶𝒫 𝒫 𝑋)
neiptop.1 ((((𝜑𝑝𝑋) ∧ 𝑎𝑏𝑏𝑋) ∧ 𝑎 ∈ (𝑁𝑝)) → 𝑏 ∈ (𝑁𝑝))
neiptop.2 ((𝜑𝑝𝑋) → (fi‘(𝑁𝑝)) ⊆ (𝑁𝑝))
neiptop.3 (((𝜑𝑝𝑋) ∧ 𝑎 ∈ (𝑁𝑝)) → 𝑝𝑎)
neiptop.4 (((𝜑𝑝𝑋) ∧ 𝑎 ∈ (𝑁𝑝)) → ∃𝑏 ∈ (𝑁𝑝)∀𝑞𝑏 𝑎 ∈ (𝑁𝑞))
neiptop.5 ((𝜑𝑝𝑋) → 𝑋 ∈ (𝑁𝑝))
Assertion
Ref Expression
neiptopreu (𝜑 → ∃!𝑗 ∈ (TopOn‘𝑋)𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})))
Distinct variable groups:   𝑝,𝑎,𝑁   𝑋,𝑎,𝑏,𝑝   𝐽,𝑎,𝑝   𝑋,𝑝   𝜑,𝑝   𝑁,𝑏   𝑋,𝑏   𝜑,𝑎,𝑏,𝑞,𝑝   𝑁,𝑝,𝑞   𝑋,𝑞   𝜑,𝑞   𝑗,𝑎,𝑏,𝐽,𝑝   𝑗,𝑞,𝑁   𝑗,𝑋   𝜑,𝑗
Allowed substitution hint:   𝐽(𝑞)

Proof of Theorem neiptopreu
StepHypRef Expression
1 neiptop.o . . . . 5 𝐽 = {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑝𝑎 𝑎 ∈ (𝑁𝑝)}
2 neiptop.0 . . . . 5 (𝜑𝑁:𝑋⟶𝒫 𝒫 𝑋)
3 neiptop.1 . . . . 5 ((((𝜑𝑝𝑋) ∧ 𝑎𝑏𝑏𝑋) ∧ 𝑎 ∈ (𝑁𝑝)) → 𝑏 ∈ (𝑁𝑝))
4 neiptop.2 . . . . 5 ((𝜑𝑝𝑋) → (fi‘(𝑁𝑝)) ⊆ (𝑁𝑝))
5 neiptop.3 . . . . 5 (((𝜑𝑝𝑋) ∧ 𝑎 ∈ (𝑁𝑝)) → 𝑝𝑎)
6 neiptop.4 . . . . 5 (((𝜑𝑝𝑋) ∧ 𝑎 ∈ (𝑁𝑝)) → ∃𝑏 ∈ (𝑁𝑝)∀𝑞𝑏 𝑎 ∈ (𝑁𝑞))
7 neiptop.5 . . . . 5 ((𝜑𝑝𝑋) → 𝑋 ∈ (𝑁𝑝))
81, 2, 3, 4, 5, 6, 7neiptoptop 23191 . . . 4 (𝜑𝐽 ∈ Top)
9 toptopon2 22978 . . . 4 (𝐽 ∈ Top ↔ 𝐽 ∈ (TopOn‘ 𝐽))
108, 9sylib 220 . . 3 (𝜑𝐽 ∈ (TopOn‘ 𝐽))
111, 2, 3, 4, 5, 6, 7neiptopuni 23190 . . . 4 (𝜑𝑋 = 𝐽)
1211fveq2d 6871 . . 3 (𝜑 → (TopOn‘𝑋) = (TopOn‘ 𝐽))
1310, 12eleqtrrd 2865 . 2 (𝜑𝐽 ∈ (TopOn‘𝑋))
141, 2, 3, 4, 5, 6, 7neiptopnei 23192 . 2 (𝜑𝑁 = (𝑝𝑋 ↦ ((nei‘𝐽)‘{𝑝})))
15 nfv 1934 . . . . . . . . . 10 𝑝(𝜑𝑗 ∈ (TopOn‘𝑋))
16 nfmpt1 5199 . . . . . . . . . . 11 𝑝(𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))
1716nfeq2 2941 . . . . . . . . . 10 𝑝 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))
1815, 17nfan 1919 . . . . . . . . 9 𝑝((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})))
19 nfv 1934 . . . . . . . . 9 𝑝 𝑏𝑋
2018, 19nfan 1919 . . . . . . . 8 𝑝(((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋)
21 simpllr 785 . . . . . . . . . . 11 (((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) ∧ 𝑝𝑏) → 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})))
22 simpr 488 . . . . . . . . . . . 12 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) → 𝑏𝑋)
2322sselda 3936 . . . . . . . . . . 11 (((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) ∧ 𝑝𝑏) → 𝑝𝑋)
24 id 22 . . . . . . . . . . . 12 (𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) → 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})))
25 fvexd 6882 . . . . . . . . . . . 12 ((𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) ∧ 𝑝𝑋) → ((nei‘𝑗)‘{𝑝}) ∈ V)
2624, 25fvmpt2d 6989 . . . . . . . . . . 11 ((𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) ∧ 𝑝𝑋) → (𝑁𝑝) = ((nei‘𝑗)‘{𝑝}))
2721, 23, 26syl2anc 593 . . . . . . . . . 10 (((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) ∧ 𝑝𝑏) → (𝑁𝑝) = ((nei‘𝑗)‘{𝑝}))
2827eqcomd 2768 . . . . . . . . 9 (((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) ∧ 𝑝𝑏) → ((nei‘𝑗)‘{𝑝}) = (𝑁𝑝))
2928eleq2d 2848 . . . . . . . 8 (((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) ∧ 𝑝𝑏) → (𝑏 ∈ ((nei‘𝑗)‘{𝑝}) ↔ 𝑏 ∈ (𝑁𝑝)))
3020, 29ralbida 3273 . . . . . . 7 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑋) → (∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝}) ↔ ∀𝑝𝑏 𝑏 ∈ (𝑁𝑝)))
3130pm5.32da 587 . . . . . 6 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → ((𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝})) ↔ (𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ (𝑁𝑝))))
32 toponss 22987 . . . . . . . . 9 ((𝑗 ∈ (TopOn‘𝑋) ∧ 𝑏𝑗) → 𝑏𝑋)
3332ad4ant24 764 . . . . . . . 8 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑗) → 𝑏𝑋)
34 topontop 22973 . . . . . . . . . . 11 (𝑗 ∈ (TopOn‘𝑋) → 𝑗 ∈ Top)
3534ad2antlr 737 . . . . . . . . . 10 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → 𝑗 ∈ Top)
36 opnnei 23180 . . . . . . . . . 10 (𝑗 ∈ Top → (𝑏𝑗 ↔ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝})))
3735, 36syl 17 . . . . . . . . 9 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → (𝑏𝑗 ↔ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝})))
3837biimpa 480 . . . . . . . 8 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑗) → ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝}))
3933, 38jca 519 . . . . . . 7 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ 𝑏𝑗) → (𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝})))
4037biimpar 481 . . . . . . . 8 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝})) → 𝑏𝑗)
4140adantrl 726 . . . . . . 7 ((((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) ∧ (𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝}))) → 𝑏𝑗)
4239, 41impbida 810 . . . . . 6 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → (𝑏𝑗 ↔ (𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ ((nei‘𝑗)‘{𝑝}))))
431neipeltop 23189 . . . . . . 7 (𝑏𝐽 ↔ (𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ (𝑁𝑝)))
4443a1i 11 . . . . . 6 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → (𝑏𝐽 ↔ (𝑏𝑋 ∧ ∀𝑝𝑏 𝑏 ∈ (𝑁𝑝))))
4531, 42, 443bitr4d 313 . . . . 5 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → (𝑏𝑗𝑏𝐽))
4645eqrdv 2760 . . . 4 (((𝜑𝑗 ∈ (TopOn‘𝑋)) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝}))) → 𝑗 = 𝐽)
4746ex 416 . . 3 ((𝜑𝑗 ∈ (TopOn‘𝑋)) → (𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) → 𝑗 = 𝐽))
4847ralrimiva 3154 . 2 (𝜑 → ∀𝑗 ∈ (TopOn‘𝑋)(𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) → 𝑗 = 𝐽))
49 simpl 486 . . . . . . 7 ((𝑗 = 𝐽𝑝𝑋) → 𝑗 = 𝐽)
5049fveq2d 6871 . . . . . 6 ((𝑗 = 𝐽𝑝𝑋) → (nei‘𝑗) = (nei‘𝐽))
5150fveq1d 6869 . . . . 5 ((𝑗 = 𝐽𝑝𝑋) → ((nei‘𝑗)‘{𝑝}) = ((nei‘𝐽)‘{𝑝}))
5251mpteq2dva 5193 . . . 4 (𝑗 = 𝐽 → (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) = (𝑝𝑋 ↦ ((nei‘𝐽)‘{𝑝})))
5352eqeq2d 2773 . . 3 (𝑗 = 𝐽 → (𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) ↔ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝐽)‘{𝑝}))))
5453eqreu 3692 . 2 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝑁 = (𝑝𝑋 ↦ ((nei‘𝐽)‘{𝑝})) ∧ ∀𝑗 ∈ (TopOn‘𝑋)(𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})) → 𝑗 = 𝐽)) → ∃!𝑗 ∈ (TopOn‘𝑋)𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})))
5513, 14, 48, 54syl3anc 1390 1 (𝜑 → ∃!𝑗 ∈ (TopOn‘𝑋)𝑁 = (𝑝𝑋 ↦ ((nei‘𝑗)‘{𝑝})))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399  w3a 1098   = wceq 1560  wcel 2142  wral 3076  wrex 3086  ∃!wreu 3365  {crab 3414  Vcvv 3454  wss 3904  𝒫 cpw 4555  {csn 4582   cuni 4865  cmpt 5181  wf 6517  cfv 6521  ficfi 9356  Topctop 22953  TopOnctopon 22970  neicnei 23157
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4906  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-om 7847  df-1o 8437  df-2o 8438  df-en 8928  df-fin 8931  df-fi 9357  df-top 22954  df-topon 22971  df-ntr 23080  df-nei 23158
This theorem is referenced by:  ustuqtop  24306
  Copyright terms: Public domain W3C validator