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

Theorem vonicclem2 45885
Description: The n-dimensional Lebesgue measure of closed intervals. This is the second statement in Proposition 115G (d) of [Fremlin1] p. 32. (Contributed by Glauco Siliprandi, 8-Apr-2021.)
Hypotheses
Ref Expression
vonicclem2.x (πœ‘ β†’ 𝑋 ∈ Fin)
vonicclem2.a (πœ‘ β†’ 𝐴:π‘‹βŸΆβ„)
vonicclem2.b (πœ‘ β†’ 𝐡:π‘‹βŸΆβ„)
vonicclem2.n (πœ‘ β†’ 𝑋 β‰  βˆ…)
vonicclem2.t ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ≀ (π΅β€˜π‘˜))
vonicclem2.i 𝐼 = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,](π΅β€˜π‘˜))
vonicclem2.c 𝐢 = (𝑛 ∈ β„• ↦ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))))
vonicclem2.d 𝐷 = (𝑛 ∈ β„• ↦ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)))
Assertion
Ref Expression
vonicclem2 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜πΌ) = βˆπ‘˜ ∈ 𝑋 ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
Distinct variable groups:   𝐴,π‘˜,𝑛   𝐡,π‘˜,𝑛   𝐢,π‘˜,𝑛   𝐷,𝑛   𝑛,𝐼   π‘˜,𝑋,𝑛   πœ‘,π‘˜,𝑛
Allowed substitution hints:   𝐷(π‘˜)   𝐼(π‘˜)

Proof of Theorem vonicclem2
Dummy variable π‘š is distinct from all other variables.
StepHypRef Expression
1 nfv 1909 . . . 4 β„²π‘›πœ‘
2 vonicclem2.x . . . . 5 (πœ‘ β†’ 𝑋 ∈ Fin)
32vonmea 45775 . . . 4 (πœ‘ β†’ (volnβ€˜π‘‹) ∈ Meas)
4 1zzd 12590 . . . 4 (πœ‘ β†’ 1 ∈ β„€)
5 nnuz 12862 . . . 4 β„• = (β„€β‰₯β€˜1)
62adantr 480 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝑋 ∈ Fin)
7 eqid 2724 . . . . . 6 dom (volnβ€˜π‘‹) = dom (volnβ€˜π‘‹)
8 vonicclem2.a . . . . . . 7 (πœ‘ β†’ 𝐴:π‘‹βŸΆβ„)
98adantr 480 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝐴:π‘‹βŸΆβ„)
10 vonicclem2.b . . . . . . . . . . 11 (πœ‘ β†’ 𝐡:π‘‹βŸΆβ„)
1110ffvelcdmda 7076 . . . . . . . . . 10 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ (π΅β€˜π‘˜) ∈ ℝ)
1211adantlr 712 . . . . . . . . 9 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (π΅β€˜π‘˜) ∈ ℝ)
13 nnrecre 12251 . . . . . . . . . 10 (𝑛 ∈ β„• β†’ (1 / 𝑛) ∈ ℝ)
1413ad2antlr 724 . . . . . . . . 9 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (1 / 𝑛) ∈ ℝ)
1512, 14readdcld 11240 . . . . . . . 8 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((π΅β€˜π‘˜) + (1 / 𝑛)) ∈ ℝ)
1615fmpttd 7106 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))):π‘‹βŸΆβ„)
17 vonicclem2.c . . . . . . . . . 10 𝐢 = (𝑛 ∈ β„• ↦ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))))
1817a1i 11 . . . . . . . . 9 (πœ‘ β†’ 𝐢 = (𝑛 ∈ β„• ↦ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛)))))
192mptexd 7217 . . . . . . . . . 10 (πœ‘ β†’ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))) ∈ V)
2019adantr 480 . . . . . . . . 9 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))) ∈ V)
2118, 20fvmpt2d 7001 . . . . . . . 8 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (πΆβ€˜π‘›) = (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))))
2221feq1d 6692 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ ((πΆβ€˜π‘›):π‘‹βŸΆβ„ ↔ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))):π‘‹βŸΆβ„))
2316, 22mpbird 257 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (πΆβ€˜π‘›):π‘‹βŸΆβ„)
246, 7, 9, 23hoimbl 45832 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) ∈ dom (volnβ€˜π‘‹))
25 vonicclem2.d . . . . 5 𝐷 = (𝑛 ∈ β„• ↦ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)))
2624, 25fmptd 7105 . . . 4 (πœ‘ β†’ 𝐷:β„•βŸΆdom (volnβ€˜π‘‹))
27 nfv 1909 . . . . . 6 β„²π‘˜(πœ‘ ∧ 𝑛 ∈ β„•)
28 ressxr 11255 . . . . . . . . 9 ℝ βŠ† ℝ*
298ffvelcdmda 7076 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ∈ ℝ)
3028, 29sselid 3972 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ∈ ℝ*)
3130adantlr 712 . . . . . . 7 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ∈ ℝ*)
32 ovexd 7436 . . . . . . . . . 10 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((π΅β€˜π‘˜) + (1 / 𝑛)) ∈ V)
3321, 32fvmpt2d 7001 . . . . . . . . 9 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜π‘›)β€˜π‘˜) = ((π΅β€˜π‘˜) + (1 / 𝑛)))
3433, 15eqeltrd 2825 . . . . . . . 8 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜π‘›)β€˜π‘˜) ∈ ℝ)
3534rexrd 11261 . . . . . . 7 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜π‘›)β€˜π‘˜) ∈ ℝ*)
369ffvelcdmda 7076 . . . . . . . 8 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ∈ ℝ)
3736leidd 11777 . . . . . . 7 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ≀ (π΄β€˜π‘˜))
38 1red 11212 . . . . . . . . . . 11 (𝑛 ∈ β„• β†’ 1 ∈ ℝ)
39 nnre 12216 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ 𝑛 ∈ ℝ)
4039, 38readdcld 11240 . . . . . . . . . . 11 (𝑛 ∈ β„• β†’ (𝑛 + 1) ∈ ℝ)
41 peano2nn 12221 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ (𝑛 + 1) ∈ β„•)
42 nnne0 12243 . . . . . . . . . . . 12 ((𝑛 + 1) ∈ β„• β†’ (𝑛 + 1) β‰  0)
4341, 42syl 17 . . . . . . . . . . 11 (𝑛 ∈ β„• β†’ (𝑛 + 1) β‰  0)
4438, 40, 43redivcld 12039 . . . . . . . . . 10 (𝑛 ∈ β„• β†’ (1 / (𝑛 + 1)) ∈ ℝ)
4544ad2antlr 724 . . . . . . . . 9 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (1 / (𝑛 + 1)) ∈ ℝ)
4639ltp1d 12141 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ 𝑛 < (𝑛 + 1))
47 nnrp 12982 . . . . . . . . . . . . 13 (𝑛 ∈ β„• β†’ 𝑛 ∈ ℝ+)
4841nnrpd 13011 . . . . . . . . . . . . 13 (𝑛 ∈ β„• β†’ (𝑛 + 1) ∈ ℝ+)
4947, 48ltrecd 13031 . . . . . . . . . . . 12 (𝑛 ∈ β„• β†’ (𝑛 < (𝑛 + 1) ↔ (1 / (𝑛 + 1)) < (1 / 𝑛)))
5046, 49mpbid 231 . . . . . . . . . . 11 (𝑛 ∈ β„• β†’ (1 / (𝑛 + 1)) < (1 / 𝑛))
5144, 13, 50ltled 11359 . . . . . . . . . 10 (𝑛 ∈ β„• β†’ (1 / (𝑛 + 1)) ≀ (1 / 𝑛))
5251ad2antlr 724 . . . . . . . . 9 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (1 / (𝑛 + 1)) ≀ (1 / 𝑛))
5345, 14, 12, 52leadd2dd 11826 . . . . . . . 8 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((π΅β€˜π‘˜) + (1 / (𝑛 + 1))) ≀ ((π΅β€˜π‘˜) + (1 / 𝑛)))
54 oveq2 7409 . . . . . . . . . . . . . . 15 (𝑛 = π‘š β†’ (1 / 𝑛) = (1 / π‘š))
5554oveq2d 7417 . . . . . . . . . . . . . 14 (𝑛 = π‘š β†’ ((π΅β€˜π‘˜) + (1 / 𝑛)) = ((π΅β€˜π‘˜) + (1 / π‘š)))
5655mpteq2dv 5240 . . . . . . . . . . . . 13 (𝑛 = π‘š β†’ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛))) = (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / π‘š))))
5756cbvmptv 5251 . . . . . . . . . . . 12 (𝑛 ∈ β„• ↦ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / 𝑛)))) = (π‘š ∈ β„• ↦ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / π‘š))))
5817, 57eqtri 2752 . . . . . . . . . . 11 𝐢 = (π‘š ∈ β„• ↦ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / π‘š))))
59 oveq2 7409 . . . . . . . . . . . . 13 (π‘š = (𝑛 + 1) β†’ (1 / π‘š) = (1 / (𝑛 + 1)))
6059oveq2d 7417 . . . . . . . . . . . 12 (π‘š = (𝑛 + 1) β†’ ((π΅β€˜π‘˜) + (1 / π‘š)) = ((π΅β€˜π‘˜) + (1 / (𝑛 + 1))))
6160mpteq2dv 5240 . . . . . . . . . . 11 (π‘š = (𝑛 + 1) β†’ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / π‘š))) = (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / (𝑛 + 1)))))
62 simpr 484 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝑛 ∈ β„•)
6362peano2nnd 12226 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (𝑛 + 1) ∈ β„•)
646mptexd 7217 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / (𝑛 + 1)))) ∈ V)
6558, 61, 63, 64fvmptd3 7011 . . . . . . . . . 10 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (πΆβ€˜(𝑛 + 1)) = (π‘˜ ∈ 𝑋 ↦ ((π΅β€˜π‘˜) + (1 / (𝑛 + 1)))))
66 ovexd 7436 . . . . . . . . . 10 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((π΅β€˜π‘˜) + (1 / (𝑛 + 1))) ∈ V)
6765, 66fvmpt2d 7001 . . . . . . . . 9 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜(𝑛 + 1))β€˜π‘˜) = ((π΅β€˜π‘˜) + (1 / (𝑛 + 1))))
6867, 33breq12d 5151 . . . . . . . 8 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ (((πΆβ€˜(𝑛 + 1))β€˜π‘˜) ≀ ((πΆβ€˜π‘›)β€˜π‘˜) ↔ ((π΅β€˜π‘˜) + (1 / (𝑛 + 1))) ≀ ((π΅β€˜π‘˜) + (1 / 𝑛))))
6953, 68mpbird 257 . . . . . . 7 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜(𝑛 + 1))β€˜π‘˜) ≀ ((πΆβ€˜π‘›)β€˜π‘˜))
70 icossico 13391 . . . . . . 7 ((((π΄β€˜π‘˜) ∈ ℝ* ∧ ((πΆβ€˜π‘›)β€˜π‘˜) ∈ ℝ*) ∧ ((π΄β€˜π‘˜) ≀ (π΄β€˜π‘˜) ∧ ((πΆβ€˜(𝑛 + 1))β€˜π‘˜) ≀ ((πΆβ€˜π‘›)β€˜π‘˜))) β†’ ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) βŠ† ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)))
7131, 35, 37, 69, 70syl22anc 836 . . . . . 6 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) βŠ† ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)))
7227, 71ixpssixp 44269 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) βŠ† Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)))
73 fveq2 6881 . . . . . . . . . . . 12 (𝑛 = π‘š β†’ (πΆβ€˜π‘›) = (πΆβ€˜π‘š))
7473fveq1d 6883 . . . . . . . . . . 11 (𝑛 = π‘š β†’ ((πΆβ€˜π‘›)β€˜π‘˜) = ((πΆβ€˜π‘š)β€˜π‘˜))
7574oveq2d 7417 . . . . . . . . . 10 (𝑛 = π‘š β†’ ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘š)β€˜π‘˜)))
7675ixpeq2dv 8903 . . . . . . . . 9 (𝑛 = π‘š β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘š)β€˜π‘˜)))
7776cbvmptv 5251 . . . . . . . 8 (𝑛 ∈ β„• ↦ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜))) = (π‘š ∈ β„• ↦ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘š)β€˜π‘˜)))
7825, 77eqtri 2752 . . . . . . 7 𝐷 = (π‘š ∈ β„• ↦ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘š)β€˜π‘˜)))
79 fveq2 6881 . . . . . . . . . 10 (π‘š = (𝑛 + 1) β†’ (πΆβ€˜π‘š) = (πΆβ€˜(𝑛 + 1)))
8079fveq1d 6883 . . . . . . . . 9 (π‘š = (𝑛 + 1) β†’ ((πΆβ€˜π‘š)β€˜π‘˜) = ((πΆβ€˜(𝑛 + 1))β€˜π‘˜))
8180oveq2d 7417 . . . . . . . 8 (π‘š = (𝑛 + 1) β†’ ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘š)β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)))
8281ixpeq2dv 8903 . . . . . . 7 (π‘š = (𝑛 + 1) β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘š)β€˜π‘˜)) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)))
83 ovex 7434 . . . . . . . . . 10 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) ∈ V
8483rgenw 3057 . . . . . . . . 9 βˆ€π‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) ∈ V
85 ixpexg 8912 . . . . . . . . 9 (βˆ€π‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) ∈ V β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) ∈ V)
8684, 85ax-mp 5 . . . . . . . 8 Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) ∈ V
8786a1i 11 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) ∈ V)
8878, 82, 63, 87fvmptd3 7011 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π·β€˜(𝑛 + 1)) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)))
8925a1i 11 . . . . . . 7 (πœ‘ β†’ 𝐷 = (𝑛 ∈ β„• ↦ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜))))
9024elexd 3487 . . . . . . 7 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) ∈ V)
9189, 90fvmpt2d 7001 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π·β€˜π‘›) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)))
9288, 91sseq12d 4007 . . . . 5 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ ((π·β€˜(𝑛 + 1)) βŠ† (π·β€˜π‘›) ↔ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜(𝑛 + 1))β€˜π‘˜)) βŠ† Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜))))
9372, 92mpbird 257 . . . 4 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π·β€˜(𝑛 + 1)) βŠ† (π·β€˜π‘›))
94 1nn 12220 . . . . . 6 1 ∈ β„•
9594, 5eleqtri 2823 . . . . 5 1 ∈ (β„€β‰₯β€˜1)
9695a1i 11 . . . 4 (πœ‘ β†’ 1 ∈ (β„€β‰₯β€˜1))
97 fveq2 6881 . . . . . . . . . 10 (𝑛 = 1 β†’ (πΆβ€˜π‘›) = (πΆβ€˜1))
9897fveq1d 6883 . . . . . . . . 9 (𝑛 = 1 β†’ ((πΆβ€˜π‘›)β€˜π‘˜) = ((πΆβ€˜1)β€˜π‘˜))
9998oveq2d 7417 . . . . . . . 8 (𝑛 = 1 β†’ ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)))
10099ixpeq2dv 8903 . . . . . . 7 (𝑛 = 1 β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)))
10194a1i 11 . . . . . . 7 (πœ‘ β†’ 1 ∈ β„•)
102 ovex 7434 . . . . . . . . . 10 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)) ∈ V
103102rgenw 3057 . . . . . . . . 9 βˆ€π‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)) ∈ V
104 ixpexg 8912 . . . . . . . . 9 (βˆ€π‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)) ∈ V β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)) ∈ V)
105103, 104ax-mp 5 . . . . . . . 8 Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)) ∈ V
106105a1i 11 . . . . . . 7 (πœ‘ β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)) ∈ V)
10725, 100, 101, 106fvmptd3 7011 . . . . . 6 (πœ‘ β†’ (π·β€˜1) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜)))
108107fveq2d 6885 . . . . 5 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜(π·β€˜1)) = ((volnβ€˜π‘‹)β€˜Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜))))
109 nfv 1909 . . . . . 6 β„²π‘˜πœ‘
110 simpl 482 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ πœ‘)
11194a1i 11 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ 1 ∈ β„•)
112 simpr 484 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ π‘˜ ∈ 𝑋)
11394elexi 3486 . . . . . . . 8 1 ∈ V
114 eleq1 2813 . . . . . . . . . . 11 (𝑛 = 1 β†’ (𝑛 ∈ β„• ↔ 1 ∈ β„•))
115114anbi2d 628 . . . . . . . . . 10 (𝑛 = 1 β†’ ((πœ‘ ∧ 𝑛 ∈ β„•) ↔ (πœ‘ ∧ 1 ∈ β„•)))
116115anbi1d 629 . . . . . . . . 9 (𝑛 = 1 β†’ (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) ↔ ((πœ‘ ∧ 1 ∈ β„•) ∧ π‘˜ ∈ 𝑋)))
11798eleq1d 2810 . . . . . . . . 9 (𝑛 = 1 β†’ (((πΆβ€˜π‘›)β€˜π‘˜) ∈ ℝ ↔ ((πΆβ€˜1)β€˜π‘˜) ∈ ℝ))
118116, 117imbi12d 344 . . . . . . . 8 (𝑛 = 1 β†’ ((((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜π‘›)β€˜π‘˜) ∈ ℝ) ↔ (((πœ‘ ∧ 1 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜1)β€˜π‘˜) ∈ ℝ)))
119113, 118, 34vtocl 3538 . . . . . . 7 (((πœ‘ ∧ 1 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜1)β€˜π‘˜) ∈ ℝ)
120110, 111, 112, 119syl21anc 835 . . . . . 6 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ ((πΆβ€˜1)β€˜π‘˜) ∈ ℝ)
121109, 2, 29, 120vonhoire 45873 . . . . 5 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜1)β€˜π‘˜))) ∈ ℝ)
122108, 121eqeltrd 2825 . . . 4 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜(π·β€˜1)) ∈ ℝ)
123 eqid 2724 . . . 4 (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) = (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›)))
1241, 3, 4, 5, 26, 93, 96, 122, 123meaiininc 45688 . . 3 (πœ‘ β†’ (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) ⇝ ((volnβ€˜π‘‹)β€˜βˆ© 𝑛 ∈ β„• (π·β€˜π‘›)))
125109, 29, 11iinhoiicc 45875 . . . . . . 7 (πœ‘ β†’ ∩ 𝑛 ∈ β„• Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((π΅β€˜π‘˜) + (1 / 𝑛))) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,](π΅β€˜π‘˜)))
12633oveq2d 7417 . . . . . . . . . 10 (((πœ‘ ∧ 𝑛 ∈ β„•) ∧ π‘˜ ∈ 𝑋) β†’ ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) = ((π΄β€˜π‘˜)[,)((π΅β€˜π‘˜) + (1 / 𝑛))))
127126ixpeq2dva 8902 . . . . . . . . 9 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((πΆβ€˜π‘›)β€˜π‘˜)) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((π΅β€˜π‘˜) + (1 / 𝑛))))
12891, 127eqtrd 2764 . . . . . . . 8 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (π·β€˜π‘›) = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((π΅β€˜π‘˜) + (1 / 𝑛))))
129128iineq2dv 5012 . . . . . . 7 (πœ‘ β†’ ∩ 𝑛 ∈ β„• (π·β€˜π‘›) = ∩ 𝑛 ∈ β„• Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,)((π΅β€˜π‘˜) + (1 / 𝑛))))
130 vonicclem2.i . . . . . . . 8 𝐼 = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,](π΅β€˜π‘˜))
131130a1i 11 . . . . . . 7 (πœ‘ β†’ 𝐼 = Xπ‘˜ ∈ 𝑋 ((π΄β€˜π‘˜)[,](π΅β€˜π‘˜)))
132125, 129, 1313eqtr4d 2774 . . . . . 6 (πœ‘ β†’ ∩ 𝑛 ∈ β„• (π·β€˜π‘›) = 𝐼)
133132eqcomd 2730 . . . . 5 (πœ‘ β†’ 𝐼 = ∩ 𝑛 ∈ β„• (π·β€˜π‘›))
134133fveq2d 6885 . . . 4 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜πΌ) = ((volnβ€˜π‘‹)β€˜βˆ© 𝑛 ∈ β„• (π·β€˜π‘›)))
135134eqcomd 2730 . . 3 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜βˆ© 𝑛 ∈ β„• (π·β€˜π‘›)) = ((volnβ€˜π‘‹)β€˜πΌ))
136124, 135breqtrd 5164 . 2 (πœ‘ β†’ (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) ⇝ ((volnβ€˜π‘‹)β€˜πΌ))
137 2fveq3 6886 . . . . 5 (𝑛 = π‘š β†’ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›)) = ((volnβ€˜π‘‹)β€˜(π·β€˜π‘š)))
138137cbvmptv 5251 . . . 4 (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) = (π‘š ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘š)))
139138a1i 11 . . 3 (πœ‘ β†’ (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) = (π‘š ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘š))))
140 vonicclem2.n . . . 4 (πœ‘ β†’ 𝑋 β‰  βˆ…)
141 vonicclem2.t . . . 4 ((πœ‘ ∧ π‘˜ ∈ 𝑋) β†’ (π΄β€˜π‘˜) ≀ (π΅β€˜π‘˜))
142138eqcomi 2733 . . . 4 (π‘š ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘š))) = (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›)))
1432, 8, 10, 140, 141, 17, 25, 142vonicclem1 45884 . . 3 (πœ‘ β†’ (π‘š ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘š))) ⇝ βˆπ‘˜ ∈ 𝑋 ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
144139, 143eqbrtrd 5160 . 2 (πœ‘ β†’ (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) ⇝ βˆπ‘˜ ∈ 𝑋 ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
145 climuni 15493 . 2 (((𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) ⇝ ((volnβ€˜π‘‹)β€˜πΌ) ∧ (𝑛 ∈ β„• ↦ ((volnβ€˜π‘‹)β€˜(π·β€˜π‘›))) ⇝ βˆπ‘˜ ∈ 𝑋 ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜))) β†’ ((volnβ€˜π‘‹)β€˜πΌ) = βˆπ‘˜ ∈ 𝑋 ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
146136, 144, 145syl2anc 583 1 (πœ‘ β†’ ((volnβ€˜π‘‹)β€˜πΌ) = βˆπ‘˜ ∈ 𝑋 ((π΅β€˜π‘˜) βˆ’ (π΄β€˜π‘˜)))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ∧ wa 395   = wceq 1533   ∈ wcel 2098   β‰  wne 2932  βˆ€wral 3053  Vcvv 3466   βŠ† wss 3940  βˆ…c0 4314  βˆ© ciin 4988   class class class wbr 5138   ↦ cmpt 5221  dom cdm 5666  βŸΆwf 6529  β€˜cfv 6533  (class class class)co 7401  Xcixp 8887  Fincfn 8935  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109  β„*cxr 11244   < clt 11245   ≀ cle 11246   βˆ’ cmin 11441   / cdiv 11868  β„•cn 12209  β„€β‰₯cuz 12819  [,)cico 13323  [,]cicc 13324   ⇝ cli 15425  βˆcprod 15846  volncvoln 45739
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9632  ax-cc 10426  ax-ac2 10454  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  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-disj 5104  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  df-tpos 8206  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-omul 8466  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-acn 9933  df-ac 10107  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-fl 13754  df-seq 13964  df-exp 14025  df-hash 14288  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-clim 15429  df-rlim 15430  df-sum 15630  df-prod 15847  df-struct 17079  df-sets 17096  df-slot 17114  df-ndx 17126  df-base 17144  df-ress 17173  df-plusg 17209  df-mulr 17210  df-starv 17211  df-sca 17212  df-vsca 17213  df-ip 17214  df-tset 17215  df-ple 17216  df-ds 17218  df-unif 17219  df-hom 17220  df-cco 17221  df-rest 17367  df-topn 17368  df-0g 17386  df-gsum 17387  df-topgen 17388  df-pt 17389  df-prds 17392  df-xrs 17447  df-qtop 17452  df-imas 17453  df-xps 17455  df-mre 17529  df-mrc 17530  df-acs 17532  df-mgm 18563  df-sgrp 18642  df-mnd 18658  df-submnd 18704  df-grp 18856  df-minusg 18857  df-mulg 18986  df-subg 19040  df-cntz 19223  df-cmn 19692  df-abl 19693  df-mgp 20030  df-rng 20048  df-ur 20077  df-ring 20130  df-cring 20131  df-oppr 20226  df-dvdsr 20249  df-unit 20250  df-invr 20280  df-dvr 20293  df-drng 20579  df-psmet 21220  df-xmet 21221  df-met 21222  df-bl 21223  df-mopn 21224  df-cnfld 21229  df-top 22718  df-topon 22735  df-topsp 22757  df-bases 22771  df-cn 23053  df-cnp 23054  df-cmp 23213  df-tx 23388  df-hmeo 23581  df-xms 24148  df-ms 24149  df-tms 24150  df-cncf 24720  df-ovol 25315  df-vol 25316  df-salg 45510  df-sumge0 45564  df-mea 45651  df-ome 45691  df-caragen 45693  df-ovoln 45738  df-voln 45740
This theorem is referenced by:  vonicc  45886
  Copyright terms: Public domain W3C validator