Theorem xkoccn 21422

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 21087	. . . 4 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
2	1	3expa 1265	. . 3 ⊢ (((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
3		eqid 2622	. . 3 ⊢ (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) = (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥}))
4	2, 3	fmptd 6385	. 2 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})):𝑌⟶(𝑅 Cn 𝑆))
5		eqid 2622	. . . . . 6 ⊢ ∪ 𝑅 = ∪ 𝑅
6		eqid 2622	. . . . . 6 ⊢ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp} = {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}
7		eqid 2622	. . . . . 6 ⊢ (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) = (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
8	5, 6, 7	xkobval 21389	. . . . 5 ⊢ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) = {𝑦 ∣ ∃𝑘 ∈ 𝒫 ∪ 𝑅∃𝑣 ∈ 𝑆 ((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})}
9	8	abeq2i 2735	. . . 4 ⊢ (𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ↔ ∃𝑘 ∈ 𝒫 ∪ 𝑅∃𝑣 ∈ 𝑆 ((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))
10	2	adantlr 751	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
11	10	adantlr 751	. . . . . . . . . . . . 13 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
12	11	adantlr 751	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
13		simplr 792	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 = ∅)
14	13	imaeq2d 5466	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) = ((𝑋 × {𝑥}) “ ∅))
15		ima0 5481	. . . . . . . . . . . . . 14 ⊢ ((𝑋 × {𝑥}) “ ∅) = ∅
16		0ss 3972	. . . . . . . . . . . . . 14 ⊢ ∅ ⊆ 𝑣
17	15, 16	eqsstri 3635	. . . . . . . . . . . . 13 ⊢ ((𝑋 × {𝑥}) “ ∅) ⊆ 𝑣
18	14, 17	syl6eqss 3655	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)
19		imaeq1 5461	. . . . . . . . . . . . . 14 ⊢ (𝑓 = (𝑋 × {𝑥}) → (𝑓 “ 𝑘) = ((𝑋 × {𝑥}) “ 𝑘))
20	19	sseq1d 3632	. . . . . . . . . . . . 13 ⊢ (𝑓 = (𝑋 × {𝑥}) → ((𝑓 “ 𝑘) ⊆ 𝑣 ↔ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣))
21	20	elrab 3363	. . . . . . . . . . . 12 ⊢ ((𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣))
22	12, 18, 21	sylanbrc 698	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
23	22	ralrimiva 2966	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → ∀𝑥 ∈ 𝑌 (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
24		rabid2 3118	. . . . . . . . . 10 ⊢ (𝑌 = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ↔ ∀𝑥 ∈ 𝑌 (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})
25	23, 24	sylibr 224	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → 𝑌 = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}})
26		simpllr 799	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑆 ∈ (TopOn‘𝑌))
27		toponmax 20730	. . . . . . . . . . 11 ⊢ (𝑆 ∈ (TopOn‘𝑌) → 𝑌 ∈ 𝑆)
28	26, 27	syl 17	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑌 ∈ 𝑆)
29	28	adantr 481	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → 𝑌 ∈ 𝑆)
30	25, 29	eqeltrrd 2702	. . . . . . . 8 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 = ∅) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆)
31		ifnefalse 4098	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ≠ ∅ → if(𝑘 = ∅, 𝑌, 𝑣) = 𝑣)
32	31	ad2antlr 763	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → if(𝑘 = ∅, 𝑌, 𝑣) = 𝑣)
33	32	eleq2d 2687	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ if(𝑘 = ∅, 𝑌, 𝑣) ↔ 𝑥 ∈ 𝑣))
34		vex 3203	. . . . . . . . . . . . . . . 16 ⊢ 𝑥 ∈ V
35	34	snss 4316	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ 𝑣 ↔ {𝑥} ⊆ 𝑣)
36	33, 35	syl6bb 276	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ if(𝑘 = ∅, 𝑌, 𝑣) ↔ {𝑥} ⊆ 𝑣))
37		df-ima 5127	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑋 × {𝑥}) “ 𝑘) = ran ((𝑋 × {𝑥}) ↾ 𝑘)
38		simplrl 800	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑘 ∈ 𝒫 ∪ 𝑅)
39	38	ad2antrr 762	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 ∈ 𝒫 ∪ 𝑅)
40	39	elpwid 4170	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 ⊆ ∪ 𝑅)
41		toponuni 20719	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑅 ∈ (TopOn‘𝑋) → 𝑋 = ∪ 𝑅)
42	41	ad5antr 770	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑋 = ∪ 𝑅)
43	40, 42	sseqtr4d 3642	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → 𝑘 ⊆ 𝑋)
44		xpssres 5434	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ⊆ 𝑋 → ((𝑋 × {𝑥}) ↾ 𝑘) = (𝑘 × {𝑥}))
45	43, 44	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) ↾ 𝑘) = (𝑘 × {𝑥}))
46	45	rneqd 5353	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ran ((𝑋 × {𝑥}) ↾ 𝑘) = ran (𝑘 × {𝑥}))
47	37, 46	syl5eq 2668	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) = ran (𝑘 × {𝑥}))
48		rnxp 5564	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ≠ ∅ → ran (𝑘 × {𝑥}) = {𝑥})
49	48	ad2antlr 763	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ran (𝑘 × {𝑥}) = {𝑥})
50	47, 49	eqtrd 2656	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → ((𝑋 × {𝑥}) “ 𝑘) = {𝑥})
51	50	sseq1d 3632	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣 ↔ {𝑥} ⊆ 𝑣))
52	11	adantlr 751	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆))
53	52	biantrurd 529	. . . . . . . . . . . . . 14 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣 ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)))
54	36, 51, 53	3bitr2d 296	. . . . . . . . . . . . 13 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ if(𝑘 = ∅, 𝑌, 𝑣) ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)))
55	33, 54	bitr3d 270	. . . . . . . . . . . 12 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ 𝑣 ↔ ((𝑋 × {𝑥}) ∈ (𝑅 Cn 𝑆) ∧ ((𝑋 × {𝑥}) “ 𝑘) ⊆ 𝑣)))
56	55, 21	syl6bbr 278	. . . . . . . . . . 11 ⊢ ((((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) ∧ 𝑥 ∈ 𝑌) → (𝑥 ∈ 𝑣 ↔ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))
57	56	rabbi2dva 3821	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → (𝑌 ∩ 𝑣) = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}})
58		simplrr 801	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑣 ∈ 𝑆)
59		toponss 20731	. . . . . . . . . . . . 13 ⊢ ((𝑆 ∈ (TopOn‘𝑌) ∧ 𝑣 ∈ 𝑆) → 𝑣 ⊆ 𝑌)
60	26, 58, 59	syl2anc 693	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → 𝑣 ⊆ 𝑌)
61	60	adantr 481	. . . . . . . . . . 11 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → 𝑣 ⊆ 𝑌)
62		sseqin2 3817	. . . . . . . . . . 11 ⊢ (𝑣 ⊆ 𝑌 ↔ (𝑌 ∩ 𝑣) = 𝑣)
63	61, 62	sylib 208	. . . . . . . . . 10 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → (𝑌 ∩ 𝑣) = 𝑣)
64	57, 63	eqtr3d 2658	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} = 𝑣)
65	58	adantr 481	. . . . . . . . 9 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → 𝑣 ∈ 𝑆)
66	64, 65	eqeltrd 2701	. . . . . . . 8 ⊢ (((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) ∧ 𝑘 ≠ ∅) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆)
67	30, 66	pm2.61dane 2881	. . . . . . 7 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆)
68		imaeq2 5462	. . . . . . . . 9 ⊢ (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) = (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))
69	3	mptpreima 5628	. . . . . . . . 9 ⊢ (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}}
70	68, 69	syl6eq 2672	. . . . . . . 8 ⊢ (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) = {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}})
71	70	eleq1d 2686	. . . . . . 7 ⊢ (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → ((◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆 ↔ {𝑥 ∈ 𝑌 ∣ (𝑋 × {𝑥}) ∈ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}} ∈ 𝑆))
72	67, 71	syl5ibrcom 237	. . . . . 6 ⊢ ((((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) ∧ (𝑅 ↾t 𝑘) ∈ Comp) → (𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣} → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
73	72	expimpd 629	. . . . 5 ⊢ (((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) ∧ (𝑘 ∈ 𝒫 ∪ 𝑅 ∧ 𝑣 ∈ 𝑆)) → (((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
74	73	rexlimdvva 3038	. . . 4 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (∃𝑘 ∈ 𝒫 ∪ 𝑅∃𝑣 ∈ 𝑆 ((𝑅 ↾t 𝑘) ∈ Comp ∧ 𝑦 = {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
75	9, 74	syl5bi 232	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) → (◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆))
76	75	ralrimiv 2965	. 2 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → ∀𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})(◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆)
77		simpr 477	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → 𝑆 ∈ (TopOn‘𝑌))
78		ovex 6678	. . . . . 6 ⊢ (𝑅 Cn 𝑆) ∈ V
79	78	pwex 4848	. . . . 5 ⊢ 𝒫 (𝑅 Cn 𝑆) ∈ V
80	5, 6, 7	xkotf 21388	. . . . . 6 ⊢ (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}):({𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp} × 𝑆)⟶𝒫 (𝑅 Cn 𝑆)
81		frn 6053	. . . . . 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 4803	. . . 4 ⊢ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ∈ V
84	83	a1i 11	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}) ∈ V)
85		topontop 20718	. . . 4 ⊢ (𝑅 ∈ (TopOn‘𝑋) → 𝑅 ∈ Top)
86		topontop 20718	. . . 4 ⊢ (𝑆 ∈ (TopOn‘𝑌) → 𝑆 ∈ Top)
87	5, 6, 7	xkoval 21390	. . . 4 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑆 ^ko 𝑅) = (topGen‘(fi‘ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))))
88	85, 86, 87	syl2an 494	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑆 ^ko 𝑅) = (topGen‘(fi‘ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣}))))
89		eqid 2622	. . . . 5 ⊢ (𝑆 ^ko 𝑅) = (𝑆 ^ko 𝑅)
90	89	xkotopon 21403	. . . 4 ⊢ ((𝑅 ∈ Top ∧ 𝑆 ∈ Top) → (𝑆 ^ko 𝑅) ∈ (TopOn‘(𝑅 Cn 𝑆)))
91	85, 86, 90	syl2an 494	. . 3 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑆 ^ko 𝑅) ∈ (TopOn‘(𝑅 Cn 𝑆)))
92	77, 84, 88, 91	subbascn 21058	. 2 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → ((𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) ∈ (𝑆 Cn (𝑆 ^ko 𝑅)) ↔ ((𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})):𝑌⟶(𝑅 Cn 𝑆) ∧ ∀𝑦 ∈ ran (𝑘 ∈ {𝑧 ∈ 𝒫 ∪ 𝑅 ∣ (𝑅 ↾t 𝑧) ∈ Comp}, 𝑣 ∈ 𝑆 ↦ {𝑓 ∈ (𝑅 Cn 𝑆) ∣ (𝑓 “ 𝑘) ⊆ 𝑣})(◡(𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) “ 𝑦) ∈ 𝑆)))
93	4, 76, 92	mpbir2and 957	1 ⊢ ((𝑅 ∈ (TopOn‘𝑋) ∧ 𝑆 ∈ (TopOn‘𝑌)) → (𝑥 ∈ 𝑌 ↦ (𝑋 × {𝑥})) ∈ (𝑆 Cn (𝑆 ^ko 𝑅)))

Syntax hints:   → wi 4   ∧ wa 384   = wceq 1483   ∈ wcel 1990   ≠ wne 2794  ∀wral 2912  ∃wrex 2913  {crab 2916  Vcvv 3200   ∩ cin 3573   ⊆ wss 3574  ∅c0 3915  ifcif 4086  𝒫 cpw 4158  {csn 4177  ∪ cuni 4436   ↦ cmpt 4729   × cxp 5112  ^◡ccnv 5113  ran crn 5115   ↾ cres 5116   “ cima 5117  ⟶wf 5884  ‘cfv 5888  (class class class)co 6650   ↦ cmpt2 6652  ficfi 8316   ↾_t crest 16081  topGenctg 16098  Topctop 20698  TopOnctopon 20715   Cn ccn 21028  Compccmp 21189   ^_ko cxko 21364

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-reu 2919  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-iin 4523  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-oadd 7564  df-er 7742  df-map 7859  df-en 7956  df-dom 7957  df-fin 7959  df-fi 8317  df-rest 16083  df-topgen 16104  df-top 20699  df-topon 20716  df-bases 20750  df-cn 21031  df-cnp 21032  df-cmp 21190  df-xko 21366

This theorem is referenced by:  cnmptkc  21482  xkofvcn  21487