Theorem txconn 23713

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 23441	. . 3 ⊢ (𝑅 ∈ Conn → 𝑅 ∈ Top)
2		conntop 23441	. . 3 ⊢ (𝑆 ∈ Conn → 𝑆 ∈ Top)
3		txtop 23593	. . 3 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑅 ×t 𝑆) ∈ Top)
4	1, 2, 3	syl2an 596	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Top)
5		neq0 4358	. . . . . . 7 ⊢ (¬ 𝑥 = ∅ ↔ ∃𝑧 𝑧 ∈ 𝑥)
6		simplr 769	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
7	6	elin1d 4214	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ (𝑅 ×t 𝑆))
8		elssuni 4942	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (𝑅 ×t 𝑆) → 𝑥 ⊆ ∪ (𝑅 ×t 𝑆))
9	7, 8	syl 17	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ⊆ ∪ (𝑅 ×t 𝑆))
10		simprr 773	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ ∪ (𝑅 ×t 𝑆))
11		simplll 775	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ Conn)
12	11, 1	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ Top)
13		simpllr 776	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ Conn)
14	13, 2	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ Top)
15		eqid 2735	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑅 = ∪ 𝑅
16		eqid 2735	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑆 = ∪ 𝑆
17	15, 16	txuni 23616	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
18	12, 14, 17	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
19	10, 18	eleqtrrd 2842	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ (∪ 𝑅 × ∪ 𝑆))
20		1st2nd2 8052	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
21	19, 20	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
22		xp2nd 8046	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑤) ∈ ∪ 𝑆)
23	19, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ ∪ 𝑆)
24		eqid 2735	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) = (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩)
25	24	mptpreima 6260	. . . . . . . . . . . . . . . . 17 ⊢ (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥}
26		toptopon2 22940	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑆 ∈ Top ↔ 𝑆 ∈ (TopOn‘∪ 𝑆))
27	14, 26	sylib 218	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ (TopOn‘∪ 𝑆))
28		toptopon2 22940	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ Top ↔ 𝑅 ∈ (TopOn‘∪ 𝑅))
29	12, 28	sylib 218	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ (TopOn‘∪ 𝑅))
30		xp1st 8045	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑤) ∈ ∪ 𝑅)
31	19, 30	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ ∪ 𝑅)
32	27, 29, 31	cnmptc 23686	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ (1st ‘𝑤)) ∈ (𝑆 Cn 𝑅))
33	27	cnmptid 23685	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ 𝑎) ∈ (𝑆 Cn 𝑆))
34	27, 32, 33	cnmpt1t 23689	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)))
35		simplr 769	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
36	35	elin1d 4214	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (𝑅 ×t 𝑆))
37		cnima 23289	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
38	34, 36, 37	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
39	25, 38	eqeltrrid 2844	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ 𝑆)
40		simprl 771	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ 𝑥)
41		elunii 4917	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 ∈ 𝑥 ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
42	40, 36, 41	syl2anc 584	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
43	42, 18	eleqtrrd 2842	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ (∪ 𝑅 × ∪ 𝑆))
44		xp2nd 8046	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑧) ∈ ∪ 𝑆)
45	43, 44	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑧) ∈ ∪ 𝑆)
46		eqid 2735	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) = (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩)
47	46	mptpreima 6260	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥}
48	29	cnmptid 23685	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ 𝑎) ∈ (𝑅 Cn 𝑅))
49	29, 27, 45	cnmptc 23686	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ (2nd ‘𝑧)) ∈ (𝑅 Cn 𝑆))
50	29, 48, 49	cnmpt1t 23689	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)))
51		cnima 23289	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
52	50, 36, 51	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
53	47, 52	eqeltrrid 2844	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ 𝑅)
54		xp1st 8045	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑧) ∈ ∪ 𝑅)
55	43, 54	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑧) ∈ ∪ 𝑅)
56		1st2nd2 8052	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
57	43, 56	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
58	57, 40	eqeltrrd 2840	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥)
59		opeq1 4878	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑎 = (1st ‘𝑧) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	59	eleq1d 2824	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑎 = (1st ‘𝑧) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥))
61	60	rspcev 3622	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((1st ‘𝑧) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
62	55, 58, 61	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
63		rabn0 4395	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ({𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
64	62, 63	sylibr 234	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅)
65	35	elin2d 4215	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆)))
66		cnclima 23292	. . . . . . . . . . . . . . . . . . . . . . 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 2844	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ (Clsd‘𝑅))
69	15, 11, 53, 64, 68	connclo 23439	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} = ∪ 𝑅)
70	31, 69	eleqtrrd 2842	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥})
71		opeq1 4878	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = (1st ‘𝑤) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
72	71	eleq1d 2824	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (1st ‘𝑤) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
73	72	elrab 3695	. . . . . . . . . . . . . . . . . . . 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 4879	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (2nd ‘𝑧) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
77	76	eleq1d 2824	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (2nd ‘𝑧) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
78	77	rspcev 3622	. . . . . . . . . . . . . . . . . 18 ⊢ (((2nd ‘𝑧) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
79	45, 75, 78	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
80		rabn0 4395	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
81	79, 80	sylibr 234	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅)
82		cnclima 23292	. . . . . . . . . . . . . . . . . 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 2844	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ (Clsd‘𝑆))
85	16, 13, 39, 81, 84	connclo 23439	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} = ∪ 𝑆)
86	23, 85	eleqtrrd 2842	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥})
87		opeq2 4879	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (2nd ‘𝑤) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
88	87	eleq1d 2824	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (2nd ‘𝑤) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
89	88	elrab 3695	. . . . . . . . . . . . . . 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 2839	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ 𝑥)
93	92	expr 456	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → (𝑤 ∈ ∪ (𝑅 ×t 𝑆) → 𝑤 ∈ 𝑥))
94	93	ssrdv 4001	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → ∪ (𝑅 ×t 𝑆) ⊆ 𝑥)
95	9, 94	eqssd 4013	. . . . . . . . 9 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 = ∪ (𝑅 ×t 𝑆))
96	95	ex 412	. . . . . . . 8 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (𝑧 ∈ 𝑥 → 𝑥 = ∪ (𝑅 ×t 𝑆)))
97	96	exlimdv 1931	. . . . . . 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 3482	. . . . 5 ⊢ 𝑥 ∈ V
102	101	elpr 4655	. . . 4 ⊢ (𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)} ↔ (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
103	100, 102	imbitrrdi 252	. . 3 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → 𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)}))
104	103	ssrdv 4001	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)})
105		eqid 2735	. . 3 ⊢ ∪ (𝑅 ×t 𝑆) = ∪ (𝑅 ×t 𝑆)
106	105	isconn2 23438	. 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 1537  ∃wex 1776   ∈ wcel 2106   ≠ wne 2938  ∃wrex 3068  {crab 3433   ∩ cin 3962   ⊆ wss 3963  ∅c0 4339  {cpr 4633  ⟨cop 4637  ∪ cuni 4912   ↦ cmpt 5231   × cxp 5687  ^◡ccnv 5688   “ cima 5692  ‘cfv 6563  (class class class)co 7431  1^st c1st 8011  2^nd c2nd 8012  Topctop 22915  TopOnctopon 22932  Clsdccld 23040   Cn ccn 23248  Conncconn 23435   ×_t ctx 23584

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pow 5371  ax-pr 5438  ax-un 7754

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rab 3434  df-v 3480  df-sbc 3792  df-csb 3909  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-iota 6516  df-fun 6565  df-fn 6566  df-f 6567  df-f1 6568  df-fo 6569  df-f1o 6570  df-fv 6571  df-ov 7434  df-oprab 7435  df-mpo 7436  df-1st 8013  df-2nd 8014  df-map 8867  df-topgen 17490  df-top 22916  df-topon 22933  df-bases 22969  df-cld 23043  df-cn 23251  df-cnp 23252  df-conn 23436  df-tx 23586

This theorem is referenced by:  cvmlift2lem9  35296  cvmlift2lem13  35300