Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ovnovollem1 Structured version   Visualization version   GIF version

Theorem ovnovollem1 41442
Description: if 𝐹 is a cover of 𝐵 in , then 𝐼 is the corresponding cover in the space of 1-dimensional reals. (Contributed by Glauco Siliprandi, 3-Mar-2021.)
Hypotheses
Ref Expression
ovnovollem1.a (𝜑𝐴𝑉)
ovnovollem1.f (𝜑𝐹 ∈ ((ℝ × ℝ) ↑𝑚 ℕ))
ovnovollem1.i 𝐼 = (𝑗 ∈ ℕ ↦ {⟨𝐴, (𝐹𝑗)⟩})
ovnovollem1.s (𝜑𝐵 ran ([,) ∘ 𝐹))
ovnovollem1.b (𝜑𝐵𝑊)
ovnovollem1.z (𝜑𝑍 = (Σ^‘((vol ∘ [,)) ∘ 𝐹)))
Assertion
Ref Expression
ovnovollem1 (𝜑 → ∃𝑖 ∈ (((ℝ × ℝ) ↑𝑚 {𝐴}) ↑𝑚 ℕ)((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
Distinct variable groups:   𝐴,𝑖,𝑗,𝑘   𝐵,𝑖   𝑗,𝐹,𝑘   𝑖,𝐼,𝑗,𝑘   𝑘,𝑉   𝑖,𝑍   𝜑,𝑗,𝑘
Allowed substitution hints:   𝜑(𝑖)   𝐵(𝑗,𝑘)   𝐹(𝑖)   𝑉(𝑖,𝑗)   𝑊(𝑖,𝑗,𝑘)   𝑍(𝑗,𝑘)

Proof of Theorem ovnovollem1
StepHypRef Expression
1 eqidd 2766 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩})
2 ovnovollem1.a . . . . . . . . 9 (𝜑𝐴𝑉)
32adantr 472 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝐴𝑉)
4 ovnovollem1.f . . . . . . . . . 10 (𝜑𝐹 ∈ ((ℝ × ℝ) ↑𝑚 ℕ))
5 elmapi 8082 . . . . . . . . . 10 (𝐹 ∈ ((ℝ × ℝ) ↑𝑚 ℕ) → 𝐹:ℕ⟶(ℝ × ℝ))
64, 5syl 17 . . . . . . . . 9 (𝜑𝐹:ℕ⟶(ℝ × ℝ))
76ffvelrnda 6549 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) ∈ (ℝ × ℝ))
8 fsng 6595 . . . . . . . 8 ((𝐴𝑉 ∧ (𝐹𝑗) ∈ (ℝ × ℝ)) → ({⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)} ↔ {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩}))
93, 7, 8syl2anc 579 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)} ↔ {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩}))
101, 9mpbird 248 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)})
117snssd 4494 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {(𝐹𝑗)} ⊆ (ℝ × ℝ))
1210, 11fssd 6237 . . . . 5 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶(ℝ × ℝ))
13 reex 10280 . . . . . . . 8 ℝ ∈ V
1413, 13xpex 7160 . . . . . . 7 (ℝ × ℝ) ∈ V
1514a1i 11 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (ℝ × ℝ) ∈ V)
16 snex 5064 . . . . . . 7 {𝐴} ∈ V
1716a1i 11 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {𝐴} ∈ V)
1815, 17elmapd 8074 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩} ∈ ((ℝ × ℝ) ↑𝑚 {𝐴}) ↔ {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶(ℝ × ℝ)))
1912, 18mpbird 248 . . . 4 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩} ∈ ((ℝ × ℝ) ↑𝑚 {𝐴}))
20 ovnovollem1.i . . . 4 𝐼 = (𝑗 ∈ ℕ ↦ {⟨𝐴, (𝐹𝑗)⟩})
2119, 20fmptd 6574 . . 3 (𝜑𝐼:ℕ⟶((ℝ × ℝ) ↑𝑚 {𝐴}))
22 ovexd 6876 . . . 4 (𝜑 → ((ℝ × ℝ) ↑𝑚 {𝐴}) ∈ V)
23 nnex 11281 . . . . 5 ℕ ∈ V
2423a1i 11 . . . 4 (𝜑 → ℕ ∈ V)
2522, 24elmapd 8074 . . 3 (𝜑 → (𝐼 ∈ (((ℝ × ℝ) ↑𝑚 {𝐴}) ↑𝑚 ℕ) ↔ 𝐼:ℕ⟶((ℝ × ℝ) ↑𝑚 {𝐴})))
2621, 25mpbird 248 . 2 (𝜑𝐼 ∈ (((ℝ × ℝ) ↑𝑚 {𝐴}) ↑𝑚 ℕ))
27 ovnovollem1.s . . . . . 6 (𝜑𝐵 ran ([,) ∘ 𝐹))
28 icof 39988 . . . . . . . . . . 11 [,):(ℝ* × ℝ*)⟶𝒫 ℝ*
2928a1i 11 . . . . . . . . . 10 (𝜑 → [,):(ℝ* × ℝ*)⟶𝒫 ℝ*)
30 rexpssxrxp 10338 . . . . . . . . . . 11 (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
3130a1i 11 . . . . . . . . . 10 (𝜑 → (ℝ × ℝ) ⊆ (ℝ* × ℝ*))
3229, 31, 6fcoss 39979 . . . . . . . . 9 (𝜑 → ([,) ∘ 𝐹):ℕ⟶𝒫 ℝ*)
3332ffnd 6224 . . . . . . . 8 (𝜑 → ([,) ∘ 𝐹) Fn ℕ)
34 fniunfv 6697 . . . . . . . 8 (([,) ∘ 𝐹) Fn ℕ → 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = ran ([,) ∘ 𝐹))
3533, 34syl 17 . . . . . . 7 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = ran ([,) ∘ 𝐹))
3635eqcomd 2771 . . . . . 6 (𝜑 ran ([,) ∘ 𝐹) = 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗))
3727, 36sseqtrd 3801 . . . . 5 (𝜑𝐵 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗))
38 ovnovollem1.b . . . . . 6 (𝜑𝐵𝑊)
39 fvex 6388 . . . . . . . 8 (([,) ∘ 𝐹)‘𝑗) ∈ V
4023, 39iunex 7345 . . . . . . 7 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ∈ V
4140a1i 11 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ∈ V)
4216a1i 11 . . . . . 6 (𝜑 → {𝐴} ∈ V)
432snn0d 39841 . . . . . 6 (𝜑 → {𝐴} ≠ ∅)
4438, 41, 42, 43mapss2 39974 . . . . 5 (𝜑 → (𝐵 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↔ (𝐵𝑚 {𝐴}) ⊆ ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑𝑚 {𝐴})))
4537, 44mpbid 223 . . . 4 (𝜑 → (𝐵𝑚 {𝐴}) ⊆ ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑𝑚 {𝐴}))
46 nfv 2009 . . . . . . 7 𝑗𝜑
47 fvexd 6390 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ([,)‘(𝐹𝑗)) ∈ V)
4846, 24, 47, 2iunmapsn 39986 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}) = ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}))
4948eqcomd 2771 . . . . 5 (𝜑 → ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}) = 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}))
50 elmapfun 8084 . . . . . . . . . 10 (𝐹 ∈ ((ℝ × ℝ) ↑𝑚 ℕ) → Fun 𝐹)
514, 50syl 17 . . . . . . . . 9 (𝜑 → Fun 𝐹)
5251adantr 472 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → Fun 𝐹)
53 simpr 477 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
546fdmd 6232 . . . . . . . . . . 11 (𝜑 → dom 𝐹 = ℕ)
5554eqcomd 2771 . . . . . . . . . 10 (𝜑 → ℕ = dom 𝐹)
5655adantr 472 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ℕ = dom 𝐹)
5753, 56eleqtrd 2846 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ dom 𝐹)
58 fvco 6463 . . . . . . . 8 ((Fun 𝐹𝑗 ∈ dom 𝐹) → (([,) ∘ 𝐹)‘𝑗) = ([,)‘(𝐹𝑗)))
5952, 57, 58syl2anc 579 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ 𝐹)‘𝑗) = ([,)‘(𝐹𝑗)))
6059iuneq2dv 4698 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)))
6160oveq1d 6857 . . . . 5 (𝜑 → ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑𝑚 {𝐴}) = ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}))
6210ffund 6227 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → Fun {⟨𝐴, (𝐹𝑗)⟩})
63 id 22 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ)
64 snex 5064 . . . . . . . . . . . . . . . 16 {⟨𝐴, (𝐹𝑗)⟩} ∈ V
6564a1i 11 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → {⟨𝐴, (𝐹𝑗)⟩} ∈ V)
6620fvmpt2 6480 . . . . . . . . . . . . . . 15 ((𝑗 ∈ ℕ ∧ {⟨𝐴, (𝐹𝑗)⟩} ∈ V) → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6763, 65, 66syl2anc 579 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6867adantl 473 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6968funeqd 6090 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (Fun (𝐼𝑗) ↔ Fun {⟨𝐴, (𝐹𝑗)⟩}))
7062, 69mpbird 248 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Fun (𝐼𝑗))
7170adantr 472 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → Fun (𝐼𝑗))
72 simpr 477 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → 𝑘 ∈ {𝐴})
7368dmeqd 5494 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → dom (𝐼𝑗) = dom {⟨𝐴, (𝐹𝑗)⟩})
7410fdmd 6232 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
7573, 74eqtrd 2799 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → dom (𝐼𝑗) = {𝐴})
7675eleq2d 2830 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (𝑘 ∈ dom (𝐼𝑗) ↔ 𝑘 ∈ {𝐴}))
7776adantr 472 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (𝑘 ∈ dom (𝐼𝑗) ↔ 𝑘 ∈ {𝐴}))
7872, 77mpbird 248 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → 𝑘 ∈ dom (𝐼𝑗))
79 fvco 6463 . . . . . . . . . 10 ((Fun (𝐼𝑗) ∧ 𝑘 ∈ dom (𝐼𝑗)) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘((𝐼𝑗)‘𝑘)))
8071, 78, 79syl2anc 579 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘((𝐼𝑗)‘𝑘)))
8167fveq1d 6377 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → ((𝐼𝑗)‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘))
8281ad2antlr 718 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ((𝐼𝑗)‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘))
83 elsni 4351 . . . . . . . . . . . . 13 (𝑘 ∈ {𝐴} → 𝑘 = 𝐴)
8483fveq2d 6379 . . . . . . . . . . . 12 (𝑘 ∈ {𝐴} → ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴))
8584adantl 473 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴))
86 fvexd 6390 . . . . . . . . . . . . 13 (𝜑 → (𝐹𝑗) ∈ V)
87 fvsng 6640 . . . . . . . . . . . . 13 ((𝐴𝑉 ∧ (𝐹𝑗) ∈ V) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
882, 86, 87syl2anc 579 . . . . . . . . . . . 12 (𝜑 → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
8988ad2antrr 717 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
9082, 85, 893eqtrd 2803 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ((𝐼𝑗)‘𝑘) = (𝐹𝑗))
9190fveq2d 6379 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ([,)‘((𝐼𝑗)‘𝑘)) = ([,)‘(𝐹𝑗)))
92 eqidd 2766 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ([,)‘(𝐹𝑗)) = ([,)‘(𝐹𝑗)))
9380, 91, 923eqtrd 2803 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘(𝐹𝑗)))
9493ixpeq2dva 8128 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)))
95 fvex 6388 . . . . . . . . 9 ([,)‘(𝐹𝑗)) ∈ V
9616, 95ixpconst 8123 . . . . . . . 8 X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)) = (([,)‘(𝐹𝑗)) ↑𝑚 {𝐴})
9796a1i 11 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)) = (([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}))
9894, 97eqtrd 2799 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = (([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}))
9998iuneq2dv 4698 . . . . 5 (𝜑 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑𝑚 {𝐴}))
10049, 61, 993eqtr4d 2809 . . . 4 (𝜑 → ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑𝑚 {𝐴}) = 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
10145, 100sseqtrd 3801 . . 3 (𝜑 → (𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
102 ovnovollem1.z . . . 4 (𝜑𝑍 = (Σ^‘((vol ∘ [,)) ∘ 𝐹)))
103 nfcv 2907 . . . . . . 7 𝑗𝐹
104 ressxr 10337 . . . . . . . . . 10 ℝ ⊆ ℝ*
105 xpss2 5297 . . . . . . . . . 10 (ℝ ⊆ ℝ* → (ℝ × ℝ) ⊆ (ℝ × ℝ*))
106104, 105ax-mp 5 . . . . . . . . 9 (ℝ × ℝ) ⊆ (ℝ × ℝ*)
107106a1i 11 . . . . . . . 8 (𝜑 → (ℝ × ℝ) ⊆ (ℝ × ℝ*))
1086, 107fssd 6237 . . . . . . 7 (𝜑𝐹:ℕ⟶(ℝ × ℝ*))
109103, 108volicofmpt 40783 . . . . . 6 (𝜑 → ((vol ∘ [,)) ∘ 𝐹) = (𝑗 ∈ ℕ ↦ (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))))
11067coeq2d 5453 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → ([,) ∘ (𝐼𝑗)) = ([,) ∘ {⟨𝐴, (𝐹𝑗)⟩}))
111110fveq1d 6377 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (([,) ∘ (𝐼𝑗))‘𝐴) = (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴))
112111adantl 473 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ (𝐼𝑗))‘𝐴) = (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴))
113 snidg 4364 . . . . . . . . . . . . . . . . 17 (𝐴𝑉𝐴 ∈ {𝐴})
1142, 113syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝐴 ∈ {𝐴})
115 dmsnopg 5790 . . . . . . . . . . . . . . . . 17 ((𝐹𝑗) ∈ V → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
11686, 115syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
117114, 116eleqtrrd 2847 . . . . . . . . . . . . . . 15 (𝜑𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩})
118117adantr 472 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → 𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩})
119 fvco 6463 . . . . . . . . . . . . . 14 ((Fun {⟨𝐴, (𝐹𝑗)⟩} ∧ 𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩}) → (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴) = ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)))
12062, 118, 119syl2anc 579 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴) = ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)))
121 fvexd 6390 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) ∈ V)
1223, 121, 87syl2anc 579 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
123 1st2nd2 7405 . . . . . . . . . . . . . . . . 17 ((𝐹𝑗) ∈ (ℝ × ℝ) → (𝐹𝑗) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
1247, 123syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
125122, 124eqtrd 2799 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
126125fveq2d 6379 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)) = ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩))
127 df-ov 6845 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))) = ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
128127eqcomi 2774 . . . . . . . . . . . . . . 15 ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))
129128a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
130126, 129eqtrd 2799 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
131112, 120, 1303eqtrd 2803 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ (𝐼𝑗))‘𝐴) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
132131fveq2d 6379 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) = (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))))
133 xp1st 7398 . . . . . . . . . . . . 13 ((𝐹𝑗) ∈ (ℝ × ℝ) → (1st ‘(𝐹𝑗)) ∈ ℝ)
1347, 133syl 17 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (1st ‘(𝐹𝑗)) ∈ ℝ)
135 xp2nd 7399 . . . . . . . . . . . . 13 ((𝐹𝑗) ∈ (ℝ × ℝ) → (2nd ‘(𝐹𝑗)) ∈ ℝ)
1367, 135syl 17 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2nd ‘(𝐹𝑗)) ∈ ℝ)
137 volicore 41367 . . . . . . . . . . . 12 (((1st ‘(𝐹𝑗)) ∈ ℝ ∧ (2nd ‘(𝐹𝑗)) ∈ ℝ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) ∈ ℝ)
138134, 136, 137syl2anc 579 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) ∈ ℝ)
139132, 138eqeltrd 2844 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℝ)
140139recnd 10322 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℂ)
141 2fveq3 6380 . . . . . . . . . 10 (𝑘 = 𝐴 → (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
142141prodsn 14977 . . . . . . . . 9 ((𝐴𝑉 ∧ (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℂ) → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
1433, 140, 142syl2anc 579 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
144143, 132eqtr2d 2800 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) = ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
145144mpteq2dva 4903 . . . . . 6 (𝜑 → (𝑗 ∈ ℕ ↦ (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
146109, 145eqtrd 2799 . . . . 5 (𝜑 → ((vol ∘ [,)) ∘ 𝐹) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
147146fveq2d 6379 . . . 4 (𝜑 → (Σ^‘((vol ∘ [,)) ∘ 𝐹)) = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
148102, 147eqtrd 2799 . . 3 (𝜑𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
149101, 148jca 507 . 2 (𝜑 → ((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))))
150 fveq1 6374 . . . . . . . . 9 (𝑖 = 𝐼 → (𝑖𝑗) = (𝐼𝑗))
151150coeq2d 5453 . . . . . . . 8 (𝑖 = 𝐼 → ([,) ∘ (𝑖𝑗)) = ([,) ∘ (𝐼𝑗)))
152151fveq1d 6377 . . . . . . 7 (𝑖 = 𝐼 → (([,) ∘ (𝑖𝑗))‘𝑘) = (([,) ∘ (𝐼𝑗))‘𝑘))
153152ixpeq2dv 8129 . . . . . 6 (𝑖 = 𝐼X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) = X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
154153iuneq2d 4703 . . . . 5 (𝑖 = 𝐼 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) = 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
155154sseq2d 3793 . . . 4 (𝑖 = 𝐼 → ((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ↔ (𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘)))
156 simpl 474 . . . . . . . . . . . 12 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → 𝑖 = 𝐼)
157156fveq1d 6377 . . . . . . . . . . 11 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (𝑖𝑗) = (𝐼𝑗))
158157coeq2d 5453 . . . . . . . . . 10 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → ([,) ∘ (𝑖𝑗)) = ([,) ∘ (𝐼𝑗)))
159158fveq1d 6377 . . . . . . . . 9 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (([,) ∘ (𝑖𝑗))‘𝑘) = (([,) ∘ (𝐼𝑗))‘𝑘))
160159fveq2d 6379 . . . . . . . 8 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
161160prodeq2dv 14938 . . . . . . 7 (𝑖 = 𝐼 → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)) = ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
162161mpteq2dv 4904 . . . . . 6 (𝑖 = 𝐼 → (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
163162fveq2d 6379 . . . . 5 (𝑖 = 𝐼 → (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)))) = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
164163eqeq2d 2775 . . . 4 (𝑖 = 𝐼 → (𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)))) ↔ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))))
165155, 164anbi12d 624 . . 3 (𝑖 = 𝐼 → (((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))) ↔ ((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))))
166165rspcev 3461 . 2 ((𝐼 ∈ (((ℝ × ℝ) ↑𝑚 {𝐴}) ↑𝑚 ℕ) ∧ ((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))) → ∃𝑖 ∈ (((ℝ × ℝ) ↑𝑚 {𝐴}) ↑𝑚 ℕ)((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
16726, 149, 166syl2anc 579 1 (𝜑 → ∃𝑖 ∈ (((ℝ × ℝ) ↑𝑚 {𝐴}) ↑𝑚 ℕ)((𝐵𝑚 {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 197  wa 384   = wceq 1652  wcel 2155  wrex 3056  Vcvv 3350  wss 3732  𝒫 cpw 4315  {csn 4334  cop 4340   cuni 4594   ciun 4676  cmpt 4888   × cxp 5275  dom cdm 5277  ran crn 5278  ccom 5281  Fun wfun 6062   Fn wfn 6063  wf 6064  cfv 6068  (class class class)co 6842  1st c1st 7364  2nd c2nd 7365  𝑚 cmap 8060  Xcixp 8113  cc 10187  cr 10188  *cxr 10327  cn 11274  [,)cico 12379  cprod 14920  volcvol 23521  Σ^csumge0 41148
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 2069  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  ax-inf2 8753  ax-cnex 10245  ax-resscn 10246  ax-1cn 10247  ax-icn 10248  ax-addcl 10249  ax-addrcl 10250  ax-mulcl 10251  ax-mulrcl 10252  ax-mulcom 10253  ax-addass 10254  ax-mulass 10255  ax-distr 10256  ax-i2m1 10257  ax-1ne0 10258  ax-1rid 10259  ax-rnegex 10260  ax-rrecex 10261  ax-cnre 10262  ax-pre-lttri 10263  ax-pre-lttrn 10264  ax-pre-ltadd 10265  ax-pre-mulgt0 10266  ax-pre-sup 10267
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3or 1108  df-3an 1109  df-tru 1656  df-fal 1666  df-ex 1875  df-nf 1879  df-sb 2062  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-nel 3041  df-ral 3060  df-rex 3061  df-reu 3062  df-rmo 3063  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-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-se 5237  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-isom 6077  df-riota 6803  df-ov 6845  df-oprab 6846  df-mpt2 6847  df-of 7095  df-om 7264  df-1st 7366  df-2nd 7367  df-wrecs 7610  df-recs 7672  df-rdg 7710  df-1o 7764  df-2o 7765  df-oadd 7768  df-er 7947  df-map 8062  df-pm 8063  df-ixp 8114  df-en 8161  df-dom 8162  df-sdom 8163  df-fin 8164  df-fi 8524  df-sup 8555  df-inf 8556  df-oi 8622  df-card 9016  df-cda 9243  df-pnf 10330  df-mnf 10331  df-xr 10332  df-ltxr 10333  df-le 10334  df-sub 10522  df-neg 10523  df-div 10939  df-nn 11275  df-2 11335  df-3 11336  df-n0 11539  df-z 11625  df-uz 11887  df-q 11990  df-rp 12029  df-xneg 12146  df-xadd 12147  df-xmul 12148  df-ioo 12381  df-ico 12383  df-icc 12384  df-fz 12534  df-fzo 12674  df-fl 12801  df-seq 13009  df-exp 13068  df-hash 13322  df-cj 14126  df-re 14127  df-im 14128  df-sqrt 14262  df-abs 14263  df-clim 14506  df-rlim 14507  df-sum 14704  df-prod 14921  df-rest 16351  df-topgen 16372  df-psmet 20011  df-xmet 20012  df-met 20013  df-bl 20014  df-mopn 20015  df-top 20978  df-topon 20995  df-bases 21030  df-cmp 21470  df-ovol 23522  df-vol 23523
This theorem is referenced by:  ovnovollem3  41444
  Copyright terms: Public domain W3C validator