Theorem txconn 23633

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 23361	. . 3 ⊢ (𝑅 ∈ Conn → 𝑅 ∈ Top)
2		conntop 23361	. . 3 ⊢ (𝑆 ∈ Conn → 𝑆 ∈ Top)
3		txtop 23513	. . 3 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑅 ×t 𝑆) ∈ Top)
4	1, 2, 3	syl2an 596	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Top)
5		neq0 4304	. . . . . . 7 ⊢ (¬ 𝑥 = ∅ ↔ ∃𝑧 𝑧 ∈ 𝑥)
6		simplr 768	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
7	6	elin1d 4156	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ (𝑅 ×t 𝑆))
8		elssuni 4894	. . . . . . . . . . 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 23536	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
18	12, 14, 17	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
19	10, 18	eleqtrrd 2839	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ (∪ 𝑅 × ∪ 𝑆))
20		1st2nd2 7972	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
21	19, 20	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
22		xp2nd 7966	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑤) ∈ ∪ 𝑆)
23	19, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ ∪ 𝑆)
24		eqid 2736	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) = (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩)
25	24	mptpreima 6196	. . . . . . . . . . . . . . . . 17 ⊢ (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥}
26		toptopon2 22862	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑆 ∈ Top ↔ 𝑆 ∈ (TopOn‘∪ 𝑆))
27	14, 26	sylib 218	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ (TopOn‘∪ 𝑆))
28		toptopon2 22862	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ Top ↔ 𝑅 ∈ (TopOn‘∪ 𝑅))
29	12, 28	sylib 218	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ (TopOn‘∪ 𝑅))
30		xp1st 7965	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑤) ∈ ∪ 𝑅)
31	19, 30	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ ∪ 𝑅)
32	27, 29, 31	cnmptc 23606	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ (1st ‘𝑤)) ∈ (𝑆 Cn 𝑅))
33	27	cnmptid 23605	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ 𝑎) ∈ (𝑆 Cn 𝑆))
34	27, 32, 33	cnmpt1t 23609	. . . . . . . . . . . . . . . . . 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 4156	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (𝑅 ×t 𝑆))
37		cnima 23209	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
38	34, 36, 37	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
39	25, 38	eqeltrrid 2841	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ 𝑆)
40		simprl 770	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ 𝑥)
41		elunii 4868	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 ∈ 𝑥 ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
42	40, 36, 41	syl2anc 584	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
43	42, 18	eleqtrrd 2839	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ (∪ 𝑅 × ∪ 𝑆))
44		xp2nd 7966	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑧) ∈ ∪ 𝑆)
45	43, 44	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑧) ∈ ∪ 𝑆)
46		eqid 2736	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) = (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩)
47	46	mptpreima 6196	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥}
48	29	cnmptid 23605	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ 𝑎) ∈ (𝑅 Cn 𝑅))
49	29, 27, 45	cnmptc 23606	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ (2nd ‘𝑧)) ∈ (𝑅 Cn 𝑆))
50	29, 48, 49	cnmpt1t 23609	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)))
51		cnima 23209	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
52	50, 36, 51	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
53	47, 52	eqeltrrid 2841	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ 𝑅)
54		xp1st 7965	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑧) ∈ ∪ 𝑅)
55	43, 54	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑧) ∈ ∪ 𝑅)
56		1st2nd2 7972	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
57	43, 56	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
58	57, 40	eqeltrrd 2837	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥)
59		opeq1 4829	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑎 = (1st ‘𝑧) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	59	eleq1d 2821	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑎 = (1st ‘𝑧) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥))
61	60	rspcev 3576	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((1st ‘𝑧) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
62	55, 58, 61	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
63		rabn0 4341	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ({𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
64	62, 63	sylibr 234	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅)
65	35	elin2d 4157	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆)))
66		cnclima 23212	. . . . . . . . . . . . . . . . . . . . . . 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 2841	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ (Clsd‘𝑅))
69	15, 11, 53, 64, 68	connclo 23359	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} = ∪ 𝑅)
70	31, 69	eleqtrrd 2839	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥})
71		opeq1 4829	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = (1st ‘𝑤) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
72	71	eleq1d 2821	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (1st ‘𝑤) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
73	72	elrab 3646	. . . . . . . . . . . . . . . . . . . 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 4830	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (2nd ‘𝑧) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
77	76	eleq1d 2821	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (2nd ‘𝑧) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
78	77	rspcev 3576	. . . . . . . . . . . . . . . . . 18 ⊢ (((2nd ‘𝑧) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
79	45, 75, 78	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
80		rabn0 4341	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
81	79, 80	sylibr 234	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅)
82		cnclima 23212	. . . . . . . . . . . . . . . . . 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 2841	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ (Clsd‘𝑆))
85	16, 13, 39, 81, 84	connclo 23359	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} = ∪ 𝑆)
86	23, 85	eleqtrrd 2839	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥})
87		opeq2 4830	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (2nd ‘𝑤) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
88	87	eleq1d 2821	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (2nd ‘𝑤) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
89	88	elrab 3646	. . . . . . . . . . . . . . 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 2836	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ 𝑥)
93	92	expr 456	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → (𝑤 ∈ ∪ (𝑅 ×t 𝑆) → 𝑤 ∈ 𝑥))
94	93	ssrdv 3939	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → ∪ (𝑅 ×t 𝑆) ⊆ 𝑥)
95	9, 94	eqssd 3951	. . . . . . . . 9 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 = ∪ (𝑅 ×t 𝑆))
96	95	ex 412	. . . . . . . 8 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (𝑧 ∈ 𝑥 → 𝑥 = ∪ (𝑅 ×t 𝑆)))
97	96	exlimdv 1934	. . . . . . 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 3444	. . . . 5 ⊢ 𝑥 ∈ V
102	101	elpr 4605	. . . 4 ⊢ (𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)} ↔ (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
103	100, 102	imbitrrdi 252	. . 3 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → 𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)}))
104	103	ssrdv 3939	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)})
105		eqid 2736	. . 3 ⊢ ∪ (𝑅 ×t 𝑆) = ∪ (𝑅 ×t 𝑆)
106	105	isconn2 23358	. 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 1541  ∃wex 1780   ∈ wcel 2113   ≠ wne 2932  ∃wrex 3060  {crab 3399   ∩ cin 3900   ⊆ wss 3901  ∅c0 4285  {cpr 4582  ⟨cop 4586  ∪ cuni 4863   ↦ cmpt 5179   × cxp 5622  ^◡ccnv 5623   “ cima 5627  ‘cfv 6492  (class class class)co 7358  1^st c1st 7931  2^nd c2nd 7932  Topctop 22837  TopOnctopon 22854  Clsdccld 22960   Cn ccn 23168  Conncconn 23355   ×_t ctx 23504

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-iun 4948  df-br 5099  df-opab 5161  df-mpt 5180  df-id 5519  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-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 7361  df-oprab 7362  df-mpo 7363  df-1st 7933  df-2nd 7934  df-map 8765  df-topgen 17363  df-top 22838  df-topon 22855  df-bases 22890  df-cld 22963  df-cn 23171  df-cnp 23172  df-conn 23356  df-tx 23506

This theorem is referenced by:  cvmlift2lem9  35505  cvmlift2lem13  35509