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 46577
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 (𝜑𝐹 ∈ ((ℝ × ℝ) ↑m ℕ))
ovnovollem1.i 𝐼 = (𝑗 ∈ ℕ ↦ {⟨𝐴, (𝐹𝑗)⟩})
ovnovollem1.s (𝜑𝐵 ran ([,) ∘ 𝐹))
ovnovollem1.b (𝜑𝐵𝑊)
ovnovollem1.z (𝜑𝑍 = (Σ^‘((vol ∘ [,)) ∘ 𝐹)))
Assertion
Ref Expression
ovnovollem1 (𝜑 → ∃𝑖 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ)((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
Distinct variable groups:   𝐴,𝑖,𝑗,𝑘   𝐵,𝑖   𝑗,𝐹,𝑘   𝑖,𝐼,𝑗,𝑘   𝑘,𝑉   𝑖,𝑍   𝜑,𝑗,𝑘
Allowed substitution hints:   𝜑(𝑖)   𝐵(𝑗,𝑘)   𝐹(𝑖)   𝑉(𝑖,𝑗)   𝑊(𝑖,𝑗,𝑘)   𝑍(𝑗,𝑘)

Proof of Theorem ovnovollem1
StepHypRef Expression
1 eqidd 2741 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩})
2 ovnovollem1.a . . . . . . . . 9 (𝜑𝐴𝑉)
32adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝐴𝑉)
4 ovnovollem1.f . . . . . . . . . 10 (𝜑𝐹 ∈ ((ℝ × ℝ) ↑m ℕ))
5 elmapi 8907 . . . . . . . . . 10 (𝐹 ∈ ((ℝ × ℝ) ↑m ℕ) → 𝐹:ℕ⟶(ℝ × ℝ))
64, 5syl 17 . . . . . . . . 9 (𝜑𝐹:ℕ⟶(ℝ × ℝ))
76ffvelcdmda 7118 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) ∈ (ℝ × ℝ))
8 fsng 7171 . . . . . . . 8 ((𝐴𝑉 ∧ (𝐹𝑗) ∈ (ℝ × ℝ)) → ({⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)} ↔ {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩}))
93, 7, 8syl2anc 583 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)} ↔ {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩}))
101, 9mpbird 257 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)})
117snssd 4834 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {(𝐹𝑗)} ⊆ (ℝ × ℝ))
1210, 11fssd 6764 . . . . 5 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶(ℝ × ℝ))
13 reex 11275 . . . . . . . 8 ℝ ∈ V
1413, 13xpex 7788 . . . . . . 7 (ℝ × ℝ) ∈ V
1514a1i 11 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (ℝ × ℝ) ∈ V)
16 snex 5451 . . . . . . 7 {𝐴} ∈ V
1716a1i 11 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {𝐴} ∈ V)
1815, 17elmapd 8898 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩} ∈ ((ℝ × ℝ) ↑m {𝐴}) ↔ {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶(ℝ × ℝ)))
1912, 18mpbird 257 . . . 4 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩} ∈ ((ℝ × ℝ) ↑m {𝐴}))
20 ovnovollem1.i . . . 4 𝐼 = (𝑗 ∈ ℕ ↦ {⟨𝐴, (𝐹𝑗)⟩})
2119, 20fmptd 7148 . . 3 (𝜑𝐼:ℕ⟶((ℝ × ℝ) ↑m {𝐴}))
22 ovexd 7483 . . . 4 (𝜑 → ((ℝ × ℝ) ↑m {𝐴}) ∈ V)
23 nnex 12299 . . . . 5 ℕ ∈ V
2423a1i 11 . . . 4 (𝜑 → ℕ ∈ V)
2522, 24elmapd 8898 . . 3 (𝜑 → (𝐼 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ) ↔ 𝐼:ℕ⟶((ℝ × ℝ) ↑m {𝐴})))
2621, 25mpbird 257 . 2 (𝜑𝐼 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ))
27 ovnovollem1.s . . . . . 6 (𝜑𝐵 ran ([,) ∘ 𝐹))
28 icof 45126 . . . . . . . . . . 11 [,):(ℝ* × ℝ*)⟶𝒫 ℝ*
2928a1i 11 . . . . . . . . . 10 (𝜑 → [,):(ℝ* × ℝ*)⟶𝒫 ℝ*)
30 rexpssxrxp 11335 . . . . . . . . . . 11 (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
3130a1i 11 . . . . . . . . . 10 (𝜑 → (ℝ × ℝ) ⊆ (ℝ* × ℝ*))
3229, 31, 6fcoss 45117 . . . . . . . . 9 (𝜑 → ([,) ∘ 𝐹):ℕ⟶𝒫 ℝ*)
3332ffnd 6748 . . . . . . . 8 (𝜑 → ([,) ∘ 𝐹) Fn ℕ)
34 fniunfv 7284 . . . . . . . 8 (([,) ∘ 𝐹) Fn ℕ → 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = ran ([,) ∘ 𝐹))
3533, 34syl 17 . . . . . . 7 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = ran ([,) ∘ 𝐹))
3635eqcomd 2746 . . . . . 6 (𝜑 ran ([,) ∘ 𝐹) = 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗))
3727, 36sseqtrd 4049 . . . . 5 (𝜑𝐵 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗))
38 ovnovollem1.b . . . . . 6 (𝜑𝐵𝑊)
39 fvex 6933 . . . . . . . 8 (([,) ∘ 𝐹)‘𝑗) ∈ V
4023, 39iunex 8009 . . . . . . 7 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ∈ V
4140a1i 11 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ∈ V)
4216a1i 11 . . . . . 6 (𝜑 → {𝐴} ∈ V)
432snn0d 4800 . . . . . 6 (𝜑 → {𝐴} ≠ ∅)
4438, 41, 42, 43mapss2 45112 . . . . 5 (𝜑 → (𝐵 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↔ (𝐵m {𝐴}) ⊆ ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴})))
4537, 44mpbid 232 . . . 4 (𝜑 → (𝐵m {𝐴}) ⊆ ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴}))
46 nfv 1913 . . . . . . 7 𝑗𝜑
47 fvexd 6935 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ([,)‘(𝐹𝑗)) ∈ V)
4846, 24, 47, 2iunmapsn 45124 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑m {𝐴}) = ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑m {𝐴}))
4948eqcomd 2746 . . . . 5 (𝜑 → ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑m {𝐴}) = 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑m {𝐴}))
50 elmapfun 8924 . . . . . . . . . 10 (𝐹 ∈ ((ℝ × ℝ) ↑m ℕ) → Fun 𝐹)
514, 50syl 17 . . . . . . . . 9 (𝜑 → Fun 𝐹)
5251adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → Fun 𝐹)
53 simpr 484 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
546fdmd 6757 . . . . . . . . . . 11 (𝜑 → dom 𝐹 = ℕ)
5554eqcomd 2746 . . . . . . . . . 10 (𝜑 → ℕ = dom 𝐹)
5655adantr 480 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ℕ = dom 𝐹)
5753, 56eleqtrd 2846 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ dom 𝐹)
58 fvco 7020 . . . . . . . 8 ((Fun 𝐹𝑗 ∈ dom 𝐹) → (([,) ∘ 𝐹)‘𝑗) = ([,)‘(𝐹𝑗)))
5952, 57, 58syl2anc 583 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ 𝐹)‘𝑗) = ([,)‘(𝐹𝑗)))
6059iuneq2dv 5039 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)))
6160oveq1d 7463 . . . . 5 (𝜑 → ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴}) = ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑m {𝐴}))
6210ffund 6751 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → Fun {⟨𝐴, (𝐹𝑗)⟩})
63 id 22 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ)
64 snex 5451 . . . . . . . . . . . . . . . 16 {⟨𝐴, (𝐹𝑗)⟩} ∈ V
6564a1i 11 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → {⟨𝐴, (𝐹𝑗)⟩} ∈ V)
6620fvmpt2 7040 . . . . . . . . . . . . . . 15 ((𝑗 ∈ ℕ ∧ {⟨𝐴, (𝐹𝑗)⟩} ∈ V) → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6763, 65, 66syl2anc 583 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6867adantl 481 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6968funeqd 6600 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (Fun (𝐼𝑗) ↔ Fun {⟨𝐴, (𝐹𝑗)⟩}))
7062, 69mpbird 257 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Fun (𝐼𝑗))
7170adantr 480 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → Fun (𝐼𝑗))
72 simpr 484 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → 𝑘 ∈ {𝐴})
7368dmeqd 5930 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → dom (𝐼𝑗) = dom {⟨𝐴, (𝐹𝑗)⟩})
7410fdmd 6757 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
7573, 74eqtrd 2780 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → dom (𝐼𝑗) = {𝐴})
7675eleq2d 2830 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (𝑘 ∈ dom (𝐼𝑗) ↔ 𝑘 ∈ {𝐴}))
7776adantr 480 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (𝑘 ∈ dom (𝐼𝑗) ↔ 𝑘 ∈ {𝐴}))
7872, 77mpbird 257 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → 𝑘 ∈ dom (𝐼𝑗))
79 fvco 7020 . . . . . . . . . 10 ((Fun (𝐼𝑗) ∧ 𝑘 ∈ dom (𝐼𝑗)) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘((𝐼𝑗)‘𝑘)))
8071, 78, 79syl2anc 583 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘((𝐼𝑗)‘𝑘)))
8167fveq1d 6922 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → ((𝐼𝑗)‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘))
8281ad2antlr 726 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ((𝐼𝑗)‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘))
83 elsni 4665 . . . . . . . . . . . . 13 (𝑘 ∈ {𝐴} → 𝑘 = 𝐴)
8483fveq2d 6924 . . . . . . . . . . . 12 (𝑘 ∈ {𝐴} → ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴))
8584adantl 481 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴))
86 fvexd 6935 . . . . . . . . . . . . 13 (𝜑 → (𝐹𝑗) ∈ V)
87 fvsng 7214 . . . . . . . . . . . . 13 ((𝐴𝑉 ∧ (𝐹𝑗) ∈ V) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
882, 86, 87syl2anc 583 . . . . . . . . . . . 12 (𝜑 → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
8988ad2antrr 725 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
9082, 85, 893eqtrd 2784 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ((𝐼𝑗)‘𝑘) = (𝐹𝑗))
9190fveq2d 6924 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ([,)‘((𝐼𝑗)‘𝑘)) = ([,)‘(𝐹𝑗)))
92 eqidd 2741 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ([,)‘(𝐹𝑗)) = ([,)‘(𝐹𝑗)))
9380, 91, 923eqtrd 2784 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘(𝐹𝑗)))
9493ixpeq2dva 8970 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)))
95 fvex 6933 . . . . . . . . 9 ([,)‘(𝐹𝑗)) ∈ V
9616, 95ixpconst 8965 . . . . . . . 8 X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)) = (([,)‘(𝐹𝑗)) ↑m {𝐴})
9796a1i 11 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)) = (([,)‘(𝐹𝑗)) ↑m {𝐴}))
9894, 97eqtrd 2780 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = (([,)‘(𝐹𝑗)) ↑m {𝐴}))
9998iuneq2dv 5039 . . . . 5 (𝜑 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑m {𝐴}))
10049, 61, 993eqtr4d 2790 . . . 4 (𝜑 → ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴}) = 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
10145, 100sseqtrd 4049 . . 3 (𝜑 → (𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
102 ovnovollem1.z . . . 4 (𝜑𝑍 = (Σ^‘((vol ∘ [,)) ∘ 𝐹)))
103 nfcv 2908 . . . . . . 7 𝑗𝐹
104 ressxr 11334 . . . . . . . . . 10 ℝ ⊆ ℝ*
105 xpss2 5720 . . . . . . . . . 10 (ℝ ⊆ ℝ* → (ℝ × ℝ) ⊆ (ℝ × ℝ*))
106104, 105ax-mp 5 . . . . . . . . 9 (ℝ × ℝ) ⊆ (ℝ × ℝ*)
107106a1i 11 . . . . . . . 8 (𝜑 → (ℝ × ℝ) ⊆ (ℝ × ℝ*))
1086, 107fssd 6764 . . . . . . 7 (𝜑𝐹:ℕ⟶(ℝ × ℝ*))
109103, 108volicofmpt 45918 . . . . . 6 (𝜑 → ((vol ∘ [,)) ∘ 𝐹) = (𝑗 ∈ ℕ ↦ (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))))
11067coeq2d 5887 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → ([,) ∘ (𝐼𝑗)) = ([,) ∘ {⟨𝐴, (𝐹𝑗)⟩}))
111110fveq1d 6922 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (([,) ∘ (𝐼𝑗))‘𝐴) = (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴))
112111adantl 481 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ (𝐼𝑗))‘𝐴) = (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴))
113 snidg 4682 . . . . . . . . . . . . . . . . 17 (𝐴𝑉𝐴 ∈ {𝐴})
1142, 113syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝐴 ∈ {𝐴})
115 dmsnopg 6244 . . . . . . . . . . . . . . . . 17 ((𝐹𝑗) ∈ V → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
11686, 115syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
117114, 116eleqtrrd 2847 . . . . . . . . . . . . . . 15 (𝜑𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩})
118117adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → 𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩})
119 fvco 7020 . . . . . . . . . . . . . 14 ((Fun {⟨𝐴, (𝐹𝑗)⟩} ∧ 𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩}) → (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴) = ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)))
12062, 118, 119syl2anc 583 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴) = ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)))
121 fvexd 6935 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) ∈ V)
1223, 121, 87syl2anc 583 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
123 1st2nd2 8069 . . . . . . . . . . . . . . . . 17 ((𝐹𝑗) ∈ (ℝ × ℝ) → (𝐹𝑗) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
1247, 123syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
125122, 124eqtrd 2780 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
126125fveq2d 6924 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)) = ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩))
127 df-ov 7451 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))) = ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
128127eqcomi 2749 . . . . . . . . . . . . . . 15 ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))
129128a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
130126, 129eqtrd 2780 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
131112, 120, 1303eqtrd 2784 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ (𝐼𝑗))‘𝐴) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
132131fveq2d 6924 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) = (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))))
133 xp1st 8062 . . . . . . . . . . . . 13 ((𝐹𝑗) ∈ (ℝ × ℝ) → (1st ‘(𝐹𝑗)) ∈ ℝ)
1347, 133syl 17 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (1st ‘(𝐹𝑗)) ∈ ℝ)
135 xp2nd 8063 . . . . . . . . . . . . 13 ((𝐹𝑗) ∈ (ℝ × ℝ) → (2nd ‘(𝐹𝑗)) ∈ ℝ)
1367, 135syl 17 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2nd ‘(𝐹𝑗)) ∈ ℝ)
137 volicore 46502 . . . . . . . . . . . 12 (((1st ‘(𝐹𝑗)) ∈ ℝ ∧ (2nd ‘(𝐹𝑗)) ∈ ℝ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) ∈ ℝ)
138134, 136, 137syl2anc 583 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) ∈ ℝ)
139132, 138eqeltrd 2844 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℝ)
140139recnd 11318 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℂ)
141 2fveq3 6925 . . . . . . . . . 10 (𝑘 = 𝐴 → (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
142141prodsn 16010 . . . . . . . . 9 ((𝐴𝑉 ∧ (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℂ) → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
1433, 140, 142syl2anc 583 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
144143, 132eqtr2d 2781 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) = ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
145144mpteq2dva 5266 . . . . . 6 (𝜑 → (𝑗 ∈ ℕ ↦ (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
146109, 145eqtrd 2780 . . . . 5 (𝜑 → ((vol ∘ [,)) ∘ 𝐹) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
147146fveq2d 6924 . . . 4 (𝜑 → (Σ^‘((vol ∘ [,)) ∘ 𝐹)) = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
148102, 147eqtrd 2780 . . 3 (𝜑𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
149101, 148jca 511 . 2 (𝜑 → ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))))
150 fveq1 6919 . . . . . . . . 9 (𝑖 = 𝐼 → (𝑖𝑗) = (𝐼𝑗))
151150coeq2d 5887 . . . . . . . 8 (𝑖 = 𝐼 → ([,) ∘ (𝑖𝑗)) = ([,) ∘ (𝐼𝑗)))
152151fveq1d 6922 . . . . . . 7 (𝑖 = 𝐼 → (([,) ∘ (𝑖𝑗))‘𝑘) = (([,) ∘ (𝐼𝑗))‘𝑘))
153152ixpeq2dv 8971 . . . . . 6 (𝑖 = 𝐼X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) = X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
154153iuneq2d 5045 . . . . 5 (𝑖 = 𝐼 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) = 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
155154sseq2d 4041 . . . 4 (𝑖 = 𝐼 → ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ↔ (𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘)))
156 simpl 482 . . . . . . . . . . . 12 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → 𝑖 = 𝐼)
157156fveq1d 6922 . . . . . . . . . . 11 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (𝑖𝑗) = (𝐼𝑗))
158157coeq2d 5887 . . . . . . . . . 10 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → ([,) ∘ (𝑖𝑗)) = ([,) ∘ (𝐼𝑗)))
159158fveq1d 6922 . . . . . . . . 9 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (([,) ∘ (𝑖𝑗))‘𝑘) = (([,) ∘ (𝐼𝑗))‘𝑘))
160159fveq2d 6924 . . . . . . . 8 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
161160prodeq2dv 15970 . . . . . . 7 (𝑖 = 𝐼 → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)) = ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
162161mpteq2dv 5268 . . . . . 6 (𝑖 = 𝐼 → (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
163162fveq2d 6924 . . . . 5 (𝑖 = 𝐼 → (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)))) = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
164163eqeq2d 2751 . . . 4 (𝑖 = 𝐼 → (𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)))) ↔ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))))
165155, 164anbi12d 631 . . 3 (𝑖 = 𝐼 → (((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))) ↔ ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))))
166165rspcev 3635 . 2 ((𝐼 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ) ∧ ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))) → ∃𝑖 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ)((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
16726, 149, 166syl2anc 583 1 (𝜑 → ∃𝑖 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ)((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1537  wcel 2108  wrex 3076  Vcvv 3488  wss 3976  𝒫 cpw 4622  {csn 4648  cop 4654   cuni 4931   ciun 5015  cmpt 5249   × cxp 5698  dom cdm 5700  ran crn 5701  ccom 5704  Fun wfun 6567   Fn wfn 6568  wf 6569  cfv 6573  (class class class)co 7448  1st c1st 8028  2nd c2nd 8029  m cmap 8884  Xcixp 8955  cc 11182  cr 11183  *cxr 11323  cn 12293  [,)cico 13409  cprod 15951  volcvol 25517  Σ^csumge0 46283
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261  ax-pre-sup 11262
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-se 5653  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-of 7714  df-om 7904  df-1st 8030  df-2nd 8031  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-2o 8523  df-er 8763  df-map 8886  df-pm 8887  df-ixp 8956  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-fi 9480  df-sup 9511  df-inf 9512  df-oi 9579  df-dju 9970  df-card 10008  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-div 11948  df-nn 12294  df-2 12356  df-3 12357  df-n0 12554  df-z 12640  df-uz 12904  df-q 13014  df-rp 13058  df-xneg 13175  df-xadd 13176  df-xmul 13177  df-ioo 13411  df-ico 13413  df-icc 13414  df-fz 13568  df-fzo 13712  df-fl 13843  df-seq 14053  df-exp 14113  df-hash 14380  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-clim 15534  df-rlim 15535  df-sum 15735  df-prod 15952  df-rest 17482  df-topgen 17503  df-psmet 21379  df-xmet 21380  df-met 21381  df-bl 21382  df-mopn 21383  df-top 22921  df-topon 22938  df-bases 22974  df-cmp 23416  df-ovol 25518  df-vol 25519
This theorem is referenced by:  ovnovollem3  46579
  Copyright terms: Public domain W3C validator