Theorem lpbl 22289

Description: Every ball around a limit point 𝑃 of a subset 𝑆 includes a member of 𝑆 (even if 𝑃 ∉ 𝑆). (Contributed by NM, 9-Nov-2007.) (Revised by Mario Carneiro, 23-Dec-2013.)

Hypothesis

Ref	Expression
mopni.1	⊢ 𝐽 = (MetOpen‘𝐷)

Assertion

Ref	Expression
lpbl	⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → ∃𝑥 ∈ 𝑆 𝑥 ∈ (𝑃(ball‘𝐷)𝑅))

Distinct variable groups:   𝑥,𝐷   𝑥,𝐽   𝑥,𝑅   𝑥,𝑆   𝑥,𝑃   𝑥,𝑋

Proof of Theorem lpbl

Step	Hyp	Ref	Expression
1		simpl1 1062	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝐷 ∈ (∞Met‘𝑋))
2		mopni.1	. . . . . . . . 9 ⊢ 𝐽 = (MetOpen‘𝐷)
3	2	mopntop 22226	. . . . . . . 8 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ Top)
4	1, 3	syl 17	. . . . . . 7 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝐽 ∈ Top)
5		simpl2 1063	. . . . . . . 8 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑆 ⊆ 𝑋)
6	2	mopnuni 22227	. . . . . . . . 9 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = ∪ 𝐽)
7	1, 6	syl 17	. . . . . . . 8 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑋 = ∪ 𝐽)
8	5, 7	sseqtrd 3633	. . . . . . 7 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑆 ⊆ ∪ 𝐽)
9		eqid 2620	. . . . . . . 8 ⊢ ∪ 𝐽 = ∪ 𝐽
10	9	lpss 20927	. . . . . . 7 ⊢ ((𝐽 ∈ Top ∧ 𝑆 ⊆ ∪ 𝐽) → ((limPt‘𝐽)‘𝑆) ⊆ ∪ 𝐽)
11	4, 8, 10	syl2anc 692	. . . . . 6 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → ((limPt‘𝐽)‘𝑆) ⊆ ∪ 𝐽)
12		simpl3 1064	. . . . . 6 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑃 ∈ ((limPt‘𝐽)‘𝑆))
13	11, 12	sseldd 3596	. . . . 5 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑃 ∈ ∪ 𝐽)
14	13, 7	eleqtrrd 2702	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑃 ∈ 𝑋)
15		simpr 477	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → 𝑅 ∈ ℝ+)
16	2	blnei 22288	. . . 4 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋 ∧ 𝑅 ∈ ℝ+) → (𝑃(ball‘𝐷)𝑅) ∈ ((nei‘𝐽)‘{𝑃}))
17	1, 14, 15, 16	syl3anc 1324	. . 3 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → (𝑃(ball‘𝐷)𝑅) ∈ ((nei‘𝐽)‘{𝑃}))
18	9	islp2 20930	. . . . 5 ⊢ ((𝐽 ∈ Top ∧ 𝑆 ⊆ ∪ 𝐽 ∧ 𝑃 ∈ ∪ 𝐽) → (𝑃 ∈ ((limPt‘𝐽)‘𝑆) ↔ ∀𝑥 ∈ ((nei‘𝐽)‘{𝑃})(𝑥 ∩ (𝑆 ∖ {𝑃})) ≠ ∅))
19	4, 8, 13, 18	syl3anc 1324	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → (𝑃 ∈ ((limPt‘𝐽)‘𝑆) ↔ ∀𝑥 ∈ ((nei‘𝐽)‘{𝑃})(𝑥 ∩ (𝑆 ∖ {𝑃})) ≠ ∅))
20	12, 19	mpbid 222	. . 3 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → ∀𝑥 ∈ ((nei‘𝐽)‘{𝑃})(𝑥 ∩ (𝑆 ∖ {𝑃})) ≠ ∅)
21		ineq1 3799	. . . . 5 ⊢ (𝑥 = (𝑃(ball‘𝐷)𝑅) → (𝑥 ∩ (𝑆 ∖ {𝑃})) = ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})))
22	21	neeq1d 2850	. . . 4 ⊢ (𝑥 = (𝑃(ball‘𝐷)𝑅) → ((𝑥 ∩ (𝑆 ∖ {𝑃})) ≠ ∅ ↔ ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) ≠ ∅))
23	22	rspcva 3302	. . 3 ⊢ (((𝑃(ball‘𝐷)𝑅) ∈ ((nei‘𝐽)‘{𝑃}) ∧ ∀𝑥 ∈ ((nei‘𝐽)‘{𝑃})(𝑥 ∩ (𝑆 ∖ {𝑃})) ≠ ∅) → ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) ≠ ∅)
24	17, 20, 23	syl2anc 692	. 2 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) ≠ ∅)
25		elin 3788	. . . . 5 ⊢ (𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) ↔ (𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ∧ 𝑥 ∈ (𝑆 ∖ {𝑃})))
26		eldifi 3724	. . . . . . 7 ⊢ (𝑥 ∈ (𝑆 ∖ {𝑃}) → 𝑥 ∈ 𝑆)
27	26	anim2i 592	. . . . . 6 ⊢ ((𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ∧ 𝑥 ∈ (𝑆 ∖ {𝑃})) → (𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ∧ 𝑥 ∈ 𝑆))
28	27	ancomd 467	. . . . 5 ⊢ ((𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ∧ 𝑥 ∈ (𝑆 ∖ {𝑃})) → (𝑥 ∈ 𝑆 ∧ 𝑥 ∈ (𝑃(ball‘𝐷)𝑅)))
29	25, 28	sylbi 207	. . . 4 ⊢ (𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) → (𝑥 ∈ 𝑆 ∧ 𝑥 ∈ (𝑃(ball‘𝐷)𝑅)))
30	29	eximi 1760	. . 3 ⊢ (∃𝑥 𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) → ∃𝑥(𝑥 ∈ 𝑆 ∧ 𝑥 ∈ (𝑃(ball‘𝐷)𝑅)))
31		n0 3923	. . 3 ⊢ (((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) ≠ ∅ ↔ ∃𝑥 𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})))
32		df-rex 2915	. . 3 ⊢ (∃𝑥 ∈ 𝑆 𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ↔ ∃𝑥(𝑥 ∈ 𝑆 ∧ 𝑥 ∈ (𝑃(ball‘𝐷)𝑅)))
33	30, 31, 32	3imtr4i 281	. 2 ⊢ (((𝑃(ball‘𝐷)𝑅) ∩ (𝑆 ∖ {𝑃})) ≠ ∅ → ∃𝑥 ∈ 𝑆 𝑥 ∈ (𝑃(ball‘𝐷)𝑅))
34	24, 33	syl 17	1 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝑃 ∈ ((limPt‘𝐽)‘𝑆)) ∧ 𝑅 ∈ ℝ+) → ∃𝑥 ∈ 𝑆 𝑥 ∈ (𝑃(ball‘𝐷)𝑅))

Syntax hints:   → wi 4   ↔ wb 196   ∧ wa 384   ∧ w3a 1036   = wceq 1481  ∃wex 1702   ∈ wcel 1988   ≠ wne 2791  ∀wral 2909  ∃wrex 2910   ∖ cdif 3564   ∩ cin 3566   ⊆ wss 3567  ∅c0 3907  {csn 4168  ∪ cuni 4427  ‘cfv 5876  (class class class)co 6635  ℝ⁺crp 11817  ∞Metcxmt 19712  ballcbl 19714  MetOpencmopn 19717  Topctop 20679  neicnei 20882  limPtclp 20919

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-rep 4762  ax-sep 4772  ax-nul 4780  ax-pow 4834  ax-pr 4897  ax-un 6934  ax-cnex 9977  ax-resscn 9978  ax-1cn 9979  ax-icn 9980  ax-addcl 9981  ax-addrcl 9982  ax-mulcl 9983  ax-mulrcl 9984  ax-mulcom 9985  ax-addass 9986  ax-mulass 9987  ax-distr 9988  ax-i2m1 9989  ax-1ne0 9990  ax-1rid 9991  ax-rnegex 9992  ax-rrecex 9993  ax-cnre 9994  ax-pre-lttri 9995  ax-pre-lttrn 9996  ax-pre-ltadd 9997  ax-pre-mulgt0 9998  ax-pre-sup 9999

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1484  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ne 2792  df-nel 2895  df-ral 2914  df-rex 2915  df-reu 2916  df-rmo 2917  df-rab 2918  df-v 3197  df-sbc 3430  df-csb 3527  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-pss 3583  df-nul 3908  df-if 4078  df-pw 4151  df-sn 4169  df-pr 4171  df-tp 4173  df-op 4175  df-uni 4428  df-int 4467  df-iun 4513  df-iin 4514  df-br 4645  df-opab 4704  df-mpt 4721  df-tr 4744  df-id 5014  df-eprel 5019  df-po 5025  df-so 5026  df-fr 5063  df-we 5065  df-xp 5110  df-rel 5111  df-cnv 5112  df-co 5113  df-dm 5114  df-rn 5115  df-res 5116  df-ima 5117  df-pred 5668  df-ord 5714  df-on 5715  df-lim 5716  df-suc 5717  df-iota 5839  df-fun 5878  df-fn 5879  df-f 5880  df-f1 5881  df-fo 5882  df-f1o 5883  df-fv 5884  df-riota 6596  df-ov 6638  df-oprab 6639  df-mpt2 6640  df-om 7051  df-1st 7153  df-2nd 7154  df-wrecs 7392  df-recs 7453  df-rdg 7491  df-er 7727  df-map 7844  df-en 7941  df-dom 7942  df-sdom 7943  df-sup 8333  df-inf 8334  df-pnf 10061  df-mnf 10062  df-xr 10063  df-ltxr 10064  df-le 10065  df-sub 10253  df-neg 10254  df-div 10670  df-nn 11006  df-2 11064  df-n0 11278  df-z 11363  df-uz 11673  df-q 11774  df-rp 11818  df-xneg 11931  df-xadd 11932  df-xmul 11933  df-topgen 16085  df-psmet 19719  df-xmet 19720  df-bl 19722  df-mopn 19723  df-top 20680  df-topon 20697  df-bases 20731  df-cld 20804  df-ntr 20805  df-cls 20806  df-nei 20883  df-lp 20921

This theorem is referenced by:  limcrecl  39661