Theorem txconn 23670

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 23398	. . 3 ⊢ (𝑅 ∈ Conn → 𝑅 ∈ Top)
2		conntop 23398	. . 3 ⊢ (𝑆 ∈ Conn → 𝑆 ∈ Top)
3		txtop 23550	. . 3 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑅 ×t 𝑆) ∈ Top)
4	1, 2, 3	syl2an 597	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Top)
5		neq0 4293	. . . . . . 7 ⊢ (¬ 𝑥 = ∅ ↔ ∃𝑧 𝑧 ∈ 𝑥)
6		simplr 769	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))))
7	6	elin1d 4145	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 ∈ (𝑅 ×t 𝑆))
8		elssuni 4882	. . . . . . . . . . 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 2737	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑅 = ∪ 𝑅
16		eqid 2737	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝑆 = ∪ 𝑆
17	15, 16	txuni 23573	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
18	12, 14, 17	syl2anc 585	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (∪ 𝑅 × ∪ 𝑆) = ∪ (𝑅 ×t 𝑆))
19	10, 18	eleqtrrd 2840	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ (∪ 𝑅 × ∪ 𝑆))
20		1st2nd2 7978	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
21	19, 20	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
22		xp2nd 7972	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑤) ∈ ∪ 𝑆)
23	19, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ ∪ 𝑆)
24		eqid 2737	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) = (𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩)
25	24	mptpreima 6200	. . . . . . . . . . . . . . . . 17 ⊢ (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥}
26		toptopon2 22899	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑆 ∈ Top ↔ 𝑆 ∈ (TopOn‘∪ 𝑆))
27	14, 26	sylib 218	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑆 ∈ (TopOn‘∪ 𝑆))
28		toptopon2 22899	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ Top ↔ 𝑅 ∈ (TopOn‘∪ 𝑅))
29	12, 28	sylib 218	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑅 ∈ (TopOn‘∪ 𝑅))
30		xp1st 7971	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑤) ∈ ∪ 𝑅)
31	19, 30	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ ∪ 𝑅)
32	27, 29, 31	cnmptc 23643	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ (1st ‘𝑤)) ∈ (𝑆 Cn 𝑅))
33	27	cnmptid 23642	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑆 ↦ 𝑎) ∈ (𝑆 Cn 𝑆))
34	27, 32, 33	cnmpt1t 23646	. . . . . . . . . . . . . . . . . 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 4145	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (𝑅 ×t 𝑆))
37		cnima 23246	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
38	34, 36, 37	syl2anc 585	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ 𝑆)
39	25, 38	eqeltrrid 2842	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ 𝑆)
40		simprl 771	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ 𝑥)
41		elunii 4856	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 ∈ 𝑥 ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
42	40, 36, 41	syl2anc 585	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ ∪ (𝑅 ×t 𝑆))
43	42, 18	eleqtrrd 2840	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 ∈ (∪ 𝑅 × ∪ 𝑆))
44		xp2nd 7972	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (2nd ‘𝑧) ∈ ∪ 𝑆)
45	43, 44	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑧) ∈ ∪ 𝑆)
46		eqid 2737	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) = (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩)
47	46	mptpreima 6200	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) = {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥}
48	29	cnmptid 23642	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ 𝑎) ∈ (𝑅 Cn 𝑅))
49	29, 27, 45	cnmptc 23643	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ (2nd ‘𝑧)) ∈ (𝑅 Cn 𝑆))
50	29, 48, 49	cnmpt1t 23646	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)))
51		cnima 23246	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (𝑅 ×t 𝑆)) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
52	50, 36, 51	syl2anc 585	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ 𝑅)
53	47, 52	eqeltrrid 2842	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ 𝑅)
54		xp1st 7971	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → (1st ‘𝑧) ∈ ∪ 𝑅)
55	43, 54	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑧) ∈ ∪ 𝑅)
56		1st2nd2 7978	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ (∪ 𝑅 × ∪ 𝑆) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
57	43, 56	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
58	57, 40	eqeltrrd 2838	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥)
59		opeq1 4817	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑎 = (1st ‘𝑧) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	59	eleq1d 2822	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑎 = (1st ‘𝑧) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥))
61	60	rspcev 3565	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((1st ‘𝑧) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
62	55, 58, 61	syl2anc 585	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
63		rabn0 4330	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ({𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑅⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥)
64	62, 63	sylibr 234	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ≠ ∅)
65	35	elin2d 4146	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆)))
66		cnclima 23249	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) ∈ (𝑅 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ (Clsd‘𝑅))
67	50, 65, 66	syl2anc 585	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑅 ↦ ⟨𝑎, (2nd ‘𝑧)⟩) “ 𝑥) ∈ (Clsd‘𝑅))
68	47, 67	eqeltrrid 2842	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ∈ (Clsd‘𝑅))
69	15, 11, 53, 64, 68	connclo 23396	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} = ∪ 𝑅)
70	31, 69	eleqtrrd 2840	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥})
71		opeq1 4817	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = (1st ‘𝑤) → ⟨𝑎, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
72	71	eleq1d 2822	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (1st ‘𝑤) → (⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
73	72	elrab 3635	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} ↔ ((1st ‘𝑤) ∈ ∪ 𝑅 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
74	73	simprbi 497	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1st ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑅 ∣ ⟨𝑎, (2nd ‘𝑧)⟩ ∈ 𝑥} → ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥)
75	70, 74	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥)
76		opeq2 4818	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (2nd ‘𝑧) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩)
77	76	eleq1d 2822	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (2nd ‘𝑧) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥))
78	77	rspcev 3565	. . . . . . . . . . . . . . . . . 18 ⊢ (((2nd ‘𝑧) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑧)⟩ ∈ 𝑥) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
79	45, 75, 78	syl2anc 585	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
80		rabn0 4330	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅ ↔ ∃𝑎 ∈ ∪ 𝑆⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥)
81	79, 80	sylibr 234	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ≠ ∅)
82		cnclima 23249	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) ∈ (𝑆 Cn (𝑅 ×t 𝑆)) ∧ 𝑥 ∈ (Clsd‘(𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ (Clsd‘𝑆))
83	34, 65, 82	syl2anc 585	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (◡(𝑎 ∈ ∪ 𝑆 ↦ ⟨(1st ‘𝑤), 𝑎⟩) “ 𝑥) ∈ (Clsd‘𝑆))
84	25, 83	eqeltrrid 2842	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ∈ (Clsd‘𝑆))
85	16, 13, 39, 81, 84	connclo 23396	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} = ∪ 𝑆)
86	23, 85	eleqtrrd 2840	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → (2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥})
87		opeq2 4818	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (2nd ‘𝑤) → ⟨(1st ‘𝑤), 𝑎⟩ = ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩)
88	87	eleq1d 2822	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (2nd ‘𝑤) → (⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥 ↔ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
89	88	elrab 3635	. . . . . . . . . . . . . . 15 ⊢ ((2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} ↔ ((2nd ‘𝑤) ∈ ∪ 𝑆 ∧ ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥))
90	89	simprbi 497	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝑤) ∈ {𝑎 ∈ ∪ 𝑆 ∣ ⟨(1st ‘𝑤), 𝑎⟩ ∈ 𝑥} → ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥)
91	86, 90	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → ⟨(1st ‘𝑤), (2nd ‘𝑤)⟩ ∈ 𝑥)
92	21, 91	eqeltrd 2837	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ (𝑧 ∈ 𝑥 ∧ 𝑤 ∈ ∪ (𝑅 ×t 𝑆))) → 𝑤 ∈ 𝑥)
93	92	expr 456	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → (𝑤 ∈ ∪ (𝑅 ×t 𝑆) → 𝑤 ∈ 𝑥))
94	93	ssrdv 3928	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → ∪ (𝑅 ×t 𝑆) ⊆ 𝑥)
95	9, 94	eqssd 3940	. . . . . . . . 9 ⊢ ((((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) ∧ 𝑧 ∈ 𝑥) → 𝑥 = ∪ (𝑅 ×t 𝑆))
96	95	ex 412	. . . . . . . 8 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (𝑧 ∈ 𝑥 → 𝑥 = ∪ (𝑅 ×t 𝑆)))
97	96	exlimdv 1935	. . . . . . 7 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (∃𝑧 𝑧 ∈ 𝑥 → 𝑥 = ∪ (𝑅 ×t 𝑆)))
98	5, 97	biimtrid 242	. . . . . 6 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (¬ 𝑥 = ∅ → 𝑥 = ∪ (𝑅 ×t 𝑆)))
99	98	orrd 864	. . . . 5 ⊢ (((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) ∧ 𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆)))) → (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
100	99	ex 412	. . . 4 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆))))
101		vex 3434	. . . . 5 ⊢ 𝑥 ∈ V
102	101	elpr 4593	. . . 4 ⊢ (𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)} ↔ (𝑥 = ∅ ∨ 𝑥 = ∪ (𝑅 ×t 𝑆)))
103	100, 102	imbitrrdi 252	. . 3 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑥 ∈ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) → 𝑥 ∈ {∅, ∪ (𝑅 ×t 𝑆)}))
104	103	ssrdv 3928	. 2 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)})
105		eqid 2737	. . 3 ⊢ ∪ (𝑅 ×t 𝑆) = ∪ (𝑅 ×t 𝑆)
106	105	isconn2 23395	. 2 ⊢ ((𝑅 ×t 𝑆) ∈ Conn ↔ ((𝑅 ×t 𝑆) ∈ Top ∧ ((𝑅 ×t 𝑆) ∩ (Clsd‘(𝑅 ×t 𝑆))) ⊆ {∅, ∪ (𝑅 ×t 𝑆)}))
107	4, 104, 106	sylanbrc 584	1 ⊢ ((𝑅 ∈ Conn ∧ 𝑆 ∈ Conn) → (𝑅 ×t 𝑆) ∈ Conn)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 848   = wceq 1542  ∃wex 1781   ∈ wcel 2114   ≠ wne 2933  ∃wrex 3062  {crab 3390   ∩ cin 3889   ⊆ wss 3890  ∅c0 4274  {cpr 4570  ⟨cop 4574  ∪ cuni 4851   ↦ cmpt 5167   × cxp 5626  ^◡ccnv 5627   “ cima 5631  ‘cfv 6496  (class class class)co 7364  1^st c1st 7937  2^nd c2nd 7938  Topctop 22874  TopOnctopon 22891  Clsdccld 22997   Cn ccn 23205  Conncconn 23392   ×_t ctx 23541

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-sep 5232  ax-nul 5242  ax-pow 5306  ax-pr 5374  ax-un 7686

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  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-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-id 5523  df-xp 5634  df-rel 5635  df-cnv 5636  df-co 5637  df-dm 5638  df-rn 5639  df-res 5640  df-ima 5641  df-iota 6452  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-ov 7367  df-oprab 7368  df-mpo 7369  df-1st 7939  df-2nd 7940  df-map 8772  df-topgen 17403  df-top 22875  df-topon 22892  df-bases 22927  df-cld 23000  df-cn 23208  df-cnp 23209  df-conn 23393  df-tx 23543

This theorem is referenced by:  cvmlift2lem9  35515  cvmlift2lem13  35519