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

Theorem volcn 25820
Description: The function formed by restricting a measurable set to a closed interval with a varying endpoint produces an increasing continuous function on the reals. (Contributed by Mario Carneiro, 30-Aug-2014.)
Hypothesis
Ref Expression
volcn.1 𝐹 = (𝑥 ∈ ℝ ↦ (vol‘(𝐴 ∩ (𝐵[,]𝑥))))
Assertion
Ref Expression
volcn ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → 𝐹 ∈ (ℝ–cn→ℝ))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵
Allowed substitution hint:   𝐹(𝑥)

Proof of Theorem volcn
Dummy variables 𝑢 𝑒 𝑣 𝑦 𝑧 𝑑 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpll 779 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → 𝐴 ∈ dom vol)
2 iccmbl 25780 . . . . . . 7 ((𝐵 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ∈ dom vol)
32adantll 727 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ∈ dom vol)
4 inmbl 25756 . . . . . 6 ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑥) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol)
51, 3, 4syl2anc 596 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol)
6 mblvol 25744 . . . . 5 ((𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑥))))
75, 6syl 18 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑥))))
8 inss2 4190 . . . . 5 (𝐴 ∩ (𝐵[,]𝑥)) ⊆ (𝐵[,]𝑥)
9 mblss 25745 . . . . . 6 ((𝐵[,]𝑥) ∈ dom vol → (𝐵[,]𝑥) ⊆ ℝ)
103, 9syl 18 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ⊆ ℝ)
11 mblvol 25744 . . . . . . 7 ((𝐵[,]𝑥) ∈ dom vol → (vol‘(𝐵[,]𝑥)) = (vol*‘(𝐵[,]𝑥)))
123, 11syl 18 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐵[,]𝑥)) = (vol*‘(𝐵[,]𝑥)))
13 iccvolcl 25781 . . . . . . 7 ((𝐵 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (vol‘(𝐵[,]𝑥)) ∈ ℝ)
1413adantll 727 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐵[,]𝑥)) ∈ ℝ)
1512, 14eqeltrrd 2866 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol*‘(𝐵[,]𝑥)) ∈ ℝ)
16 ovolsscl 25700 . . . . 5 (((𝐴 ∩ (𝐵[,]𝑥)) ⊆ (𝐵[,]𝑥) ∧ (𝐵[,]𝑥) ⊆ ℝ ∧ (vol*‘(𝐵[,]𝑥)) ∈ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ)
178, 10, 15, 16mp3an2i 1495 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ)
187, 17eqeltrd 2865 . . 3 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ)
19 volcn.1 . . 3 𝐹 = (𝑥 ∈ ℝ ↦ (vol‘(𝐴 ∩ (𝐵[,]𝑥))))
2018, 19fmptd 7113 . 2 ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → 𝐹:ℝ⟶ℝ)
21 simprr 785 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+)) → 𝑒 ∈ ℝ+)
22 oveq12 7428 . . . . . . . . . . . . 13 ((𝑣 = 𝑧𝑢 = 𝑦) → (𝑣𝑢) = (𝑧𝑦))
2322ancoms 464 . . . . . . . . . . . 12 ((𝑢 = 𝑦𝑣 = 𝑧) → (𝑣𝑢) = (𝑧𝑦))
2423fveq2d 6889 . . . . . . . . . . 11 ((𝑢 = 𝑦𝑣 = 𝑧) → (abs‘(𝑣𝑢)) = (abs‘(𝑧𝑦)))
2524breq1d 5121 . . . . . . . . . 10 ((𝑢 = 𝑦𝑣 = 𝑧) → ((abs‘(𝑣𝑢)) < 𝑒 ↔ (abs‘(𝑧𝑦)) < 𝑒))
26 fveq2 6885 . . . . . . . . . . . . 13 (𝑣 = 𝑧 → (𝐹𝑣) = (𝐹𝑧))
27 fveq2 6885 . . . . . . . . . . . . 13 (𝑢 = 𝑦 → (𝐹𝑢) = (𝐹𝑦))
2826, 27oveqan12rd 7439 . . . . . . . . . . . 12 ((𝑢 = 𝑦𝑣 = 𝑧) → ((𝐹𝑣) − (𝐹𝑢)) = ((𝐹𝑧) − (𝐹𝑦)))
2928fveq2d 6889 . . . . . . . . . . 11 ((𝑢 = 𝑦𝑣 = 𝑧) → (abs‘((𝐹𝑣) − (𝐹𝑢))) = (abs‘((𝐹𝑧) − (𝐹𝑦))))
3029breq1d 5121 . . . . . . . . . 10 ((𝑢 = 𝑦𝑣 = 𝑧) → ((abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒 ↔ (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
3125, 30imbi12d 347 . . . . . . . . 9 ((𝑢 = 𝑦𝑣 = 𝑧) → (((abs‘(𝑣𝑢)) < 𝑒 → (abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒) ↔ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒)))
32 oveq12 7428 . . . . . . . . . . . . 13 ((𝑣 = 𝑦𝑢 = 𝑧) → (𝑣𝑢) = (𝑦𝑧))
3332ancoms 464 . . . . . . . . . . . 12 ((𝑢 = 𝑧𝑣 = 𝑦) → (𝑣𝑢) = (𝑦𝑧))
3433fveq2d 6889 . . . . . . . . . . 11 ((𝑢 = 𝑧𝑣 = 𝑦) → (abs‘(𝑣𝑢)) = (abs‘(𝑦𝑧)))
3534breq1d 5121 . . . . . . . . . 10 ((𝑢 = 𝑧𝑣 = 𝑦) → ((abs‘(𝑣𝑢)) < 𝑒 ↔ (abs‘(𝑦𝑧)) < 𝑒))
36 fveq2 6885 . . . . . . . . . . . . 13 (𝑣 = 𝑦 → (𝐹𝑣) = (𝐹𝑦))
37 fveq2 6885 . . . . . . . . . . . . 13 (𝑢 = 𝑧 → (𝐹𝑢) = (𝐹𝑧))
3836, 37oveqan12rd 7439 . . . . . . . . . . . 12 ((𝑢 = 𝑧𝑣 = 𝑦) → ((𝐹𝑣) − (𝐹𝑢)) = ((𝐹𝑦) − (𝐹𝑧)))
3938fveq2d 6889 . . . . . . . . . . 11 ((𝑢 = 𝑧𝑣 = 𝑦) → (abs‘((𝐹𝑣) − (𝐹𝑢))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
4039breq1d 5121 . . . . . . . . . 10 ((𝑢 = 𝑧𝑣 = 𝑦) → ((abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒 ↔ (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒))
4135, 40imbi12d 347 . . . . . . . . 9 ((𝑢 = 𝑧𝑣 = 𝑦) → (((abs‘(𝑣𝑢)) < 𝑒 → (abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒) ↔ ((abs‘(𝑦𝑧)) < 𝑒 → (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒)))
42 ssidd 3961 . . . . . . . . 9 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) → ℝ ⊆ ℝ)
43 recn 11209 . . . . . . . . . . . . 13 (𝑧 ∈ ℝ → 𝑧 ∈ ℂ)
44 recn 11209 . . . . . . . . . . . . 13 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
45 abssub 15406 . . . . . . . . . . . . 13 ((𝑧 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (abs‘(𝑧𝑦)) = (abs‘(𝑦𝑧)))
4643, 44, 45syl2anr 609 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (abs‘(𝑧𝑦)) = (abs‘(𝑦𝑧)))
4746adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → (abs‘(𝑧𝑦)) = (abs‘(𝑦𝑧)))
4847breq1d 5121 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((abs‘(𝑧𝑦)) < 𝑒 ↔ (abs‘(𝑦𝑧)) < 𝑒))
4920adantr 486 . . . . . . . . . . . . 13 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) → 𝐹:ℝ⟶ℝ)
50 ffvelcdm 7080 . . . . . . . . . . . . . 14 ((𝐹:ℝ⟶ℝ ∧ 𝑦 ∈ ℝ) → (𝐹𝑦) ∈ ℝ)
51 ffvelcdm 7080 . . . . . . . . . . . . . 14 ((𝐹:ℝ⟶ℝ ∧ 𝑧 ∈ ℝ) → (𝐹𝑧) ∈ ℝ)
5250, 51anim12dan 631 . . . . . . . . . . . . 13 ((𝐹:ℝ⟶ℝ ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((𝐹𝑦) ∈ ℝ ∧ (𝐹𝑧) ∈ ℝ))
5349, 52sylan 592 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((𝐹𝑦) ∈ ℝ ∧ (𝐹𝑧) ∈ ℝ))
54 recn 11209 . . . . . . . . . . . . 13 ((𝐹𝑧) ∈ ℝ → (𝐹𝑧) ∈ ℂ)
55 recn 11209 . . . . . . . . . . . . 13 ((𝐹𝑦) ∈ ℝ → (𝐹𝑦) ∈ ℂ)
56 abssub 15406 . . . . . . . . . . . . 13 (((𝐹𝑧) ∈ ℂ ∧ (𝐹𝑦) ∈ ℂ) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
5754, 55, 56syl2anr 609 . . . . . . . . . . . 12 (((𝐹𝑦) ∈ ℝ ∧ (𝐹𝑧) ∈ ℝ) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
5853, 57syl 18 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
5958breq1d 5121 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒 ↔ (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒))
6048, 59imbi12d 347 . . . . . . . . 9 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → (((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒) ↔ ((abs‘(𝑦𝑧)) < 𝑒 → (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒)))
61 simpr2 1214 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑧 ∈ ℝ)
62 oveq2 7427 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑧 → (𝐵[,]𝑥) = (𝐵[,]𝑧))
6362ineq2d 4173 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑧 → (𝐴 ∩ (𝐵[,]𝑥)) = (𝐴 ∩ (𝐵[,]𝑧)))
6463fveq2d 6889 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑧 → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol‘(𝐴 ∩ (𝐵[,]𝑧))))
65 fvex 6898 . . . . . . . . . . . . . . . 16 (vol‘(𝐴 ∩ (𝐵[,]𝑧))) ∈ V
6664, 19, 65fvmpt 6993 . . . . . . . . . . . . . . 15 (𝑧 ∈ ℝ → (𝐹𝑧) = (vol‘(𝐴 ∩ (𝐵[,]𝑧))))
6761, 66syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑧) = (vol‘(𝐴 ∩ (𝐵[,]𝑧))))
68 simplll 787 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝐴 ∈ dom vol)
69 simplr 781 . . . . . . . . . . . . . . . . . 18 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) → 𝐵 ∈ ℝ)
7069adantr 486 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝐵 ∈ ℝ)
71 iccmbl 25780 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝐵[,]𝑧) ∈ dom vol)
7270, 61, 71syl2anc 596 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑧) ∈ dom vol)
73 inmbl 25756 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑧) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol)
7468, 72, 73syl2anc 596 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol)
75 mblvol 25744 . . . . . . . . . . . . . . 15 ((𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑧))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
7674, 75syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol‘(𝐴 ∩ (𝐵[,]𝑧))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
7767, 76eqtrd 2800 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑧) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
78 simpr1 1213 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑦 ∈ ℝ)
79 oveq2 7427 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑦 → (𝐵[,]𝑥) = (𝐵[,]𝑦))
8079ineq2d 4173 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑦 → (𝐴 ∩ (𝐵[,]𝑥)) = (𝐴 ∩ (𝐵[,]𝑦)))
8180fveq2d 6889 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑦 → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol‘(𝐴 ∩ (𝐵[,]𝑦))))
82 fvex 6898 . . . . . . . . . . . . . . . 16 (vol‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ V
8381, 19, 82fvmpt 6993 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℝ → (𝐹𝑦) = (vol‘(𝐴 ∩ (𝐵[,]𝑦))))
8478, 83syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) = (vol‘(𝐴 ∩ (𝐵[,]𝑦))))
85 simp1 1154 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → 𝑦 ∈ ℝ)
86 iccmbl 25780 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐵[,]𝑦) ∈ dom vol)
8769, 85, 86syl2an 608 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑦) ∈ dom vol)
88 inmbl 25756 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑦) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol)
8968, 87, 88syl2anc 596 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol)
90 mblvol 25744 . . . . . . . . . . . . . . 15 ((𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑦))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))
9189, 90syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol‘(𝐴 ∩ (𝐵[,]𝑦))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))
9284, 91eqtrd 2800 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))
9377, 92oveq12d 7437 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐹𝑧) − (𝐹𝑦)) = ((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))))
9449adantr 486 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝐹:ℝ⟶ℝ)
9594, 61ffvelcdmd 7084 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑧) ∈ ℝ)
9677, 95eqeltrrd 2866 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ∈ ℝ)
9770leidd 11799 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝐵𝐵)
98 simpr3 1215 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑦𝑧)
99 iccss 13461 . . . . . . . . . . . . . . . . . . 19 (((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) ∧ (𝐵𝐵𝑦𝑧)) → (𝐵[,]𝑦) ⊆ (𝐵[,]𝑧))
10070, 61, 97, 98, 99syl22anc 852 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑦) ⊆ (𝐵[,]𝑧))
101 sslin 4195 . . . . . . . . . . . . . . . . . 18 ((𝐵[,]𝑦) ⊆ (𝐵[,]𝑧) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)))
102100, 101syl 18 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)))
103 mblss 25745 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ)
10474, 103syl 18 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ)
105102, 104sstrd 3948 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ ℝ)
106 iccssre 13476 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑦[,]𝑧) ⊆ ℝ)
10778, 61, 106syl2anc 596 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝑦[,]𝑧) ⊆ ℝ)
108105, 107unssd 4145 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ)
10994, 78ffvelcdmd 7084 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) ∈ ℝ)
11092, 109eqeltrrd 2866 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ ℝ)
11161, 78resubcld 11661 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝑧𝑦) ∈ ℝ)
112110, 111readdcld 11257 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)) ∈ ℝ)
113 ovolicc 25737 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → (vol*‘(𝑦[,]𝑧)) = (𝑧𝑦))
114113adantl 487 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝑦[,]𝑧)) = (𝑧𝑦))
115114, 111eqeltrd 2865 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝑦[,]𝑧)) ∈ ℝ)
116 ovolun 25713 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∩ (𝐵[,]𝑦)) ⊆ ℝ ∧ (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ ℝ) ∧ ((𝑦[,]𝑧) ⊆ ℝ ∧ (vol*‘(𝑦[,]𝑧)) ∈ ℝ)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))))
117105, 110, 107, 115, 116syl22anc 852 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))))
118114oveq2d 7435 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))) = ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)))
119117, 118breqtrd 5139 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)))
120 ovollecl 25697 . . . . . . . . . . . . . . 15 ((((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ ∧ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)) ∈ ℝ ∧ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦))) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ∈ ℝ)
121108, 112, 119, 120syl3anc 1398 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ∈ ℝ)
12270adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝐵 ∈ ℝ)
12361adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝑧 ∈ ℝ)
12478adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝑦 ∈ ℝ)
125 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝐵𝑦)
12698adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝑦𝑧)
127 simp2 1155 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → 𝑧 ∈ ℝ)
128 elicc2 13458 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵𝑦𝑦𝑧)))
12969, 127, 128syl2an 608 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵𝑦𝑦𝑧)))
130129adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵𝑦𝑦𝑧)))
131124, 125, 126, 130mpbir3and 1361 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝑦 ∈ (𝐵[,]𝑧))
132 iccsplit 13532 . . . . . . . . . . . . . . . . . . . 20 ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ∈ (𝐵[,]𝑧)) → (𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
133122, 123, 131, 132syl3anc 1398 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → (𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
134 eqimss 3996 . . . . . . . . . . . . . . . . . . 19 ((𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
135133, 134syl 18 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
13678adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑦 ∈ ℝ)
13761adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑧 ∈ ℝ)
138 simpr 490 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑦𝐵)
139137leidd 11799 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑧𝑧)
140 iccss 13461 . . . . . . . . . . . . . . . . . . . 20 (((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) ∧ (𝑦𝐵𝑧𝑧)) → (𝐵[,]𝑧) ⊆ (𝑦[,]𝑧))
141136, 137, 138, 139, 140syl22anc 852 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → (𝐵[,]𝑧) ⊆ (𝑦[,]𝑧))
142 ssun4 4134 . . . . . . . . . . . . . . . . . . 19 ((𝐵[,]𝑧) ⊆ (𝑦[,]𝑧) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
143141, 142syl 18 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
14470, 78, 135, 143lecasei 11335 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
145 sslin 4195 . . . . . . . . . . . . . . . . 17 ((𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))))
146144, 145syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))))
147 indi 4237 . . . . . . . . . . . . . . . . 17 (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) = ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧)))
148 inss2 4190 . . . . . . . . . . . . . . . . . 18 (𝐴 ∩ (𝑦[,]𝑧)) ⊆ (𝑦[,]𝑧)
149 unss2 4140 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∩ (𝑦[,]𝑧)) ⊆ (𝑦[,]𝑧) → ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)))
150148, 149ax-mp 5 . . . . . . . . . . . . . . . . 17 ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))
151147, 150eqsstri 3984 . . . . . . . . . . . . . . . 16 (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))
152146, 151sstrdi 3950 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)))
153 ovolss 25699 . . . . . . . . . . . . . . 15 (((𝐴 ∩ (𝐵[,]𝑧)) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ∧ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))))
154152, 108, 153syl2anc 596 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))))
15596, 121, 112, 154, 119letrd 11386 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)))
15696, 110, 111lesubadd2d 11832 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) ≤ (𝑧𝑦) ↔ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦))))
157155, 156mpbird 260 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) ≤ (𝑧𝑦))
15893, 157eqbrtrd 5135 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐹𝑧) − (𝐹𝑦)) ≤ (𝑧𝑦))
15995, 109resubcld 11661 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐹𝑧) − (𝐹𝑦)) ∈ ℝ)
160 simplr 781 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑒 ∈ ℝ+)
161160rpred 13080 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑒 ∈ ℝ)
162 lelttr 11319 . . . . . . . . . . . 12 ((((𝐹𝑧) − (𝐹𝑦)) ∈ ℝ ∧ (𝑧𝑦) ∈ ℝ ∧ 𝑒 ∈ ℝ) → ((((𝐹𝑧) − (𝐹𝑦)) ≤ (𝑧𝑦) ∧ (𝑧𝑦) < 𝑒) → ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
163159, 111, 161, 162syl3anc 1398 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((((𝐹𝑧) − (𝐹𝑦)) ≤ (𝑧𝑦) ∧ (𝑧𝑦) < 𝑒) → ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
164158, 163mpand 708 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝑧𝑦) < 𝑒 → ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
165 abssubge0 15407 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → (abs‘(𝑧𝑦)) = (𝑧𝑦))
166165adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (abs‘(𝑧𝑦)) = (𝑧𝑦))
167166breq1d 5121 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((abs‘(𝑧𝑦)) < 𝑒 ↔ (𝑧𝑦) < 𝑒))
168 ovolss 25699 . . . . . . . . . . . . . 14 (((𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)) ∧ (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ≤ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
169102, 104, 168syl2anc 596 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ≤ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
170169, 92, 773brtr4d 5145 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) ≤ (𝐹𝑧))
171109, 95, 170abssubge0d 15513 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = ((𝐹𝑧) − (𝐹𝑦)))
172171breq1d 5121 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒 ↔ ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
173164, 167, 1723imtr4d 297 . . . . . . . . 9 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
17431, 41, 42, 60, 173wlogle 11766 . . . . . . . 8 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
175174anassrs 473 . . . . . . 7 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
176175ralrimiva 3159 . . . . . 6 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ 𝑦 ∈ ℝ) → ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
177176anasss 472 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑒 ∈ ℝ+𝑦 ∈ ℝ)) → ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
178177ancom2s 663 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+)) → ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
179 breq2 5115 . . . . 5 (𝑑 = 𝑒 → ((abs‘(𝑧𝑦)) < 𝑑 ↔ (abs‘(𝑧𝑦)) < 𝑒))
180179rspceaimv 3589 . . . 4 ((𝑒 ∈ ℝ+ ∧ ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒)) → ∃𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
18121, 178, 180syl2anc 596 . . 3 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+)) → ∃𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
182181ralrimivva 3210 . 2 ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → ∀𝑦 ∈ ℝ ∀𝑒 ∈ ℝ+𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
183 ax-resscn 11176 . . 3 ℝ ⊆ ℂ
184 elcncf2 25104 . . 3 ((ℝ ⊆ ℂ ∧ ℝ ⊆ ℂ) → (𝐹 ∈ (ℝ–cn→ℝ) ↔ (𝐹:ℝ⟶ℝ ∧ ∀𝑦 ∈ ℝ ∀𝑒 ∈ ℝ+𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))))
185183, 183, 184mp2an 705 . 2 (𝐹 ∈ (ℝ–cn→ℝ) ↔ (𝐹:ℝ⟶ℝ ∧ ∀𝑦 ∈ ℝ ∀𝑒 ∈ ℝ+𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒)))
18620, 182, 185sylanbrc 595 1 ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → 𝐹 ∈ (ℝ–cn→ℝ))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2146  wral 3081  wrex 3091  cun 3904  cin 3905  wss 3906   class class class wbr 5111  cmpt 5194  dom cdm 5663  wf 6536  cfv 6540  (class class class)co 7419  cc 11117  cr 11118   + caddc 11122   < clt 11262  cle 11263  cmin 11460  +crp 13036  [,]cicc 13395  abscabs 15313  cnccncf 25090  vol*covol 25676  volcvol 25677
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742  ax-inf2 9617  ax-cnex 11175  ax-resscn 11176  ax-1cn 11177  ax-icn 11178  ax-addcl 11179  ax-addrcl 11180  ax-mulcl 11181  ax-mulrcl 11182  ax-mulcom 11183  ax-addass 11184  ax-mulass 11185  ax-distr 11186  ax-i2m1 11187  ax-1ne0 11188  ax-1rid 11189  ax-rnegex 11190  ax-rrecex 11191  ax-cnre 11192  ax-pre-lttri 11193  ax-pre-lttrn 11194  ax-pre-ltadd 11195  ax-pre-mulgt0 11196  ax-pre-sup 11197
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  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 7376  df-ov 7422  df-oprab 7423  df-mpo 7424  df-of 7684  df-om 7869  df-1st 7992  df-2nd 7993  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-2o 8460  df-er 8700  df-map 8832  df-pm 8833  df-en 8950  df-dom 8951  df-sdom 8952  df-fin 8953  df-fi 9378  df-sup 9409  df-inf 9410  df-oi 9479  df-dju 9903  df-card 9941  df-pnf 11264  df-mnf 11265  df-xr 11266  df-ltxr 11267  df-le 11268  df-sub 11462  df-neg 11463  df-div 11891  df-nn 12253  df-2 12322  df-3 12323  df-n0 12524  df-z 12611  df-uz 12883  df-q 12993  df-rp 13037  df-xneg 13157  df-xadd 13158  df-xmul 13159  df-ioo 13396  df-ico 13398  df-icc 13399  df-fz 13556  df-fzo 13704  df-fl 13847  df-seq 14060  df-exp 14120  df-hash 14389  df-cj 15178  df-re 15179  df-im 15180  df-sqrt 15314  df-abs 15315  df-clim 15567  df-rlim 15568  df-sum 15766  df-rest 17501  df-topgen 17522  df-psmet 21568  df-xmet 21569  df-met 21570  df-bl 21571  df-mopn 21572  df-top 23105  df-topon 23122  df-bases 23157  df-cmp 23598  df-cncf 25092  df-ovol 25678  df-vol 25679
This theorem is used by:  volivth  25821
  Copyright terms: Public domain W3C validator