Proof of Theorem ftc1lem4
Step | Hyp | Ref
| Expression |
1 | | ftc1.a |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐴 ∈ ℝ) |
2 | | ftc1.b |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐵 ∈ ℝ) |
3 | | iccssre 12255 |
. . . . . . . . . . . . . 14
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ) |
4 | 1, 2, 3 | syl2anc 693 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ) |
5 | | ftc1.x1 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝑋 ∈ (𝐴[,]𝐵)) |
6 | 4, 5 | sseldd 3604 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑋 ∈ ℝ) |
7 | | ftc1.y1 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝑌 ∈ (𝐴[,]𝐵)) |
8 | 4, 7 | sseldd 3604 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑌 ∈ ℝ) |
9 | | ltle 10126 |
. . . . . . . . . . . 12
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝑋 < 𝑌 → 𝑋 ≤ 𝑌)) |
10 | 6, 8, 9 | syl2anc 693 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑋 < 𝑌 → 𝑋 ≤ 𝑌)) |
11 | 10 | imp 445 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝑋 ≤ 𝑌) |
12 | | ftc1.g |
. . . . . . . . . . 11
⊢ 𝐺 = (𝑥 ∈ (𝐴[,]𝐵) ↦ ∫(𝐴(,)𝑥)(𝐹‘𝑡) d𝑡) |
13 | | ftc1.le |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐴 ≤ 𝐵) |
14 | | ftc1.s |
. . . . . . . . . . 11
⊢ (𝜑 → (𝐴(,)𝐵) ⊆ 𝐷) |
15 | | ftc1.d |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐷 ⊆ ℝ) |
16 | | ftc1.i |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐹 ∈
𝐿1) |
17 | | ftc1.c |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐶 ∈ (𝐴(,)𝐵)) |
18 | | ftc1.f |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐹 ∈ ((𝐾 CnP 𝐿)‘𝐶)) |
19 | | ftc1.j |
. . . . . . . . . . . 12
⊢ 𝐽 = (𝐿 ↾t
ℝ) |
20 | | ftc1.k |
. . . . . . . . . . . 12
⊢ 𝐾 = (𝐿 ↾t 𝐷) |
21 | | ftc1.l |
. . . . . . . . . . . 12
⊢ 𝐿 =
(TopOpen‘ℂfld) |
22 | 12, 1, 2, 13, 14, 15, 16, 17, 18, 19, 20, 21 | ftc1lem3 23801 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐹:𝐷⟶ℂ) |
23 | 12, 1, 2, 13, 14, 15, 16, 22, 5, 7 | ftc1lem1 23798 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑋 ≤ 𝑌) → ((𝐺‘𝑌) − (𝐺‘𝑋)) = ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡) |
24 | 11, 23 | syldan 487 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐺‘𝑌) − (𝐺‘𝑋)) = ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡) |
25 | 1 | rexrd 10089 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → 𝐴 ∈
ℝ*) |
26 | | elicc2 12238 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑋 ∈ (𝐴[,]𝐵) ↔ (𝑋 ∈ ℝ ∧ 𝐴 ≤ 𝑋 ∧ 𝑋 ≤ 𝐵))) |
27 | 1, 2, 26 | syl2anc 693 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → (𝑋 ∈ (𝐴[,]𝐵) ↔ (𝑋 ∈ ℝ ∧ 𝐴 ≤ 𝑋 ∧ 𝑋 ≤ 𝐵))) |
28 | 5, 27 | mpbid 222 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝜑 → (𝑋 ∈ ℝ ∧ 𝐴 ≤ 𝑋 ∧ 𝑋 ≤ 𝐵)) |
29 | 28 | simp2d 1074 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → 𝐴 ≤ 𝑋) |
30 | | iooss1 12210 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐴 ∈ ℝ*
∧ 𝐴 ≤ 𝑋) → (𝑋(,)𝑌) ⊆ (𝐴(,)𝑌)) |
31 | 25, 29, 30 | syl2anc 693 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ (𝐴(,)𝑌)) |
32 | 2 | rexrd 10089 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → 𝐵 ∈
ℝ*) |
33 | | elicc2 12238 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑌 ∈ (𝐴[,]𝐵) ↔ (𝑌 ∈ ℝ ∧ 𝐴 ≤ 𝑌 ∧ 𝑌 ≤ 𝐵))) |
34 | 1, 2, 33 | syl2anc 693 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → (𝑌 ∈ (𝐴[,]𝐵) ↔ (𝑌 ∈ ℝ ∧ 𝐴 ≤ 𝑌 ∧ 𝑌 ≤ 𝐵))) |
35 | 7, 34 | mpbid 222 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝜑 → (𝑌 ∈ ℝ ∧ 𝐴 ≤ 𝑌 ∧ 𝑌 ≤ 𝐵)) |
36 | 35 | simp3d 1075 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → 𝑌 ≤ 𝐵) |
37 | | iooss2 12211 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐵 ∈ ℝ*
∧ 𝑌 ≤ 𝐵) → (𝐴(,)𝑌) ⊆ (𝐴(,)𝐵)) |
38 | 32, 36, 37 | syl2anc 693 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝐴(,)𝑌) ⊆ (𝐴(,)𝐵)) |
39 | 31, 38 | sstrd 3613 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ (𝐴(,)𝐵)) |
40 | 39, 14 | sstrd 3613 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ 𝐷) |
41 | 40 | sselda 3603 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 ∈ 𝐷) |
42 | 22 | ffvelrnda 6359 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑡 ∈ 𝐷) → (𝐹‘𝑡) ∈ ℂ) |
43 | 41, 42 | syldan 487 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐹‘𝑡) ∈ ℂ) |
44 | 14, 17 | sseldd 3604 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝐶 ∈ 𝐷) |
45 | 22, 44 | ffvelrnd 6360 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝐹‘𝐶) ∈ ℂ) |
46 | 45 | adantr 481 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐹‘𝐶) ∈ ℂ) |
47 | 43, 46 | npcand 10396 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (((𝐹‘𝑡) − (𝐹‘𝐶)) + (𝐹‘𝐶)) = (𝐹‘𝑡)) |
48 | 47 | itgeq2dv 23548 |
. . . . . . . . . . 11
⊢ (𝜑 → ∫(𝑋(,)𝑌)(((𝐹‘𝑡) − (𝐹‘𝐶)) + (𝐹‘𝐶)) d𝑡 = ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡) |
49 | 43, 46 | subcld 10392 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((𝐹‘𝑡) − (𝐹‘𝐶)) ∈ ℂ) |
50 | | ioombl 23333 |
. . . . . . . . . . . . . . 15
⊢ (𝑋(,)𝑌) ∈ dom vol |
51 | 50 | a1i 11 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑋(,)𝑌) ∈ dom vol) |
52 | | fvexd 6203 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑡 ∈ 𝐷) → (𝐹‘𝑡) ∈ V) |
53 | 22 | feqmptd 6249 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝐹 = (𝑡 ∈ 𝐷 ↦ (𝐹‘𝑡))) |
54 | 53, 16 | eqeltrrd 2702 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑡 ∈ 𝐷 ↦ (𝐹‘𝑡)) ∈
𝐿1) |
55 | 40, 51, 52, 54 | iblss 23571 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐹‘𝑡)) ∈
𝐿1) |
56 | | fconstmpt 5163 |
. . . . . . . . . . . . . 14
⊢ ((𝑋(,)𝑌) × {(𝐹‘𝐶)}) = (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐹‘𝐶)) |
57 | | mblvol 23298 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑋(,)𝑌) ∈ dom vol → (vol‘(𝑋(,)𝑌)) = (vol*‘(𝑋(,)𝑌))) |
58 | 50, 57 | ax-mp 5 |
. . . . . . . . . . . . . . . 16
⊢
(vol‘(𝑋(,)𝑌)) = (vol*‘(𝑋(,)𝑌)) |
59 | | ioossicc 12259 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑋(,)𝑌) ⊆ (𝑋[,]𝑌) |
60 | 59 | a1i 11 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ (𝑋[,]𝑌)) |
61 | | iccmbl 23334 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝑋[,]𝑌) ∈ dom vol) |
62 | 6, 8, 61 | syl2anc 693 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → (𝑋[,]𝑌) ∈ dom vol) |
63 | | mblss 23299 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑋[,]𝑌) ∈ dom vol → (𝑋[,]𝑌) ⊆ ℝ) |
64 | 62, 63 | syl 17 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑋[,]𝑌) ⊆ ℝ) |
65 | | mblvol 23298 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑋[,]𝑌) ∈ dom vol → (vol‘(𝑋[,]𝑌)) = (vol*‘(𝑋[,]𝑌))) |
66 | 62, 65 | syl 17 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → (vol‘(𝑋[,]𝑌)) = (vol*‘(𝑋[,]𝑌))) |
67 | | iccvolcl 23335 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) →
(vol‘(𝑋[,]𝑌)) ∈
ℝ) |
68 | 6, 8, 67 | syl2anc 693 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → (vol‘(𝑋[,]𝑌)) ∈ ℝ) |
69 | 66, 68 | eqeltrrd 2702 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (vol*‘(𝑋[,]𝑌)) ∈ ℝ) |
70 | | ovolsscl 23254 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑋(,)𝑌) ⊆ (𝑋[,]𝑌) ∧ (𝑋[,]𝑌) ⊆ ℝ ∧ (vol*‘(𝑋[,]𝑌)) ∈ ℝ) → (vol*‘(𝑋(,)𝑌)) ∈ ℝ) |
71 | 60, 64, 69, 70 | syl3anc 1326 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (vol*‘(𝑋(,)𝑌)) ∈ ℝ) |
72 | 58, 71 | syl5eqel 2705 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (vol‘(𝑋(,)𝑌)) ∈ ℝ) |
73 | | iblconst 23584 |
. . . . . . . . . . . . . . 15
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ (𝐹‘𝐶) ∈ ℂ) → ((𝑋(,)𝑌) × {(𝐹‘𝐶)}) ∈
𝐿1) |
74 | 51, 72, 45, 73 | syl3anc 1326 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((𝑋(,)𝑌) × {(𝐹‘𝐶)}) ∈
𝐿1) |
75 | 56, 74 | syl5eqelr 2706 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐹‘𝐶)) ∈
𝐿1) |
76 | 43, 55, 46, 75 | iblsub 23588 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ ((𝐹‘𝑡) − (𝐹‘𝐶))) ∈
𝐿1) |
77 | 49, 76, 46, 75 | itgadd 23591 |
. . . . . . . . . . 11
⊢ (𝜑 → ∫(𝑋(,)𝑌)(((𝐹‘𝑡) − (𝐹‘𝐶)) + (𝐹‘𝐶)) d𝑡 = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡)) |
78 | 48, 77 | eqtr3d 2658 |
. . . . . . . . . 10
⊢ (𝜑 → ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡 = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡)) |
79 | 78 | adantr 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡 = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡)) |
80 | | itgconst 23585 |
. . . . . . . . . . . . 13
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ (𝐹‘𝐶) ∈ ℂ) → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌)))) |
81 | 51, 72, 45, 80 | syl3anc 1326 |
. . . . . . . . . . . 12
⊢ (𝜑 → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌)))) |
82 | 81 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌)))) |
83 | 6 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝑋 ∈ ℝ) |
84 | 8 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝑌 ∈ ℝ) |
85 | | ovolioo 23336 |
. . . . . . . . . . . . . 14
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌) → (vol*‘(𝑋(,)𝑌)) = (𝑌 − 𝑋)) |
86 | 83, 84, 11, 85 | syl3anc 1326 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (vol*‘(𝑋(,)𝑌)) = (𝑌 − 𝑋)) |
87 | 58, 86 | syl5eq 2668 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (vol‘(𝑋(,)𝑌)) = (𝑌 − 𝑋)) |
88 | 87 | oveq2d 6666 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌))) = ((𝐹‘𝐶) · (𝑌 − 𝑋))) |
89 | 82, 88 | eqtrd 2656 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (𝑌 − 𝑋))) |
90 | 89 | oveq2d 6666 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋)))) |
91 | 24, 79, 90 | 3eqtrd 2660 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐺‘𝑌) − (𝐺‘𝑋)) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋)))) |
92 | 91 | oveq1d 6665 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋))) / (𝑌 − 𝑋))) |
93 | | ovexd 6680 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((𝐹‘𝑡) − (𝐹‘𝐶)) ∈ V) |
94 | 93, 76 | itgcl 23550 |
. . . . . . . . 9
⊢ (𝜑 → ∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 ∈ ℂ) |
95 | 94 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 ∈ ℂ) |
96 | 45 | adantr 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝐹‘𝐶) ∈ ℂ) |
97 | 8, 6 | resubcld 10458 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℝ) |
98 | 97 | adantr 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑌 − 𝑋) ∈ ℝ) |
99 | 98 | recnd 10068 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑌 − 𝑋) ∈ ℂ) |
100 | 96, 99 | mulcld 10060 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐹‘𝐶) · (𝑌 − 𝑋)) ∈ ℂ) |
101 | 6, 8 | posdifd 10614 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑋 < 𝑌 ↔ 0 < (𝑌 − 𝑋))) |
102 | 101 | biimpa 501 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < (𝑌 − 𝑋)) |
103 | 102 | gt0ne0d 10592 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑌 − 𝑋) ≠ 0) |
104 | 95, 100, 99, 103 | divdird 10839 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋))) / (𝑌 − 𝑋)) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (((𝐹‘𝐶) · (𝑌 − 𝑋)) / (𝑌 − 𝑋)))) |
105 | 96, 99, 103 | divcan4d 10807 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((𝐹‘𝐶) · (𝑌 − 𝑋)) / (𝑌 − 𝑋)) = (𝐹‘𝐶)) |
106 | 105 | oveq2d 6666 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (((𝐹‘𝐶) · (𝑌 − 𝑋)) / (𝑌 − 𝑋))) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (𝐹‘𝐶))) |
107 | 92, 104, 106 | 3eqtrd 2660 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (𝐹‘𝐶))) |
108 | 107 | oveq1d 6665 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶)) = (((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (𝐹‘𝐶)) − (𝐹‘𝐶))) |
109 | 95, 99, 103 | divcld 10801 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) ∈ ℂ) |
110 | 109, 96 | pncand 10393 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (𝐹‘𝐶)) − (𝐹‘𝐶)) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋))) |
111 | 108, 110 | eqtrd 2656 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶)) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋))) |
112 | 111 | fveq2d 6195 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶))) = (abs‘(∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)))) |
113 | 95, 99, 103 | absdivd 14194 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘(∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋))) = ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (abs‘(𝑌 − 𝑋)))) |
114 | | 0re 10040 |
. . . . . . 7
⊢ 0 ∈
ℝ |
115 | | ltle 10126 |
. . . . . . 7
⊢ ((0
∈ ℝ ∧ (𝑌
− 𝑋) ∈ ℝ)
→ (0 < (𝑌 −
𝑋) → 0 ≤ (𝑌 − 𝑋))) |
116 | 114, 98, 115 | sylancr 695 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (0 < (𝑌 − 𝑋) → 0 ≤ (𝑌 − 𝑋))) |
117 | 102, 116 | mpd 15 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 ≤ (𝑌 − 𝑋)) |
118 | 98, 117 | absidd 14161 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘(𝑌 − 𝑋)) = (𝑌 − 𝑋)) |
119 | 118 | oveq2d 6666 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (abs‘(𝑌 − 𝑋))) = ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋))) |
120 | 112, 113,
119 | 3eqtrd 2660 |
. 2
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶))) = ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋))) |
121 | 94 | abscld 14175 |
. . . . 5
⊢ (𝜑 → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ) |
122 | 121 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ) |
123 | 49 | abscld 14175 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) ∈ ℝ) |
124 | 93, 76 | iblabs 23595 |
. . . . . 6
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
𝐿1) |
125 | 123, 124 | itgrecl 23564 |
. . . . 5
⊢ (𝜑 → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 ∈ ℝ) |
126 | 125 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 ∈ ℝ) |
127 | | ftc1.e |
. . . . . . 7
⊢ (𝜑 → 𝐸 ∈
ℝ+) |
128 | 127 | rpred 11872 |
. . . . . 6
⊢ (𝜑 → 𝐸 ∈ ℝ) |
129 | 97, 128 | remulcld 10070 |
. . . . 5
⊢ (𝜑 → ((𝑌 − 𝑋) · 𝐸) ∈ ℝ) |
130 | 129 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝑌 − 𝑋) · 𝐸) ∈ ℝ) |
131 | 49, 76 | itgabs 23601 |
. . . . 5
⊢ (𝜑 → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ≤ ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡) |
132 | 131 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ≤ ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡) |
133 | 102, 87 | breqtrrd 4681 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < (vol‘(𝑋(,)𝑌))) |
134 | 128 | adantr 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝐸 ∈ ℝ) |
135 | | fconstmpt 5163 |
. . . . . . . . . 10
⊢ ((𝑋(,)𝑌) × {𝐸}) = (𝑡 ∈ (𝑋(,)𝑌) ↦ 𝐸) |
136 | 128 | recnd 10068 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐸 ∈ ℂ) |
137 | | iblconst 23584 |
. . . . . . . . . . 11
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ 𝐸 ∈ ℂ) → ((𝑋(,)𝑌) × {𝐸}) ∈
𝐿1) |
138 | 51, 72, 136, 137 | syl3anc 1326 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝑋(,)𝑌) × {𝐸}) ∈
𝐿1) |
139 | 135, 138 | syl5eqelr 2706 |
. . . . . . . . 9
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ 𝐸) ∈
𝐿1) |
140 | 134, 139,
123, 124 | iblsub 23588 |
. . . . . . . 8
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))))) ∈
𝐿1) |
141 | 140 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))))) ∈
𝐿1) |
142 | | ftc1.fc |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐷) → ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸)) |
143 | 142 | ralrimiva 2966 |
. . . . . . . . . . 11
⊢ (𝜑 → ∀𝑦 ∈ 𝐷 ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸)) |
144 | 143 | adantr 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ∀𝑦 ∈ 𝐷 ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸)) |
145 | 15, 44 | sseldd 3604 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐶 ∈ ℝ) |
146 | | ftc1.r |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝑅 ∈
ℝ+) |
147 | 146 | rpred 11872 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝑅 ∈ ℝ) |
148 | 145, 147 | resubcld 10458 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐶 − 𝑅) ∈ ℝ) |
149 | 148 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 − 𝑅) ∈ ℝ) |
150 | 6 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑋 ∈ ℝ) |
151 | 40, 15 | sstrd 3613 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ ℝ) |
152 | 151 | sselda 3603 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 ∈ ℝ) |
153 | | ftc1.x2 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (abs‘(𝑋 − 𝐶)) < 𝑅) |
154 | 6, 145, 147 | absdifltd 14172 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((abs‘(𝑋 − 𝐶)) < 𝑅 ↔ ((𝐶 − 𝑅) < 𝑋 ∧ 𝑋 < (𝐶 + 𝑅)))) |
155 | 153, 154 | mpbid 222 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((𝐶 − 𝑅) < 𝑋 ∧ 𝑋 < (𝐶 + 𝑅))) |
156 | 155 | simpld 475 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐶 − 𝑅) < 𝑋) |
157 | 156 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 − 𝑅) < 𝑋) |
158 | | eliooord 12233 |
. . . . . . . . . . . . . 14
⊢ (𝑡 ∈ (𝑋(,)𝑌) → (𝑋 < 𝑡 ∧ 𝑡 < 𝑌)) |
159 | 158 | adantl 482 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝑋 < 𝑡 ∧ 𝑡 < 𝑌)) |
160 | 159 | simpld 475 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑋 < 𝑡) |
161 | 149, 150,
152, 157, 160 | lttrd 10198 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 − 𝑅) < 𝑡) |
162 | 8 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑌 ∈ ℝ) |
163 | 145, 147 | readdcld 10069 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐶 + 𝑅) ∈ ℝ) |
164 | 163 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 + 𝑅) ∈ ℝ) |
165 | 159 | simprd 479 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 < 𝑌) |
166 | | ftc1.y2 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (abs‘(𝑌 − 𝐶)) < 𝑅) |
167 | 8, 145, 147 | absdifltd 14172 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((abs‘(𝑌 − 𝐶)) < 𝑅 ↔ ((𝐶 − 𝑅) < 𝑌 ∧ 𝑌 < (𝐶 + 𝑅)))) |
168 | 166, 167 | mpbid 222 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((𝐶 − 𝑅) < 𝑌 ∧ 𝑌 < (𝐶 + 𝑅))) |
169 | 168 | simprd 479 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝑌 < (𝐶 + 𝑅)) |
170 | 169 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑌 < (𝐶 + 𝑅)) |
171 | 152, 162,
164, 165, 170 | lttrd 10198 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 < (𝐶 + 𝑅)) |
172 | 145 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝐶 ∈ ℝ) |
173 | 147 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑅 ∈ ℝ) |
174 | 152, 172,
173 | absdifltd 14172 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((abs‘(𝑡 − 𝐶)) < 𝑅 ↔ ((𝐶 − 𝑅) < 𝑡 ∧ 𝑡 < (𝐶 + 𝑅)))) |
175 | 161, 171,
174 | mpbir2and 957 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (abs‘(𝑡 − 𝐶)) < 𝑅) |
176 | | oveq1 6657 |
. . . . . . . . . . . . . 14
⊢ (𝑦 = 𝑡 → (𝑦 − 𝐶) = (𝑡 − 𝐶)) |
177 | 176 | fveq2d 6195 |
. . . . . . . . . . . . 13
⊢ (𝑦 = 𝑡 → (abs‘(𝑦 − 𝐶)) = (abs‘(𝑡 − 𝐶))) |
178 | 177 | breq1d 4663 |
. . . . . . . . . . . 12
⊢ (𝑦 = 𝑡 → ((abs‘(𝑦 − 𝐶)) < 𝑅 ↔ (abs‘(𝑡 − 𝐶)) < 𝑅)) |
179 | | fveq2 6191 |
. . . . . . . . . . . . . . 15
⊢ (𝑦 = 𝑡 → (𝐹‘𝑦) = (𝐹‘𝑡)) |
180 | 179 | oveq1d 6665 |
. . . . . . . . . . . . . 14
⊢ (𝑦 = 𝑡 → ((𝐹‘𝑦) − (𝐹‘𝐶)) = ((𝐹‘𝑡) − (𝐹‘𝐶))) |
181 | 180 | fveq2d 6195 |
. . . . . . . . . . . . 13
⊢ (𝑦 = 𝑡 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) = (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) |
182 | 181 | breq1d 4663 |
. . . . . . . . . . . 12
⊢ (𝑦 = 𝑡 → ((abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸 ↔ (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸)) |
183 | 178, 182 | imbi12d 334 |
. . . . . . . . . . 11
⊢ (𝑦 = 𝑡 → (((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸) ↔ ((abs‘(𝑡 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸))) |
184 | 183 | rspcv 3305 |
. . . . . . . . . 10
⊢ (𝑡 ∈ 𝐷 → (∀𝑦 ∈ 𝐷 ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸) → ((abs‘(𝑡 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸))) |
185 | 41, 144, 175, 184 | syl3c 66 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸) |
186 | | difrp 11868 |
. . . . . . . . . 10
⊢
(((abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) ∈ ℝ ∧ 𝐸 ∈ ℝ) → ((abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸 ↔ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+)) |
187 | 123, 134,
186 | syl2anc 693 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸 ↔ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+)) |
188 | 185, 187 | mpbid 222 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+) |
189 | 188 | adantlr 751 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑋 < 𝑌) ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+) |
190 | 133, 141,
189 | itggt0 23608 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡) |
191 | 134, 139,
123, 124 | itgsub 23592 |
. . . . . . . 8
⊢ (𝜑 → ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡 = (∫(𝑋(,)𝑌)𝐸 d𝑡 − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
192 | 191 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡 = (∫(𝑋(,)𝑌)𝐸 d𝑡 − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
193 | | itgconst 23585 |
. . . . . . . . . . 11
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ 𝐸 ∈ ℂ) → ∫(𝑋(,)𝑌)𝐸 d𝑡 = (𝐸 · (vol‘(𝑋(,)𝑌)))) |
194 | 51, 72, 136, 193 | syl3anc 1326 |
. . . . . . . . . 10
⊢ (𝜑 → ∫(𝑋(,)𝑌)𝐸 d𝑡 = (𝐸 · (vol‘(𝑋(,)𝑌)))) |
195 | 194 | adantr 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)𝐸 d𝑡 = (𝐸 · (vol‘(𝑋(,)𝑌)))) |
196 | 87 | oveq2d 6666 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝐸 · (vol‘(𝑋(,)𝑌))) = (𝐸 · (𝑌 − 𝑋))) |
197 | 97 | recnd 10068 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℂ) |
198 | 136, 197 | mulcomd 10061 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐸 · (𝑌 − 𝑋)) = ((𝑌 − 𝑋) · 𝐸)) |
199 | 198 | adantr 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝐸 · (𝑌 − 𝑋)) = ((𝑌 − 𝑋) · 𝐸)) |
200 | 195, 196,
199 | 3eqtrd 2660 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)𝐸 d𝑡 = ((𝑌 − 𝑋) · 𝐸)) |
201 | 200 | oveq1d 6665 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (∫(𝑋(,)𝑌)𝐸 d𝑡 − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡) = (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
202 | 192, 201 | eqtrd 2656 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡 = (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
203 | 190, 202 | breqtrd 4679 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
204 | 125, 129 | posdifd 10614 |
. . . . . 6
⊢ (𝜑 → (∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 < ((𝑌 − 𝑋) · 𝐸) ↔ 0 < (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡))) |
205 | 204 | biimpar 502 |
. . . . 5
⊢ ((𝜑 ∧ 0 < (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 < ((𝑌 − 𝑋) · 𝐸)) |
206 | 203, 205 | syldan 487 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 < ((𝑌 − 𝑋) · 𝐸)) |
207 | 122, 126,
130, 132, 206 | lelttrd 10195 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) < ((𝑌 − 𝑋) · 𝐸)) |
208 | 95 | abscld 14175 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ) |
209 | 128 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝐸 ∈ ℝ) |
210 | | ltdivmul 10898 |
. . . 4
⊢
(((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ ∧ 𝐸 ∈ ℝ ∧ ((𝑌 − 𝑋) ∈ ℝ ∧ 0 < (𝑌 − 𝑋))) → (((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋)) < 𝐸 ↔ (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) < ((𝑌 − 𝑋) · 𝐸))) |
211 | 208, 209,
98, 102, 210 | syl112anc 1330 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋)) < 𝐸 ↔ (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) < ((𝑌 − 𝑋) · 𝐸))) |
212 | 207, 211 | mpbird 247 |
. 2
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋)) < 𝐸) |
213 | 120, 212 | eqbrtrd 4675 |
1
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶))) < 𝐸) |