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 47398
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 2763 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩})
2 ovnovollem1.a . . . . . . . . 9 (𝜑𝐴𝑉)
32adantr 485 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝐴𝑉)
4 ovnovollem1.f . . . . . . . . . 10 (𝜑𝐹 ∈ ((ℝ × ℝ) ↑m ℕ))
5 elmapi 8844 . . . . . . . . . 10 (𝐹 ∈ ((ℝ × ℝ) ↑m ℕ) → 𝐹:ℕ⟶(ℝ × ℝ))
64, 5syl 18 . . . . . . . . 9 (𝜑𝐹:ℕ⟶(ℝ × ℝ))
76ffvelcdmda 7079 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) ∈ (ℝ × ℝ))
8 fsng 7133 . . . . . . . 8 ((𝐴𝑉 ∧ (𝐹𝑗) ∈ (ℝ × ℝ)) → ({⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)} ↔ {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩}))
93, 7, 8syl2anc 595 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)} ↔ {⟨𝐴, (𝐹𝑗)⟩} = {⟨𝐴, (𝐹𝑗)⟩}))
101, 9mpbird 260 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶{(𝐹𝑗)})
117snssd 4751 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {(𝐹𝑗)} ⊆ (ℝ × ℝ))
1210, 11fssd 6723 . . . . 5 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶(ℝ × ℝ))
13 reex 11197 . . . . . . . 8 ℝ ∈ V
1413, 13xpex 7750 . . . . . . 7 (ℝ × ℝ) ∈ V
1514a1i 11 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (ℝ × ℝ) ∈ V)
16 snex 5409 . . . . . . 7 {𝐴} ∈ V
1716a1i 11 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → {𝐴} ∈ V)
1815, 17elmapd 8835 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩} ∈ ((ℝ × ℝ) ↑m {𝐴}) ↔ {⟨𝐴, (𝐹𝑗)⟩}:{𝐴}⟶(ℝ × ℝ)))
1912, 18mpbird 260 . . . 4 ((𝜑𝑗 ∈ ℕ) → {⟨𝐴, (𝐹𝑗)⟩} ∈ ((ℝ × ℝ) ↑m {𝐴}))
20 ovnovollem1.i . . . 4 𝐼 = (𝑗 ∈ ℕ ↦ {⟨𝐴, (𝐹𝑗)⟩})
2119, 20fmptd 7109 . . 3 (𝜑𝐼:ℕ⟶((ℝ × ℝ) ↑m {𝐴}))
22 ovexd 7447 . . . 4 (𝜑 → ((ℝ × ℝ) ↑m {𝐴}) ∈ V)
23 nnex 12245 . . . . 5 ℕ ∈ V
2423a1i 11 . . . 4 (𝜑 → ℕ ∈ V)
2522, 24elmapd 8835 . . 3 (𝜑 → (𝐼 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ) ↔ 𝐼:ℕ⟶((ℝ × ℝ) ↑m {𝐴})))
2621, 25mpbird 260 . 2 (𝜑𝐼 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ))
27 ovnovollem1.s . . . . . 6 (𝜑𝐵 ran ([,) ∘ 𝐹))
28 icof 45963 . . . . . . . . . . 11 [,):(ℝ* × ℝ*)⟶𝒫 ℝ*
2928a1i 11 . . . . . . . . . 10 (𝜑 → [,):(ℝ* × ℝ*)⟶𝒫 ℝ*)
30 rexpssxrxp 11260 . . . . . . . . . . 11 (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
3130a1i 11 . . . . . . . . . 10 (𝜑 → (ℝ × ℝ) ⊆ (ℝ* × ℝ*))
3229, 31, 6fcoss 45954 . . . . . . . . 9 (𝜑 → ([,) ∘ 𝐹):ℕ⟶𝒫 ℝ*)
3332ffnd 6706 . . . . . . . 8 (𝜑 → ([,) ∘ 𝐹) Fn ℕ)
34 fniunfv 7245 . . . . . . . 8 (([,) ∘ 𝐹) Fn ℕ → 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = ran ([,) ∘ 𝐹))
3533, 34syl 18 . . . . . . 7 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = ran ([,) ∘ 𝐹))
3635eqcomd 2768 . . . . . 6 (𝜑 ran ([,) ∘ 𝐹) = 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗))
3727, 36sseqtrd 3972 . . . . 5 (𝜑𝐵 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗))
38 ovnovollem1.b . . . . . 6 (𝜑𝐵𝑊)
39 fvex 6894 . . . . . . . 8 (([,) ∘ 𝐹)‘𝑗) ∈ V
4023, 39iunex 7963 . . . . . . 7 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ∈ V
4140a1i 11 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ∈ V)
4216a1i 11 . . . . . 6 (𝜑 → {𝐴} ∈ V)
432snn0d 4740 . . . . . 6 (𝜑 → {𝐴} ≠ ∅)
4438, 41, 42, 43mapss2 45950 . . . . 5 (𝜑 → (𝐵 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↔ (𝐵m {𝐴}) ⊆ ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴})))
4537, 44mpbid 235 . . . 4 (𝜑 → (𝐵m {𝐴}) ⊆ ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴}))
46 nfv 1943 . . . . . . 7 𝑗𝜑
47 fvexd 6896 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ([,)‘(𝐹𝑗)) ∈ V)
4846, 24, 47, 2iunmapsn 45961 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑m {𝐴}) = ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑m {𝐴}))
4948eqcomd 2768 . . . . 5 (𝜑 → ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑m {𝐴}) = 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑m {𝐴}))
50 elmapfun 8861 . . . . . . . . . 10 (𝐹 ∈ ((ℝ × ℝ) ↑m ℕ) → Fun 𝐹)
514, 50syl 18 . . . . . . . . 9 (𝜑 → Fun 𝐹)
5251adantr 485 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → Fun 𝐹)
53 simpr 489 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
546fdmd 6716 . . . . . . . . . . 11 (𝜑 → dom 𝐹 = ℕ)
5554eqcomd 2768 . . . . . . . . . 10 (𝜑 → ℕ = dom 𝐹)
5655adantr 485 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ℕ = dom 𝐹)
5753, 56eleqtrd 2864 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ dom 𝐹)
58 fvco 6979 . . . . . . . 8 ((Fun 𝐹𝑗 ∈ dom 𝐹) → (([,) ∘ 𝐹)‘𝑗) = ([,)‘(𝐹𝑗)))
5952, 57, 58syl2anc 595 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ 𝐹)‘𝑗) = ([,)‘(𝐹𝑗)))
6059iuneq2dv 4980 . . . . . 6 (𝜑 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) = 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)))
6160oveq1d 7427 . . . . 5 (𝜑 → ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴}) = ( 𝑗 ∈ ℕ ([,)‘(𝐹𝑗)) ↑m {𝐴}))
6210ffund 6710 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → Fun {⟨𝐴, (𝐹𝑗)⟩})
63 id 23 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ)
64 snex 5409 . . . . . . . . . . . . . . . 16 {⟨𝐴, (𝐹𝑗)⟩} ∈ V
6564a1i 11 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → {⟨𝐴, (𝐹𝑗)⟩} ∈ V)
6620fvmpt2 7001 . . . . . . . . . . . . . . 15 ((𝑗 ∈ ℕ ∧ {⟨𝐴, (𝐹𝑗)⟩} ∈ V) → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6763, 65, 66syl2anc 595 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6867adantl 486 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (𝐼𝑗) = {⟨𝐴, (𝐹𝑗)⟩})
6968funeqd 6558 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (Fun (𝐼𝑗) ↔ Fun {⟨𝐴, (𝐹𝑗)⟩}))
7062, 69mpbird 260 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Fun (𝐼𝑗))
7170adantr 485 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → Fun (𝐼𝑗))
72 simpr 489 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → 𝑘 ∈ {𝐴})
7368dmeqd 5894 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → dom (𝐼𝑗) = dom {⟨𝐴, (𝐹𝑗)⟩})
7410fdmd 6716 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
7573, 74eqtrd 2797 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → dom (𝐼𝑗) = {𝐴})
7675eleq2d 2848 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (𝑘 ∈ dom (𝐼𝑗) ↔ 𝑘 ∈ {𝐴}))
7776adantr 485 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (𝑘 ∈ dom (𝐼𝑗) ↔ 𝑘 ∈ {𝐴}))
7872, 77mpbird 260 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → 𝑘 ∈ dom (𝐼𝑗))
79 fvco 6979 . . . . . . . . . 10 ((Fun (𝐼𝑗) ∧ 𝑘 ∈ dom (𝐼𝑗)) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘((𝐼𝑗)‘𝑘)))
8071, 78, 79syl2anc 595 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘((𝐼𝑗)‘𝑘)))
8167fveq1d 6883 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → ((𝐼𝑗)‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘))
8281ad2antlr 739 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ((𝐼𝑗)‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘))
83 elsni 4605 . . . . . . . . . . . . 13 (𝑘 ∈ {𝐴} → 𝑘 = 𝐴)
8483fveq2d 6885 . . . . . . . . . . . 12 (𝑘 ∈ {𝐴} → ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴))
8584adantl 486 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝑘) = ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴))
86 fvexd 6896 . . . . . . . . . . . . 13 (𝜑 → (𝐹𝑗) ∈ V)
87 fvsng 7178 . . . . . . . . . . . . 13 ((𝐴𝑉 ∧ (𝐹𝑗) ∈ V) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
882, 86, 87syl2anc 595 . . . . . . . . . . . 12 (𝜑 → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
8988ad2antrr 738 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
9082, 85, 893eqtrd 2801 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ((𝐼𝑗)‘𝑘) = (𝐹𝑗))
9190fveq2d 6885 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ([,)‘((𝐼𝑗)‘𝑘)) = ([,)‘(𝐹𝑗)))
92 eqidd 2763 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → ([,)‘(𝐹𝑗)) = ([,)‘(𝐹𝑗)))
9380, 91, 923eqtrd 2801 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ {𝐴}) → (([,) ∘ (𝐼𝑗))‘𝑘) = ([,)‘(𝐹𝑗)))
9493ixpeq2dva 8908 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)))
95 fvex 6894 . . . . . . . . 9 ([,)‘(𝐹𝑗)) ∈ V
9616, 95ixpconst 8903 . . . . . . . 8 X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)) = (([,)‘(𝐹𝑗)) ↑m {𝐴})
9796a1i 11 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} ([,)‘(𝐹𝑗)) = (([,)‘(𝐹𝑗)) ↑m {𝐴}))
9894, 97eqtrd 2797 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = (([,)‘(𝐹𝑗)) ↑m {𝐴}))
9998iuneq2dv 4980 . . . . 5 (𝜑 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) = 𝑗 ∈ ℕ (([,)‘(𝐹𝑗)) ↑m {𝐴}))
10049, 61, 993eqtr4d 2807 . . . 4 (𝜑 → ( 𝑗 ∈ ℕ (([,) ∘ 𝐹)‘𝑗) ↑m {𝐴}) = 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
10145, 100sseqtrd 3972 . . 3 (𝜑 → (𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
102 ovnovollem1.z . . . 4 (𝜑𝑍 = (Σ^‘((vol ∘ [,)) ∘ 𝐹)))
103 nfcv 2924 . . . . . . 7 𝑗𝐹
104 ressxr 11259 . . . . . . . . . 10 ℝ ⊆ ℝ*
105 xpss2 5680 . . . . . . . . . 10 (ℝ ⊆ ℝ* → (ℝ × ℝ) ⊆ (ℝ × ℝ*))
106104, 105ax-mp 5 . . . . . . . . 9 (ℝ × ℝ) ⊆ (ℝ × ℝ*)
107106a1i 11 . . . . . . . 8 (𝜑 → (ℝ × ℝ) ⊆ (ℝ × ℝ*))
1086, 107fssd 6723 . . . . . . 7 (𝜑𝐹:ℕ⟶(ℝ × ℝ*))
109103, 108volicofmpt 46739 . . . . . 6 (𝜑 → ((vol ∘ [,)) ∘ 𝐹) = (𝑗 ∈ ℕ ↦ (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))))
11067coeq2d 5847 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ → ([,) ∘ (𝐼𝑗)) = ([,) ∘ {⟨𝐴, (𝐹𝑗)⟩}))
111110fveq1d 6883 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (([,) ∘ (𝐼𝑗))‘𝐴) = (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴))
112111adantl 486 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ (𝐼𝑗))‘𝐴) = (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴))
113 snidg 4625 . . . . . . . . . . . . . . . . 17 (𝐴𝑉𝐴 ∈ {𝐴})
1142, 113syl 18 . . . . . . . . . . . . . . . 16 (𝜑𝐴 ∈ {𝐴})
115 dmsnopg 6213 . . . . . . . . . . . . . . . . 17 ((𝐹𝑗) ∈ V → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
11686, 115syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → dom {⟨𝐴, (𝐹𝑗)⟩} = {𝐴})
117114, 116eleqtrrd 2865 . . . . . . . . . . . . . . 15 (𝜑𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩})
118117adantr 485 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → 𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩})
119 fvco 6979 . . . . . . . . . . . . . 14 ((Fun {⟨𝐴, (𝐹𝑗)⟩} ∧ 𝐴 ∈ dom {⟨𝐴, (𝐹𝑗)⟩}) → (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴) = ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)))
12062, 118, 119syl2anc 595 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ {⟨𝐴, (𝐹𝑗)⟩})‘𝐴) = ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)))
121 fvexd 6896 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) ∈ V)
1223, 121, 87syl2anc 595 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = (𝐹𝑗))
123 1st2nd2 8023 . . . . . . . . . . . . . . . . 17 ((𝐹𝑗) ∈ (ℝ × ℝ) → (𝐹𝑗) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
1247, 123syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (𝐹𝑗) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
125122, 124eqtrd 2797 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ({⟨𝐴, (𝐹𝑗)⟩}‘𝐴) = ⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
126125fveq2d 6885 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)) = ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩))
127 df-ov 7415 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))) = ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩)
128127eqcomi 2771 . . . . . . . . . . . . . . 15 ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))
129128a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → ([,)‘⟨(1st ‘(𝐹𝑗)), (2nd ‘(𝐹𝑗))⟩) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
130126, 129eqtrd 2797 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ([,)‘({⟨𝐴, (𝐹𝑗)⟩}‘𝐴)) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
131112, 120, 1303eqtrd 2801 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (([,) ∘ (𝐼𝑗))‘𝐴) = ((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))
132131fveq2d 6885 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) = (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))))
133 xp1st 8016 . . . . . . . . . . . . 13 ((𝐹𝑗) ∈ (ℝ × ℝ) → (1st ‘(𝐹𝑗)) ∈ ℝ)
1347, 133syl 18 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (1st ‘(𝐹𝑗)) ∈ ℝ)
135 xp2nd 8017 . . . . . . . . . . . . 13 ((𝐹𝑗) ∈ (ℝ × ℝ) → (2nd ‘(𝐹𝑗)) ∈ ℝ)
1367, 135syl 18 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2nd ‘(𝐹𝑗)) ∈ ℝ)
137 volicore 47323 . . . . . . . . . . . 12 (((1st ‘(𝐹𝑗)) ∈ ℝ ∧ (2nd ‘(𝐹𝑗)) ∈ ℝ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) ∈ ℝ)
138134, 136, 137syl2anc 595 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) ∈ ℝ)
139132, 138eqeltrd 2862 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℝ)
140139recnd 11243 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℂ)
141 2fveq3 6886 . . . . . . . . . 10 (𝑘 = 𝐴 → (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
142141prodsn 16023 . . . . . . . . 9 ((𝐴𝑉 ∧ (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)) ∈ ℂ) → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
1433, 140, 142syl2anc 595 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝐴)))
144143, 132eqtr2d 2798 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗)))) = ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
145144mpteq2dva 5203 . . . . . 6 (𝜑 → (𝑗 ∈ ℕ ↦ (vol‘((1st ‘(𝐹𝑗))[,)(2nd ‘(𝐹𝑗))))) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
146109, 145eqtrd 2797 . . . . 5 (𝜑 → ((vol ∘ [,)) ∘ 𝐹) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
147146fveq2d 6885 . . . 4 (𝜑 → (Σ^‘((vol ∘ [,)) ∘ 𝐹)) = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
148102, 147eqtrd 2797 . . 3 (𝜑𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
149101, 148jca 520 . 2 (𝜑 → ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))))
150 fveq1 6880 . . . . . . . . 9 (𝑖 = 𝐼 → (𝑖𝑗) = (𝐼𝑗))
151150coeq2d 5847 . . . . . . . 8 (𝑖 = 𝐼 → ([,) ∘ (𝑖𝑗)) = ([,) ∘ (𝐼𝑗)))
152151fveq1d 6883 . . . . . . 7 (𝑖 = 𝐼 → (([,) ∘ (𝑖𝑗))‘𝑘) = (([,) ∘ (𝐼𝑗))‘𝑘))
153152ixpeq2dv 8909 . . . . . 6 (𝑖 = 𝐼X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) = X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
154153iuneq2d 4986 . . . . 5 (𝑖 = 𝐼 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) = 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘))
155154sseq2d 3968 . . . 4 (𝑖 = 𝐼 → ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ↔ (𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘)))
156 simpl 487 . . . . . . . . . . . 12 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → 𝑖 = 𝐼)
157156fveq1d 6883 . . . . . . . . . . 11 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (𝑖𝑗) = (𝐼𝑗))
158157coeq2d 5847 . . . . . . . . . 10 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → ([,) ∘ (𝑖𝑗)) = ([,) ∘ (𝐼𝑗)))
159158fveq1d 6883 . . . . . . . . 9 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (([,) ∘ (𝑖𝑗))‘𝑘) = (([,) ∘ (𝐼𝑗))‘𝑘))
160159fveq2d 6885 . . . . . . . 8 ((𝑖 = 𝐼𝑘 ∈ {𝐴}) → (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)) = (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
161160prodeq2dv 15983 . . . . . . 7 (𝑖 = 𝐼 → ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)) = ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))
162161mpteq2dv 5204 . . . . . 6 (𝑖 = 𝐼 → (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))) = (𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))
163162fveq2d 6885 . . . . 5 (𝑖 = 𝐼 → (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)))) = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))
164163eqeq2d 2773 . . . 4 (𝑖 = 𝐼 → (𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘)))) ↔ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘))))))
165155, 164anbi12d 643 . . 3 (𝑖 = 𝐼 → (((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))) ↔ ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))))
166165rspcev 3580 . 2 ((𝐼 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ) ∧ ((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝐼𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝐼𝑗))‘𝑘)))))) → ∃𝑖 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ)((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
16726, 149, 166syl2anc 595 1 (𝜑 → ∃𝑖 ∈ (((ℝ × ℝ) ↑m {𝐴}) ↑m ℕ)((𝐵m {𝐴}) ⊆ 𝑗 ∈ ℕ X𝑘 ∈ {𝐴} (([,) ∘ (𝑖𝑗))‘𝑘) ∧ 𝑍 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ {𝐴} (vol‘(([,) ∘ (𝑖𝑗))‘𝑘))))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400   = wceq 1569  wcel 2142  wrex 3088  Vcvv 3454  wss 3904  𝒫 cpw 4561  {csn 4588  cop 4594   cuni 4871   ciun 4955  cmpt 5191   × cxp 5658  dom cdm 5660  ran crn 5661  ccom 5664  Fun wfun 6530   Fn wfn 6531  wf 6532  cfv 6536  (class class class)co 7412  1st c1st 7982  2nd c2nd 7983  m cmap 8822  Xcixp 8893  cc 11104  cr 11105  *cxr 11248  cn 12239  [,)cico 13380  cprod 15964  volcvol 25633  Σ^csumge0 47104
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734  ax-inf2 9608  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  ax-pre-sup 11184
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1103  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-int 4912  df-iun 4957  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5555  df-eprel 5560  df-po 5568  df-so 5569  df-fr 5613  df-se 5614  df-we 5615  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7676  df-om 7861  df-1st 7984  df-2nd 7985  df-frecs 8276  df-wrecs 8307  df-recs 8356  df-rdg 8395  df-1o 8451  df-2o 8452  df-er 8692  df-map 8824  df-pm 8825  df-ixp 8894  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-fi 9369  df-sup 9400  df-inf 9401  df-oi 9470  df-dju 9894  df-card 9932  df-pnf 11251  df-mnf 11252  df-xr 11253  df-ltxr 11254  df-le 11255  df-sub 11449  df-neg 11450  df-div 11878  df-nn 12240  df-2 12309  df-3 12310  df-n0 12511  df-z 12598  df-uz 12869  df-q 12979  df-rp 13023  df-xneg 13143  df-xadd 13144  df-xmul 13145  df-ioo 13382  df-ico 13384  df-icc 13385  df-fz 13542  df-fzo 13690  df-fl 13832  df-seq 14045  df-exp 14105  df-hash 14374  df-cj 15157  df-re 15158  df-im 15159  df-sqrt 15293  df-abs 15294  df-clim 15546  df-rlim 15547  df-sum 15745  df-prod 15965  df-rest 17481  df-topgen 17502  df-psmet 21525  df-xmet 21526  df-met 21527  df-bl 21528  df-mopn 21529  df-top 23062  df-topon 23079  df-bases 23114  df-cmp 23555  df-ovol 25634  df-vol 25635
This theorem is used by:  ovnovollem3  47400
  Copyright terms: Public domain W3C validator