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

Theorem tmdgsum2 23820
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 2730 . . . . . . 7 (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) = (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓))
21mptpreima 6236 . . . . . 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 23819 . . . . . . . 8 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) β†’ (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))
93, 4, 5, 8syl3anc 1369 . . . . . . 7 (πœ‘ β†’ (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))
10 tmdgsum2.u . . . . . . 7 (πœ‘ β†’ π‘ˆ ∈ 𝐽)
11 cnima 22989 . . . . . . 7 (((𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽) ∧ π‘ˆ ∈ 𝐽) β†’ (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) ∈ (𝐽 ↑ko 𝒫 𝐴))
129, 10, 11syl2anc 582 . . . . . 6 (πœ‘ β†’ (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) ∈ (𝐽 ↑ko 𝒫 𝐴))
132, 12eqeltrrid 2836 . . . . 5 (πœ‘ β†’ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (𝐽 ↑ko 𝒫 𝐴))
146, 7tmdtopon 23805 . . . . . . . 8 (𝐺 ∈ TopMnd β†’ 𝐽 ∈ (TopOnβ€˜π΅))
15 topontop 22635 . . . . . . . 8 (𝐽 ∈ (TopOnβ€˜π΅) β†’ 𝐽 ∈ Top)
164, 14, 153syl 18 . . . . . . 7 (πœ‘ β†’ 𝐽 ∈ Top)
17 xkopt 23379 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝐴 ∈ Fin) β†’ (𝐽 ↑ko 𝒫 𝐴) = (∏tβ€˜(𝐴 Γ— {𝐽})))
1816, 5, 17syl2anc 582 . . . . . 6 (πœ‘ β†’ (𝐽 ↑ko 𝒫 𝐴) = (∏tβ€˜(𝐴 Γ— {𝐽})))
19 fnconstg 6778 . . . . . . . 8 (𝐽 ∈ (TopOnβ€˜π΅) β†’ (𝐴 Γ— {𝐽}) Fn 𝐴)
204, 14, 193syl 18 . . . . . . 7 (πœ‘ β†’ (𝐴 Γ— {𝐽}) Fn 𝐴)
21 eqid 2730 . . . . . . . 8 {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} = {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}
2221ptval 23294 . . . . . . 7 ((𝐴 ∈ Fin ∧ (𝐴 Γ— {𝐽}) Fn 𝐴) β†’ (∏tβ€˜(𝐴 Γ— {𝐽})) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
235, 20, 22syl2anc 582 . . . . . 6 (πœ‘ β†’ (∏tβ€˜(𝐴 Γ— {𝐽})) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
2418, 23eqtrd 2770 . . . . 5 (πœ‘ β†’ (𝐽 ↑ko 𝒫 𝐴) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
2513, 24eleqtrd 2833 . . . 4 (πœ‘ β†’ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
26 oveq2 7419 . . . . . 6 (𝑓 = (𝐴 Γ— {𝑋}) β†’ (𝐺 Ξ£g 𝑓) = (𝐺 Ξ£g (𝐴 Γ— {𝑋})))
2726eleq1d 2816 . . . . 5 (𝑓 = (𝐴 Γ— {𝑋}) β†’ ((𝐺 Ξ£g 𝑓) ∈ π‘ˆ ↔ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) ∈ π‘ˆ))
28 tmdgsum2.x . . . . . . 7 (πœ‘ β†’ 𝑋 ∈ 𝐡)
29 fconst6g 6779 . . . . . . 7 (𝑋 ∈ 𝐡 β†’ (𝐴 Γ— {𝑋}):𝐴⟢𝐡)
3028, 29syl 17 . . . . . 6 (πœ‘ β†’ (𝐴 Γ— {𝑋}):𝐴⟢𝐡)
317fvexi 6904 . . . . . . 7 𝐡 ∈ V
32 elmapg 8835 . . . . . . 7 ((𝐡 ∈ V ∧ 𝐴 ∈ Fin) β†’ ((𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴) ↔ (𝐴 Γ— {𝑋}):𝐴⟢𝐡))
3331, 5, 32sylancr 585 . . . . . 6 (πœ‘ β†’ ((𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴) ↔ (𝐴 Γ— {𝑋}):𝐴⟢𝐡))
3430, 33mpbird 256 . . . . 5 (πœ‘ β†’ (𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴))
35 fconstmpt 5737 . . . . . . . 8 (𝐴 Γ— {𝑋}) = (π‘˜ ∈ 𝐴 ↦ 𝑋)
3635oveq2i 7422 . . . . . . 7 (𝐺 Ξ£g (𝐴 Γ— {𝑋})) = (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋))
37 cmnmnd 19706 . . . . . . . . 9 (𝐺 ∈ CMnd β†’ 𝐺 ∈ Mnd)
383, 37syl 17 . . . . . . . 8 (πœ‘ β†’ 𝐺 ∈ Mnd)
39 tmdgsum2.t . . . . . . . . 9 Β· = (.gβ€˜πΊ)
407, 39gsumconst 19843 . . . . . . . 8 ((𝐺 ∈ Mnd ∧ 𝐴 ∈ Fin ∧ 𝑋 ∈ 𝐡) β†’ (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋)) = ((β™―β€˜π΄) Β· 𝑋))
4138, 5, 28, 40syl3anc 1369 . . . . . . 7 (πœ‘ β†’ (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋)) = ((β™―β€˜π΄) Β· 𝑋))
4236, 41eqtrid 2782 . . . . . 6 (πœ‘ β†’ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) = ((β™―β€˜π΄) Β· 𝑋))
43 tmdgsum2.3 . . . . . 6 (πœ‘ β†’ ((β™―β€˜π΄) Β· 𝑋) ∈ π‘ˆ)
4442, 43eqeltrd 2831 . . . . 5 (πœ‘ β†’ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) ∈ π‘ˆ)
4527, 34, 44elrabd 3684 . . . 4 (πœ‘ β†’ (𝐴 Γ— {𝑋}) ∈ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})
46 tg2 22688 . . . 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 2820 . . . . 5 (𝑑 = π‘₯ β†’ ((𝐴 Γ— {𝑋}) ∈ 𝑑 ↔ (𝐴 Γ— {𝑋}) ∈ π‘₯))
49 sseq1 4006 . . . . 5 (𝑑 = π‘₯ β†’ (𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
5048, 49anbi12d 629 . . . 4 (𝑑 = π‘₯ β†’ (((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) ↔ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
5150rexab2 3694 . . 3 (βˆƒπ‘‘ ∈ {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} ((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) ↔ βˆƒπ‘₯(βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
5247, 51sylib 217 . 2 (πœ‘ β†’ βˆƒπ‘₯(βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
53 toponuni 22636 . . . . . . . . . . . . . 14 (𝐽 ∈ (TopOnβ€˜π΅) β†’ 𝐡 = βˆͺ 𝐽)
544, 14, 533syl 18 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝐡 = βˆͺ 𝐽)
5554ad2antrr 722 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐡 = βˆͺ 𝐽)
5655ineq1d 4210 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐡 ∩ ∩ ran 𝑔) = (βˆͺ 𝐽 ∩ ∩ ran 𝑔))
5716ad2antrr 722 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐽 ∈ Top)
58 simplrl 773 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔 Fn 𝐴)
59 simplrr 774 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))
60 fvconst2g 7204 . . . . . . . . . . . . . . . . . 18 ((𝐽 ∈ Top ∧ 𝑦 ∈ 𝐴) β†’ ((𝐴 Γ— {𝐽})β€˜π‘¦) = 𝐽)
6160eleq2d 2817 . . . . . . . . . . . . . . . . 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 7119 . . . . . . . . . . . . . 14 (𝑔:𝐴⟢𝐽 ↔ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6658, 64, 65sylanbrc 581 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔:𝐴⟢𝐽)
6766frnd 6724 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ran 𝑔 βŠ† 𝐽)
685ad2antrr 722 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐴 ∈ Fin)
69 dffn4 6810 . . . . . . . . . . . . . 14 (𝑔 Fn 𝐴 ↔ 𝑔:𝐴–ontoβ†’ran 𝑔)
7058, 69sylib 217 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔:𝐴–ontoβ†’ran 𝑔)
71 fofi 9340 . . . . . . . . . . . . 13 ((𝐴 ∈ Fin ∧ 𝑔:𝐴–ontoβ†’ran 𝑔) β†’ ran 𝑔 ∈ Fin)
7268, 70, 71syl2anc 582 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ran 𝑔 ∈ Fin)
73 eqid 2730 . . . . . . . . . . . . 13 βˆͺ 𝐽 = βˆͺ 𝐽
7473rintopn 22631 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ ran 𝑔 βŠ† 𝐽 ∧ ran 𝑔 ∈ Fin) β†’ (βˆͺ 𝐽 ∩ ∩ ran 𝑔) ∈ 𝐽)
7557, 67, 72, 74syl3anc 1369 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (βˆͺ 𝐽 ∩ ∩ ran 𝑔) ∈ 𝐽)
7656, 75eqeltrd 2831 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐡 ∩ ∩ ran 𝑔) ∈ 𝐽)
7728ad2antrr 722 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑋 ∈ 𝐡)
78 fconstmpt 5737 . . . . . . . . . . . . . 14 (𝐴 Γ— {𝑋}) = (𝑦 ∈ 𝐴 ↦ 𝑋)
79 simprl 767 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
8078, 79eqeltrrid 2836 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
81 mptelixpg 8931 . . . . . . . . . . . . . 14 (𝐴 ∈ Fin β†’ ((𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8268, 81syl 17 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ((𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8380, 82mpbid 231 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦))
84 eleq2 2820 . . . . . . . . . . . . . 14 (𝑧 = (π‘”β€˜π‘¦) β†’ (𝑋 ∈ 𝑧 ↔ 𝑋 ∈ (π‘”β€˜π‘¦)))
8584ralrn 7088 . . . . . . . . . . . . 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 4994 . . . . . . . . . . 11 (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ↔ (𝑋 ∈ 𝐡 ∧ βˆ€π‘§ ∈ ran 𝑔 𝑋 ∈ 𝑧))
8977, 87, 88sylanbrc 581 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔))
9031inex1 5316 . . . . . . . . . . . . 13 (𝐡 ∩ ∩ ran 𝑔) ∈ V
91 ixpconstg 8902 . . . . . . . . . . . . 13 ((𝐴 ∈ Fin ∧ (𝐡 ∩ ∩ ran 𝑔) ∈ V) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
9268, 90, 91sylancl 584 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
93 inss2 4228 . . . . . . . . . . . . . . 15 (𝐡 ∩ ∩ ran 𝑔) βŠ† ∩ ran 𝑔
94 fnfvelrn 7081 . . . . . . . . . . . . . . . 16 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ (π‘”β€˜π‘¦) ∈ ran 𝑔)
95 intss1 4966 . . . . . . . . . . . . . . . 16 ((π‘”β€˜π‘¦) ∈ ran 𝑔 β†’ ∩ ran 𝑔 βŠ† (π‘”β€˜π‘¦))
9694, 95syl 17 . . . . . . . . . . . . . . 15 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ ∩ ran 𝑔 βŠ† (π‘”β€˜π‘¦))
9793, 96sstrid 3992 . . . . . . . . . . . . . 14 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦))
9897ralrimiva 3144 . . . . . . . . . . . . 13 (𝑔 Fn 𝐴 β†’ βˆ€π‘¦ ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦))
99 ss2ixp 8906 . . . . . . . . . . . . 13 (βˆ€π‘¦ ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
10058, 98, 993syl 18 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
10192, 100eqsstrrd 4020 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
102 ssrab 4069 . . . . . . . . . . . . 13 (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† (𝐡 ↑m 𝐴) ∧ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
103102simprbi 495 . . . . . . . . . . . 12 (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} β†’ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
104103ad2antll 725 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
105 ssralv 4049 . . . . . . . . . . 11 (((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴) βŠ† X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ β†’ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
106101, 104, 105sylc 65 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
107 eleq2 2820 . . . . . . . . . . . 12 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (𝑋 ∈ 𝑒 ↔ 𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔)))
108 oveq1 7418 . . . . . . . . . . . . 13 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (𝑒 ↑m 𝐴) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
109108raleqdv 3323 . . . . . . . . . . . 12 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ ↔ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
110107, 109anbi12d 629 . . . . . . . . . . 11 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ ((𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ) ↔ (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ∧ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
111110rspcev 3611 . . . . . . . . . 10 (((𝐡 ∩ ∩ ran 𝑔) ∈ 𝐽 ∧ (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ∧ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
11276, 89, 106, 111syl12anc 833 . . . . . . . . 9 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
113112ex 411 . . . . . . . 8 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
1141133adantr3 1169 . . . . . . 7 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
115 eleq2 2820 . . . . . . . . 9 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ↔ (𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)))
116 sseq1 4006 . . . . . . . . 9 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
117115, 116anbi12d 629 . . . . . . . 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 1934 . . . 4 (πœ‘ β†’ (βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
122121impd 409 . . 3 (πœ‘ β†’ ((βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
123122exlimdv 1934 . 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 1085   = wceq 1539  βˆƒwex 1779   ∈ wcel 2104  {cab 2707  βˆ€wral 3059  βˆƒwrex 3068  {crab 3430  Vcvv 3472   βˆ– cdif 3944   ∩ cin 3946   βŠ† wss 3947  π’« cpw 4601  {csn 4627  βˆͺ cuni 4907  βˆ© cint 4949   ↦ cmpt 5230   Γ— cxp 5673  β—‘ccnv 5674  ran crn 5676   β€œ cima 5678   Fn wfn 6537  βŸΆwf 6538  β€“ontoβ†’wfo 6540  β€˜cfv 6542  (class class class)co 7411   ↑m cmap 8822  Xcixp 8893  Fincfn 8941  β™―chash 14294  Basecbs 17148  TopOpenctopn 17371  topGenctg 17387  βˆtcpt 17388   Ξ£g cgsu 17390  Mndcmnd 18659  .gcmg 18986  CMndccmn 19689  Topctop 22615  TopOnctopon 22632   Cn ccn 22948   ↑ko cxko 23285  TopMndctmd 23794
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2701  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7727  ax-cnex 11168  ax-resscn 11169  ax-1cn 11170  ax-icn 11171  ax-addcl 11172  ax-addrcl 11173  ax-mulcl 11174  ax-mulrcl 11175  ax-mulcom 11176  ax-addass 11177  ax-mulass 11178  ax-distr 11179  ax-i2m1 11180  ax-1ne0 11181  ax-1rid 11182  ax-rnegex 11183  ax-rrecex 11184  ax-cnre 11185  ax-pre-lttri 11186  ax-pre-lttrn 11187  ax-pre-ltadd 11188  ax-pre-mulgt0 11189
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2532  df-eu 2561  df-clab 2708  df-cleq 2722  df-clel 2808  df-nfc 2883  df-ne 2939  df-nel 3045  df-ral 3060  df-rex 3069  df-rmo 3374  df-reu 3375  df-rab 3431  df-v 3474  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6299  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-isom 6551  df-riota 7367  df-ov 7414  df-oprab 7415  df-mpo 7416  df-of 7672  df-om 7858  df-1st 7977  df-2nd 7978  df-supp 8149  df-frecs 8268  df-wrecs 8299  df-recs 8373  df-rdg 8412  df-1o 8468  df-er 8705  df-map 8824  df-ixp 8894  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-fsupp 9364  df-fi 9408  df-oi 9507  df-card 9936  df-pnf 11254  df-mnf 11255  df-xr 11256  df-ltxr 11257  df-le 11258  df-sub 11450  df-neg 11451  df-nn 12217  df-2 12279  df-n0 12477  df-z 12563  df-uz 12827  df-fz 13489  df-fzo 13632  df-seq 13971  df-hash 14295  df-sets 17101  df-slot 17119  df-ndx 17131  df-base 17149  df-ress 17178  df-plusg 17214  df-rest 17372  df-0g 17391  df-gsum 17392  df-topgen 17393  df-pt 17394  df-mre 17534  df-mrc 17535  df-acs 17537  df-plusf 18564  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-submnd 18706  df-mulg 18987  df-cntz 19222  df-cmn 19691  df-top 22616  df-topon 22633  df-topsp 22655  df-bases 22669  df-cn 22951  df-cnp 22952  df-cmp 23111  df-tx 23286  df-xko 23287  df-tmd 23796
This theorem is referenced by:  tsmsxp  23879
  Copyright terms: Public domain W3C validator