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

Theorem volcn 25863
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 25823 . . . . . . 7 ((𝐵 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ∈ dom vol)
32adantll 727 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ∈ dom vol)
4 inmbl 25799 . . . . . 6 ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑥) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol)
51, 3, 4syl2anc 596 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol)
6 mblvol 25787 . . . . 5 ((𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑥))))
75, 6syl 18 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑥))))
8 inss2 4183 . . . . 5 (𝐴 ∩ (𝐵[,]𝑥)) ⊆ (𝐵[,]𝑥)
9 mblss 25788 . . . . . 6 ((𝐵[,]𝑥) ∈ dom vol → (𝐵[,]𝑥) ⊆ ℝ)
103, 9syl 18 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ⊆ ℝ)
11 mblvol 25787 . . . . . . 7 ((𝐵[,]𝑥) ∈ dom vol → (vol‘(𝐵[,]𝑥)) = (vol*‘(𝐵[,]𝑥)))
123, 11syl 18 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐵[,]𝑥)) = (vol*‘(𝐵[,]𝑥)))
13 iccvolcl 25824 . . . . . . 7 ((𝐵 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (vol‘(𝐵[,]𝑥)) ∈ ℝ)
1413adantll 727 . . . . . 6 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐵[,]𝑥)) ∈ ℝ)
1512, 14eqeltrrd 2861 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol*‘(𝐵[,]𝑥)) ∈ ℝ)
16 ovolsscl 25743 . . . . 5 (((𝐴 ∩ (𝐵[,]𝑥)) ⊆ (𝐵[,]𝑥) ∧ (𝐵[,]𝑥) ⊆ ℝ ∧ (vol*‘(𝐵[,]𝑥)) ∈ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ)
178, 10, 15, 16mp3an2i 1495 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ)
187, 17eqeltrd 2860 . . 3 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ)
19 volcn.1 . . 3 𝐹 = (𝑥 ∈ ℝ ↦ (vol‘(𝐴 ∩ (𝐵[,]𝑥))))
2018, 19fmptd 7109 . 2 ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → 𝐹:ℝ⟶ℝ)
21 simprr 785 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+)) → 𝑒 ∈ ℝ+)
22 oveq12 7424 . . . . . . . . . . . . 13 ((𝑣 = 𝑧𝑢 = 𝑦) → (𝑣𝑢) = (𝑧𝑦))
2322ancoms 464 . . . . . . . . . . . 12 ((𝑢 = 𝑦𝑣 = 𝑧) → (𝑣𝑢) = (𝑧𝑦))
2423fveq2d 6884 . . . . . . . . . . 11 ((𝑢 = 𝑦𝑣 = 𝑧) → (abs‘(𝑣𝑢)) = (abs‘(𝑧𝑦)))
2524breq1d 5113 . . . . . . . . . 10 ((𝑢 = 𝑦𝑣 = 𝑧) → ((abs‘(𝑣𝑢)) < 𝑒 ↔ (abs‘(𝑧𝑦)) < 𝑒))
26 fveq2 6880 . . . . . . . . . . . . 13 (𝑣 = 𝑧 → (𝐹𝑣) = (𝐹𝑧))
27 fveq2 6880 . . . . . . . . . . . . 13 (𝑢 = 𝑦 → (𝐹𝑢) = (𝐹𝑦))
2826, 27oveqan12rd 7435 . . . . . . . . . . . 12 ((𝑢 = 𝑦𝑣 = 𝑧) → ((𝐹𝑣) − (𝐹𝑢)) = ((𝐹𝑧) − (𝐹𝑦)))
2928fveq2d 6884 . . . . . . . . . . 11 ((𝑢 = 𝑦𝑣 = 𝑧) → (abs‘((𝐹𝑣) − (𝐹𝑢))) = (abs‘((𝐹𝑧) − (𝐹𝑦))))
3029breq1d 5113 . . . . . . . . . 10 ((𝑢 = 𝑦𝑣 = 𝑧) → ((abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒 ↔ (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
3125, 30imbi12d 347 . . . . . . . . 9 ((𝑢 = 𝑦𝑣 = 𝑧) → (((abs‘(𝑣𝑢)) < 𝑒 → (abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒) ↔ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒)))
32 oveq12 7424 . . . . . . . . . . . . 13 ((𝑣 = 𝑦𝑢 = 𝑧) → (𝑣𝑢) = (𝑦𝑧))
3332ancoms 464 . . . . . . . . . . . 12 ((𝑢 = 𝑧𝑣 = 𝑦) → (𝑣𝑢) = (𝑦𝑧))
3433fveq2d 6884 . . . . . . . . . . 11 ((𝑢 = 𝑧𝑣 = 𝑦) → (abs‘(𝑣𝑢)) = (abs‘(𝑦𝑧)))
3534breq1d 5113 . . . . . . . . . 10 ((𝑢 = 𝑧𝑣 = 𝑦) → ((abs‘(𝑣𝑢)) < 𝑒 ↔ (abs‘(𝑦𝑧)) < 𝑒))
36 fveq2 6880 . . . . . . . . . . . . 13 (𝑣 = 𝑦 → (𝐹𝑣) = (𝐹𝑦))
37 fveq2 6880 . . . . . . . . . . . . 13 (𝑢 = 𝑧 → (𝐹𝑢) = (𝐹𝑧))
3836, 37oveqan12rd 7435 . . . . . . . . . . . 12 ((𝑢 = 𝑧𝑣 = 𝑦) → ((𝐹𝑣) − (𝐹𝑢)) = ((𝐹𝑦) − (𝐹𝑧)))
3938fveq2d 6884 . . . . . . . . . . 11 ((𝑢 = 𝑧𝑣 = 𝑦) → (abs‘((𝐹𝑣) − (𝐹𝑢))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
4039breq1d 5113 . . . . . . . . . 10 ((𝑢 = 𝑧𝑣 = 𝑦) → ((abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒 ↔ (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒))
4135, 40imbi12d 347 . . . . . . . . 9 ((𝑢 = 𝑧𝑣 = 𝑦) → (((abs‘(𝑣𝑢)) < 𝑒 → (abs‘((𝐹𝑣) − (𝐹𝑢))) < 𝑒) ↔ ((abs‘(𝑦𝑧)) < 𝑒 → (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒)))
42 ssidd 3954 . . . . . . . . 9 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) → ℝ ⊆ ℝ)
43 recn 11236 . . . . . . . . . . . . 13 (𝑧 ∈ ℝ → 𝑧 ∈ ℂ)
44 recn 11236 . . . . . . . . . . . . 13 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
45 abssub 15436 . . . . . . . . . . . . 13 ((𝑧 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (abs‘(𝑧𝑦)) = (abs‘(𝑦𝑧)))
4643, 44, 45syl2anr 609 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (abs‘(𝑧𝑦)) = (abs‘(𝑦𝑧)))
4746adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → (abs‘(𝑧𝑦)) = (abs‘(𝑦𝑧)))
4847breq1d 5113 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((abs‘(𝑧𝑦)) < 𝑒 ↔ (abs‘(𝑦𝑧)) < 𝑒))
4920adantr 486 . . . . . . . . . . . . 13 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) → 𝐹:ℝ⟶ℝ)
50 ffvelcdm 7076 . . . . . . . . . . . . . 14 ((𝐹:ℝ⟶ℝ ∧ 𝑦 ∈ ℝ) → (𝐹𝑦) ∈ ℝ)
51 ffvelcdm 7076 . . . . . . . . . . . . . 14 ((𝐹:ℝ⟶ℝ ∧ 𝑧 ∈ ℝ) → (𝐹𝑧) ∈ ℝ)
5250, 51anim12dan 631 . . . . . . . . . . . . 13 ((𝐹:ℝ⟶ℝ ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((𝐹𝑦) ∈ ℝ ∧ (𝐹𝑧) ∈ ℝ))
5349, 52sylan 592 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((𝐹𝑦) ∈ ℝ ∧ (𝐹𝑧) ∈ ℝ))
54 recn 11236 . . . . . . . . . . . . 13 ((𝐹𝑧) ∈ ℝ → (𝐹𝑧) ∈ ℂ)
55 recn 11236 . . . . . . . . . . . . 13 ((𝐹𝑦) ∈ ℝ → (𝐹𝑦) ∈ ℂ)
56 abssub 15436 . . . . . . . . . . . . 13 (((𝐹𝑧) ∈ ℂ ∧ (𝐹𝑦) ∈ ℂ) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
5754, 55, 56syl2anr 609 . . . . . . . . . . . 12 (((𝐹𝑦) ∈ ℝ ∧ (𝐹𝑧) ∈ ℝ) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
5853, 57syl 18 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = (abs‘((𝐹𝑦) − (𝐹𝑧))))
5958breq1d 5113 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒 ↔ (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒))
6048, 59imbi12d 347 . . . . . . . . 9 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → (((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒) ↔ ((abs‘(𝑦𝑧)) < 𝑒 → (abs‘((𝐹𝑦) − (𝐹𝑧))) < 𝑒)))
61 simpr2 1214 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑧 ∈ ℝ)
62 oveq2 7423 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑧 → (𝐵[,]𝑥) = (𝐵[,]𝑧))
6362ineq2d 4166 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑧 → (𝐴 ∩ (𝐵[,]𝑥)) = (𝐴 ∩ (𝐵[,]𝑧)))
6463fveq2d 6884 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑧 → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol‘(𝐴 ∩ (𝐵[,]𝑧))))
65 fvex 6893 . . . . . . . . . . . . . . . 16 (vol‘(𝐴 ∩ (𝐵[,]𝑧))) ∈ V
6664, 19, 65fvmpt 6988 . . . . . . . . . . . . . . 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 25823 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝐵[,]𝑧) ∈ dom vol)
7270, 61, 71syl2anc 596 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑧) ∈ dom vol)
73 inmbl 25799 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑧) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol)
7468, 72, 73syl2anc 596 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol)
75 mblvol 25787 . . . . . . . . . . . . . . 15 ((𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑧))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
7674, 75syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol‘(𝐴 ∩ (𝐵[,]𝑧))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
7767, 76eqtrd 2795 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑧) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
78 simpr1 1213 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑦 ∈ ℝ)
79 oveq2 7423 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑦 → (𝐵[,]𝑥) = (𝐵[,]𝑦))
8079ineq2d 4166 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑦 → (𝐴 ∩ (𝐵[,]𝑥)) = (𝐴 ∩ (𝐵[,]𝑦)))
8180fveq2d 6884 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑦 → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol‘(𝐴 ∩ (𝐵[,]𝑦))))
82 fvex 6893 . . . . . . . . . . . . . . . 16 (vol‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ V
8381, 19, 82fvmpt 6988 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℝ → (𝐹𝑦) = (vol‘(𝐴 ∩ (𝐵[,]𝑦))))
8478, 83syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) = (vol‘(𝐴 ∩ (𝐵[,]𝑦))))
85 simp1 1154 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → 𝑦 ∈ ℝ)
86 iccmbl 25823 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐵[,]𝑦) ∈ dom vol)
8769, 85, 86syl2an 608 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑦) ∈ dom vol)
88 inmbl 25799 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑦) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol)
8968, 87, 88syl2anc 596 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol)
90 mblvol 25787 . . . . . . . . . . . . . . 15 ((𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑦))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))
9189, 90syl 18 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol‘(𝐴 ∩ (𝐵[,]𝑦))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))
9284, 91eqtrd 2795 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))
9377, 92oveq12d 7433 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐹𝑧) − (𝐹𝑦)) = ((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))))
9449adantr 486 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝐹:ℝ⟶ℝ)
9594, 61ffvelcdmd 7080 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑧) ∈ ℝ)
9677, 95eqeltrrd 2861 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ∈ ℝ)
9770leidd 11826 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝐵𝐵)
98 simpr3 1215 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑦𝑧)
99 iccss 13489 . . . . . . . . . . . . . . . . . . 19 (((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) ∧ (𝐵𝐵𝑦𝑧)) → (𝐵[,]𝑦) ⊆ (𝐵[,]𝑧))
10070, 61, 97, 98, 99syl22anc 852 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑦) ⊆ (𝐵[,]𝑧))
101 sslin 4188 . . . . . . . . . . . . . . . . . 18 ((𝐵[,]𝑦) ⊆ (𝐵[,]𝑧) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)))
102100, 101syl 18 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)))
103 mblss 25788 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ)
10474, 103syl 18 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ)
105102, 104sstrd 3941 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ ℝ)
106 iccssre 13504 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑦[,]𝑧) ⊆ ℝ)
10778, 61, 106syl2anc 596 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝑦[,]𝑧) ⊆ ℝ)
108105, 107unssd 4138 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ)
10994, 78ffvelcdmd 7080 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) ∈ ℝ)
11092, 109eqeltrrd 2861 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ ℝ)
11161, 78resubcld 11688 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝑧𝑦) ∈ ℝ)
112110, 111readdcld 11284 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)) ∈ ℝ)
113 ovolicc 25780 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → (vol*‘(𝑦[,]𝑧)) = (𝑧𝑦))
114113adantl 487 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝑦[,]𝑧)) = (𝑧𝑦))
115114, 111eqeltrd 2860 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝑦[,]𝑧)) ∈ ℝ)
116 ovolun 25756 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∩ (𝐵[,]𝑦)) ⊆ ℝ ∧ (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ ℝ) ∧ ((𝑦[,]𝑧) ⊆ ℝ ∧ (vol*‘(𝑦[,]𝑧)) ∈ ℝ)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))))
117105, 110, 107, 115, 116syl22anc 852 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))))
118114oveq2d 7431 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))) = ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)))
119117, 118breqtrd 5131 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)))
120 ovollecl 25740 . . . . . . . . . . . . . . 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 13486 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵𝑦𝑦𝑧)))
12969, 127, 128syl2an 608 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵𝑦𝑦𝑧)))
130129adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵𝑦𝑦𝑧)))
131124, 125, 126, 130mpbir3and 1361 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → 𝑦 ∈ (𝐵[,]𝑧))
132 iccsplit 13560 . . . . . . . . . . . . . . . . . . . 20 ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ∈ (𝐵[,]𝑧)) → (𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
133122, 123, 131, 132syl3anc 1398 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → (𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
134 eqimss 3989 . . . . . . . . . . . . . . . . . . 19 ((𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
135133, 134syl 18 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝐵𝑦) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
13678adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑦 ∈ ℝ)
13761adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑧 ∈ ℝ)
138 simpr 490 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑦𝐵)
139137leidd 11826 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → 𝑧𝑧)
140 iccss 13489 . . . . . . . . . . . . . . . . . . . 20 (((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) ∧ (𝑦𝐵𝑧𝑧)) → (𝐵[,]𝑧) ⊆ (𝑦[,]𝑧))
141136, 137, 138, 139, 140syl22anc 852 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → (𝐵[,]𝑧) ⊆ (𝑦[,]𝑧))
142 ssun4 4127 . . . . . . . . . . . . . . . . . . 19 ((𝐵[,]𝑧) ⊆ (𝑦[,]𝑧) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
143141, 142syl 18 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) ∧ 𝑦𝐵) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
14470, 78, 135, 143lecasei 11362 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))
145 sslin 4188 . . . . . . . . . . . . . . . . 17 ((𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))))
146144, 145syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))))
147 indi 4230 . . . . . . . . . . . . . . . . 17 (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) = ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧)))
148 inss2 4183 . . . . . . . . . . . . . . . . . 18 (𝐴 ∩ (𝑦[,]𝑧)) ⊆ (𝑦[,]𝑧)
149 unss2 4133 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∩ (𝑦[,]𝑧)) ⊆ (𝑦[,]𝑧) → ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)))
150148, 149ax-mp 5 . . . . . . . . . . . . . . . . 17 ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))
151147, 150eqsstri 3977 . . . . . . . . . . . . . . . 16 (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))
152146, 151sstrdi 3943 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)))
153 ovolss 25742 . . . . . . . . . . . . . . 15 (((𝐴 ∩ (𝐵[,]𝑧)) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ∧ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))))
154152, 108, 153syl2anc 596 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))))
15596, 121, 112, 154, 119letrd 11413 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦)))
15696, 110, 111lesubadd2d 11859 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) ≤ (𝑧𝑦) ↔ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧𝑦))))
157155, 156mpbird 260 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) ≤ (𝑧𝑦))
15893, 157eqbrtrd 5127 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐹𝑧) − (𝐹𝑦)) ≤ (𝑧𝑦))
15995, 109resubcld 11688 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝐹𝑧) − (𝐹𝑦)) ∈ ℝ)
160 simplr 781 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑒 ∈ ℝ+)
161160rpred 13108 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → 𝑒 ∈ ℝ)
162 lelttr 11346 . . . . . . . . . . . 12 ((((𝐹𝑧) − (𝐹𝑦)) ∈ ℝ ∧ (𝑧𝑦) ∈ ℝ ∧ 𝑒 ∈ ℝ) → ((((𝐹𝑧) − (𝐹𝑦)) ≤ (𝑧𝑦) ∧ (𝑧𝑦) < 𝑒) → ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
163159, 111, 161, 162syl3anc 1398 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((((𝐹𝑧) − (𝐹𝑦)) ≤ (𝑧𝑦) ∧ (𝑧𝑦) < 𝑒) → ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
164158, 163mpand 708 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((𝑧𝑦) < 𝑒 → ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
165 abssubge0 15437 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧) → (abs‘(𝑧𝑦)) = (𝑧𝑦))
166165adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (abs‘(𝑧𝑦)) = (𝑧𝑦))
167166breq1d 5113 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((abs‘(𝑧𝑦)) < 𝑒 ↔ (𝑧𝑦) < 𝑒))
168 ovolss 25742 . . . . . . . . . . . . . 14 (((𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)) ∧ (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ≤ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
169102, 104, 168syl2anc 596 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ≤ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))))
170169, 92, 773brtr4d 5137 . . . . . . . . . . . 12 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (𝐹𝑦) ≤ (𝐹𝑧))
171109, 95, 170abssubge0d 15543 . . . . . . . . . . 11 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → (abs‘((𝐹𝑧) − (𝐹𝑦))) = ((𝐹𝑧) − (𝐹𝑦)))
172171breq1d 5113 . . . . . . . . . 10 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒 ↔ ((𝐹𝑧) − (𝐹𝑦)) < 𝑒))
173164, 167, 1723imtr4d 297 . . . . . . . . 9 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦𝑧)) → ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
17431, 41, 42, 60, 173wlogle 11793 . . . . . . . 8 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ)) → ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
175174anassrs 473 . . . . . . 7 (((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
176175ralrimiva 3154 . . . . . 6 ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+) ∧ 𝑦 ∈ ℝ) → ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
177176anasss 472 . . . . 5 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑒 ∈ ℝ+𝑦 ∈ ℝ)) → ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
178177ancom2s 663 . . . 4 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+)) → ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
179 breq2 5107 . . . . 5 (𝑑 = 𝑒 → ((abs‘(𝑧𝑦)) < 𝑑 ↔ (abs‘(𝑧𝑦)) < 𝑒))
180179rspceaimv 3582 . . . 4 ((𝑒 ∈ ℝ+ ∧ ∀𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑒 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒)) → ∃𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
18121, 178, 180syl2anc 596 . . 3 (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+)) → ∃𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
182181ralrimivva 3205 . 2 ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → ∀𝑦 ∈ ℝ ∀𝑒 ∈ ℝ+𝑑 ∈ ℝ+𝑧 ∈ ℝ ((abs‘(𝑧𝑦)) < 𝑑 → (abs‘((𝐹𝑧) − (𝐹𝑦))) < 𝑒))
183 ax-resscn 11203 . . 3 ℝ ⊆ ℂ
184 elcncf2 25147 . . 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 2145  wral 3076  wrex 3086  cun 3897  cin 3898  wss 3899   class class class wbr 5103  cmpt 5186  dom cdm 5655  wf 6530  cfv 6534  (class class class)co 7415  cc 11144  cr 11145   + caddc 11149   < clt 11289  cle 11290  cmin 11487  +crp 13064  [,]cicc 13423  abscabs 15343  cnccncf 25133  vol*covol 25719  volcvol 25720
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 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7738  ax-inf2 9624  ax-cnex 11202  ax-resscn 11203  ax-1cn 11204  ax-icn 11205  ax-addcl 11206  ax-addrcl 11207  ax-mulcl 11208  ax-mulrcl 11209  ax-mulcom 11210  ax-addass 11211  ax-mulass 11212  ax-distr 11213  ax-i2m1 11214  ax-1ne0 11215  ax-1rid 11216  ax-rnegex 11217  ax-rrecex 11218  ax-cnre 11219  ax-pre-lttri 11220  ax-pre-lttrn 11221  ax-pre-ltadd 11222  ax-pre-mulgt0 11223  ax-pre-sup 11224
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 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6300  df-ord 6361  df-on 6362  df-lim 6363  df-suc 6364  df-iota 6490  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-isom 6543  df-riota 7372  df-ov 7418  df-oprab 7419  df-mpo 7420  df-of 7680  df-om 7865  df-1st 7988  df-2nd 7989  df-frecs 8282  df-wrecs 8313  df-recs 8362  df-rdg 8401  df-1o 8459  df-2o 8460  df-er 8700  df-map 8832  df-pm 8833  df-en 8957  df-dom 8958  df-sdom 8959  df-fin 8960  df-fi 9385  df-sup 9416  df-inf 9417  df-oi 9486  df-dju 9928  df-card 9966  df-pnf 11291  df-mnf 11292  df-xr 11293  df-ltxr 11294  df-le 11295  df-sub 11489  df-neg 11490  df-div 11918  df-nn 12280  df-2 12349  df-3 12350  df-n0 12551  df-z 12638  df-uz 12910  df-q 13020  df-rp 13065  df-xneg 13185  df-xadd 13186  df-xmul 13187  df-ioo 13424  df-ico 13426  df-icc 13427  df-fz 13584  df-fzo 13732  df-fl 13875  df-seq 14088  df-exp 14148  df-hash 14417  df-cj 15208  df-re 15209  df-im 15210  df-sqrt 15344  df-abs 15345  df-clim 15597  df-rlim 15598  df-sum 15796  df-rest 17529  df-topgen 17550  df-psmet 21606  df-xmet 21607  df-met 21608  df-bl 21609  df-mopn 21610  df-top 23148  df-topon 23165  df-bases 23200  df-cmp 23641  df-cncf 25135  df-ovol 25721  df-vol 25722
This theorem is used by:  volivth  25864
  Copyright terms: Public domain W3C validator