Theorem ptclsg 23840

Description: The closure of a box in the product topology is the box formed from the closures of the factors. The proof uses the axiom of choice; the last hypothesis is the choice assumption. (Contributed by Mario Carneiro, 3-Sep-2015.)

Hypotheses

Ref	Expression
ptcls.2	⊢ 𝐽 = (∏t‘(𝑘 ∈ 𝐴 ↦ 𝑅))
ptcls.a	⊢ (𝜑 → 𝐴 ∈ 𝑉)
ptcls.j	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑅 ∈ (TopOn‘𝑋))
ptcls.c	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑆 ⊆ 𝑋)
ptclsg.1	⊢ (𝜑 → ∪ 𝑘 ∈ 𝐴 𝑆 ∈ AC 𝐴)

Assertion

Ref	Expression
ptclsg	⊢ (𝜑 → ((cls‘𝐽)‘X𝑘 ∈ 𝐴 𝑆) = X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆))

Distinct variable groups:   𝜑,𝑘   𝐴,𝑘

Allowed substitution hints:   𝑅(𝑘)   𝑆(𝑘)   𝐽(𝑘)   𝑉(𝑘)   𝑋(𝑘)

Proof of Theorem ptclsg

Dummy variables 𝑓 𝑔 𝑢 𝑥 𝑦 𝑧 ℎ are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ptcls.a	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
2		ptcls.j	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑅 ∈ (TopOn‘𝑋))
3		topontop 23137	. . . . . 6 ⊢ (𝑅 ∈ (TopOn‘𝑋) → 𝑅 ∈ Top)
4	2, 3	syl 18	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑅 ∈ Top)
5		ptcls.c	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑆 ⊆ 𝑋)
6		toponuni 23138	. . . . . . . 8 ⊢ (𝑅 ∈ (TopOn‘𝑋) → 𝑋 = ∪ 𝑅)
7	2, 6	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑋 = ∪ 𝑅)
8	5, 7	sseqtrd 3970	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑆 ⊆ ∪ 𝑅)
9		eqid 2762	. . . . . . 7 ⊢ ∪ 𝑅 = ∪ 𝑅
10	9	clscld 23271	. . . . . 6 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ⊆ ∪ 𝑅) → ((cls‘𝑅)‘𝑆) ∈ (Clsd‘𝑅))
11	4, 8, 10	syl2anc 596	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((cls‘𝑅)‘𝑆) ∈ (Clsd‘𝑅))
12	1, 4, 11	ptcldmpt 23839	. . . 4 ⊢ (𝜑 → X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ∈ (Clsd‘(∏t‘(𝑘 ∈ 𝐴 ↦ 𝑅))))
13		ptcls.2	. . . . 5 ⊢ 𝐽 = (∏t‘(𝑘 ∈ 𝐴 ↦ 𝑅))
14	13	fveq2i 6885	. . . 4 ⊢ (Clsd‘𝐽) = (Clsd‘(∏t‘(𝑘 ∈ 𝐴 ↦ 𝑅)))
15	12, 14	eleqtrrdi 2873	. . 3 ⊢ (𝜑 → X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ∈ (Clsd‘𝐽))
16	9	sscls 23280	. . . . . 6 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ⊆ ∪ 𝑅) → 𝑆 ⊆ ((cls‘𝑅)‘𝑆))
17	4, 8, 16	syl2anc 596	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑆 ⊆ ((cls‘𝑅)‘𝑆))
18	17	ralrimiva 3156	. . . 4 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝑆 ⊆ ((cls‘𝑅)‘𝑆))
19		ss2ixp 8920	. . . 4 ⊢ (∀𝑘 ∈ 𝐴 𝑆 ⊆ ((cls‘𝑅)‘𝑆) → X𝑘 ∈ 𝐴 𝑆 ⊆ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆))
20	18, 19	syl 18	. . 3 ⊢ (𝜑 → X𝑘 ∈ 𝐴 𝑆 ⊆ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆))
21		eqid 2762	. . . 4 ⊢ ∪ 𝐽 = ∪ 𝐽
22	21	clsss2 23296	. . 3 ⊢ ((X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ∈ (Clsd‘𝐽) ∧ X𝑘 ∈ 𝐴 𝑆 ⊆ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → ((cls‘𝐽)‘X𝑘 ∈ 𝐴 𝑆) ⊆ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆))
23	15, 20, 22	syl2anc 596	. 2 ⊢ (𝜑 → ((cls‘𝐽)‘X𝑘 ∈ 𝐴 𝑆) ⊆ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆))
24		vex 3457	. . . . . 6 ⊢ 𝑢 ∈ V
25		eqeq1 2766	. . . . . . . 8 ⊢ (𝑥 = 𝑢 → (𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦) ↔ 𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦)))
26	25	anbi2d 642	. . . . . . 7 ⊢ (𝑥 = 𝑢 → (((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦)) ↔ ((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))))
27	26	exbidv 1954	. . . . . 6 ⊢ (𝑥 = 𝑢 → (∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦)) ↔ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))))
28	24, 27	elab 3636	. . . . 5 ⊢ (𝑢 ∈ {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} ↔ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦)))
29		nffvmpt1 6893	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)
30	29	nfel2 2942	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘(𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)
31		nfv 1947	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑦(𝑔‘𝑘) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘)
32		fveq2 6882	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑘 → (𝑔‘𝑦) = (𝑔‘𝑘))
33		fveq2 6882	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑘 → ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) = ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘))
34	32, 33	eleq12d 2856	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 𝑘 → ((𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ↔ (𝑔‘𝑘) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘)))
35	30, 31, 34	cbvralw 3306	. . . . . . . . . . . . . 14 ⊢ (∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ↔ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘))
36		simpr 490	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑘 ∈ 𝐴)
37		eqid 2762	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ 𝐴 ↦ 𝑅) = (𝑘 ∈ 𝐴 ↦ 𝑅)
38	37	fvmpt2 7002	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ 𝐴 ∧ 𝑅 ∈ (TopOn‘𝑋)) → ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘) = 𝑅)
39	36, 2, 38	syl2anc 596	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘) = 𝑅)
40	39	eleq2d 2848	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑔‘𝑘) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘) ↔ (𝑔‘𝑘) ∈ 𝑅))
41	40	ralbidva 3185	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑘) ↔ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅))
42	35, 41	bitrid 286	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ↔ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅))
43	42	anbi2d 642	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ↔ (𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅)))
44	43	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → ((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ↔ (𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅)))
45	44	biimpa 482	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ (𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦))) → (𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅))
46		ptclsg.1	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∪ 𝑘 ∈ 𝐴 𝑆 ∈ AC 𝐴)
47	46	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∪ 𝑘 ∈ 𝐴 𝑆 ∈ AC 𝐴)
48		simpll 779	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → 𝜑)
49		vex 3457	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑓 ∈ V
50	49	elixp 8914	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ↔ (𝑓 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆)))
51	50	simprbi 503	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) → ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆))
52	51	ad2antlr 740	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆))
53	9	clsndisj 23299	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑅 ∈ Top ∧ 𝑆 ⊆ ∪ 𝑅 ∧ (𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆)) ∧ ((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘))) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)
54	53	ex 418	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ⊆ ∪ 𝑅 ∧ (𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆)) → (((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅))
55	54	3expia 1139	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ⊆ ∪ 𝑅) → ((𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆) → (((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)))
56	4, 8, 55	syl2anc 596	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆) → (((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)))
57	56	ralimdva 3176	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ ((cls‘𝑅)‘𝑆) → ∀𝑘 ∈ 𝐴 (((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)))
58	48, 52, 57	sylc 66	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 (((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅))
59		simprlr 792	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅)
60		simprr 785	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))
61	32	cbvixpv 8925	. . . . . . . . . . . . . . . . . . 19 ⊢ X𝑦 ∈ 𝐴 (𝑔‘𝑦) = X𝑘 ∈ 𝐴 (𝑔‘𝑘)
62	60, 61	eleqtrdi 2872	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → 𝑓 ∈ X𝑘 ∈ 𝐴 (𝑔‘𝑘))
63	49	elixp 8914	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑓 ∈ X𝑘 ∈ 𝐴 (𝑔‘𝑘) ↔ (𝑓 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ (𝑔‘𝑘)))
64	63	simprbi 503	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓 ∈ X𝑘 ∈ 𝐴 (𝑔‘𝑘) → ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ (𝑔‘𝑘))
65	62, 64	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ (𝑔‘𝑘))
66		r19.26 3124	. . . . . . . . . . . . . . . . 17 ⊢ (∀𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) ↔ (∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅 ∧ ∀𝑘 ∈ 𝐴 (𝑓‘𝑘) ∈ (𝑔‘𝑘)))
67	59, 65, 66	sylanbrc 595	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)))
68		ralim 3104	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑘 ∈ 𝐴 (((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅) → (∀𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∈ 𝑅 ∧ (𝑓‘𝑘) ∈ (𝑔‘𝑘)) → ∀𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅))
69	58, 67, 68	sylc 66	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)
70		rabn0 4342	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆 ∣ 𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆)} ≠ ∅ ↔ ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆))
71		dfin5 3910	. . . . . . . . . . . . . . . . . . 19 ⊢ (∪ 𝑘 ∈ 𝐴 𝑆 ∩ ((𝑔‘𝑘) ∩ 𝑆)) = {𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆 ∣ 𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆)}
72		inss2 4186	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑔‘𝑘) ∩ 𝑆) ⊆ 𝑆
73		ssiun2 5010	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 ∈ 𝐴 → 𝑆 ⊆ ∪ 𝑘 ∈ 𝐴 𝑆)
74	72, 73	sstrid 3945	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 ∈ 𝐴 → ((𝑔‘𝑘) ∩ 𝑆) ⊆ ∪ 𝑘 ∈ 𝐴 𝑆)
75		sseqin2 4172	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑔‘𝑘) ∩ 𝑆) ⊆ ∪ 𝑘 ∈ 𝐴 𝑆 ↔ (∪ 𝑘 ∈ 𝐴 𝑆 ∩ ((𝑔‘𝑘) ∩ 𝑆)) = ((𝑔‘𝑘) ∩ 𝑆))
76	74, 75	sylib 221	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ 𝐴 → (∪ 𝑘 ∈ 𝐴 𝑆 ∩ ((𝑔‘𝑘) ∩ 𝑆)) = ((𝑔‘𝑘) ∩ 𝑆))
77	71, 76	eqtr3id 2811	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ 𝐴 → {𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆 ∣ 𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆)} = ((𝑔‘𝑘) ∩ 𝑆))
78	77	neeq1d 3016	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ 𝐴 → ({𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆 ∣ 𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆)} ≠ ∅ ↔ ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅))
79	70, 78	bitr3id 288	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝐴 → (∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅))
80	79	ralbiia 3108	. . . . . . . . . . . . . . 15 ⊢ (∀𝑘 ∈ 𝐴 ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ ∀𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)
81	69, 80	sylibr 237	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑘 ∈ 𝐴 ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆))
82		nfv 1947	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑦∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆)
83		nfiu1 4990	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘∪ 𝑘 ∈ 𝐴 𝑆
84		nfcv 2924	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑘(𝑔‘𝑦)
85		nfcsb1v 3874	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑘⦋𝑦 / 𝑘⦌𝑆
86	84, 85	nfin 4173	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)
87	86	nfel2 2942	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘 𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)
88	83, 87	nfrexw 3312	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)
89		fveq2 6882	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → (𝑔‘𝑘) = (𝑔‘𝑦))
90		csbeq1a 3864	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → 𝑆 = ⦋𝑦 / 𝑘⦌𝑆)
91	89, 90	ineq12d 4170	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → ((𝑔‘𝑘) ∩ 𝑆) = ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆))
92	91	eleq2d 2848	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑦 → (𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ 𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)))
93	92	rexbidv 3188	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑦 → (∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)))
94	82, 88, 93	cbvralw 3306	. . . . . . . . . . . . . 14 ⊢ (∀𝑘 ∈ 𝐴 ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ ∀𝑦 ∈ 𝐴 ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆))
95	81, 94	sylib 221	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∀𝑦 ∈ 𝐴 ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆))
96		eleq1 2850	. . . . . . . . . . . . . 14 ⊢ (𝑧 = (ℎ‘𝑦) → (𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆) ↔ (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)))
97	96	acni3 10053	. . . . . . . . . . . . 13 ⊢ ((∪ 𝑘 ∈ 𝐴 𝑆 ∈ AC 𝐴 ∧ ∀𝑦 ∈ 𝐴 ∃𝑧 ∈ ∪ 𝑘 ∈ 𝐴 𝑆𝑧 ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)) → ∃ℎ(ℎ:𝐴⟶∪ 𝑘 ∈ 𝐴 𝑆 ∧ ∀𝑦 ∈ 𝐴 (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)))
98	47, 95, 97	syl2anc 596	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → ∃ℎ(ℎ:𝐴⟶∪ 𝑘 ∈ 𝐴 𝑆 ∧ ∀𝑦 ∈ 𝐴 (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)))
99		ffn 6706	. . . . . . . . . . . . . 14 ⊢ (ℎ:𝐴⟶∪ 𝑘 ∈ 𝐴 𝑆 → ℎ Fn 𝐴)
100		nfv 1947	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑦(ℎ‘𝑘) ∈ ((𝑔‘𝑘) ∩ 𝑆)
101	86	nfel2 2942	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘(ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)
102		fveq2 6882	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → (ℎ‘𝑘) = (ℎ‘𝑦))
103	102, 91	eleq12d 2856	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑦 → ((ℎ‘𝑘) ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)))
104	100, 101, 103	cbvralw 3306	. . . . . . . . . . . . . . 15 ⊢ (∀𝑘 ∈ 𝐴 (ℎ‘𝑘) ∈ ((𝑔‘𝑘) ∩ 𝑆) ↔ ∀𝑦 ∈ 𝐴 (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆))
105		ne0i 4290	. . . . . . . . . . . . . . . 16 ⊢ (ℎ ∈ X𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) → X𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅)
106		vex 3457	. . . . . . . . . . . . . . . . 17 ⊢ ℎ ∈ V
107	106	elixp 8914	. . . . . . . . . . . . . . . 16 ⊢ (ℎ ∈ X𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) ↔ (ℎ Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (ℎ‘𝑘) ∈ ((𝑔‘𝑘) ∩ 𝑆)))
108		ixpin 8933	. . . . . . . . . . . . . . . . . 18 ⊢ X𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) = (X𝑘 ∈ 𝐴 (𝑔‘𝑘) ∩ X𝑘 ∈ 𝐴 𝑆)
109	61	ineq1i 4165	. . . . . . . . . . . . . . . . . 18 ⊢ (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) = (X𝑘 ∈ 𝐴 (𝑔‘𝑘) ∩ X𝑘 ∈ 𝐴 𝑆)
110	108, 109	eqtr4i 2788	. . . . . . . . . . . . . . . . 17 ⊢ X𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) = (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆)
111	110	neeq1i 3021	. . . . . . . . . . . . . . . 16 ⊢ (X𝑘 ∈ 𝐴 ((𝑔‘𝑘) ∩ 𝑆) ≠ ∅ ↔ (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)
112	105, 107, 111	3imtr3i 294	. . . . . . . . . . . . . . 15 ⊢ ((ℎ Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (ℎ‘𝑘) ∈ ((𝑔‘𝑘) ∩ 𝑆)) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)
113	104, 112	sylan2br 607	. . . . . . . . . . . . . 14 ⊢ ((ℎ Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)
114	99, 113	sylan 592	. . . . . . . . . . . . 13 ⊢ ((ℎ:𝐴⟶∪ 𝑘 ∈ 𝐴 𝑆 ∧ ∀𝑦 ∈ 𝐴 (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)
115	114	exlimiv 1963	. . . . . . . . . . . 12 ⊢ (∃ℎ(ℎ:𝐴⟶∪ 𝑘 ∈ 𝐴 𝑆 ∧ ∀𝑦 ∈ 𝐴 (ℎ‘𝑦) ∈ ((𝑔‘𝑦) ∩ ⦋𝑦 / 𝑘⦌𝑆)) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)
116	98, 115	syl 18	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ ((𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅) ∧ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦))) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)
117	116	expr 462	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ (𝑔 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑔‘𝑘) ∈ 𝑅)) → (𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅))
118	45, 117	syldan 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ (𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦))) → (𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅))
119	118	3adantr3 1190	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ (𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦))) → (𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅))
120		eleq2 2851	. . . . . . . . 9 ⊢ (𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (𝑓 ∈ 𝑢 ↔ 𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦)))
121		ineq1 4162	. . . . . . . . . 10 ⊢ (𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) = (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆))
122	121	neeq1d 3016	. . . . . . . . 9 ⊢ (𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦) → ((𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅ ↔ (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅))
123	120, 122	imbi12d 347	. . . . . . . 8 ⊢ (𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦) → ((𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅) ↔ (𝑓 ∈ X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (X𝑦 ∈ 𝐴 (𝑔‘𝑦) ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)))
124	119, 123	syl5ibrcom 250	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) ∧ (𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦))) → (𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦) → (𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)))
125	124	expimpd 459	. . . . . 6 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → (((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦)) → (𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)))
126	125	exlimdv 1966	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → (∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑢 = X𝑦 ∈ 𝐴 (𝑔‘𝑦)) → (𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)))
127	28, 126	biimtrid 245	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → (𝑢 ∈ {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} → (𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)))
128	127	ralrimiv 3155	. . 3 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → ∀𝑢 ∈ {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} (𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅))
129	4	fmpttd 7111	. . . . . . . 8 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ 𝑅):𝐴⟶Top)
130	129	ffnd 6707	. . . . . . 7 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ 𝑅) Fn 𝐴)
131		eqid 2762	. . . . . . . 8 ⊢ {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} = {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))}
132	131	ptval 23795	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑘 ∈ 𝐴 ↦ 𝑅) Fn 𝐴) → (∏t‘(𝑘 ∈ 𝐴 ↦ 𝑅)) = (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))}))
133	1, 130, 132	syl2anc 596	. . . . . 6 ⊢ (𝜑 → (∏t‘(𝑘 ∈ 𝐴 ↦ 𝑅)) = (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))}))
134	13, 133	eqtrid 2809	. . . . 5 ⊢ (𝜑 → 𝐽 = (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))}))
135	134	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → 𝐽 = (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))}))
136	2	ralrimiva 3156	. . . . . . 7 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝑅 ∈ (TopOn‘𝑋))
137	13	pttopon 23821	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ ∀𝑘 ∈ 𝐴 𝑅 ∈ (TopOn‘𝑋)) → 𝐽 ∈ (TopOn‘X𝑘 ∈ 𝐴 𝑋))
138	1, 136, 137	syl2anc 596	. . . . . 6 ⊢ (𝜑 → 𝐽 ∈ (TopOn‘X𝑘 ∈ 𝐴 𝑋))
139		toponuni 23138	. . . . . 6 ⊢ (𝐽 ∈ (TopOn‘X𝑘 ∈ 𝐴 𝑋) → X𝑘 ∈ 𝐴 𝑋 = ∪ 𝐽)
140	138, 139	syl 18	. . . . 5 ⊢ (𝜑 → X𝑘 ∈ 𝐴 𝑋 = ∪ 𝐽)
141	140	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → X𝑘 ∈ 𝐴 𝑋 = ∪ 𝐽)
142	131	ptbas 23804	. . . . . 6 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑘 ∈ 𝐴 ↦ 𝑅):𝐴⟶Top) → {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} ∈ TopBases)
143	1, 129, 142	syl2anc 596	. . . . 5 ⊢ (𝜑 → {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} ∈ TopBases)
144	143	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} ∈ TopBases)
145	5	ralrimiva 3156	. . . . . 6 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝑆 ⊆ 𝑋)
146		ss2ixp 8920	. . . . . 6 ⊢ (∀𝑘 ∈ 𝐴 𝑆 ⊆ 𝑋 → X𝑘 ∈ 𝐴 𝑆 ⊆ X𝑘 ∈ 𝐴 𝑋)
147	145, 146	syl 18	. . . . 5 ⊢ (𝜑 → X𝑘 ∈ 𝐴 𝑆 ⊆ X𝑘 ∈ 𝐴 𝑋)
148	147	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → X𝑘 ∈ 𝐴 𝑆 ⊆ X𝑘 ∈ 𝐴 𝑋)
149	9	clsss3 23283	. . . . . . . . 9 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ⊆ ∪ 𝑅) → ((cls‘𝑅)‘𝑆) ⊆ ∪ 𝑅)
150	4, 8, 149	syl2anc 596	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((cls‘𝑅)‘𝑆) ⊆ ∪ 𝑅)
151	150, 7	sseqtrrd 3971	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((cls‘𝑅)‘𝑆) ⊆ 𝑋)
152	151	ralrimiva 3156	. . . . . 6 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ⊆ 𝑋)
153		ss2ixp 8920	. . . . . 6 ⊢ (∀𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ⊆ 𝑋 → X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ⊆ X𝑘 ∈ 𝐴 𝑋)
154	152, 153	syl 18	. . . . 5 ⊢ (𝜑 → X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆) ⊆ X𝑘 ∈ 𝐴 𝑋)
155	154	sselda 3934	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → 𝑓 ∈ X𝑘 ∈ 𝐴 𝑋)
156	135, 141, 144, 148, 155	elcls3 23307	. . 3 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → (𝑓 ∈ ((cls‘𝐽)‘X𝑘 ∈ 𝐴 𝑆) ↔ ∀𝑢 ∈ {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦 ∈ 𝐴 (𝑔‘𝑦) ∈ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴 ∖ 𝑧)(𝑔‘𝑦) = ∪ ((𝑘 ∈ 𝐴 ↦ 𝑅)‘𝑦)) ∧ 𝑥 = X𝑦 ∈ 𝐴 (𝑔‘𝑦))} (𝑓 ∈ 𝑢 → (𝑢 ∩ X𝑘 ∈ 𝐴 𝑆) ≠ ∅)))
157	128, 156	mpbird 260	. 2 ⊢ ((𝜑 ∧ 𝑓 ∈ X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆)) → 𝑓 ∈ ((cls‘𝐽)‘X𝑘 ∈ 𝐴 𝑆))
158	23, 157	eqelssd 3955	1 ⊢ (𝜑 → ((cls‘𝐽)‘X𝑘 ∈ 𝐴 𝑆) = X𝑘 ∈ 𝐴 ((cls‘𝑅)‘𝑆))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570  ∃wex 1812   ∈ wcel 2145  {cab 2740   ≠ wne 2957  ∀wral 3078  ∃wrex 3088  {crab 3414  ⦋csb 3850   ∖ cdif 3899   ∩ cin 3901   ⊆ wss 3902  ∅c0 4282  ∪ cuni 4870  ∪ ciun 4954   ↦ cmpt 5190   Fn wfn 6532  ⟶wf 6533  ‘cfv 6537  Xcixp 8907  Fincfn 8955  AC wacn 9946  topGenctg 17524  ∏_tcpt 17525  Topctop 23117  TopOnctopon 23134  TopBasesctb 23169  Clsdccld 23240  clsccl 23242

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7739

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7866  df-1o 8458  df-2o 8459  df-map 8831  df-ixp 8908  df-en 8956  df-fin 8959  df-fi 9384  df-acn 9950  df-topgen 17530  df-pt 17531  df-top 23118  df-topon 23135  df-bases 23170  df-cld 23243  df-ntr 23244  df-cls 23245

This theorem is used by:  ptcls  23841  dfac14  23843