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

Theorem tmdgsum2 23591
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 2732 . . . . . . 7 (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) = (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓))
21mptpreima 6234 . . . . . 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 23590 . . . . . . . 8 ((𝐺 ∈ CMnd ∧ 𝐺 ∈ TopMnd ∧ 𝐴 ∈ Fin) β†’ (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))
93, 4, 5, 8syl3anc 1371 . . . . . . 7 (πœ‘ β†’ (𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽))
10 tmdgsum2.u . . . . . . 7 (πœ‘ β†’ π‘ˆ ∈ 𝐽)
11 cnima 22760 . . . . . . 7 (((𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) ∈ ((𝐽 ↑ko 𝒫 𝐴) Cn 𝐽) ∧ π‘ˆ ∈ 𝐽) β†’ (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) ∈ (𝐽 ↑ko 𝒫 𝐴))
129, 10, 11syl2anc 584 . . . . . 6 (πœ‘ β†’ (β—‘(𝑓 ∈ (𝐡 ↑m 𝐴) ↦ (𝐺 Ξ£g 𝑓)) β€œ π‘ˆ) ∈ (𝐽 ↑ko 𝒫 𝐴))
132, 12eqeltrrid 2838 . . . . 5 (πœ‘ β†’ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (𝐽 ↑ko 𝒫 𝐴))
146, 7tmdtopon 23576 . . . . . . . 8 (𝐺 ∈ TopMnd β†’ 𝐽 ∈ (TopOnβ€˜π΅))
15 topontop 22406 . . . . . . . 8 (𝐽 ∈ (TopOnβ€˜π΅) β†’ 𝐽 ∈ Top)
164, 14, 153syl 18 . . . . . . 7 (πœ‘ β†’ 𝐽 ∈ Top)
17 xkopt 23150 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝐴 ∈ Fin) β†’ (𝐽 ↑ko 𝒫 𝐴) = (∏tβ€˜(𝐴 Γ— {𝐽})))
1816, 5, 17syl2anc 584 . . . . . 6 (πœ‘ β†’ (𝐽 ↑ko 𝒫 𝐴) = (∏tβ€˜(𝐴 Γ— {𝐽})))
19 fnconstg 6776 . . . . . . . 8 (𝐽 ∈ (TopOnβ€˜π΅) β†’ (𝐴 Γ— {𝐽}) Fn 𝐴)
204, 14, 193syl 18 . . . . . . 7 (πœ‘ β†’ (𝐴 Γ— {𝐽}) Fn 𝐴)
21 eqid 2732 . . . . . . . 8 {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} = {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}
2221ptval 23065 . . . . . . 7 ((𝐴 ∈ Fin ∧ (𝐴 Γ— {𝐽}) Fn 𝐴) β†’ (∏tβ€˜(𝐴 Γ— {𝐽})) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
235, 20, 22syl2anc 584 . . . . . 6 (πœ‘ β†’ (∏tβ€˜(𝐴 Γ— {𝐽})) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
2418, 23eqtrd 2772 . . . . 5 (πœ‘ β†’ (𝐽 ↑ko 𝒫 𝐴) = (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
2513, 24eleqtrd 2835 . . . 4 (πœ‘ β†’ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}))
26 oveq2 7413 . . . . . 6 (𝑓 = (𝐴 Γ— {𝑋}) β†’ (𝐺 Ξ£g 𝑓) = (𝐺 Ξ£g (𝐴 Γ— {𝑋})))
2726eleq1d 2818 . . . . 5 (𝑓 = (𝐴 Γ— {𝑋}) β†’ ((𝐺 Ξ£g 𝑓) ∈ π‘ˆ ↔ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) ∈ π‘ˆ))
28 tmdgsum2.x . . . . . . 7 (πœ‘ β†’ 𝑋 ∈ 𝐡)
29 fconst6g 6777 . . . . . . 7 (𝑋 ∈ 𝐡 β†’ (𝐴 Γ— {𝑋}):𝐴⟢𝐡)
3028, 29syl 17 . . . . . 6 (πœ‘ β†’ (𝐴 Γ— {𝑋}):𝐴⟢𝐡)
317fvexi 6902 . . . . . . 7 𝐡 ∈ V
32 elmapg 8829 . . . . . . 7 ((𝐡 ∈ V ∧ 𝐴 ∈ Fin) β†’ ((𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴) ↔ (𝐴 Γ— {𝑋}):𝐴⟢𝐡))
3331, 5, 32sylancr 587 . . . . . 6 (πœ‘ β†’ ((𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴) ↔ (𝐴 Γ— {𝑋}):𝐴⟢𝐡))
3430, 33mpbird 256 . . . . 5 (πœ‘ β†’ (𝐴 Γ— {𝑋}) ∈ (𝐡 ↑m 𝐴))
35 fconstmpt 5736 . . . . . . . 8 (𝐴 Γ— {𝑋}) = (π‘˜ ∈ 𝐴 ↦ 𝑋)
3635oveq2i 7416 . . . . . . 7 (𝐺 Ξ£g (𝐴 Γ— {𝑋})) = (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋))
37 cmnmnd 19659 . . . . . . . . 9 (𝐺 ∈ CMnd β†’ 𝐺 ∈ Mnd)
383, 37syl 17 . . . . . . . 8 (πœ‘ β†’ 𝐺 ∈ Mnd)
39 tmdgsum2.t . . . . . . . . 9 Β· = (.gβ€˜πΊ)
407, 39gsumconst 19796 . . . . . . . 8 ((𝐺 ∈ Mnd ∧ 𝐴 ∈ Fin ∧ 𝑋 ∈ 𝐡) β†’ (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋)) = ((β™―β€˜π΄) Β· 𝑋))
4138, 5, 28, 40syl3anc 1371 . . . . . . 7 (πœ‘ β†’ (𝐺 Ξ£g (π‘˜ ∈ 𝐴 ↦ 𝑋)) = ((β™―β€˜π΄) Β· 𝑋))
4236, 41eqtrid 2784 . . . . . 6 (πœ‘ β†’ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) = ((β™―β€˜π΄) Β· 𝑋))
43 tmdgsum2.3 . . . . . 6 (πœ‘ β†’ ((β™―β€˜π΄) Β· 𝑋) ∈ π‘ˆ)
4442, 43eqeltrd 2833 . . . . 5 (πœ‘ β†’ (𝐺 Ξ£g (𝐴 Γ— {𝑋})) ∈ π‘ˆ)
4527, 34, 44elrabd 3684 . . . 4 (πœ‘ β†’ (𝐴 Γ— {𝑋}) ∈ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})
46 tg2 22459 . . . 4 (({𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ∈ (topGenβ€˜{π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))}) ∧ (𝐴 Γ— {𝑋}) ∈ {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘‘ ∈ {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} ((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
4725, 45, 46syl2anc 584 . . 3 (πœ‘ β†’ βˆƒπ‘‘ ∈ {π‘₯ ∣ βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))} ((𝐴 Γ— {𝑋}) ∈ 𝑑 ∧ 𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
48 eleq2 2822 . . . . 5 (𝑑 = π‘₯ β†’ ((𝐴 Γ— {𝑋}) ∈ 𝑑 ↔ (𝐴 Γ— {𝑋}) ∈ π‘₯))
49 sseq1 4006 . . . . 5 (𝑑 = π‘₯ β†’ (𝑑 βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
5048, 49anbi12d 631 . . . 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 22407 . . . . . . . . . . . . . 14 (𝐽 ∈ (TopOnβ€˜π΅) β†’ 𝐡 = βˆͺ 𝐽)
544, 14, 533syl 18 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝐡 = βˆͺ 𝐽)
5554ad2antrr 724 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐡 = βˆͺ 𝐽)
5655ineq1d 4210 . . . . . . . . . . 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 7199 . . . . . . . . . . . . . . . . . 18 ((𝐽 ∈ Top ∧ 𝑦 ∈ 𝐴) β†’ ((𝐴 Γ— {𝐽})β€˜π‘¦) = 𝐽)
6160eleq2d 2819 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ Top ∧ 𝑦 ∈ 𝐴) β†’ ((π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ↔ (π‘”β€˜π‘¦) ∈ 𝐽))
6261ralbidva 3175 . . . . . . . . . . . . . . . 16 (𝐽 ∈ Top β†’ (βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6357, 62syl 17 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6459, 63mpbid 231 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽)
65 ffnfv 7114 . . . . . . . . . . . . . 14 (𝑔:𝐴⟢𝐽 ↔ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ 𝐽))
6658, 64, 65sylanbrc 583 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔:𝐴⟢𝐽)
6766frnd 6722 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ran 𝑔 βŠ† 𝐽)
685ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝐴 ∈ Fin)
69 dffn4 6808 . . . . . . . . . . . . . 14 (𝑔 Fn 𝐴 ↔ 𝑔:𝐴–ontoβ†’ran 𝑔)
7058, 69sylib 217 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑔:𝐴–ontoβ†’ran 𝑔)
71 fofi 9334 . . . . . . . . . . . . 13 ((𝐴 ∈ Fin ∧ 𝑔:𝐴–ontoβ†’ran 𝑔) β†’ ran 𝑔 ∈ Fin)
7268, 70, 71syl2anc 584 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ran 𝑔 ∈ Fin)
73 eqid 2732 . . . . . . . . . . . . 13 βˆͺ 𝐽 = βˆͺ 𝐽
7473rintopn 22402 . . . . . . . . . . . 12 ((𝐽 ∈ Top ∧ ran 𝑔 βŠ† 𝐽 ∧ ran 𝑔 ∈ Fin) β†’ (βˆͺ 𝐽 ∩ ∩ ran 𝑔) ∈ 𝐽)
7557, 67, 72, 74syl3anc 1371 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (βˆͺ 𝐽 ∩ ∩ ran 𝑔) ∈ 𝐽)
7656, 75eqeltrd 2833 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐡 ∩ ∩ ran 𝑔) ∈ 𝐽)
7728ad2antrr 724 . . . . . . . . . . 11 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑋 ∈ 𝐡)
78 fconstmpt 5736 . . . . . . . . . . . . . 14 (𝐴 Γ— {𝑋}) = (𝑦 ∈ 𝐴 ↦ 𝑋)
79 simprl 769 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
8078, 79eqeltrrid 2838 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ (𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦))
81 mptelixpg 8925 . . . . . . . . . . . . . 14 (𝐴 ∈ Fin β†’ ((𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8268, 81syl 17 . . . . . . . . . . . . 13 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ ((𝑦 ∈ 𝐴 ↦ 𝑋) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ↔ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦)))
8380, 82mpbid 231 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆ€π‘¦ ∈ 𝐴 𝑋 ∈ (π‘”β€˜π‘¦))
84 eleq2 2822 . . . . . . . . . . . . . 14 (𝑧 = (π‘”β€˜π‘¦) β†’ (𝑋 ∈ 𝑧 ↔ 𝑋 ∈ (π‘”β€˜π‘¦)))
8584ralrn 7086 . . . . . . . . . . . . 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 583 . . . . . . . . . 10 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ 𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔))
9031inex1 5316 . . . . . . . . . . . . 13 (𝐡 ∩ ∩ ran 𝑔) ∈ V
91 ixpconstg 8896 . . . . . . . . . . . . 13 ((𝐴 ∈ Fin ∧ (𝐡 ∩ ∩ ran 𝑔) ∈ V) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
9268, 90, 91sylancl 586 . . . . . . . . . . . 12 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ X𝑦 ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
93 inss2 4228 . . . . . . . . . . . . . . 15 (𝐡 ∩ ∩ ran 𝑔) βŠ† ∩ ran 𝑔
94 fnfvelrn 7079 . . . . . . . . . . . . . . . 16 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ (π‘”β€˜π‘¦) ∈ ran 𝑔)
95 intss1 4966 . . . . . . . . . . . . . . . 16 ((π‘”β€˜π‘¦) ∈ ran 𝑔 β†’ ∩ ran 𝑔 βŠ† (π‘”β€˜π‘¦))
9694, 95syl 17 . . . . . . . . . . . . . . 15 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ ∩ ran 𝑔 βŠ† (π‘”β€˜π‘¦))
9793, 96sstrid 3992 . . . . . . . . . . . . . 14 ((𝑔 Fn 𝐴 ∧ 𝑦 ∈ 𝐴) β†’ (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦))
9897ralrimiva 3146 . . . . . . . . . . . . 13 (𝑔 Fn 𝐴 β†’ βˆ€π‘¦ ∈ 𝐴 (𝐡 ∩ ∩ ran 𝑔) βŠ† (π‘”β€˜π‘¦))
99 ss2ixp 8900 . . . . . . . . . . . . 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 497 . . . . . . . . . . . 12 (X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} β†’ βˆ€π‘“ ∈ X 𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)
104103ad2antll 727 . . . . . . . . . . 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 2822 . . . . . . . . . . . 12 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (𝑋 ∈ 𝑒 ↔ 𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔)))
108 oveq1 7412 . . . . . . . . . . . . 13 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (𝑒 ↑m 𝐴) = ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴))
109108raleqdv 3325 . . . . . . . . . . . 12 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ (βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ ↔ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
110107, 109anbi12d 631 . . . . . . . . . . 11 (𝑒 = (𝐡 ∩ ∩ ran 𝑔) β†’ ((𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ) ↔ (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ∧ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
111110rspcev 3612 . . . . . . . . . 10 (((𝐡 ∩ ∩ ran 𝑔) ∈ 𝐽 ∧ (𝑋 ∈ (𝐡 ∩ ∩ ran 𝑔) ∧ βˆ€π‘“ ∈ ((𝐡 ∩ ∩ ran 𝑔) ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
11276, 89, 106, 111syl12anc 835 . . . . . . . . 9 (((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) ∧ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))
113112ex 413 . . . . . . . 8 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
1141133adantr3 1171 . . . . . . 7 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
115 eleq2 2822 . . . . . . . . 9 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ↔ (𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)))
116 sseq1 4006 . . . . . . . . 9 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ} ↔ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}))
117115, 116anbi12d 631 . . . . . . . 8 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) ↔ ((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})))
118117imbi1d 341 . . . . . . 7 (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ ((((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)) ↔ (((𝐴 Γ— {𝑋}) ∈ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) ∧ X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
119114, 118syl5ibrcom 246 . . . . . 6 ((πœ‘ ∧ (𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦))) β†’ (π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
120119expimpd 454 . . . . 5 (πœ‘ β†’ (((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
121120exlimdv 1936 . . . 4 (πœ‘ β†’ (βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) β†’ (((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ}) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ))))
122121impd 411 . . 3 (πœ‘ β†’ ((βˆƒπ‘”((𝑔 Fn 𝐴 ∧ βˆ€π‘¦ ∈ 𝐴 (π‘”β€˜π‘¦) ∈ ((𝐴 Γ— {𝐽})β€˜π‘¦) ∧ βˆƒπ‘§ ∈ Fin βˆ€π‘¦ ∈ (𝐴 βˆ– 𝑧)(π‘”β€˜π‘¦) = βˆͺ ((𝐴 Γ— {𝐽})β€˜π‘¦)) ∧ π‘₯ = X𝑦 ∈ 𝐴 (π‘”β€˜π‘¦)) ∧ ((𝐴 Γ— {𝑋}) ∈ π‘₯ ∧ π‘₯ βŠ† {𝑓 ∈ (𝐡 ↑m 𝐴) ∣ (𝐺 Ξ£g 𝑓) ∈ π‘ˆ})) β†’ βˆƒπ‘’ ∈ 𝐽 (𝑋 ∈ 𝑒 ∧ βˆ€π‘“ ∈ (𝑒 ↑m 𝐴)(𝐺 Ξ£g 𝑓) ∈ π‘ˆ)))
123122exlimdv 1936 . 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 396   ∧ w3a 1087   = wceq 1541  βˆƒwex 1781   ∈ wcel 2106  {cab 2709  βˆ€wral 3061  βˆƒwrex 3070  {crab 3432  Vcvv 3474   βˆ– 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 6535  βŸΆwf 6536  β€“ontoβ†’wfo 6538  β€˜cfv 6540  (class class class)co 7405   ↑m cmap 8816  Xcixp 8887  Fincfn 8935  β™―chash 14286  Basecbs 17140  TopOpenctopn 17363  topGenctg 17379  βˆtcpt 17380   Ξ£g cgsu 17382  Mndcmnd 18621  .gcmg 18944  CMndccmn 19642  Topctop 22386  TopOnctopon 22403   Cn ccn 22719   ↑ko cxko 23056  TopMndctmd 23565
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  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 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7666  df-om 7852  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-er 8699  df-map 8818  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-oi 9501  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-nn 12209  df-2 12271  df-n0 12469  df-z 12555  df-uz 12819  df-fz 13481  df-fzo 13624  df-seq 13963  df-hash 14287  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-rest 17364  df-0g 17383  df-gsum 17384  df-topgen 17385  df-pt 17386  df-mre 17526  df-mrc 17527  df-acs 17529  df-plusf 18556  df-mgm 18557  df-sgrp 18606  df-mnd 18622  df-submnd 18668  df-mulg 18945  df-cntz 19175  df-cmn 19644  df-top 22387  df-topon 22404  df-topsp 22426  df-bases 22440  df-cn 22722  df-cnp 22723  df-cmp 22882  df-tx 23057  df-xko 23058  df-tmd 23567
This theorem is referenced by:  tsmsxp  23650
  Copyright terms: Public domain W3C validator