Theorem bcth 25283

Description: Baire's Category Theorem. If a nonempty metric space is complete, it is nonmeager in itself. In other words, no open set in the metric space can be the countable union of rare closed subsets (where rare means having a closure with empty interior), so some subset 𝑀‘𝑘 must have a nonempty interior. Theorem 4.7-2 of [Kreyszig] p. 247. (The terminology "meager" and "nonmeager" is used by Kreyszig to replace Baire's "of the first category" and "of the second category." The latter terms are going out of favor to avoid confusion with category theory.) See bcthlem5 25282 for an overview of the proof. (Contributed by NM, 28-Oct-2007.) (Proof shortened by Mario Carneiro, 6-Jan-2014.)

Hypothesis

Ref	Expression
bcth.2	⊢ 𝐽 = (MetOpen‘𝐷)

Assertion

Ref	Expression
bcth	⊢ ((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽) ∧ ((int‘𝐽)‘∪ ran 𝑀) ≠ ∅) → ∃𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) ≠ ∅)

Distinct variable groups:   𝐷,𝑘   𝑘,𝐽   𝑘,𝑀   𝑘,𝑋

Proof of Theorem bcth

Dummy variables 𝑛 𝑟 𝑥 𝑧 𝑔 𝑚 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		bcth.2	. . . . . 6 ⊢ 𝐽 = (MetOpen‘𝐷)
2		simpll 766	. . . . . 6 ⊢ (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) ∧ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅) → 𝐷 ∈ (CMet‘𝑋))
3		eleq1w 2817	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ 𝑋 ↔ 𝑦 ∈ 𝑋))
4		eleq1w 2817	. . . . . . . . . . 11 ⊢ (𝑟 = 𝑚 → (𝑟 ∈ ℝ+ ↔ 𝑚 ∈ ℝ+))
5	3, 4	bi2anan9 638	. . . . . . . . . 10 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → ((𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) ↔ (𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+)))
6		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → 𝑟 = 𝑚)
7	6	breq1d 5106	. . . . . . . . . . 11 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → (𝑟 < (1 / 𝑘) ↔ 𝑚 < (1 / 𝑘)))
8		oveq12 7365	. . . . . . . . . . . . 13 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → (𝑥(ball‘𝐷)𝑟) = (𝑦(ball‘𝐷)𝑚))
9	8	fveq2d 6836	. . . . . . . . . . . 12 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → ((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) = ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)))
10	9	sseq1d 3963	. . . . . . . . . . 11 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → (((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘)) ↔ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))
11	7, 10	anbi12d 632	. . . . . . . . . 10 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → ((𝑟 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))) ↔ (𝑚 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘)))))
12	5, 11	anbi12d 632	. . . . . . . . 9 ⊢ ((𝑥 = 𝑦 ∧ 𝑟 = 𝑚) → (((𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) ∧ (𝑟 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘)))) ↔ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))))
13	12	cbvopabv 5169	. . . . . . . 8 ⊢ {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) ∧ (𝑟 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))} = {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))}
14		oveq2 7364	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑛 → (1 / 𝑘) = (1 / 𝑛))
15	14	breq2d 5108	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → (𝑚 < (1 / 𝑘) ↔ 𝑚 < (1 / 𝑛)))
16		fveq2 6832	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑛 → (𝑀‘𝑘) = (𝑀‘𝑛))
17	16	difeq2d 4076	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑛 → (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘)) = (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛)))
18	17	sseq2d 3964	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑛 → (((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘)) ↔ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛))))
19	15, 18	anbi12d 632	. . . . . . . . . 10 ⊢ (𝑘 = 𝑛 → ((𝑚 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))) ↔ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛)))))
20	19	anbi2d 630	. . . . . . . . 9 ⊢ (𝑘 = 𝑛 → (((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘)))) ↔ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛))))))
21	20	opabbidv 5162	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))} = {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛))))})
22	13, 21	eqtrid 2781	. . . . . . 7 ⊢ (𝑘 = 𝑛 → {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) ∧ (𝑟 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))} = {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛))))})
23		fveq2 6832	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑔 → ((ball‘𝐷)‘𝑧) = ((ball‘𝐷)‘𝑔))
24	23	difeq1d 4075	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑔 → (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛)) = (((ball‘𝐷)‘𝑔) ∖ (𝑀‘𝑛)))
25	24	sseq2d 3964	. . . . . . . . . 10 ⊢ (𝑧 = 𝑔 → (((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛)) ↔ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑔) ∖ (𝑀‘𝑛))))
26	25	anbi2d 630	. . . . . . . . 9 ⊢ (𝑧 = 𝑔 → ((𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛))) ↔ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑔) ∖ (𝑀‘𝑛)))))
27	26	anbi2d 630	. . . . . . . 8 ⊢ (𝑧 = 𝑔 → (((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛)))) ↔ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑔) ∖ (𝑀‘𝑛))))))
28	27	opabbidv 5162	. . . . . . 7 ⊢ (𝑧 = 𝑔 → {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑛))))} = {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑔) ∖ (𝑀‘𝑛))))})
29	22, 28	cbvmpov 7451	. . . . . 6 ⊢ (𝑘 ∈ ℕ, 𝑧 ∈ (𝑋 × ℝ+) ↦ {⟨𝑥, 𝑟⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) ∧ (𝑟 < (1 / 𝑘) ∧ ((cls‘𝐽)‘(𝑥(ball‘𝐷)𝑟)) ⊆ (((ball‘𝐷)‘𝑧) ∖ (𝑀‘𝑘))))}) = (𝑛 ∈ ℕ, 𝑔 ∈ (𝑋 × ℝ+) ↦ {⟨𝑦, 𝑚⟩ ∣ ((𝑦 ∈ 𝑋 ∧ 𝑚 ∈ ℝ+) ∧ (𝑚 < (1 / 𝑛) ∧ ((cls‘𝐽)‘(𝑦(ball‘𝐷)𝑚)) ⊆ (((ball‘𝐷)‘𝑔) ∖ (𝑀‘𝑛))))})
30		simplr 768	. . . . . 6 ⊢ (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) ∧ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅) → 𝑀:ℕ⟶(Clsd‘𝐽))
31		simpr 484	. . . . . . 7 ⊢ (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) ∧ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅) → ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅)
32	16	fveqeq2d 6840	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → (((int‘𝐽)‘(𝑀‘𝑘)) = ∅ ↔ ((int‘𝐽)‘(𝑀‘𝑛)) = ∅))
33	32	cbvralvw 3212	. . . . . . 7 ⊢ (∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅ ↔ ∀𝑛 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑛)) = ∅)
34	31, 33	sylib 218	. . . . . 6 ⊢ (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) ∧ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅) → ∀𝑛 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑛)) = ∅)
35	1, 2, 29, 30, 34	bcthlem5 25282	. . . . 5 ⊢ (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) ∧ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅) → ((int‘𝐽)‘∪ ran 𝑀) = ∅)
36	35	ex 412	. . . 4 ⊢ ((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) → (∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅ → ((int‘𝐽)‘∪ ran 𝑀) = ∅))
37	36	necon3ad 2943	. . 3 ⊢ ((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽)) → (((int‘𝐽)‘∪ ran 𝑀) ≠ ∅ → ¬ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅))
38	37	3impia 1117	. 2 ⊢ ((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽) ∧ ((int‘𝐽)‘∪ ran 𝑀) ≠ ∅) → ¬ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅)
39		df-ne 2931	. . . 4 ⊢ (((int‘𝐽)‘(𝑀‘𝑘)) ≠ ∅ ↔ ¬ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅)
40	39	rexbii 3081	. . 3 ⊢ (∃𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) ≠ ∅ ↔ ∃𝑘 ∈ ℕ ¬ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅)
41		rexnal 3086	. . 3 ⊢ (∃𝑘 ∈ ℕ ¬ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅ ↔ ¬ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅)
42	40, 41	bitri 275	. 2 ⊢ (∃𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) ≠ ∅ ↔ ¬ ∀𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) = ∅)
43	38, 42	sylibr 234	1 ⊢ ((𝐷 ∈ (CMet‘𝑋) ∧ 𝑀:ℕ⟶(Clsd‘𝐽) ∧ ((int‘𝐽)‘∪ ran 𝑀) ≠ ∅) → ∃𝑘 ∈ ℕ ((int‘𝐽)‘(𝑀‘𝑘)) ≠ ∅)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∧ w3a 1086   = wceq 1541   ∈ wcel 2113   ≠ wne 2930  ∀wral 3049  ∃wrex 3058   ∖ cdif 3896   ⊆ wss 3899  ∅c0 4283  ∪ cuni 4861   class class class wbr 5096  {copab 5158   × cxp 5620  ran crn 5623  ⟶wf 6486  ‘cfv 6490  (class class class)co 7356   ∈ cmpo 7358  1c1 11025   < clt 11164   / cdiv 11792  ℕcn 12143  ℝ⁺crp 12903  ballcbl 21294  MetOpencmopn 21297  Clsdccld 22958  intcnt 22959  clsccl 22960  CMetccmet 25208

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706  ax-rep 5222  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678  ax-inf2 9548  ax-dc 10354  ax-cnex 11080  ax-resscn 11081  ax-1cn 11082  ax-icn 11083  ax-addcl 11084  ax-addrcl 11085  ax-mulcl 11086  ax-mulrcl 11087  ax-mulcom 11088  ax-addass 11089  ax-mulass 11090  ax-distr 11091  ax-i2m1 11092  ax-1ne0 11093  ax-1rid 11094  ax-rnegex 11095  ax-rrecex 11096  ax-cnre 11097  ax-pre-lttri 11098  ax-pre-lttrn 11099  ax-pre-ltadd 11100  ax-pre-mulgt0 11101  ax-pre-sup 11102

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-op 4585  df-uni 4862  df-int 4901  df-iun 4946  df-iin 4947  df-br 5097  df-opab 5159  df-mpt 5178  df-tr 5204  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-er 8633  df-map 8763  df-pm 8764  df-en 8882  df-dom 8883  df-sdom 8884  df-sup 9343  df-inf 9344  df-pnf 11166  df-mnf 11167  df-xr 11168  df-ltxr 11169  df-le 11170  df-sub 11364  df-neg 11365  df-div 11793  df-nn 12144  df-2 12206  df-n0 12400  df-z 12487  df-uz 12750  df-q 12860  df-rp 12904  df-xneg 13024  df-xadd 13025  df-xmul 13026  df-ico 13265  df-rest 17340  df-topgen 17361  df-psmet 21299  df-xmet 21300  df-met 21301  df-bl 21302  df-mopn 21303  df-fbas 21304  df-fg 21305  df-top 22836  df-topon 22853  df-bases 22888  df-cld 22961  df-ntr 22962  df-cls 22963  df-nei 23040  df-lm 23171  df-fil 23788  df-fm 23880  df-flim 23881  df-flf 23882  df-cfil 25209  df-cau 25210  df-cmet 25211

This theorem is referenced by:  bcth2  25284  bcth3  25285