cmpcld - Metamath Proof Explorer

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

Theorem cmpcld 23377

Description: A closed subset of a compact space is compact. (Contributed by Jeff Hankins, 29-Jun-2009.)

**Assertion**
Ref	Expression
cmpcld	⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → (𝐽 ↾_t 𝑆) ∈ Comp)

Proof of Theorem cmpcld Dummy variables 𝑡 𝑠 𝑢 𝑣 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		velpw 4547	. . . 4 ⊢ (𝑠 ∈ 𝒫 𝐽 ↔ 𝑠 ⊆ 𝐽)
2		simp1l 1199	. . . . . . 7 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → 𝐽 ∈ Comp)
3		simp2 1138	. . . . . . . 8 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → 𝑠 ⊆ 𝐽)
4		eqid 2737	. . . . . . . . . . . 12 ⊢ ∪ 𝐽 = ∪ 𝐽
5	4	cldopn 23006	. . . . . . . . . . 11 ⊢ (𝑆 ∈ (Clsd‘𝐽) → (∪ 𝐽 ∖ 𝑆) ∈ 𝐽)
6	5	adantl 481	. . . . . . . . . 10 ⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → (∪ 𝐽 ∖ 𝑆) ∈ 𝐽)
7	6	3ad2ant1 1134	. . . . . . . . 9 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (∪ 𝐽 ∖ 𝑆) ∈ 𝐽)
8	7	snssd 4753	. . . . . . . 8 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → {(∪ 𝐽 ∖ 𝑆)} ⊆ 𝐽)
9	3, 8	unssd 4133	. . . . . . 7 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ⊆ 𝐽)
10		simp3 1139	. . . . . . . . . . . . 13 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → 𝑆 ⊆ ∪ 𝑠)
11		uniss 4859	. . . . . . . . . . . . . 14 ⊢ (𝑠 ⊆ 𝐽 → ∪ 𝑠 ⊆ ∪ 𝐽)
12	11	3ad2ant2 1135	. . . . . . . . . . . . 13 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ 𝑠 ⊆ ∪ 𝐽)
13	10, 12	sstrd 3933	. . . . . . . . . . . 12 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → 𝑆 ⊆ ∪ 𝐽)
14		undif 4423	. . . . . . . . . . . 12 ⊢ (𝑆 ⊆ ∪ 𝐽 ↔ (𝑆 ∪ (∪ 𝐽 ∖ 𝑆)) = ∪ 𝐽)
15	13, 14	sylib 218	. . . . . . . . . . 11 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (𝑆 ∪ (∪ 𝐽 ∖ 𝑆)) = ∪ 𝐽)
16		unss1 4126	. . . . . . . . . . . 12 ⊢ (𝑆 ⊆ ∪ 𝑠 → (𝑆 ∪ (∪ 𝐽 ∖ 𝑆)) ⊆ (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)))
17	16	3ad2ant3 1136	. . . . . . . . . . 11 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (𝑆 ∪ (∪ 𝐽 ∖ 𝑆)) ⊆ (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)))
18	15, 17	eqsstrrd 3958	. . . . . . . . . 10 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ 𝐽 ⊆ (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)))
19		difss 4077	. . . . . . . . . . 11 ⊢ (∪ 𝐽 ∖ 𝑆) ⊆ ∪ 𝐽
20		unss 4131	. . . . . . . . . . 11 ⊢ ((∪ 𝑠 ⊆ ∪ 𝐽 ∧ (∪ 𝐽 ∖ 𝑆) ⊆ ∪ 𝐽) ↔ (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)) ⊆ ∪ 𝐽)
21	12, 19, 20	sylanblc 590	. . . . . . . . . 10 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)) ⊆ ∪ 𝐽)
22	18, 21	eqssd 3940	. . . . . . . . 9 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ 𝐽 = (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)))
23		uniexg 7687	. . . . . . . . . . . . 13 ⊢ (𝐽 ∈ Comp → ∪ 𝐽 ∈ V)
24	23	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽) → ∪ 𝐽 ∈ V)
25	24	3adant3 1133	. . . . . . . . . . 11 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ 𝐽 ∈ V)
26		difexg 5266	. . . . . . . . . . 11 ⊢ (∪ 𝐽 ∈ V → (∪ 𝐽 ∖ 𝑆) ∈ V)
27		unisng 4869	. . . . . . . . . . 11 ⊢ ((∪ 𝐽 ∖ 𝑆) ∈ V → ∪ {(∪ 𝐽 ∖ 𝑆)} = (∪ 𝐽 ∖ 𝑆))
28	25, 26, 27	3syl 18	. . . . . . . . . 10 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ {(∪ 𝐽 ∖ 𝑆)} = (∪ 𝐽 ∖ 𝑆))
29	28	uneq2d 4109	. . . . . . . . 9 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (∪ 𝑠 ∪ ∪ {(∪ 𝐽 ∖ 𝑆)}) = (∪ 𝑠 ∪ (∪ 𝐽 ∖ 𝑆)))
30	22, 29	eqtr4d 2775	. . . . . . . 8 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ 𝐽 = (∪ 𝑠 ∪ ∪ {(∪ 𝐽 ∖ 𝑆)}))
31		uniun 4874	. . . . . . . 8 ⊢ ∪ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) = (∪ 𝑠 ∪ ∪ {(∪ 𝐽 ∖ 𝑆)})
32	30, 31	eqtr4di 2790	. . . . . . 7 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∪ 𝐽 = ∪ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}))
33	4	cmpcov 23364	. . . . . . 7 ⊢ ((𝐽 ∈ Comp ∧ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ⊆ 𝐽 ∧ ∪ 𝐽 = ∪ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)})) → ∃𝑢 ∈ (𝒫 (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∩ Fin)∪ 𝐽 = ∪ 𝑢)
34	2, 9, 32, 33	syl3anc 1374	. . . . . 6 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∃𝑢 ∈ (𝒫 (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∩ Fin)∪ 𝐽 = ∪ 𝑢)
35		elfpw 9257	. . . . . . . 8 ⊢ (𝑢 ∈ (𝒫 (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∩ Fin) ↔ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin))
36		simp2l 1201	. . . . . . . . . . . 12 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → 𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}))
37		uncom 4099	. . . . . . . . . . . 12 ⊢ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) = ({(∪ 𝐽 ∖ 𝑆)} ∪ 𝑠)
38	36, 37	sseqtrdi 3963	. . . . . . . . . . 11 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → 𝑢 ⊆ ({(∪ 𝐽 ∖ 𝑆)} ∪ 𝑠))
39		ssundif 4428	. . . . . . . . . . 11 ⊢ (𝑢 ⊆ ({(∪ 𝐽 ∖ 𝑆)} ∪ 𝑠) ↔ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ⊆ 𝑠)
40	38, 39	sylib 218	. . . . . . . . . 10 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ⊆ 𝑠)
41		diffi 9102	. . . . . . . . . . . 12 ⊢ (𝑢 ∈ Fin → (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ Fin)
42	41	ad2antll 730	. . . . . . . . . . 11 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin)) → (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ Fin)
43	42	3adant3 1133	. . . . . . . . . 10 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ Fin)
44		elfpw 9257	. . . . . . . . . 10 ⊢ ((𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ (𝒫 𝑠 ∩ Fin) ↔ ((𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ⊆ 𝑠 ∧ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ Fin))
45	40, 43, 44	sylanbrc 584	. . . . . . . . 9 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ (𝒫 𝑠 ∩ Fin))
46	10	3ad2ant1 1134	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → 𝑆 ⊆ ∪ 𝑠)
47	12	3ad2ant1 1134	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → ∪ 𝑠 ⊆ ∪ 𝐽)
48		simp3 1139	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → ∪ 𝐽 = ∪ 𝑢)
49	47, 48	sseqtrd 3959	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → ∪ 𝑠 ⊆ ∪ 𝑢)
50	46, 49	sstrd 3933	. . . . . . . . . . . . . . 15 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → 𝑆 ⊆ ∪ 𝑢)
51	50	sselda 3922	. . . . . . . . . . . . . 14 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → 𝑣 ∈ ∪ 𝑢)
52		eluni 4854	. . . . . . . . . . . . . 14 ⊢ (𝑣 ∈ ∪ 𝑢 ↔ ∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢))
53	51, 52	sylib 218	. . . . . . . . . . . . 13 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢))
54		simpl 482	. . . . . . . . . . . . . . . 16 ⊢ ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → 𝑣 ∈ 𝑤)
55	54	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → 𝑣 ∈ 𝑤))
56		simpr 484	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → 𝑤 ∈ 𝑢)
57	56	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → 𝑤 ∈ 𝑢))
58		elndif 4074	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑣 ∈ 𝑆 → ¬ 𝑣 ∈ (∪ 𝐽 ∖ 𝑆))
59	58	ad2antlr 728	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) ∧ 𝑣 ∈ 𝑤) → ¬ 𝑣 ∈ (∪ 𝐽 ∖ 𝑆))
60		eleq2 2826	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑤 = (∪ 𝐽 ∖ 𝑆) → (𝑣 ∈ 𝑤 ↔ 𝑣 ∈ (∪ 𝐽 ∖ 𝑆)))
61	60	biimpd 229	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑤 = (∪ 𝐽 ∖ 𝑆) → (𝑣 ∈ 𝑤 → 𝑣 ∈ (∪ 𝐽 ∖ 𝑆)))
62	61	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → (𝑤 = (∪ 𝐽 ∖ 𝑆) → (𝑣 ∈ 𝑤 → 𝑣 ∈ (∪ 𝐽 ∖ 𝑆))))
63	62	com23 86	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → (𝑣 ∈ 𝑤 → (𝑤 = (∪ 𝐽 ∖ 𝑆) → 𝑣 ∈ (∪ 𝐽 ∖ 𝑆))))
64	63	imp 406	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) ∧ 𝑣 ∈ 𝑤) → (𝑤 = (∪ 𝐽 ∖ 𝑆) → 𝑣 ∈ (∪ 𝐽 ∖ 𝑆)))
65	59, 64	mtod 198	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) ∧ 𝑣 ∈ 𝑤) → ¬ 𝑤 = (∪ 𝐽 ∖ 𝑆))
66	65	ex 412	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → (𝑣 ∈ 𝑤 → ¬ 𝑤 = (∪ 𝐽 ∖ 𝑆)))
67	66	adantrd 491	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → ¬ 𝑤 = (∪ 𝐽 ∖ 𝑆)))
68		velsn 4584	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑤 ∈ {(∪ 𝐽 ∖ 𝑆)} ↔ 𝑤 = (∪ 𝐽 ∖ 𝑆))
69	68	notbii 320	. . . . . . . . . . . . . . . . . 18 ⊢ (¬ 𝑤 ∈ {(∪ 𝐽 ∖ 𝑆)} ↔ ¬ 𝑤 = (∪ 𝐽 ∖ 𝑆))
70	67, 69	imbitrrdi 252	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → ¬ 𝑤 ∈ {(∪ 𝐽 ∖ 𝑆)}))
71	57, 70	jcad 512	. . . . . . . . . . . . . . . 16 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → (𝑤 ∈ 𝑢 ∧ ¬ 𝑤 ∈ {(∪ 𝐽 ∖ 𝑆)})))
72		eldif 3900	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ↔ (𝑤 ∈ 𝑢 ∧ ¬ 𝑤 ∈ {(∪ 𝐽 ∖ 𝑆)}))
73	71, 72	imbitrrdi 252	. . . . . . . . . . . . . . 15 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → 𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)})))
74	55, 73	jcad 512	. . . . . . . . . . . . . 14 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ((𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → (𝑣 ∈ 𝑤 ∧ 𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}))))
75	74	eximdv 1919	. . . . . . . . . . . . 13 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → (∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ 𝑢) → ∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}))))
76	53, 75	mpd 15	. . . . . . . . . . . 12 ⊢ (((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) ∧ 𝑣 ∈ 𝑆) → ∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)})))
77	76	ex 412	. . . . . . . . . . 11 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → (𝑣 ∈ 𝑆 → ∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}))))
78		eluni 4854	. . . . . . . . . . 11 ⊢ (𝑣 ∈ ∪ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ↔ ∃𝑤(𝑣 ∈ 𝑤 ∧ 𝑤 ∈ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)})))
79	77, 78	imbitrrdi 252	. . . . . . . . . 10 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → (𝑣 ∈ 𝑆 → 𝑣 ∈ ∪ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)})))
80	79	ssrdv 3928	. . . . . . . . 9 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → 𝑆 ⊆ ∪ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}))
81		unieq 4862	. . . . . . . . . . 11 ⊢ (𝑡 = (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) → ∪ 𝑡 = ∪ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}))
82	81	sseq2d 3955	. . . . . . . . . 10 ⊢ (𝑡 = (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) → (𝑆 ⊆ ∪ 𝑡 ↔ 𝑆 ⊆ ∪ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)})))
83	82	rspcev 3565	. . . . . . . . 9 ⊢ (((𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)}) ∈ (𝒫 𝑠 ∩ Fin) ∧ 𝑆 ⊆ ∪ (𝑢 ∖ {(∪ 𝐽 ∖ 𝑆)})) → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)
84	45, 80, 83	syl2anc 585	. . . . . . . 8 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ (𝑢 ⊆ (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∧ 𝑢 ∈ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)
85	35, 84	syl3an2b 1407	. . . . . . 7 ⊢ ((((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) ∧ 𝑢 ∈ (𝒫 (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∩ Fin) ∧ ∪ 𝐽 = ∪ 𝑢) → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)
86	85	rexlimdv3a 3143	. . . . . 6 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → (∃𝑢 ∈ (𝒫 (𝑠 ∪ {(∪ 𝐽 ∖ 𝑆)}) ∩ Fin)∪ 𝐽 = ∪ 𝑢 → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡))
87	34, 86	mpd 15	. . . . 5 ⊢ (((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) ∧ 𝑠 ⊆ 𝐽 ∧ 𝑆 ⊆ ∪ 𝑠) → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)
88	87	3exp 1120	. . . 4 ⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → (𝑠 ⊆ 𝐽 → (𝑆 ⊆ ∪ 𝑠 → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)))
89	1, 88	biimtrid 242	. . 3 ⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → (𝑠 ∈ 𝒫 𝐽 → (𝑆 ⊆ ∪ 𝑠 → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)))
90	89	ralrimiv 3129	. 2 ⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → ∀𝑠 ∈ 𝒫 𝐽(𝑆 ⊆ ∪ 𝑠 → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡))
91		cmptop 23370	. . 3 ⊢ (𝐽 ∈ Comp → 𝐽 ∈ Top)
92	4	cldss 23004	. . 3 ⊢ (𝑆 ∈ (Clsd‘𝐽) → 𝑆 ⊆ ∪ 𝐽)
93	4	cmpsub 23375	. . 3 ⊢ ((𝐽 ∈ Top ∧ 𝑆 ⊆ ∪ 𝐽) → ((𝐽 ↾_t 𝑆) ∈ Comp ↔ ∀𝑠 ∈ 𝒫 𝐽(𝑆 ⊆ ∪ 𝑠 → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)))
94	91, 92, 93	syl2an 597	. 2 ⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → ((𝐽 ↾_t 𝑆) ∈ Comp ↔ ∀𝑠 ∈ 𝒫 𝐽(𝑆 ⊆ ∪ 𝑠 → ∃𝑡 ∈ (𝒫 𝑠 ∩ Fin)𝑆 ⊆ ∪ 𝑡)))
95	90, 94	mpbird 257	1 ⊢ ((𝐽 ∈ Comp ∧ 𝑆 ∈ (Clsd‘𝐽)) → (𝐽 ↾_t 𝑆) ∈ Comp)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∃wex 1781 ∈ wcel 2114 ∀wral 3052 ∃wrex 3062 Vcvv 3430 ∖ cdif 3887 ∪ cun 3888 ∩ cin 3889 ⊆ wss 3890 𝒫 cpw 4542 {csn 4568 ∪ cuni 4851 ‘cfv 6492 (class class class)co 7360 Fincfn 8886 ↾_t crest 17374 Topctop 22868 Clsdccld 22991 Compccmp 23361

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5302 ax-pr 5370 ax-un 7682

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-ral 3053 df-rex 3063 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-op 4575 df-uni 4852 df-int 4891 df-iun 4936 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5519 df-eprel 5524 df-po 5532 df-so 5533 df-fr 5577 df-we 5579 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-ov 7363 df-oprab 7364 df-mpo 7365 df-om 7811 df-1st 7935 df-2nd 7936 df-1o 8398 df-en 8887 df-dom 8888 df-fin 8890 df-fi 9317 df-rest 17376 df-topgen 17397 df-top 22869 df-topon 22886 df-bases 22921 df-cld 22994 df-cmp 23362

This theorem is referenced by: hausllycmp 23469 cldllycmp 23470 txkgen 23627 cmphaushmeo 23775 cnheiborlem 24931 cmpcmet 25296 stoweidlem28 46474 stoweidlem50 46496 stoweidlem57 46503

W3C validator