Theorem txconn 23632

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 23360	. . 3 ⊢ (𝑅 ∈ Conn → 𝑅 ∈ Top)
2		conntop 23360	. . 3 ⊢ (𝑆 ∈ Conn → 𝑆 ∈ Top)
3		txtop 23512	. . 3 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑅 ×t 𝑆) ∈ Top)
4	1, 2, 3	syl2an 596	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Top)
5		neq0 4332	. . . . . . 7 ⊢ (¬ 𝑥 = ∅ ↔ ∃𝑧 𝑧 ∈ 𝑥)
6		simplr 768	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
7	6	elin1d 4184	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ (𝑅 ×t 𝑆))
8		elssuni 4918	. . . . . . . . . . 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 2736	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑅 = ∪ 𝑅
16		eqid 2736	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑆 = ∪ 𝑆
17	15, 16	txuni 23535	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
18	12, 14, 17	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
19	10, 18	eleqtrrd 2838	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ (∪ 𝑅 × ∪ 𝑆))
20		1st2nd2 8032	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
21	19, 20	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
22		xp2nd 8026	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑤) ∈ ∪ 𝑆)
23	19, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ ∪ 𝑆)
24		eqid 2736	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) = (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩)
25	24	mptpreima 6232	. . . . . . . . . . . . . . . . 17 ⊢ (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥}
26		toptopon2 22861	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑆 ∈ Top ↔ 𝑆 ∈ (TopOn‘∪ 𝑆))
27	14, 26	sylib 218	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ (TopOn‘∪ 𝑆))
28		toptopon2 22861	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ Top ↔ 𝑅 ∈ (TopOn‘∪ 𝑅))
29	12, 28	sylib 218	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ (TopOn‘∪ 𝑅))
30		xp1st 8025	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑤) ∈ ∪ 𝑅)
31	19, 30	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ ∪ 𝑅)
32	27, 29, 31	cnmptc 23605	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ (1st ‘𝑤)) ∈ (𝑆 Cn 𝑅))
33	27	cnmptid 23604	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ 𝑎) ∈ (𝑆 Cn 𝑆))
34	27, 32, 33	cnmpt1t 23608	. . . . . . . . . . . . . . . . . 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 4184	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (𝑅 ×t 𝑆))
37		cnima 23208	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
38	34, 36, 37	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
39	25, 38	eqeltrrid 2840	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ 𝑆)
40		simprl 770	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ 𝑥)
41		elunii 4893	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 ∈ 𝑥 ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
42	40, 36, 41	syl2anc 584	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
43	42, 18	eleqtrrd 2838	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ (∪ 𝑅 × ∪ 𝑆))
44		xp2nd 8026	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑧) ∈ ∪ 𝑆)
45	43, 44	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑧) ∈ ∪ 𝑆)
46		eqid 2736	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) = (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩)
47	46	mptpreima 6232	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥}
48	29	cnmptid 23604	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ 𝑎) ∈ (𝑅 Cn 𝑅))
49	29, 27, 45	cnmptc 23605	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ (2nd ‘𝑧)) ∈ (𝑅 Cn 𝑆))
50	29, 48, 49	cnmpt1t 23608	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)))
51		cnima 23208	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
52	50, 36, 51	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
53	47, 52	eqeltrrid 2840	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ 𝑅)
54		xp1st 8025	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑧) ∈ ∪ 𝑅)
55	43, 54	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑧) ∈ ∪ 𝑅)
56		1st2nd2 8032	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
57	43, 56	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
58	57, 40	eqeltrrd 2836	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥)
59		opeq1 4854	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑎 = (1st ‘𝑧) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	59	eleq1d 2820	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑎 = (1st ‘𝑧) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥))
61	60	rspcev 3606	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((1st ‘𝑧) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
62	55, 58, 61	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
63		rabn0 4369	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ({𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
64	62, 63	sylibr 234	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅)
65	35	elin2d 4185	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆)))
66		cnclima 23211	. . . . . . . . . . . . . . . . . . . . . . 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 2840	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ (Clsd‘𝑅))
69	15, 11, 53, 64, 68	connclo 23358	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} = ∪ 𝑅)
70	31, 69	eleqtrrd 2838	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥})
71		opeq1 4854	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = (1st ‘𝑤) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
72	71	eleq1d 2820	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (1st ‘𝑤) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
73	72	elrab 3676	. . . . . . . . . . . . . . . . . . . 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 4855	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (2nd ‘𝑧) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
77	76	eleq1d 2820	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (2nd ‘𝑧) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
78	77	rspcev 3606	. . . . . . . . . . . . . . . . . 18 ⊢ (((2nd ‘𝑧) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
79	45, 75, 78	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
80		rabn0 4369	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
81	79, 80	sylibr 234	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅)
82		cnclima 23211	. . . . . . . . . . . . . . . . . 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 2840	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ (Clsd‘𝑆))
85	16, 13, 39, 81, 84	connclo 23358	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} = ∪ 𝑆)
86	23, 85	eleqtrrd 2838	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥})
87		opeq2 4855	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (2nd ‘𝑤) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
88	87	eleq1d 2820	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (2nd ‘𝑤) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
89	88	elrab 3676	. . . . . . . . . . . . . . 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 2835	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ 𝑥)
93	92	expr 456	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → (𝑤 ∈ ∪ (𝑅 ×t 𝑆) → 𝑤 ∈ 𝑥))
94	93	ssrdv 3969	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → ∪ (𝑅 ×t 𝑆) ⊆ 𝑥)
95	9, 94	eqssd 3981	. . . . . . . . 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 3468	. . . . 5 ⊢ 𝑥 ∈ V
102	101	elpr 4631	. . . 4 ⊢ (𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)} ↔ (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
103	100, 102	imbitrrdi 252	. . 3 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → 𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)}))
104	103	ssrdv 3969	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)})
105		eqid 2736	. . 3 ⊢ ∪ (𝑅 ×t 𝑆) = ∪ (𝑅 ×t 𝑆)
106	105	isconn2 23357	. 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 2933  ∃wrex 3061  {crab 3420   ∩ cin 3930   ⊆ wss 3931  ∅c0 4313  {cpr 4608  ⟨cop 4612  ∪ cuni 4888   ↦ cmpt 5206   × cxp 5657  ^◡ccnv 5658   “ cima 5662  ‘cfv 6536  (class class class)co 7410  1^st c1st 7991  2^nd c2nd 7992  Topctop 22836  TopOnctopon 22853  Clsdccld 22959   Cn ccn 23167  Conncconn 23354   ×_t ctx 23503

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 2708  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734

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 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3062  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4889  df-iun 4974  df-br 5125  df-opab 5187  df-mpt 5207  df-id 5553  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-ov 7413  df-oprab 7414  df-mpo 7415  df-1st 7993  df-2nd 7994  df-map 8847  df-topgen 17462  df-top 22837  df-topon 22854  df-bases 22889  df-cld 22962  df-cn 23170  df-cnp 23171  df-conn 23355  df-tx 23505

This theorem is referenced by:  cvmlift2lem9  35338  cvmlift2lem13  35342