MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  tmdgsum2 Structured version   Visualization version   GIF version

Theorem tmdgsum2 24028
Description: For any neighborhood π‘ˆ of 𝑛𝑋, there is a neighborhood 𝑒 of 𝑋 such that any sum of 𝑛 elements in 𝑒 sums to an element of π‘ˆ. (Contributed by Mario Carneiro, 19-Sep-2015.)
Hypotheses
Ref Expression
tmdgsum.j 𝐽 = (TopOpenβ€˜πΊ)
tmdgsum.b 𝐡 = (Baseβ€˜πΊ)
tmdgsum2.t Β· = (.gβ€˜πΊ)
tmdgsum2.1 (πœ‘ β†’ 𝐺 ∈ CMnd)
tmdgsum2.2 (πœ‘ β†’ 𝐺 ∈ TopMnd)
tmdgsum2.a (πœ‘ β†’ 𝐴 ∈ Fin)
tmdgsum2.u (πœ‘ β†’ π‘ˆ ∈ 𝐽)
tmdgsum2.x (πœ‘ β†’ 𝑋 ∈ 𝐡)
tmdgsum2.3 (πœ‘ β†’ ((β™―β€˜π΄) Β· 𝑋) ∈ π‘ˆ)
Assertion
Ref Expression
tmdgsum2 (πœ‘ β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
Distinct variable groups:   𝑒,𝑓,𝐴   𝑓,𝐽,𝑒   𝑓,𝑋,𝑒   𝐡,𝑓,𝑒   𝑓,𝐺,𝑒   π‘ˆ,𝑓,𝑒
Allowed substitution hints:   πœ‘(𝑒,𝑓)   Β· (𝑒,𝑓)

Proof of Theorem tmdgsum2
Dummy variables 𝑔 π‘˜ 𝑑 π‘₯ 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2728 . . . . . . 7 (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) = (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓))
21mptpreima 6247 . . . . . 6 (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) = {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}
3 tmdgsum2.1 . . . . . . . 8 (πœ‘ β†’ 𝐺 ∈ CMnd)
4 tmdgsum2.2 . . . . . . . 8 (πœ‘ β†’ 𝐺 ∈ TopMnd)
5 tmdgsum2.a . . . . . . . 8 (πœ‘ β†’ 𝐴 ∈ Fin)
6 tmdgsum.j . . . . . . . . 9 𝐽 = (TopOpenβ€˜πΊ)
7 tmdgsum.b . . . . . . . . 9 𝐡 = (Baseβ€˜πΊ)
86, 7tmdgsum 24027 . . . . . . . 8 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) β†’ (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))
93, 4, 5, 8syl3anc 1368 . . . . . . 7 (πœ‘ β†’ (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))
10 tmdgsum2.u . . . . . . 7 (πœ‘ β†’ π‘ˆ ∈ 𝐽)
11 cnima 23197 . . . . . . 7 (((𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽) ∧ π‘ˆ ∈ 𝐽) β†’ (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) ∈ (𝐽 ↑ko 𝒫 𝐴))
129, 10, 11syl2anc 582 . . . . . 6 (πœ‘ β†’ (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) ∈ (𝐽 ↑ko 𝒫 𝐴))
132, 12eqeltrrid 2834 . . . . 5 (πœ‘ β†’ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (𝐽 ↑ko 𝒫 𝐴))
146, 7tmdtopon 24013 . . . . . . . 8 (𝐺 ∈ TopMnd β†’ 𝐽 ∈ (TopOnβ€˜π΅))
15 topontop 22843 . . . . . . . 8 (𝐽 ∈ (TopOnβ€˜π΅) β†’ 𝐽 ∈ Top)
164, 14, 153syl 18 . . . . . . 7 (πœ‘ β†’ 𝐽 ∈ Top)
17 xkopt 23587 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝐴 ∈ Fin) β†’ (𝐽 ↑ko 𝒫 𝐴) = (∏tβ€˜(𝐴 Γ— {𝐽})))
1816, 5, 17syl2anc 582 . . . . . 6 (πœ‘ β†’ (𝐽 ↑ko 𝒫 𝐴) = (∏tβ€˜(𝐴 Γ— {𝐽})))
19 fnconstg 6790 . . . . . . . 8 (𝐽 ∈ (TopOnβ€˜π΅) β†’ (𝐴 Γ— {𝐽}) Fn 𝐴)
204, 14, 193syl 18 . . . . . . 7 (πœ‘ β†’ (𝐴 Γ— {𝐽}) Fn 𝐴)
21 eqid 2728 . . . . . . . 8 {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} = {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}
2221ptval 23502 . . . . . . 7 ((𝐴 ∈ Fin ∧ (𝐴 Γ— {𝐽}) Fn 𝐴) β†’ (∏tβ€˜(𝐴 Γ— {𝐽})) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
235, 20, 22syl2anc 582 . . . . . 6 (πœ‘ β†’ (∏tβ€˜(𝐴 Γ— {𝐽})) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
2418, 23eqtrd 2768 . . . . 5 (πœ‘ β†’ (𝐽 ↑ko 𝒫 𝐴) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
2513, 24eleqtrd 2831 . . . 4 (πœ‘ β†’ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
26 oveq2 7434 . . . . . 6 (𝑓 = (𝐴 Γ— {𝑋}) β†’ (𝐺 Ξ£g 𝑓) = (𝐺 Ξ£g (𝐴 Γ— {𝑋})))
2726eleq1d 2814 . . . . 5 (𝑓 = (𝐴 Γ— {𝑋}) β†’ ((𝐺 Ξ£g 𝑓) ∈ π‘ˆ ↔ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) ∈ π‘ˆ))
28 tmdgsum2.x . . . . . . 7 (πœ‘ β†’ 𝑋 ∈ 𝐡)
29 fconst6g 6791 . . . . . . 7 (𝑋 ∈ 𝐡 β†’ (𝐴 Γ— {𝑋}):𝐴⟢𝐡)
3028, 29syl 17 . . . . . 6 (πœ‘ β†’ (𝐴 Γ— {𝑋}):𝐴⟢𝐡)
317fvexi 6916 . . . . . . 7 𝐡 ∈ V
32 elmapg 8866 . . . . . . 7 ((𝐡 ∈ V ∧ 𝐴 ∈ Fin) β†’ ((𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴) ↔ (𝐴 Γ— {𝑋}):𝐴⟢𝐡))
3331, 5, 32sylancr 585 . . . . . 6 (πœ‘ β†’ ((𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴) ↔ (𝐴 Γ— {𝑋}):𝐴⟢𝐡))
3430, 33mpbird 256 . . . . 5 (πœ‘ β†’ (𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴))
35 fconstmpt 5744 . . . . . . . 8 (𝐴 Γ— {𝑋}) = (π‘˜ ∈ 𝐴 ↦ 𝑋)
3635oveq2i 7437 . . . . . . 7 (𝐺 Ξ£g (𝐴 Γ— {𝑋})) = (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋))
37 cmnmnd 19766 . . . . . . . . 9 (𝐺 ∈ CMnd β†’ 𝐺 ∈ Mnd)
383, 37syl 17 . . . . . . . 8 (πœ‘ β†’ 𝐺 ∈ Mnd)
39 tmdgsum2.t . . . . . . . . 9 Β· = (.gβ€˜πΊ)
407, 39gsumconst 19903 . . . . . . . 8 ((𝐺 ∈ Mnd ∧ 𝐴 ∈ Fin ∧ 𝑋 ∈ 𝐡) β†’ (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋)) = ((β™―β€˜π΄) Β· 𝑋))
4138, 5, 28, 40syl3anc 1368 . . . . . . 7 (πœ‘ β†’ (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋)) = ((β™―β€˜π΄) Β· 𝑋))
4236, 41eqtrid 2780 . . . . . 6 (πœ‘ β†’ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) = ((β™―β€˜π΄) Β· 𝑋))
43 tmdgsum2.3 . . . . . 6 (πœ‘ β†’ ((β™―β€˜π΄) Β· 𝑋) ∈ π‘ˆ)
4442, 43eqeltrd 2829 . . . . 5 (πœ‘ β†’ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) ∈ π‘ˆ)
4527, 34, 44elrabd 3686 . . . 4 (πœ‘ β†’ (𝐴 Γ— {𝑋}) ∈ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})
46 tg2 22896 . . . 4 (({𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}) ∧ (𝐴 Γ— {𝑋}) ∈ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘‘ ∈ {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} ((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
4725, 45, 46syl2anc 582 . . 3 (πœ‘ β†’ βˆƒπ‘‘ ∈ {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} ((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
48 eleq2 2818 . . . . 5 (𝑑 = π‘₯ β†’ ((𝐴 Γ— {𝑋}) ∈ 𝑑 ↔ (𝐴 Γ— {𝑋}) ∈ π‘₯))
49 sseq1 4007 . . . . 5 (𝑑 = π‘₯ β†’ (𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
5048, 49anbi12d 630 . . . 4 (𝑑 = π‘₯ β†’ (((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) ↔ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
5150rexab2 3696 . . 3 (βˆƒπ‘‘ ∈ {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} ((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) ↔ βˆƒπ‘₯(βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
5247, 51sylib 217 . 2 (πœ‘ β†’ βˆƒπ‘₯(βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
53 toponuni 22844 . . . . . . . . . . . . . 14 (𝐽 ∈ (TopOnβ€˜π΅) β†’ 𝐡 = βˆͺ 𝐽)
544, 14, 533syl 18 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝐡 = βˆͺ 𝐽)
5554ad2antrr 724 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐡 = βˆͺ 𝐽)
5655ineq1d 4213 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐡 ∩ ∩ ran 𝑔) = (βˆͺ 𝐽 ∩ ∩ ran 𝑔))
5716ad2antrr 724 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐽 ∈ Top)
58 simplrl 775 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔 Fn 𝐴)
59 simplrr 776 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))
60 fvconst2g 7220 . . . . . . . . . . . . . . . . . 18 ((𝐽 ∈ Top ∧ 𝑦 ∈ 𝐴) β†’ ((𝐴 Γ— {𝐽})β€˜π‘¦) = 𝐽)
6160eleq2d 2815 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ Top ∧ 𝑦 ∈ 𝐴) β†’ ((π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ↔ (π‘”β€˜π‘¦) ∈ 𝐽))
6261ralbidva 3173 . . . . . . . . . . . . . . . 16 (𝐽 ∈ Top β†’ (βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6357, 62syl 17 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6459, 63mpbid 231 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽)
65 ffnfv 7134 . . . . . . . . . . . . . 14 (𝑔:𝐴⟢𝐽 ↔ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6658, 64, 65sylanbrc 581 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔:𝐴⟢𝐽)
6766frnd 6735 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ran 𝑔 βŠ† 𝐽)
685ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐴 ∈ Fin)
69 dffn4 6822 . . . . . . . . . . . . . 14 (𝑔 Fn 𝐴 ↔ 𝑔:𝐴–ontoβ†’ran 𝑔)
7058, 69sylib 217 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔:𝐴–ontoβ†’ran 𝑔)
71 fofi 9372 . . . . . . . . . . . . 13 ((𝐴 ∈ Fin ∧ 𝑔:𝐴–ontoβ†’ran 𝑔) β†’ ran 𝑔 ∈ Fin)
7268, 70, 71syl2anc 582 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ran 𝑔 ∈ Fin)
73 eqid 2728 . . . . . . . . . . . . 13 βˆͺ 𝐽 = βˆͺ 𝐽
7473rintopn 22839 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ ran 𝑔 βŠ† 𝐽 ∧ ran 𝑔 ∈ Fin) β†’ (βˆͺ 𝐽 ∩ ∩ ran 𝑔) ∈ 𝐽)
7557, 67, 72, 74syl3anc 1368 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (βˆͺ 𝐽 ∩ ∩ ran 𝑔) ∈ 𝐽)
7656, 75eqeltrd 2829 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐡 ∩ ∩ ran 𝑔) ∈ 𝐽)
7728ad2antrr 724 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑋 ∈ 𝐡)
78 fconstmpt 5744 . . . . . . . . . . . . . 14 (𝐴 Γ— {𝑋}) = (𝑦 ∈ 𝐴 ↦ 𝑋)
79 simprl 769 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
8078, 79eqeltrrid 2834 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
81 mptelixpg 8962 . . . . . . . . . . . . . 14 (𝐴 ∈ Fin β†’ ((𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8268, 81syl 17 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ((𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8380, 82mpbid 231 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦))
84 eleq2 2818 . . . . . . . . . . . . . 14 (𝑧 = (π‘”β€˜π‘¦) β†’ (𝑋 ∈ 𝑧 ↔ 𝑋 ∈ (π‘”β€˜π‘¦)))
8584ralrn 7103 . . . . . . . . . . . . 13 (𝑔 Fn 𝐴 β†’ (βˆ€π‘§ ∈ ran 𝑔 𝑋 ∈ 𝑧 ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8658, 85syl 17 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (βˆ€π‘§ ∈ ran 𝑔 𝑋 ∈ 𝑧 ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8783, 86mpbird 256 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘§ ∈ ran 𝑔 𝑋 ∈ 𝑧)
88 elrint 4998 . . . . . . . . . . 11 (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ↔ (𝑋 ∈ 𝐡 ∧ βˆ€π‘§ ∈ ran 𝑔 𝑋 ∈ 𝑧))
8977, 87, 88sylanbrc 581 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔))
9031inex1 5321 . . . . . . . . . . . . 13 (𝐡 ∩ ∩ ran 𝑔) ∈ V
91 ixpconstg 8933 . . . . . . . . . . . . 13 ((𝐴 ∈ Fin ∧ (𝐡 ∩ ∩ ran 𝑔) ∈ V) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
9268, 90, 91sylancl 584 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
93 inss2 4232 . . . . . . . . . . . . . . 15 (𝐡 ∩ ∩ ran 𝑔) βŠ† ∩ ran 𝑔
94 fnfvelrn 7095 . . . . . . . . . . . . . . . 16 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ (π‘”β€˜π‘¦) ∈ ran 𝑔)
95 intss1 4970 . . . . . . . . . . . . . . . 16 ((π‘”β€˜π‘¦) ∈ ran 𝑔 β†’ ∩ ran 𝑔 βŠ† (π‘”β€˜π‘¦))
9694, 95syl 17 . . . . . . . . . . . . . . 15 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ ∩ ran 𝑔 βŠ† (π‘”β€˜π‘¦))
9793, 96sstrid 3993 . . . . . . . . . . . . . 14 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦))
9897ralrimiva 3143 . . . . . . . . . . . . 13 (𝑔 Fn 𝐴 β†’ βˆ€π‘¦ ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦))
99 ss2ixp 8937 . . . . . . . . . . . . 13 (βˆ€π‘¦ ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
10058, 98, 993syl 18 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
10192, 100eqsstrrd 4021 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
102 ssrab 4070 . . . . . . . . . . . . 13 (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† (𝐡 ↑m 𝐴) ∧ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
103102simprbi 495 . . . . . . . . . . . 12 (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} β†’ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
104103ad2antll 727 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
105 ssralv 4050 . . . . . . . . . . 11 (((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ β†’ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
106101, 104, 105sylc 65 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
107 eleq2 2818 . . . . . . . . . . . 12 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (𝑋 ∈ 𝑒 ↔ 𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔)))
108 oveq1 7433 . . . . . . . . . . . . 13 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (𝑒 ↑m 𝐴) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
109108raleqdv 3323 . . . . . . . . . . . 12 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ ↔ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
110107, 109anbi12d 630 . . . . . . . . . . 11 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ ((𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ) ↔ (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ∧ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
111110rspcev 3611 . . . . . . . . . 10 (((𝐡 ∩ ∩ ran 𝑔) ∈ 𝐽 ∧ (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ∧ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
11276, 89, 106, 111syl12anc 835 . . . . . . . . 9 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
113112ex 411 . . . . . . . 8 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
1141133adantr3 1168 . . . . . . 7 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
115 eleq2 2818 . . . . . . . . 9 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ↔ (𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)))
116 sseq1 4007 . . . . . . . . 9 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
117115, 116anbi12d 630 . . . . . . . 8 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) ↔ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
118117imbi1d 340 . . . . . . 7 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ ((((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)) ↔ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
119114, 118syl5ibrcom 246 . . . . . 6 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
120119expimpd 452 . . . . 5 (πœ‘ β†’ (((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
121120exlimdv 1928 . . . 4 (πœ‘ β†’ (βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
122121impd 409 . . 3 (πœ‘ β†’ ((βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
123122exlimdv 1928 . 2 (πœ‘ β†’ (βˆƒπ‘₯(βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
12452, 123mpd 15 1 (πœ‘ β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 394   ∧ w3a 1084   = wceq 1533  βˆƒwex 1773   ∈ wcel 2098  {cab 2705  βˆ€wral 3058  βˆƒwrex 3067  {crab 3430  Vcvv 3473   βˆ– cdif 3946   ∩ cin 3948   βŠ† wss 3949  π’« cpw 4606  {csn 4632  βˆͺ cuni 4912  βˆ© cint 4953   ↦ cmpt 5235   Γ— cxp 5680  β—‘ccnv 5681  ran crn 5683   β€œ cima 5685   Fn wfn 6548  βŸΆwf 6549  β€“ontoβ†’wfo 6551  β€˜cfv 6553  (class class class)co 7426   ↑m cmap 8853  Xcixp 8924  Fincfn 8972  β™―chash 14331  Basecbs 17189  TopOpenctopn 17412  topGenctg 17428  βˆtcpt 17429   Ξ£g cgsu 17431  Mndcmnd 18703  .gcmg 19037  CMndccmn 19749  Topctop 22823  TopOnctopon 22840   Cn ccn 23156   ↑ko cxko 23493  TopMndctmd 24002
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2699  ax-rep 5289  ax-sep 5303  ax-nul 5310  ax-pow 5369  ax-pr 5433  ax-un 7748  ax-cnex 11204  ax-resscn 11205  ax-1cn 11206  ax-icn 11207  ax-addcl 11208  ax-addrcl 11209  ax-mulcl 11210  ax-mulrcl 11211  ax-mulcom 11212  ax-addass 11213  ax-mulass 11214  ax-distr 11215  ax-i2m1 11216  ax-1ne0 11217  ax-1rid 11218  ax-rnegex 11219  ax-rrecex 11220  ax-cnre 11221  ax-pre-lttri 11222  ax-pre-lttrn 11223  ax-pre-ltadd 11224  ax-pre-mulgt0 11225
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2529  df-eu 2558  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2938  df-nel 3044  df-ral 3059  df-rex 3068  df-rmo 3374  df-reu 3375  df-rab 3431  df-v 3475  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-pss 3968  df-nul 4327  df-if 4533  df-pw 4608  df-sn 4633  df-pr 4635  df-op 4639  df-uni 4913  df-int 4954  df-iun 5002  df-iin 5003  df-br 5153  df-opab 5215  df-mpt 5236  df-tr 5270  df-id 5580  df-eprel 5586  df-po 5594  df-so 5595  df-fr 5637  df-se 5638  df-we 5639  df-xp 5688  df-rel 5689  df-cnv 5690  df-co 5691  df-dm 5692  df-rn 5693  df-res 5694  df-ima 5695  df-pred 6310  df-ord 6377  df-on 6378  df-lim 6379  df-suc 6380  df-iota 6505  df-fun 6555  df-fn 6556  df-f 6557  df-f1 6558  df-fo 6559  df-f1o 6560  df-fv 6561  df-isom 6562  df-riota 7382  df-ov 7429  df-oprab 7430  df-mpo 7431  df-of 7692  df-om 7879  df-1st 8001  df-2nd 8002  df-supp 8174  df-frecs 8295  df-wrecs 8326  df-recs 8400  df-rdg 8439  df-1o 8495  df-er 8733  df-map 8855  df-ixp 8925  df-en 8973  df-dom 8974  df-sdom 8975  df-fin 8976  df-fsupp 9396  df-fi 9444  df-oi 9543  df-card 9972  df-pnf 11290  df-mnf 11291  df-xr 11292  df-ltxr 11293  df-le 11294  df-sub 11486  df-neg 11487  df-nn 12253  df-2 12315  df-n0 12513  df-z 12599  df-uz 12863  df-fz 13527  df-fzo 13670  df-seq 14009  df-hash 14332  df-sets 17142  df-slot 17160  df-ndx 17172  df-base 17190  df-ress 17219  df-plusg 17255  df-rest 17413  df-0g 17432  df-gsum 17433  df-topgen 17434  df-pt 17435  df-mre 17575  df-mrc 17576  df-acs 17578  df-plusf 18608  df-mgm 18609  df-sgrp 18688  df-mnd 18704  df-submnd 18750  df-mulg 19038  df-cntz 19282  df-cmn 19751  df-top 22824  df-topon 22841  df-topsp 22863  df-bases 22877  df-cn 23159  df-cnp 23160  df-cmp 23319  df-tx 23494  df-xko 23495  df-tmd 24004
This theorem is referenced by:  tsmsxp  24087
  Copyright terms: Public domain W3C validator