Theorem reheibor 37809

Description: Heine-Borel theorem for real numbers. A subset of ℝ is compact iff it is closed and bounded. (Contributed by Jeff Madsen, 2-Sep-2009.) (Revised by Mario Carneiro, 22-Sep-2015.)

Hypotheses

Ref	Expression
reheibor.2	⊢ 𝑀 = ((abs ∘ − ) ↾ (𝑌 × 𝑌))
reheibor.3	⊢ 𝑇 = (MetOpen‘𝑀)
reheibor.4	⊢ 𝑈 = (topGen‘ran (,))

Assertion

Ref	Expression
reheibor	⊢ (𝑌 ⊆ ℝ → (𝑇 ∈ Comp ↔ (𝑌 ∈ (Clsd‘𝑈) ∧ 𝑀 ∈ (Bnd‘𝑌))))

Proof of Theorem reheibor

Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df1o2 8485	. . . 4 ⊢ 1o = {∅}
2		snfi 9055	. . . 4 ⊢ {∅} ∈ Fin
3	1, 2	eqeltri 2830	. . 3 ⊢ 1o ∈ Fin
4		imassrn 6058	. . . . 5 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ⊆ ran (𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))
5		0ex 5277	. . . . . . . . . 10 ⊢ ∅ ∈ V
6		eqid 2735	. . . . . . . . . . 11 ⊢ ((abs ∘ − ) ↾ (ℝ × ℝ)) = ((abs ∘ − ) ↾ (ℝ × ℝ))
7		eqid 2735	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) = (𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))
8	6, 7	ismrer1 37808	. . . . . . . . . 10 ⊢ (∅ ∈ V → (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘{∅})))
9	5, 8	ax-mp 5	. . . . . . . . 9 ⊢ (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘{∅}))
10	1	fveq2i 6878	. . . . . . . . . 10 ⊢ (ℝn‘1o) = (ℝn‘{∅})
11	10	oveq2i 7414	. . . . . . . . 9 ⊢ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)) = (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘{∅}))
12	9, 11	eleqtrri 2833	. . . . . . . 8 ⊢ (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o))
13	6	rexmet 24728	. . . . . . . . 9 ⊢ ((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ)
14		eqid 2735	. . . . . . . . . . 11 ⊢ (ℝ ↑m 1o) = (ℝ ↑m 1o)
15	14	rrnmet 37799	. . . . . . . . . 10 ⊢ (1o ∈ Fin → (ℝn‘1o) ∈ (Met‘(ℝ ↑m 1o)))
16		metxmet 24271	. . . . . . . . . 10 ⊢ ((ℝn‘1o) ∈ (Met‘(ℝ ↑m 1o)) → (ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o)))
17	3, 15, 16	mp2b 10	. . . . . . . . 9 ⊢ (ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o))
18		isismty 37771	. . . . . . . . 9 ⊢ ((((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ) ∧ (ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o))) → ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)) ↔ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ–1-1-onto→(ℝ ↑m 1o) ∧ ∀𝑦 ∈ ℝ ∀𝑧 ∈ ℝ (𝑦((abs ∘ − ) ↾ (ℝ × ℝ))𝑧) = (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))‘𝑦)(ℝn‘1o)((𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))‘𝑧)))))
19	13, 17, 18	mp2an 692	. . . . . . . 8 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)) ↔ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ–1-1-onto→(ℝ ↑m 1o) ∧ ∀𝑦 ∈ ℝ ∀𝑧 ∈ ℝ (𝑦((abs ∘ − ) ↾ (ℝ × ℝ))𝑧) = (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))‘𝑦)(ℝn‘1o)((𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))‘𝑧))))
20	12, 19	mpbi 230	. . . . . . 7 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ–1-1-onto→(ℝ ↑m 1o) ∧ ∀𝑦 ∈ ℝ ∀𝑧 ∈ ℝ (𝑦((abs ∘ − ) ↾ (ℝ × ℝ))𝑧) = (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))‘𝑦)(ℝn‘1o)((𝑥 ∈ ℝ ↦ ({∅} × {𝑥}))‘𝑧)))
21	20	simpli 483	. . . . . 6 ⊢ (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ–1-1-onto→(ℝ ↑m 1o)
22		f1of 6817	. . . . . 6 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ–1-1-onto→(ℝ ↑m 1o) → (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ⟶(ℝ ↑m 1o))
23		frn 6712	. . . . . 6 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})):ℝ⟶(ℝ ↑m 1o) → ran (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ⊆ (ℝ ↑m 1o))
24	21, 22, 23	mp2b 10	. . . . 5 ⊢ ran (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ⊆ (ℝ ↑m 1o)
25	4, 24	sstri 3968	. . . 4 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ⊆ (ℝ ↑m 1o)
26	25	a1i 11	. . 3 ⊢ (𝑌 ⊆ ℝ → ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ⊆ (ℝ ↑m 1o))
27		eqid 2735	. . . 4 ⊢ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) = ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))
28		eqid 2735	. . . 4 ⊢ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) = (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))
29		eqid 2735	. . . 4 ⊢ (MetOpen‘(ℝn‘1o)) = (MetOpen‘(ℝn‘1o))
30	14, 27, 28, 29	rrnheibor 37807	. . 3 ⊢ ((1o ∈ Fin ∧ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ⊆ (ℝ ↑m 1o)) → ((MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp ↔ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ∈ (Clsd‘(MetOpen‘(ℝn‘1o))) ∧ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (Bnd‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
31	3, 26, 30	sylancr 587	. 2 ⊢ (𝑌 ⊆ ℝ → ((MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp ↔ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ∈ (Clsd‘(MetOpen‘(ℝn‘1o))) ∧ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (Bnd‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
32		reheibor.2	. . . . . . 7 ⊢ 𝑀 = ((abs ∘ − ) ↾ (𝑌 × 𝑌))
33		cnxmet 24709	. . . . . . . 8 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
34		id 22	. . . . . . . . 9 ⊢ (𝑌 ⊆ ℝ → 𝑌 ⊆ ℝ)
35		ax-resscn 11184	. . . . . . . . 9 ⊢ ℝ ⊆ ℂ
36	34, 35	sstrdi 3971	. . . . . . . 8 ⊢ (𝑌 ⊆ ℝ → 𝑌 ⊆ ℂ)
37		xmetres2 24298	. . . . . . . 8 ⊢ (((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 𝑌 ⊆ ℂ) → ((abs ∘ − ) ↾ (𝑌 × 𝑌)) ∈ (∞Met‘𝑌))
38	33, 36, 37	sylancr 587	. . . . . . 7 ⊢ (𝑌 ⊆ ℝ → ((abs ∘ − ) ↾ (𝑌 × 𝑌)) ∈ (∞Met‘𝑌))
39	32, 38	eqeltrid 2838	. . . . . 6 ⊢ (𝑌 ⊆ ℝ → 𝑀 ∈ (∞Met‘𝑌))
40		xmetres2 24298	. . . . . . 7 ⊢ (((ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o)) ∧ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ⊆ (ℝ ↑m 1o)) → ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (∞Met‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))
41	17, 26, 40	sylancr 587	. . . . . 6 ⊢ (𝑌 ⊆ ℝ → ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (∞Met‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))
42		reheibor.3	. . . . . . 7 ⊢ 𝑇 = (MetOpen‘𝑀)
43	42, 28	ismtyhmeo 37775	. . . . . 6 ⊢ ((𝑀 ∈ (∞Met‘𝑌) ∧ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (∞Met‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) → (𝑀 Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ⊆ (𝑇Homeo(MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))))
44	39, 41, 43	syl2anc 584	. . . . 5 ⊢ (𝑌 ⊆ ℝ → (𝑀 Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ⊆ (𝑇Homeo(MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))))
45	13	a1i 11	. . . . . . 7 ⊢ (𝑌 ⊆ ℝ → ((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ))
46	17	a1i 11	. . . . . . 7 ⊢ (𝑌 ⊆ ℝ → (ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o)))
47	12	a1i 11	. . . . . . 7 ⊢ (𝑌 ⊆ ℝ → (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)))
48		eqid 2735	. . . . . . . 8 ⊢ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) = ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)
49		eqid 2735	. . . . . . . 8 ⊢ (((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌)) = (((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌))
50	48, 49, 27	ismtyres 37778	. . . . . . 7 ⊢ (((((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ) ∧ (ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o))) ∧ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)) ∧ 𝑌 ⊆ ℝ)) → ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ↾ 𝑌) ∈ ((((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌)) Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
51	45, 46, 47, 34, 50	syl22anc 838	. . . . . 6 ⊢ (𝑌 ⊆ ℝ → ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ↾ 𝑌) ∈ ((((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌)) Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
52		xpss12 5669	. . . . . . . . . 10 ⊢ ((𝑌 ⊆ ℝ ∧ 𝑌 ⊆ ℝ) → (𝑌 × 𝑌) ⊆ (ℝ × ℝ))
53	52	anidms 566	. . . . . . . . 9 ⊢ (𝑌 ⊆ ℝ → (𝑌 × 𝑌) ⊆ (ℝ × ℝ))
54	53	resabs1d 5995	. . . . . . . 8 ⊢ (𝑌 ⊆ ℝ → (((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌)) = ((abs ∘ − ) ↾ (𝑌 × 𝑌)))
55	54, 32	eqtr4di 2788	. . . . . . 7 ⊢ (𝑌 ⊆ ℝ → (((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌)) = 𝑀)
56	55	oveq1d 7418	. . . . . 6 ⊢ (𝑌 ⊆ ℝ → ((((abs ∘ − ) ↾ (ℝ × ℝ)) ↾ (𝑌 × 𝑌)) Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) = (𝑀 Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
57	51, 56	eleqtrd 2836	. . . . 5 ⊢ (𝑌 ⊆ ℝ → ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ↾ 𝑌) ∈ (𝑀 Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
58	44, 57	sseldd 3959	. . . 4 ⊢ (𝑌 ⊆ ℝ → ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ↾ 𝑌) ∈ (𝑇Homeo(MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))))
59		hmphi 23713	. . . 4 ⊢ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ↾ 𝑌) ∈ (𝑇Homeo(MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))) → 𝑇 ≃ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
60	58, 59	syl 17	. . 3 ⊢ (𝑌 ⊆ ℝ → 𝑇 ≃ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
61		cmphmph 23724	. . . 4 ⊢ (𝑇 ≃ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) → (𝑇 ∈ Comp → (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp))
62		hmphsym 23718	. . . . 5 ⊢ (𝑇 ≃ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) → (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ≃ 𝑇)
63		cmphmph 23724	. . . . 5 ⊢ ((MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ≃ 𝑇 → ((MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp → 𝑇 ∈ Comp))
64	62, 63	syl 17	. . . 4 ⊢ (𝑇 ≃ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) → ((MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp → 𝑇 ∈ Comp))
65	61, 64	impbid 212	. . 3 ⊢ (𝑇 ≃ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) → (𝑇 ∈ Comp ↔ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp))
66	60, 65	syl 17	. 2 ⊢ (𝑌 ⊆ ℝ → (𝑇 ∈ Comp ↔ (MetOpen‘((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))) ∈ Comp))
67		reheibor.4	. . . . . . . 8 ⊢ 𝑈 = (topGen‘ran (,))
68		eqid 2735	. . . . . . . . 9 ⊢ (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ))) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
69	6, 68	tgioo 24733	. . . . . . . 8 ⊢ (topGen‘ran (,)) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
70	67, 69	eqtri 2758	. . . . . . 7 ⊢ 𝑈 = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
71	70, 29	ismtyhmeo 37775	. . . . . 6 ⊢ ((((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ) ∧ (ℝn‘1o) ∈ (∞Met‘(ℝ ↑m 1o))) → (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)) ⊆ (𝑈Homeo(MetOpen‘(ℝn‘1o))))
72	13, 17, 71	mp2an 692	. . . . 5 ⊢ (((abs ∘ − ) ↾ (ℝ × ℝ)) Ismty (ℝn‘1o)) ⊆ (𝑈Homeo(MetOpen‘(ℝn‘1o)))
73	72, 12	sselii 3955	. . . 4 ⊢ (𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (𝑈Homeo(MetOpen‘(ℝn‘1o)))
74		retopon 24700	. . . . . . 7 ⊢ (topGen‘ran (,)) ∈ (TopOn‘ℝ)
75	67, 74	eqeltri 2830	. . . . . 6 ⊢ 𝑈 ∈ (TopOn‘ℝ)
76	75	toponunii 22852	. . . . 5 ⊢ ℝ = ∪ 𝑈
77	76	hmeocld 23703	. . . 4 ⊢ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ∈ (𝑈Homeo(MetOpen‘(ℝn‘1o))) ∧ 𝑌 ⊆ ℝ) → (𝑌 ∈ (Clsd‘𝑈) ↔ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ∈ (Clsd‘(MetOpen‘(ℝn‘1o)))))
78	73, 34, 77	sylancr 587	. . 3 ⊢ (𝑌 ⊆ ℝ → (𝑌 ∈ (Clsd‘𝑈) ↔ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ∈ (Clsd‘(MetOpen‘(ℝn‘1o)))))
79		ismtybnd 37777	. . . 4 ⊢ ((𝑀 ∈ (∞Met‘𝑌) ∧ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (∞Met‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)) ∧ ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) ↾ 𝑌) ∈ (𝑀 Ismty ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))) → (𝑀 ∈ (Bnd‘𝑌) ↔ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (Bnd‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))
80	39, 41, 57, 79	syl3anc 1373	. . 3 ⊢ (𝑌 ⊆ ℝ → (𝑀 ∈ (Bnd‘𝑌) ↔ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (Bnd‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))))
81	78, 80	anbi12d 632	. 2 ⊢ (𝑌 ⊆ ℝ → ((𝑌 ∈ (Clsd‘𝑈) ∧ 𝑀 ∈ (Bnd‘𝑌)) ↔ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) ∈ (Clsd‘(MetOpen‘(ℝn‘1o))) ∧ ((ℝn‘1o) ↾ (((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌) × ((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌))) ∈ (Bnd‘((𝑥 ∈ ℝ ↦ ({∅} × {𝑥})) “ 𝑌)))))
82	31, 66, 81	3bitr4d 311	1 ⊢ (𝑌 ⊆ ℝ → (𝑇 ∈ Comp ↔ (𝑌 ∈ (Clsd‘𝑈) ∧ 𝑀 ∈ (Bnd‘𝑌))))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540   ∈ wcel 2108  ∀wral 3051  Vcvv 3459   ⊆ wss 3926  ∅c0 4308  {csn 4601   class class class wbr 5119   ↦ cmpt 5201   × cxp 5652  ran crn 5655   ↾ cres 5656   “ cima 5657   ∘ ccom 5658  ⟶wf 6526  –1-1-onto→wf1o 6529  ‘cfv 6530  (class class class)co 7403  1_oc1o 8471   ↑_m cmap 8838  Fincfn 8957  ℂcc 11125  ℝcr 11126   − cmin 11464  (,)cioo 13360  abscabs 15251  topGenctg 17449  ∞Metcxmet 21298  Metcmet 21299  MetOpencmopn 21303  TopOnctopon 22846  Clsdccld 22952  Compccmp 23322  Homeochmeo 23689   ≃ chmph 23690  Bndcbnd 37737   Ismty cismty 37768  ℝⁿcrrn 37795

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7727  ax-inf2 9653  ax-cc 10447  ax-cnex 11183  ax-resscn 11184  ax-1cn 11185  ax-icn 11186  ax-addcl 11187  ax-addrcl 11188  ax-mulcl 11189  ax-mulrcl 11190  ax-mulcom 11191  ax-addass 11192  ax-mulass 11193  ax-distr 11194  ax-i2m1 11195  ax-1ne0 11196  ax-1rid 11197  ax-rnegex 11198  ax-rrecex 11199  ax-cnre 11200  ax-pre-lttri 11201  ax-pre-lttrn 11202  ax-pre-ltadd 11203  ax-pre-mulgt0 11204  ax-pre-sup 11205

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-tp 4606  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-iin 4970  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-se 5607  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6483  df-fun 6532  df-fn 6533  df-f 6534  df-f1 6535  df-fo 6536  df-f1o 6537  df-fv 6538  df-isom 6539  df-riota 7360  df-ov 7406  df-oprab 7407  df-mpo 7408  df-om 7860  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8383  df-rdg 8422  df-1o 8478  df-2o 8479  df-oadd 8482  df-omul 8483  df-er 8717  df-ec 8719  df-map 8840  df-pm 8841  df-ixp 8910  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-fi 9421  df-sup 9452  df-inf 9453  df-oi 9522  df-card 9951  df-acn 9954  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11466  df-neg 11467  df-div 11893  df-nn 12239  df-2 12301  df-3 12302  df-4 12303  df-5 12304  df-6 12305  df-7 12306  df-8 12307  df-9 12308  df-n0 12500  df-z 12587  df-dec 12707  df-uz 12851  df-q 12963  df-rp 13007  df-xneg 13126  df-xadd 13127  df-xmul 13128  df-ioo 13364  df-ico 13366  df-icc 13367  df-fz 13523  df-fzo 13670  df-fl 13807  df-seq 14018  df-exp 14078  df-hash 14347  df-cj 15116  df-re 15117  df-im 15118  df-sqrt 15252  df-abs 15253  df-limsup 15485  df-clim 15502  df-rlim 15503  df-sum 15701  df-gz 16948  df-struct 17164  df-sets 17181  df-slot 17199  df-ndx 17211  df-base 17227  df-ress 17250  df-plusg 17282  df-mulr 17283  df-starv 17284  df-sca 17285  df-vsca 17286  df-ip 17287  df-tset 17288  df-ple 17289  df-ds 17291  df-unif 17292  df-hom 17293  df-cco 17294  df-rest 17434  df-topn 17435  df-topgen 17455  df-prds 17459  df-pws 17461  df-psmet 21305  df-xmet 21306  df-met 21307  df-bl 21308  df-mopn 21309  df-fbas 21310  df-fg 21311  df-cnfld 21314  df-top 22830  df-topon 22847  df-topsp 22869  df-bases 22882  df-cld 22955  df-ntr 22956  df-cls 22957  df-nei 23034  df-cn 23163  df-lm 23165  df-haus 23251  df-cmp 23323  df-hmeo 23691  df-hmph 23692  df-fil 23782  df-fm 23874  df-flim 23875  df-flf 23876  df-xms 24257  df-ms 24258  df-cfil 25205  df-cau 25206  df-cmet 25207  df-totbnd 37738  df-bnd 37749  df-ismty 37769  df-rrn 37796

This theorem is referenced by:  icccmpALT  37811