Theorem txbas 22626

Description: The set of Cartesian products of elements from two topological bases is a basis. (Contributed by Jeff Madsen, 2-Sep-2009.) (Revised by Mario Carneiro, 31-Aug-2015.)

Hypothesis

Ref	Expression
txval.1	⊢ 𝐵 = ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))

Assertion

Ref	Expression
txbas	⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → 𝐵 ∈ TopBases)

Distinct variable groups:   𝑥,𝑦,𝑅   𝑥,𝑆,𝑦

Allowed substitution hints:   𝐵(𝑥,𝑦)

Proof of Theorem txbas

Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑝 𝑡 𝑢 𝑣 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		txval.1	. . . . . . . 8 ⊢ 𝐵 = ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))
2		xpeq1 5594	. . . . . . . . . 10 ⊢ (𝑥 = 𝑎 → (𝑥 × 𝑦) = (𝑎 × 𝑦))
3		xpeq2 5601	. . . . . . . . . 10 ⊢ (𝑦 = 𝑏 → (𝑎 × 𝑦) = (𝑎 × 𝑏))
4	2, 3	cbvmpov 7348	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = (𝑎 ∈ 𝑅, 𝑏 ∈ 𝑆 ↦ (𝑎 × 𝑏))
5	4	rnmpo 7385	. . . . . . . 8 ⊢ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = {𝑢 ∣ ∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏)}
6	1, 5	eqtri 2766	. . . . . . 7 ⊢ 𝐵 = {𝑢 ∣ ∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏)}
7	6	abeq2i 2874	. . . . . 6 ⊢ (𝑢 ∈ 𝐵 ↔ ∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏))
8		xpeq1 5594	. . . . . . . . . 10 ⊢ (𝑥 = 𝑐 → (𝑥 × 𝑦) = (𝑐 × 𝑦))
9		xpeq2 5601	. . . . . . . . . 10 ⊢ (𝑦 = 𝑑 → (𝑐 × 𝑦) = (𝑐 × 𝑑))
10	8, 9	cbvmpov 7348	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = (𝑐 ∈ 𝑅, 𝑑 ∈ 𝑆 ↦ (𝑐 × 𝑑))
11	10	rnmpo 7385	. . . . . . . 8 ⊢ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = {𝑣 ∣ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)}
12	1, 11	eqtri 2766	. . . . . . 7 ⊢ 𝐵 = {𝑣 ∣ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)}
13	12	abeq2i 2874	. . . . . 6 ⊢ (𝑣 ∈ 𝐵 ↔ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑))
14	7, 13	anbi12i 626	. . . . 5 ⊢ ((𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) ↔ (∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
15		reeanv 3292	. . . . 5 ⊢ (∃𝑎 ∈ 𝑅 ∃𝑐 ∈ 𝑅 (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)) ↔ (∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
16	14, 15	bitr4i 277	. . . 4 ⊢ ((𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) ↔ ∃𝑎 ∈ 𝑅 ∃𝑐 ∈ 𝑅 (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
17		reeanv 3292	. . . . . 6 ⊢ (∃𝑏 ∈ 𝑆 ∃𝑑 ∈ 𝑆 (𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) ↔ (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
18		basis2 22009	. . . . . . . . . . . . . . . 16 ⊢ (((𝑅 ∈ TopBases ∧ 𝑎 ∈ 𝑅) ∧ (𝑐 ∈ 𝑅 ∧ 𝑢 ∈ (𝑎 ∩ 𝑐))) → ∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)))
19	18	exp43 436	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ TopBases → (𝑎 ∈ 𝑅 → (𝑐 ∈ 𝑅 → (𝑢 ∈ (𝑎 ∩ 𝑐) → ∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐))))))
20	19	imp42 426	. . . . . . . . . . . . . 14 ⊢ (((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ 𝑢 ∈ (𝑎 ∩ 𝑐)) → ∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)))
21		basis2 22009	. . . . . . . . . . . . . . . 16 ⊢ (((𝑆 ∈ TopBases ∧ 𝑏 ∈ 𝑆) ∧ (𝑑 ∈ 𝑆 ∧ 𝑣 ∈ (𝑏 ∩ 𝑑))) → ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑)))
22	21	exp43 436	. . . . . . . . . . . . . . 15 ⊢ (𝑆 ∈ TopBases → (𝑏 ∈ 𝑆 → (𝑑 ∈ 𝑆 → (𝑣 ∈ (𝑏 ∩ 𝑑) → ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))))))
23	22	imp42 426	. . . . . . . . . . . . . 14 ⊢ (((𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) ∧ 𝑣 ∈ (𝑏 ∩ 𝑑)) → ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑)))
24		reeanv 3292	. . . . . . . . . . . . . . 15 ⊢ (∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 ((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) ↔ (∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))))
25		opelxpi 5617	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑢 ∈ 𝑥 ∧ 𝑣 ∈ 𝑦) → ⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦))
26		xpss12 5595	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ⊆ (𝑎 ∩ 𝑐) ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑)) → (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))
27	25, 26	anim12i 612	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑢 ∈ 𝑥 ∧ 𝑣 ∈ 𝑦) ∧ (𝑥 ⊆ (𝑎 ∩ 𝑐) ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
28	27	an4s 656	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
29	28	reximi 3174	. . . . . . . . . . . . . . . 16 ⊢ (∃𝑦 ∈ 𝑆 ((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
30	29	reximi 3174	. . . . . . . . . . . . . . 15 ⊢ (∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 ((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
31	24, 30	sylbir 234	. . . . . . . . . . . . . 14 ⊢ ((∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
32	20, 23, 31	syl2an 595	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ 𝑢 ∈ (𝑎 ∩ 𝑐)) ∧ ((𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) ∧ 𝑣 ∈ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
33	32	an4s 656	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) ∧ (𝑢 ∈ (𝑎 ∩ 𝑐) ∧ 𝑣 ∈ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
34	33	ralrimivva 3114	. . . . . . . . . . 11 ⊢ (((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) → ∀𝑢 ∈ (𝑎 ∩ 𝑐)∀𝑣 ∈ (𝑏 ∩ 𝑑)∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
35		eleq1 2826	. . . . . . . . . . . . . 14 ⊢ (𝑝 = ⟨𝑢, 𝑣⟩ → (𝑝 ∈ (𝑥 × 𝑦) ↔ ⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦)))
36	35	anbi1d 629	. . . . . . . . . . . . 13 ⊢ (𝑝 = ⟨𝑢, 𝑣⟩ → ((𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
37	36	2rexbidv 3228	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑢, 𝑣⟩ → (∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
38	37	ralxp 5739	. . . . . . . . . . 11 ⊢ (∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∀𝑢 ∈ (𝑎 ∩ 𝑐)∀𝑣 ∈ (𝑏 ∩ 𝑑)∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
39	34, 38	sylibr 233	. . . . . . . . . 10 ⊢ (((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) → ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
40	39	an4s 656	. . . . . . . . 9 ⊢ (((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ ((𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅) ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) → ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
41	40	anassrs 467	. . . . . . . 8 ⊢ ((((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) → ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
42		ineq12 4138	. . . . . . . . . 10 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (𝑢 ∩ 𝑣) = ((𝑎 × 𝑏) ∩ (𝑐 × 𝑑)))
43		inxp 5730	. . . . . . . . . 10 ⊢ ((𝑎 × 𝑏) ∩ (𝑐 × 𝑑)) = ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))
44	42, 43	eqtrdi 2795	. . . . . . . . 9 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (𝑢 ∩ 𝑣) = ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))
45	44	sseq2d 3949	. . . . . . . . . . . 12 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (𝑡 ⊆ (𝑢 ∩ 𝑣) ↔ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
46	45	anbi2d 628	. . . . . . . . . . 11 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → ((𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
47	46	rexbidv 3225	. . . . . . . . . 10 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ ∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
48	1	rexeqi 3338	. . . . . . . . . . 11 ⊢ (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑡 ∈ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))(𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
49		fvex 6769	. . . . . . . . . . . . . 14 ⊢ (1st ‘𝑧) ∈ V
50		fvex 6769	. . . . . . . . . . . . . 14 ⊢ (2nd ‘𝑧) ∈ V
51	49, 50	xpex 7581	. . . . . . . . . . . . 13 ⊢ ((1st ‘𝑧) × (2nd ‘𝑧)) ∈ V
52	51	rgenw 3075	. . . . . . . . . . . 12 ⊢ ∀𝑧 ∈ (𝑅 × 𝑆)((1st ‘𝑧) × (2nd ‘𝑧)) ∈ V
53		vex 3426	. . . . . . . . . . . . . . . . 17 ⊢ 𝑥 ∈ V
54		vex 3426	. . . . . . . . . . . . . . . . 17 ⊢ 𝑦 ∈ V
55	53, 54	op1std 7814	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (1st ‘𝑧) = 𝑥)
56	53, 54	op2ndd 7815	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (2nd ‘𝑧) = 𝑦)
57	55, 56	xpeq12d 5611	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → ((1st ‘𝑧) × (2nd ‘𝑧)) = (𝑥 × 𝑦))
58	57	mpompt 7366	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ (𝑅 × 𝑆) ↦ ((1st ‘𝑧) × (2nd ‘𝑧))) = (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))
59	58	eqcomi 2747	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = (𝑧 ∈ (𝑅 × 𝑆) ↦ ((1st ‘𝑧) × (2nd ‘𝑧)))
60		eleq2 2827	. . . . . . . . . . . . . 14 ⊢ (𝑡 = ((1st ‘𝑧) × (2nd ‘𝑧)) → (𝑝 ∈ 𝑡 ↔ 𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧))))
61		sseq1 3942	. . . . . . . . . . . . . 14 ⊢ (𝑡 = ((1st ‘𝑧) × (2nd ‘𝑧)) → (𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)) ↔ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
62	60, 61	anbi12d 630	. . . . . . . . . . . . 13 ⊢ (𝑡 = ((1st ‘𝑧) × (2nd ‘𝑧)) → ((𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ (𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
63	59, 62	rexrnmptw 6953	. . . . . . . . . . . 12 ⊢ (∀𝑧 ∈ (𝑅 × 𝑆)((1st ‘𝑧) × (2nd ‘𝑧)) ∈ V → (∃𝑡 ∈ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))(𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑧 ∈ (𝑅 × 𝑆)(𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
64	52, 63	ax-mp 5	. . . . . . . . . . 11 ⊢ (∃𝑡 ∈ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))(𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑧 ∈ (𝑅 × 𝑆)(𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
65	57	eleq2d 2824	. . . . . . . . . . . . 13 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ↔ 𝑝 ∈ (𝑥 × 𝑦)))
66	57	sseq1d 3948	. . . . . . . . . . . . 13 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)) ↔ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
67	65, 66	anbi12d 630	. . . . . . . . . . . 12 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → ((𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
68	67	rexxp 5740	. . . . . . . . . . 11 ⊢ (∃𝑧 ∈ (𝑅 × 𝑆)(𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
69	48, 64, 68	3bitri 296	. . . . . . . . . 10 ⊢ (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
70	47, 69	bitrdi 286	. . . . . . . . 9 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
71	44, 70	raleqbidv 3327	. . . . . . . 8 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
72	41, 71	syl5ibrcom 246	. . . . . . 7 ⊢ ((((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) → ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
73	72	rexlimdvva 3222	. . . . . 6 ⊢ (((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) → (∃𝑏 ∈ 𝑆 ∃𝑑 ∈ 𝑆 (𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
74	17, 73	syl5bir 242	. . . . 5 ⊢ (((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) → ((∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
75	74	rexlimdvva 3222	. . . 4 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → (∃𝑎 ∈ 𝑅 ∃𝑐 ∈ 𝑅 (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
76	16, 75	syl5bi 241	. . 3 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → ((𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
77	76	ralrimivv 3113	. 2 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)))
78	1	txbasex 22625	. . 3 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → 𝐵 ∈ V)
79		isbasis2g 22006	. . 3 ⊢ (𝐵 ∈ V → (𝐵 ∈ TopBases ↔ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
80	78, 79	syl 17	. 2 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → (𝐵 ∈ TopBases ↔ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
81	77, 80	mpbird 256	1 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → 𝐵 ∈ TopBases)

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 395   = wceq 1539   ∈ wcel 2108  {cab 2715  ∀wral 3063  ∃wrex 3064  Vcvv 3422   ∩ cin 3882   ⊆ wss 3883  ⟨cop 4564   ↦ cmpt 5153   × cxp 5578  ran crn 5581  ‘cfv 6418   ∈ cmpo 7257  1^st c1st 7802  2^nd c2nd 7803  TopBasesctb 22003

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-id 5480  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-fv 6426  df-oprab 7259  df-mpo 7260  df-1st 7804  df-2nd 7805  df-bases 22004

This theorem is referenced by:  txtop  22628  tx2ndc  22710  mbfimaopnlem  24724