Theorem txbas 23886

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 5664	. . . . . . . . . 10 ⊢ (𝑥 = 𝑎 → (𝑥 × 𝑦) = (𝑎 × 𝑦))
3		xpeq2 5671	. . . . . . . . . 10 ⊢ (𝑦 = 𝑏 → (𝑎 × 𝑦) = (𝑎 × 𝑏))
4	2, 3	cbvmpov 7515	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = (𝑎 ∈ 𝑅, 𝑏 ∈ 𝑆 ↦ (𝑎 × 𝑏))
5	4	rnmpo 7553	. . . . . . . 8 ⊢ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = {𝑢 ∣ ∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏)}
6	1, 5	eqtri 2783	. . . . . . 7 ⊢ 𝐵 = {𝑢 ∣ ∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏)}
7	6	eqabri 2902	. . . . . 6 ⊢ (𝑢 ∈ 𝐵 ↔ ∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏))
8		xpeq1 5664	. . . . . . . . . 10 ⊢ (𝑥 = 𝑐 → (𝑥 × 𝑦) = (𝑐 × 𝑦))
9		xpeq2 5671	. . . . . . . . . 10 ⊢ (𝑦 = 𝑑 → (𝑐 × 𝑦) = (𝑐 × 𝑑))
10	8, 9	cbvmpov 7515	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = (𝑐 ∈ 𝑅, 𝑑 ∈ 𝑆 ↦ (𝑐 × 𝑑))
11	10	rnmpo 7553	. . . . . . . 8 ⊢ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = {𝑣 ∣ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)}
12	1, 11	eqtri 2783	. . . . . . 7 ⊢ 𝐵 = {𝑣 ∣ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)}
13	12	eqabri 2902	. . . . . 6 ⊢ (𝑣 ∈ 𝐵 ↔ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑))
14	7, 13	anbi12i 640	. . . . 5 ⊢ ((𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) ↔ (∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
15		reeanv 3234	. . . . 5 ⊢ (∃𝑎 ∈ 𝑅 ∃𝑐 ∈ 𝑅 (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)) ↔ (∃𝑎 ∈ 𝑅 ∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑐 ∈ 𝑅 ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
16	14, 15	bitr4i 281	. . . 4 ⊢ ((𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) ↔ ∃𝑎 ∈ 𝑅 ∃𝑐 ∈ 𝑅 (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
17		reeanv 3234	. . . . . 6 ⊢ (∃𝑏 ∈ 𝑆 ∃𝑑 ∈ 𝑆 (𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) ↔ (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)))
18		basis2 23269	. . . . . . . . . . . . . . . 16 ⊢ (((𝑅 ∈ TopBases ∧ 𝑎 ∈ 𝑅) ∧ (𝑐 ∈ 𝑅 ∧ 𝑢 ∈ (𝑎 ∩ 𝑐))) → ∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)))
19	18	exp43 442	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ TopBases → (𝑎 ∈ 𝑅 → (𝑐 ∈ 𝑅 → (𝑢 ∈ (𝑎 ∩ 𝑐) → ∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐))))))
20	19	imp42 432	. . . . . . . . . . . . . 14 ⊢ (((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ 𝑢 ∈ (𝑎 ∩ 𝑐)) → ∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)))
21		basis2 23269	. . . . . . . . . . . . . . . 16 ⊢ (((𝑆 ∈ TopBases ∧ 𝑏 ∈ 𝑆) ∧ (𝑑 ∈ 𝑆 ∧ 𝑣 ∈ (𝑏 ∩ 𝑑))) → ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑)))
22	21	exp43 442	. . . . . . . . . . . . . . 15 ⊢ (𝑆 ∈ TopBases → (𝑏 ∈ 𝑆 → (𝑑 ∈ 𝑆 → (𝑣 ∈ (𝑏 ∩ 𝑑) → ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))))))
23	22	imp42 432	. . . . . . . . . . . . . 14 ⊢ (((𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) ∧ 𝑣 ∈ (𝑏 ∩ 𝑑)) → ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑)))
24		reeanv 3234	. . . . . . . . . . . . . . 15 ⊢ (∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 ((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) ↔ (∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))))
25		opelxpi 5687	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑢 ∈ 𝑥 ∧ 𝑣 ∈ 𝑦) → ⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦))
26		xpss12 5665	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ⊆ (𝑎 ∩ 𝑐) ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑)) → (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))
27	25, 26	anim12i 625	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑢 ∈ 𝑥 ∧ 𝑣 ∈ 𝑦) ∧ (𝑥 ⊆ (𝑎 ∩ 𝑐) ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
28	27	an4s 673	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
29	28	reximi 3100	. . . . . . . . . . . . . . . 16 ⊢ (∃𝑦 ∈ 𝑆 ((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
30	29	reximi 3100	. . . . . . . . . . . . . . 15 ⊢ (∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 ((𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
31	24, 30	sylbir 238	. . . . . . . . . . . . . 14 ⊢ ((∃𝑥 ∈ 𝑅 (𝑢 ∈ 𝑥 ∧ 𝑥 ⊆ (𝑎 ∩ 𝑐)) ∧ ∃𝑦 ∈ 𝑆 (𝑣 ∈ 𝑦 ∧ 𝑦 ⊆ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
32	20, 23, 31	syl2an 608	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ 𝑢 ∈ (𝑎 ∩ 𝑐)) ∧ ((𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) ∧ 𝑣 ∈ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
33	32	an4s 673	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) ∧ (𝑢 ∈ (𝑎 ∩ 𝑐) ∧ 𝑣 ∈ (𝑏 ∩ 𝑑))) → ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
34	33	ralrimivva 3205	. . . . . . . . . . 11 ⊢ (((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) → ∀𝑢 ∈ (𝑎 ∩ 𝑐)∀𝑣 ∈ (𝑏 ∩ 𝑑)∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
35		eleq1 2848	. . . . . . . . . . . . . 14 ⊢ (𝑝 = ⟨𝑢, 𝑣⟩ → (𝑝 ∈ (𝑥 × 𝑦) ↔ ⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦)))
36	35	anbi1d 643	. . . . . . . . . . . . 13 ⊢ (𝑝 = ⟨𝑢, 𝑣⟩ → ((𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
37	36	2rexbidv 3227	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑢, 𝑣⟩ → (∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
38	37	ralxp 5817	. . . . . . . . . . 11 ⊢ (∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∀𝑢 ∈ (𝑎 ∩ 𝑐)∀𝑣 ∈ (𝑏 ∩ 𝑑)∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (⟨𝑢, 𝑣⟩ ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
39	34, 38	sylibr 237	. . . . . . . . . 10 ⊢ (((𝑅 ∈ TopBases ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑆 ∈ TopBases ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) → ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
40	39	an4s 673	. . . . . . . . 9 ⊢ (((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ ((𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅) ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆))) → ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
41	40	anassrs 473	. . . . . . . 8 ⊢ ((((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) → ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
42		ineq12 4112	. . . . . . . . . 10 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (𝑢 ∩ 𝑣) = ((𝑎 × 𝑏) ∩ (𝑐 × 𝑑)))
43		inxp 5808	. . . . . . . . . 10 ⊢ ((𝑎 × 𝑏) ∩ (𝑐 × 𝑑)) = ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))
44	42, 43	eqtrdi 2811	. . . . . . . . 9 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (𝑢 ∩ 𝑣) = ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))
45	44	sseq2d 3940	. . . . . . . . . . . 12 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (𝑡 ⊆ (𝑢 ∩ 𝑣) ↔ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
46	45	anbi2d 642	. . . . . . . . . . 11 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → ((𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
47	46	rexbidv 3186	. . . . . . . . . 10 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ ∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
48	1	rexeqi 3318	. . . . . . . . . . 11 ⊢ (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑡 ∈ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))(𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
49		fvex 6898	. . . . . . . . . . . . . 14 ⊢ (1st ‘𝑧) ∈ V
50		fvex 6898	. . . . . . . . . . . . . 14 ⊢ (2nd ‘𝑧) ∈ V
51	49, 50	xpex 7767	. . . . . . . . . . . . 13 ⊢ ((1st ‘𝑧) × (2nd ‘𝑧)) ∈ V
52	51	rgenw 3080	. . . . . . . . . . . 12 ⊢ ∀𝑧 ∈ (𝑅 × 𝑆)((1st ‘𝑧) × (2nd ‘𝑧)) ∈ V
53		vex 3454	. . . . . . . . . . . . . . . . 17 ⊢ 𝑥 ∈ V
54		vex 3454	. . . . . . . . . . . . . . . . 17 ⊢ 𝑦 ∈ V
55	53, 54	op1std 8011	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (1st ‘𝑧) = 𝑥)
56	53, 54	op2ndd 8012	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (2nd ‘𝑧) = 𝑦)
57	55, 56	xpeq12d 5681	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → ((1st ‘𝑧) × (2nd ‘𝑧)) = (𝑥 × 𝑦))
58	57	mpompt 7534	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ (𝑅 × 𝑆) ↦ ((1st ‘𝑧) × (2nd ‘𝑧))) = (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))
59	58	eqcomi 2769	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦)) = (𝑧 ∈ (𝑅 × 𝑆) ↦ ((1st ‘𝑧) × (2nd ‘𝑧)))
60		eleq2 2849	. . . . . . . . . . . . . 14 ⊢ (𝑡 = ((1st ‘𝑧) × (2nd ‘𝑧)) → (𝑝 ∈ 𝑡 ↔ 𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧))))
61		sseq1 3933	. . . . . . . . . . . . . 14 ⊢ (𝑡 = ((1st ‘𝑧) × (2nd ‘𝑧)) → (𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)) ↔ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
62	60, 61	anbi12d 644	. . . . . . . . . . . . 13 ⊢ (𝑡 = ((1st ‘𝑧) × (2nd ‘𝑧)) → ((𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ (𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
63	59, 62	rexrnmptw 7095	. . . . . . . . . . . 12 ⊢ (∀𝑧 ∈ (𝑅 × 𝑆)((1st ‘𝑧) × (2nd ‘𝑧)) ∈ V → (∃𝑡 ∈ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))(𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑧 ∈ (𝑅 × 𝑆)(𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
64	52, 63	ax-mp 5	. . . . . . . . . . 11 ⊢ (∃𝑡 ∈ ran (𝑥 ∈ 𝑅, 𝑦 ∈ 𝑆 ↦ (𝑥 × 𝑦))(𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑧 ∈ (𝑅 × 𝑆)(𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
65	57	eleq2d 2846	. . . . . . . . . . . . 13 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ↔ 𝑝 ∈ (𝑥 × 𝑦)))
66	57	sseq1d 3939	. . . . . . . . . . . . 13 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)) ↔ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
67	65, 66	anbi12d 644	. . . . . . . . . . . 12 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → ((𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
68	67	rexxp 5818	. . . . . . . . . . 11 ⊢ (∃𝑧 ∈ (𝑅 × 𝑆)(𝑝 ∈ ((1st ‘𝑧) × (2nd ‘𝑧)) ∧ ((1st ‘𝑧) × (2nd ‘𝑧)) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
69	48, 64, 68	3bitri 300	. . . . . . . . . 10 ⊢ (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))))
70	47, 69	bitrdi 290	. . . . . . . . 9 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ ∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
71	44, 70	raleqbidv 3334	. . . . . . . 8 ⊢ ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → (∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)) ↔ ∀𝑝 ∈ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑))∃𝑥 ∈ 𝑅 ∃𝑦 ∈ 𝑆 (𝑝 ∈ (𝑥 × 𝑦) ∧ (𝑥 × 𝑦) ⊆ ((𝑎 ∩ 𝑐) × (𝑏 ∩ 𝑑)))))
72	41, 71	syl5ibrcom 250	. . . . . . 7 ⊢ ((((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) ∧ (𝑏 ∈ 𝑆 ∧ 𝑑 ∈ 𝑆)) → ((𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
73	72	rexlimdvva 3219	. . . . . 6 ⊢ (((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) → (∃𝑏 ∈ 𝑆 ∃𝑑 ∈ 𝑆 (𝑢 = (𝑎 × 𝑏) ∧ 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
74	17, 73	biimtrrid 246	. . . . 5 ⊢ (((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) ∧ (𝑎 ∈ 𝑅 ∧ 𝑐 ∈ 𝑅)) → ((∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
75	74	rexlimdvva 3219	. . . 4 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → (∃𝑎 ∈ 𝑅 ∃𝑐 ∈ 𝑅 (∃𝑏 ∈ 𝑆 𝑢 = (𝑎 × 𝑏) ∧ ∃𝑑 ∈ 𝑆 𝑣 = (𝑐 × 𝑑)) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
76	16, 75	biimtrid 245	. . 3 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → ((𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) → ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
77	76	ralrimivv 3203	. 2 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣)))
78	1	txbasex 23885	. . 3 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → 𝐵 ∈ V)
79		isbasis2g 23266	. . 3 ⊢ (𝐵 ∈ V → (𝐵 ∈ TopBases ↔ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
80	78, 79	syl 18	. 2 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → (𝐵 ∈ TopBases ↔ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 ∀𝑝 ∈ (𝑢 ∩ 𝑣)∃𝑡 ∈ 𝐵 (𝑝 ∈ 𝑡 ∧ 𝑡 ⊆ (𝑢 ∩ 𝑣))))
81	77, 80	mpbird 260	1 ⊢ ((𝑅 ∈ TopBases ∧ 𝑆 ∈ TopBases) → 𝐵 ∈ TopBases)

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2144  {cab 2738  ∀wral 3076  ∃wrex 3086  Vcvv 3450   ⊆ wss 3895   ∩ cin 4089  ⟨cop 4589   ↦ cmpt 5185   × cxp 5648  ran crn 5651  ‘cfv 6538   ∈ cmpo 7422  1^st c1st 7999  2^nd c2nd 8000  TopBasesctb 23263

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-id 5545  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-fv 6546  df-oprab 7424  df-mpo 7425  df-1st 8001  df-2nd 8002  df-bases 23264

This theorem is used by:  txtop  23888  tx2ndc  23970  mbfimaopnlem  25976