Theorem txconn 23583

Description: The topological product of two connected spaces is connected. (Contributed by Mario Carneiro, 29-Mar-2015.)

Assertion

Ref	Expression
txconn	⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Conn)

Proof of Theorem txconn

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

Step	Hyp	Ref	Expression
1		conntop 23311	. . 3 ⊢ (𝑅 ∈ Conn → 𝑅 ∈ Top)
2		conntop 23311	. . 3 ⊢ (𝑆 ∈ Conn → 𝑆 ∈ Top)
3		txtop 23463	. . 3 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑅 ×t 𝑆) ∈ Top)
4	1, 2, 3	syl2an 596	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Top)
5		neq0 4318	. . . . . . 7 ⊢ (¬ 𝑥 = ∅ ↔ ∃𝑧 𝑧 ∈ 𝑥)
6		simplr 768	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
7	6	elin1d 4170	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ (𝑅 ×t 𝑆))
8		elssuni 4904	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (𝑅 ×t 𝑆) → 𝑥 ⊆ ∪ (𝑅 ×t 𝑆))
9	7, 8	syl 17	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ⊆ ∪ (𝑅 ×t 𝑆))
10		simprr 772	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ ∪ (𝑅 ×t 𝑆))
11		simplll 774	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ Conn)
12	11, 1	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ Top)
13		simpllr 775	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ Conn)
14	13, 2	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ Top)
15		eqid 2730	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑅 = ∪ 𝑅
16		eqid 2730	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑆 = ∪ 𝑆
17	15, 16	txuni 23486	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
18	12, 14, 17	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
19	10, 18	eleqtrrd 2832	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ (∪ 𝑅 × ∪ 𝑆))
20		1st2nd2 8010	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
21	19, 20	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
22		xp2nd 8004	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑤) ∈ ∪ 𝑆)
23	19, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ ∪ 𝑆)
24		eqid 2730	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) = (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩)
25	24	mptpreima 6214	. . . . . . . . . . . . . . . . 17 ⊢ (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥}
26		toptopon2 22812	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑆 ∈ Top ↔ 𝑆 ∈ (TopOn‘∪ 𝑆))
27	14, 26	sylib 218	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ (TopOn‘∪ 𝑆))
28		toptopon2 22812	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ Top ↔ 𝑅 ∈ (TopOn‘∪ 𝑅))
29	12, 28	sylib 218	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ (TopOn‘∪ 𝑅))
30		xp1st 8003	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑤) ∈ ∪ 𝑅)
31	19, 30	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ ∪ 𝑅)
32	27, 29, 31	cnmptc 23556	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ (1st ‘𝑤)) ∈ (𝑆 Cn 𝑅))
33	27	cnmptid 23555	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ 𝑎) ∈ (𝑆 Cn 𝑆))
34	27, 32, 33	cnmpt1t 23559	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)))
35		simplr 768	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
36	35	elin1d 4170	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (𝑅 ×t 𝑆))
37		cnima 23159	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
38	34, 36, 37	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
39	25, 38	eqeltrrid 2834	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ 𝑆)
40		simprl 770	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ 𝑥)
41		elunii 4879	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 ∈ 𝑥 ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
42	40, 36, 41	syl2anc 584	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
43	42, 18	eleqtrrd 2832	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ (∪ 𝑅 × ∪ 𝑆))
44		xp2nd 8004	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑧) ∈ ∪ 𝑆)
45	43, 44	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑧) ∈ ∪ 𝑆)
46		eqid 2730	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) = (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩)
47	46	mptpreima 6214	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥}
48	29	cnmptid 23555	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ 𝑎) ∈ (𝑅 Cn 𝑅))
49	29, 27, 45	cnmptc 23556	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ (2nd ‘𝑧)) ∈ (𝑅 Cn 𝑆))
50	29, 48, 49	cnmpt1t 23559	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)))
51		cnima 23159	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
52	50, 36, 51	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
53	47, 52	eqeltrrid 2834	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ 𝑅)
54		xp1st 8003	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑧) ∈ ∪ 𝑅)
55	43, 54	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑧) ∈ ∪ 𝑅)
56		1st2nd2 8010	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
57	43, 56	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
58	57, 40	eqeltrrd 2830	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥)
59		opeq1 4840	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑎 = (1st ‘𝑧) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	59	eleq1d 2814	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑎 = (1st ‘𝑧) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥))
61	60	rspcev 3591	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((1st ‘𝑧) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
62	55, 58, 61	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
63		rabn0 4355	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ({𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
64	62, 63	sylibr 234	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅)
65	35	elin2d 4171	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆)))
66		cnclima 23162	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ (Clsd‘𝑅))
67	50, 65, 66	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ (Clsd‘𝑅))
68	47, 67	eqeltrrid 2834	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ (Clsd‘𝑅))
69	15, 11, 53, 64, 68	connclo 23309	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} = ∪ 𝑅)
70	31, 69	eleqtrrd 2832	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥})
71		opeq1 4840	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = (1st ‘𝑤) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
72	71	eleq1d 2814	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (1st ‘𝑤) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
73	72	elrab 3662	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ↔ ((1st ‘𝑤) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
74	73	simprbi 496	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} → ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥)
75	70, 74	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥)
76		opeq2 4841	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (2nd ‘𝑧) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
77	76	eleq1d 2814	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (2nd ‘𝑧) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
78	77	rspcev 3591	. . . . . . . . . . . . . . . . . 18 ⊢ (((2nd ‘𝑧) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
79	45, 75, 78	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
80		rabn0 4355	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
81	79, 80	sylibr 234	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅)
82		cnclima 23162	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ (Clsd‘𝑆))
83	34, 65, 82	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ (Clsd‘𝑆))
84	25, 83	eqeltrrid 2834	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ (Clsd‘𝑆))
85	16, 13, 39, 81, 84	connclo 23309	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} = ∪ 𝑆)
86	23, 85	eleqtrrd 2832	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥})
87		opeq2 4841	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (2nd ‘𝑤) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
88	87	eleq1d 2814	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (2nd ‘𝑤) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
89	88	elrab 3662	. . . . . . . . . . . . . . 15 ⊢ ((2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ↔ ((2nd ‘𝑤) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
90	89	simprbi 496	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} → ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥)
91	86, 90	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥)
92	21, 91	eqeltrd 2829	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ 𝑥)
93	92	expr 456	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → (𝑤 ∈ ∪ (𝑅 ×t 𝑆) → 𝑤 ∈ 𝑥))
94	93	ssrdv 3955	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → ∪ (𝑅 ×t 𝑆) ⊆ 𝑥)
95	9, 94	eqssd 3967	. . . . . . . . 9 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 = ∪ (𝑅 ×t 𝑆))
96	95	ex 412	. . . . . . . 8 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (𝑧 ∈ 𝑥 → 𝑥 = ∪ (𝑅 ×t 𝑆)))
97	96	exlimdv 1933	. . . . . . 7 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (∃𝑧 𝑧 ∈ 𝑥 → 𝑥 = ∪ (𝑅 ×t 𝑆)))
98	5, 97	biimtrid 242	. . . . . 6 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (¬ 𝑥 = ∅ → 𝑥 = ∪ (𝑅 ×t 𝑆)))
99	98	orrd 863	. . . . 5 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
100	99	ex 412	. . . 4 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆))))
101		vex 3454	. . . . 5 ⊢ 𝑥 ∈ V
102	101	elpr 4617	. . . 4 ⊢ (𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)} ↔ (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
103	100, 102	imbitrrdi 252	. . 3 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → 𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)}))
104	103	ssrdv 3955	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)})
105		eqid 2730	. . 3 ⊢ ∪ (𝑅 ×t 𝑆) = ∪ (𝑅 ×t 𝑆)
106	105	isconn2 23308	. 2 ⊢ ((𝑅 ×t 𝑆) ∈ Conn ↔ ((𝑅 ×t 𝑆) ∈ Top ∧ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)}))
107	4, 104, 106	sylanbrc 583	1 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Conn)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 847   = wceq 1540  ∃wex 1779   ∈ wcel 2109   ≠ wne 2926  ∃wrex 3054  {crab 3408   ∩ cin 3916   ⊆ wss 3917  ∅c0 4299  {cpr 4594  ⟨cop 4598  ∪ cuni 4874   ↦ cmpt 5191   × cxp 5639  ^◡ccnv 5640   “ cima 5644  ‘cfv 6514  (class class class)co 7390  1^st c1st 7969  2^nd c2nd 7970  Topctop 22787  TopOnctopon 22804  Clsdccld 22910   Cn ccn 23118  Conncconn 23305   ×_t ctx 23454

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 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-iun 4960  df-br 5111  df-opab 5173  df-mpt 5192  df-id 5536  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-ov 7393  df-oprab 7394  df-mpo 7395  df-1st 7971  df-2nd 7972  df-map 8804  df-topgen 17413  df-top 22788  df-topon 22805  df-bases 22840  df-cld 22913  df-cn 23121  df-cnp 23122  df-conn 23306  df-tx 23456

This theorem is referenced by:  cvmlift2lem9  35305  cvmlift2lem13  35309