Theorem xkoccn 21702

Description: The "constant function" function which maps 𝑥 ∈ 𝑌 to the constant function 𝑧 ∈ 𝑋 ↦ 𝑥 is a continuous function from 𝑋 into the space of continuous functions from 𝑌 to 𝑋. This can also be understood as the currying of the first projection function. (The currying of the second projection function is 𝑥 ∈ 𝑌 ↦ (𝑧 ∈ 𝑋 ↦ 𝑧), which we already know is continuous because it is a constant function.) (Contributed by Mario Carneiro, 19-Mar-2015.)

Assertion

Ref	Expression
xkoccn	⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) ∈ (𝑆 Cn (𝑆 ^ko 𝑅)))

Distinct variable groups:   𝑥,𝑅   𝑥,𝑆   𝑥,𝑋   𝑥,𝑌

Proof of Theorem xkoccn

Dummy variables 𝑓 𝑘 𝑣 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cnconst2 21367	. . . 4 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
2	1	3expa 1147	. . 3 ⊢ (((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
3	2	fmpttd 6575	. 2 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})):𝑌⟶(𝑅 Cn 𝑆))
4		eqid 2765	. . . . . 6 ⊢ ∪ 𝑅 = ∪ 𝑅
5		eqid 2765	. . . . . 6 ⊢ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp} = {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}
6		eqid 2765	. . . . . 6 ⊢ (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) = (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
7	4, 5, 6	xkobval 21669	. . . . 5 ⊢ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) = {𝑦 ∣ ∃𝑘 ∈ 𝒫 ∪ 𝑅∃𝑣 ∈ 𝑆 ((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})}
8	7	abeq2i 2878	. . . 4 ⊢ (𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ↔ ∃𝑘 ∈ 𝒫 ∪ 𝑅∃𝑣 ∈ 𝑆 ((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))
9	2	adantlr 706	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
10	9	adantlr 706	. . . . . . . . . . . . 13 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
11	10	adantlr 706	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
12		simplr 785	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 = ∅)
13	12	imaeq2d 5648	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) = ((𝑋 × {𝑥}) “ ∅))
14		ima0 5663	. . . . . . . . . . . . . 14 ⊢ ((𝑋 × {𝑥}) “ ∅) = ∅
15		0ss 4134	. . . . . . . . . . . . . 14 ⊢ ∅ ⊆ 𝑣
16	14, 15	eqsstri 3795	. . . . . . . . . . . . 13 ⊢ ((𝑋 × {𝑥}) “ ∅) ⊆ 𝑣
17	13, 16	syl6eqss 3815	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)
18		imaeq1 5643	. . . . . . . . . . . . . 14 ⊢ (𝑓 = (𝑋 × {𝑥}) → (𝑓 “ 𝑘) = ((𝑋 × {𝑥}) “ 𝑘))
19	18	sseq1d 3792	. . . . . . . . . . . . 13 ⊢ (𝑓 = (𝑋 × {𝑥}) → ((𝑓 “ 𝑘) ⊆ 𝑣 ↔ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣))
20	19	elrab 3519	. . . . . . . . . . . 12 ⊢ ((𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣))
21	11, 17, 20	sylanbrc 578	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
22	21	ralrimiva 3113	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → ∀𝑥 ∈ 𝑌 (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
23		rabid2 3266	. . . . . . . . . 10 ⊢ (𝑌 = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ↔ ∀𝑥 ∈ 𝑌 (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
24	22, 23	sylibr 225	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → 𝑌 = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}})
25		simpllr 793	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑆 ∈ (TopOn‘𝑌))
26		toponmax 21010	. . . . . . . . . . 11 ⊢ (𝑆 ∈ (TopOn‘𝑌) → 𝑌 ∈ 𝑆)
27	25, 26	syl 17	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑌 ∈ 𝑆)
28	27	adantr 472	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → 𝑌 ∈ 𝑆)
29	24, 28	eqeltrrd 2845	. . . . . . . 8 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆)
30		ifnefalse 4255	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ≠ ∅ → if(𝑘 = ∅, 𝑌, 𝑣) = 𝑣)
31	30	ad2antlr 718	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → if(𝑘 = ∅, 𝑌, 𝑣) = 𝑣)
32	31	eleq2d 2830	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ if(𝑘 = ∅, 𝑌, 𝑣) ↔ 𝑥 ∈ 𝑣))
33		vex 3353	. . . . . . . . . . . . . . . 16 ⊢ 𝑥 ∈ V
34	33	snss 4470	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ 𝑣 ↔ {𝑥} ⊆ 𝑣)
35	32, 34	syl6bb 278	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ if(𝑘 = ∅, 𝑌, 𝑣) ↔ {𝑥} ⊆ 𝑣))
36		df-ima 5290	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑋 × {𝑥}) “ 𝑘) = ran ((𝑋 × {𝑥}) ↾ 𝑘)
37		simplrl 795	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑘 ∈ 𝒫 ∪ 𝑅)
38	37	ad2antrr 717	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 ∈ 𝒫 ∪ 𝑅)
39	38	elpwid 4327	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 ⊆ ∪ 𝑅)
40		toponuni 20998	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ (TopOn‘𝑋) → 𝑋 = ∪ 𝑅)
41	40	ad5antr 728	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑋 = ∪ 𝑅)
42	39, 41	sseqtr4d 3802	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 ⊆ 𝑋)
43		xpssres 5608	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ⊆ 𝑋 → ((𝑋 × {𝑥}) ↾ 𝑘) = (𝑘 × {𝑥}))
44	42, 43	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) ↾ 𝑘) = (𝑘 × {𝑥}))
45	44	rneqd 5521	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ran ((𝑋 × {𝑥}) ↾ 𝑘) = ran (𝑘 × {𝑥}))
46	36, 45	syl5eq 2811	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) = ran (𝑘 × {𝑥}))
47		rnxp 5747	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ≠ ∅ → ran (𝑘 × {𝑥}) = {𝑥})
48	47	ad2antlr 718	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ran (𝑘 × {𝑥}) = {𝑥})
49	46, 48	eqtrd 2799	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) = {𝑥})
50	49	sseq1d 3792	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣 ↔ {𝑥} ⊆ 𝑣))
51	10	adantlr 706	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
52	51	biantrurd 528	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣 ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)))
53	35, 50, 52	3bitr2d 298	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ if(𝑘 = ∅, 𝑌, 𝑣) ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)))
54	32, 53	bitr3d 272	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ 𝑣 ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)))
55	54, 20	syl6bbr 280	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ 𝑣 ↔ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))
56	55	rabbi2dva 3981	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → (𝑌 ∩ 𝑣) = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}})
57		simplrr 796	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑣 ∈ 𝑆)
58		toponss 21011	. . . . . . . . . . . . 13 ⊢ ((𝑆 ∈ (TopOn‘𝑌) ∧ 𝑣 ∈ 𝑆) → 𝑣 ⊆ 𝑌)
59	25, 57, 58	syl2anc 579	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑣 ⊆ 𝑌)
60	59	adantr 472	. . . . . . . . . . 11 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → 𝑣 ⊆ 𝑌)
61		sseqin2 3979	. . . . . . . . . . 11 ⊢ (𝑣 ⊆ 𝑌 ↔ (𝑌 ∩ 𝑣) = 𝑣)
62	60, 61	sylib 209	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → (𝑌 ∩ 𝑣) = 𝑣)
63	56, 62	eqtr3d 2801	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} = 𝑣)
64	57	adantr 472	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → 𝑣 ∈ 𝑆)
65	63, 64	eqeltrd 2844	. . . . . . . 8 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆)
66	29, 65	pm2.61dane 3024	. . . . . . 7 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆)
67		imaeq2 5644	. . . . . . . . 9 ⊢ (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) = (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))
68		eqid 2765	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) = (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥}))
69	68	mptpreima 5814	. . . . . . . . 9 ⊢ (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}}
70	67, 69	syl6eq 2815	. . . . . . . 8 ⊢ (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}})
71	70	eleq1d 2829	. . . . . . 7 ⊢ (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → ((◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆 ↔ {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆))
72	66, 71	syl5ibrcom 238	. . . . . 6 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
73	72	expimpd 445	. . . . 5 ⊢ (((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) → (((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
74	73	rexlimdvva 3185	. . . 4 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (∃𝑘 ∈ 𝒫 ∪ 𝑅∃𝑣 ∈ 𝑆 ((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
75	8, 74	syl5bi 233	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
76	75	ralrimiv 3112	. 2 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → ∀𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})(◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆)
77		simpr 477	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → 𝑆 ∈ (TopOn‘𝑌))
78		ovex 6874	. . . . . 6 ⊢ (𝑅 Cn 𝑆) ∈ V
79	78	pwex 5016	. . . . 5 ⊢ 𝒫 (𝑅 Cn 𝑆) ∈ V
80	4, 5, 6	xkotf 21668	. . . . . 6 ⊢ (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}):({𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp} × 𝑆)⟶𝒫 (𝑅 Cn 𝑆)
81		frn 6229	. . . . . 6 ⊢ ((𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}):({𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp} × 𝑆)⟶𝒫 (𝑅 Cn 𝑆) → ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ⊆ 𝒫 (𝑅 Cn 𝑆))
82	80, 81	ax-mp 5	. . . . 5 ⊢ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ⊆ 𝒫 (𝑅 Cn 𝑆)
83	79, 82	ssexi 4964	. . . 4 ⊢ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ∈ V
84	83	a1i 11	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ∈ V)
85		topontop 20997	. . . 4 ⊢ (𝑅 ∈ (TopOn‘𝑋) → 𝑅 ∈ Top)
86		topontop 20997	. . . 4 ⊢ (𝑆 ∈ (TopOn‘𝑌) → 𝑆 ∈ Top)
87	4, 5, 6	xkoval 21670	. . . 4 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑆 ^ko 𝑅) = (topGen‘(fi‘ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))))
88	85, 86, 87	syl2an 589	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑆 ^ko 𝑅) = (topGen‘(fi‘ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))))
89		eqid 2765	. . . . 5 ⊢ (𝑆 ^ko 𝑅) = (𝑆 ^ko 𝑅)
90	89	xkotopon 21683	. . . 4 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑆 ^ko 𝑅) ∈ (TopOn‘(𝑅 Cn 𝑆)))
91	85, 86, 90	syl2an 589	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑆 ^ko 𝑅) ∈ (TopOn‘(𝑅 Cn 𝑆)))
92	77, 84, 88, 91	subbascn 21338	. 2 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → ((𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) ∈ (𝑆 Cn (𝑆 ^ko 𝑅)) ↔ ((𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})):𝑌⟶(𝑅 Cn 𝑆) ∧ ∀𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})(◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆)))
93	3, 76, 92	mpbir2and 704	1 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) ∈ (𝑆 Cn (𝑆 ^ko 𝑅)))

Syntax hints:   → wi 4   ∧ wa 384   = wceq 1652   ∈ wcel 2155   ≠ wne 2937  ∀wral 3055  ∃wrex 3056  {crab 3059  Vcvv 3350   ∩ cin 3731   ⊆ wss 3732  ∅c0 4079  ifcif 4243  𝒫 cpw 4315  {csn 4334  ∪ cuni 4594   ↦ cmpt 4888   × cxp 5275  ^◡ccnv 5276  ran crn 5278   ↾ cres 5279   “ cima 5280  ⟶wf 6064  ‘cfv 6068  (class class class)co 6842   ↦ cmpt2 6844  ficfi 8523   ↾_t crest 16349  topGenctg 16366  Topctop 20977  TopOnctopon 20994   Cn ccn 21308  Compccmp 21469   ^_ko cxko 21644

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-8 2157  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-rep 4930  ax-sep 4941  ax-nul 4949  ax-pow 5001  ax-pr 5062  ax-un 7147

This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3or 1108  df-3an 1109  df-tru 1656  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-ral 3060  df-rex 3061  df-reu 3062  df-rab 3064  df-v 3352  df-sbc 3597  df-csb 3692  df-dif 3735  df-un 3737  df-in 3739  df-ss 3746  df-pss 3748  df-nul 4080  df-if 4244  df-pw 4317  df-sn 4335  df-pr 4337  df-tp 4339  df-op 4341  df-uni 4595  df-int 4634  df-iun 4678  df-iin 4679  df-br 4810  df-opab 4872  df-mpt 4889  df-tr 4912  df-id 5185  df-eprel 5190  df-po 5198  df-so 5199  df-fr 5236  df-we 5238  df-xp 5283  df-rel 5284  df-cnv 5285  df-co 5286  df-dm 5287  df-rn 5288  df-res 5289  df-ima 5290  df-pred 5865  df-ord 5911  df-on 5912  df-lim 5913  df-suc 5914  df-iota 6031  df-fun 6070  df-fn 6071  df-f 6072  df-f1 6073  df-fo 6074  df-f1o 6075  df-fv 6076  df-ov 6845  df-oprab 6846  df-mpt2 6847  df-om 7264  df-1st 7366  df-2nd 7367  df-wrecs 7610  df-recs 7672  df-rdg 7710  df-1o 7764  df-oadd 7768  df-er 7947  df-map 8062  df-en 8161  df-dom 8162  df-fin 8164  df-fi 8524  df-rest 16351  df-topgen 16372  df-top 20978  df-topon 20995  df-bases 21030  df-cn 21311  df-cnp 21312  df-cmp 21470  df-xko 21646

This theorem is referenced by:  cnmptkc  21762  xkofvcn  21767