Proof of Theorem ftc1lem4
Step | Hyp | Ref
| Expression |
1 | | ovexd 7290 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((𝐹‘𝑡) − (𝐹‘𝐶)) ∈ V) |
2 | | ftc1.a |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝐴 ∈ ℝ) |
3 | 2 | rexrd 10956 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐴 ∈
ℝ*) |
4 | | ftc1.x1 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → 𝑋 ∈ (𝐴[,]𝐵)) |
5 | | ftc1.b |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → 𝐵 ∈ ℝ) |
6 | | elicc2 13073 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑋 ∈ (𝐴[,]𝐵) ↔ (𝑋 ∈ ℝ ∧ 𝐴 ≤ 𝑋 ∧ 𝑋 ≤ 𝐵))) |
7 | 2, 5, 6 | syl2anc 583 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑋 ∈ (𝐴[,]𝐵) ↔ (𝑋 ∈ ℝ ∧ 𝐴 ≤ 𝑋 ∧ 𝑋 ≤ 𝐵))) |
8 | 4, 7 | mpbid 231 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑋 ∈ ℝ ∧ 𝐴 ≤ 𝑋 ∧ 𝑋 ≤ 𝐵)) |
9 | 8 | simp2d 1141 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐴 ≤ 𝑋) |
10 | | iooss1 13043 |
. . . . . . . . . . . . . 14
⊢ ((𝐴 ∈ ℝ*
∧ 𝐴 ≤ 𝑋) → (𝑋(,)𝑌) ⊆ (𝐴(,)𝑌)) |
11 | 3, 9, 10 | syl2anc 583 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ (𝐴(,)𝑌)) |
12 | 5 | rexrd 10956 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐵 ∈
ℝ*) |
13 | | ftc1.y1 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → 𝑌 ∈ (𝐴[,]𝐵)) |
14 | | elicc2 13073 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑌 ∈ (𝐴[,]𝐵) ↔ (𝑌 ∈ ℝ ∧ 𝐴 ≤ 𝑌 ∧ 𝑌 ≤ 𝐵))) |
15 | 2, 5, 14 | syl2anc 583 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑌 ∈ (𝐴[,]𝐵) ↔ (𝑌 ∈ ℝ ∧ 𝐴 ≤ 𝑌 ∧ 𝑌 ≤ 𝐵))) |
16 | 13, 15 | mpbid 231 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑌 ∈ ℝ ∧ 𝐴 ≤ 𝑌 ∧ 𝑌 ≤ 𝐵)) |
17 | 16 | simp3d 1142 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝑌 ≤ 𝐵) |
18 | | iooss2 13044 |
. . . . . . . . . . . . . 14
⊢ ((𝐵 ∈ ℝ*
∧ 𝑌 ≤ 𝐵) → (𝐴(,)𝑌) ⊆ (𝐴(,)𝐵)) |
19 | 12, 17, 18 | syl2anc 583 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐴(,)𝑌) ⊆ (𝐴(,)𝐵)) |
20 | 11, 19 | sstrd 3927 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ (𝐴(,)𝐵)) |
21 | | ftc1.s |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝐴(,)𝐵) ⊆ 𝐷) |
22 | 20, 21 | sstrd 3927 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ 𝐷) |
23 | 22 | sselda 3917 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 ∈ 𝐷) |
24 | | ftc1.g |
. . . . . . . . . . . 12
⊢ 𝐺 = (𝑥 ∈ (𝐴[,]𝐵) ↦ ∫(𝐴(,)𝑥)(𝐹‘𝑡) d𝑡) |
25 | | ftc1.le |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐴 ≤ 𝐵) |
26 | | ftc1.d |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐷 ⊆ ℝ) |
27 | | ftc1.i |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐹 ∈
𝐿1) |
28 | | ftc1.c |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐶 ∈ (𝐴(,)𝐵)) |
29 | | ftc1.f |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐹 ∈ ((𝐾 CnP 𝐿)‘𝐶)) |
30 | | ftc1.j |
. . . . . . . . . . . 12
⊢ 𝐽 = (𝐿 ↾t
ℝ) |
31 | | ftc1.k |
. . . . . . . . . . . 12
⊢ 𝐾 = (𝐿 ↾t 𝐷) |
32 | | ftc1.l |
. . . . . . . . . . . 12
⊢ 𝐿 =
(TopOpen‘ℂfld) |
33 | 24, 2, 5, 25, 21, 26, 27, 28, 29, 30, 31, 32 | ftc1lem3 25107 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐹:𝐷⟶ℂ) |
34 | 33 | ffvelrnda 6943 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ 𝐷) → (𝐹‘𝑡) ∈ ℂ) |
35 | 23, 34 | syldan 590 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐹‘𝑡) ∈ ℂ) |
36 | | ioombl 24634 |
. . . . . . . . . . 11
⊢ (𝑋(,)𝑌) ∈ dom vol |
37 | 36 | a1i 11 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑋(,)𝑌) ∈ dom vol) |
38 | | fvexd 6771 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ 𝐷) → (𝐹‘𝑡) ∈ V) |
39 | 33 | feqmptd 6819 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐹 = (𝑡 ∈ 𝐷 ↦ (𝐹‘𝑡))) |
40 | 39, 27 | eqeltrrd 2840 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑡 ∈ 𝐷 ↦ (𝐹‘𝑡)) ∈
𝐿1) |
41 | 22, 37, 38, 40 | iblss 24874 |
. . . . . . . . 9
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐹‘𝑡)) ∈
𝐿1) |
42 | 21, 28 | sseldd 3918 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐶 ∈ 𝐷) |
43 | 33, 42 | ffvelrnd 6944 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐹‘𝐶) ∈ ℂ) |
44 | 43 | adantr 480 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐹‘𝐶) ∈ ℂ) |
45 | | fconstmpt 5640 |
. . . . . . . . . 10
⊢ ((𝑋(,)𝑌) × {(𝐹‘𝐶)}) = (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐹‘𝐶)) |
46 | | mblvol 24599 |
. . . . . . . . . . . . 13
⊢ ((𝑋(,)𝑌) ∈ dom vol → (vol‘(𝑋(,)𝑌)) = (vol*‘(𝑋(,)𝑌))) |
47 | 36, 46 | ax-mp 5 |
. . . . . . . . . . . 12
⊢
(vol‘(𝑋(,)𝑌)) = (vol*‘(𝑋(,)𝑌)) |
48 | | ioossicc 13094 |
. . . . . . . . . . . . . 14
⊢ (𝑋(,)𝑌) ⊆ (𝑋[,]𝑌) |
49 | 48 | a1i 11 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ (𝑋[,]𝑌)) |
50 | | iccssre 13090 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ) |
51 | 2, 5, 50 | syl2anc 583 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ) |
52 | 51, 4 | sseldd 3918 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝑋 ∈ ℝ) |
53 | 51, 13 | sseldd 3918 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝑌 ∈ ℝ) |
54 | | iccmbl 24635 |
. . . . . . . . . . . . . . 15
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝑋[,]𝑌) ∈ dom vol) |
55 | 52, 53, 54 | syl2anc 583 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑋[,]𝑌) ∈ dom vol) |
56 | | mblss 24600 |
. . . . . . . . . . . . . 14
⊢ ((𝑋[,]𝑌) ∈ dom vol → (𝑋[,]𝑌) ⊆ ℝ) |
57 | 55, 56 | syl 17 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑋[,]𝑌) ⊆ ℝ) |
58 | | mblvol 24599 |
. . . . . . . . . . . . . . 15
⊢ ((𝑋[,]𝑌) ∈ dom vol → (vol‘(𝑋[,]𝑌)) = (vol*‘(𝑋[,]𝑌))) |
59 | 55, 58 | syl 17 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (vol‘(𝑋[,]𝑌)) = (vol*‘(𝑋[,]𝑌))) |
60 | | iccvolcl 24636 |
. . . . . . . . . . . . . . 15
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) →
(vol‘(𝑋[,]𝑌)) ∈
ℝ) |
61 | 52, 53, 60 | syl2anc 583 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (vol‘(𝑋[,]𝑌)) ∈ ℝ) |
62 | 59, 61 | eqeltrrd 2840 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (vol*‘(𝑋[,]𝑌)) ∈ ℝ) |
63 | | ovolsscl 24555 |
. . . . . . . . . . . . 13
⊢ (((𝑋(,)𝑌) ⊆ (𝑋[,]𝑌) ∧ (𝑋[,]𝑌) ⊆ ℝ ∧ (vol*‘(𝑋[,]𝑌)) ∈ ℝ) → (vol*‘(𝑋(,)𝑌)) ∈ ℝ) |
64 | 49, 57, 62, 63 | syl3anc 1369 |
. . . . . . . . . . . 12
⊢ (𝜑 → (vol*‘(𝑋(,)𝑌)) ∈ ℝ) |
65 | 47, 64 | eqeltrid 2843 |
. . . . . . . . . . 11
⊢ (𝜑 → (vol‘(𝑋(,)𝑌)) ∈ ℝ) |
66 | | iblconst 24887 |
. . . . . . . . . . 11
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ (𝐹‘𝐶) ∈ ℂ) → ((𝑋(,)𝑌) × {(𝐹‘𝐶)}) ∈
𝐿1) |
67 | 37, 65, 43, 66 | syl3anc 1369 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝑋(,)𝑌) × {(𝐹‘𝐶)}) ∈
𝐿1) |
68 | 45, 67 | eqeltrrid 2844 |
. . . . . . . . 9
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐹‘𝐶)) ∈
𝐿1) |
69 | 35, 41, 44, 68 | iblsub 24891 |
. . . . . . . 8
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ ((𝐹‘𝑡) − (𝐹‘𝐶))) ∈
𝐿1) |
70 | 1, 69 | itgcl 24853 |
. . . . . . 7
⊢ (𝜑 → ∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 ∈ ℂ) |
71 | 70 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 ∈ ℂ) |
72 | 53, 52 | resubcld 11333 |
. . . . . . . 8
⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℝ) |
73 | 72 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑌 − 𝑋) ∈ ℝ) |
74 | 73 | recnd 10934 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑌 − 𝑋) ∈ ℂ) |
75 | 52, 53 | posdifd 11492 |
. . . . . . . 8
⊢ (𝜑 → (𝑋 < 𝑌 ↔ 0 < (𝑌 − 𝑋))) |
76 | 75 | biimpa 476 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < (𝑌 − 𝑋)) |
77 | 76 | gt0ne0d 11469 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑌 − 𝑋) ≠ 0) |
78 | 71, 74, 77 | divcld 11681 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) ∈ ℂ) |
79 | 43 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝐹‘𝐶) ∈ ℂ) |
80 | | ltle 10994 |
. . . . . . . . . . 11
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝑋 < 𝑌 → 𝑋 ≤ 𝑌)) |
81 | 52, 53, 80 | syl2anc 583 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑋 < 𝑌 → 𝑋 ≤ 𝑌)) |
82 | 81 | imp 406 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝑋 ≤ 𝑌) |
83 | 24, 2, 5, 25, 21, 26, 27, 33, 4, 13 | ftc1lem1 25104 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 ≤ 𝑌) → ((𝐺‘𝑌) − (𝐺‘𝑋)) = ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡) |
84 | 82, 83 | syldan 590 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐺‘𝑌) − (𝐺‘𝑋)) = ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡) |
85 | 35, 44 | npcand 11266 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (((𝐹‘𝑡) − (𝐹‘𝐶)) + (𝐹‘𝐶)) = (𝐹‘𝑡)) |
86 | 85 | itgeq2dv 24851 |
. . . . . . . . . 10
⊢ (𝜑 → ∫(𝑋(,)𝑌)(((𝐹‘𝑡) − (𝐹‘𝐶)) + (𝐹‘𝐶)) d𝑡 = ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡) |
87 | 35, 44 | subcld 11262 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((𝐹‘𝑡) − (𝐹‘𝐶)) ∈ ℂ) |
88 | 87, 69, 44, 68 | itgadd 24894 |
. . . . . . . . . 10
⊢ (𝜑 → ∫(𝑋(,)𝑌)(((𝐹‘𝑡) − (𝐹‘𝐶)) + (𝐹‘𝐶)) d𝑡 = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡)) |
89 | 86, 88 | eqtr3d 2780 |
. . . . . . . . 9
⊢ (𝜑 → ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡 = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡)) |
90 | 89 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐹‘𝑡) d𝑡 = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡)) |
91 | | itgconst 24888 |
. . . . . . . . . . . 12
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ (𝐹‘𝐶) ∈ ℂ) → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌)))) |
92 | 37, 65, 43, 91 | syl3anc 1369 |
. . . . . . . . . . 11
⊢ (𝜑 → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌)))) |
93 | 92 | adantr 480 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌)))) |
94 | 52 | adantr 480 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝑋 ∈ ℝ) |
95 | 53 | adantr 480 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝑌 ∈ ℝ) |
96 | | ovolioo 24637 |
. . . . . . . . . . . . 13
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌) → (vol*‘(𝑋(,)𝑌)) = (𝑌 − 𝑋)) |
97 | 94, 95, 82, 96 | syl3anc 1369 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (vol*‘(𝑋(,)𝑌)) = (𝑌 − 𝑋)) |
98 | 47, 97 | syl5eq 2791 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (vol‘(𝑋(,)𝑌)) = (𝑌 − 𝑋)) |
99 | 98 | oveq2d 7271 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐹‘𝐶) · (vol‘(𝑋(,)𝑌))) = ((𝐹‘𝐶) · (𝑌 − 𝑋))) |
100 | 93, 99 | eqtrd 2778 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡 = ((𝐹‘𝐶) · (𝑌 − 𝑋))) |
101 | 100 | oveq2d 7271 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ∫(𝑋(,)𝑌)(𝐹‘𝐶) d𝑡) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋)))) |
102 | 84, 90, 101 | 3eqtrd 2782 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐺‘𝑌) − (𝐺‘𝑋)) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋)))) |
103 | 102 | oveq1d 7270 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋))) / (𝑌 − 𝑋))) |
104 | 79, 74 | mulcld 10926 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝐹‘𝐶) · (𝑌 − 𝑋)) ∈ ℂ) |
105 | 71, 104, 74, 77 | divdird 11719 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 + ((𝐹‘𝐶) · (𝑌 − 𝑋))) / (𝑌 − 𝑋)) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (((𝐹‘𝐶) · (𝑌 − 𝑋)) / (𝑌 − 𝑋)))) |
106 | 79, 74, 77 | divcan4d 11687 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((𝐹‘𝐶) · (𝑌 − 𝑋)) / (𝑌 − 𝑋)) = (𝐹‘𝐶)) |
107 | 106 | oveq2d 7271 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (((𝐹‘𝐶) · (𝑌 − 𝑋)) / (𝑌 − 𝑋))) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (𝐹‘𝐶))) |
108 | 103, 105,
107 | 3eqtrd 2782 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) = ((∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)) + (𝐹‘𝐶))) |
109 | 78, 79, 108 | mvrraddd 11317 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶)) = (∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋))) |
110 | 109 | fveq2d 6760 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶))) = (abs‘(∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋)))) |
111 | 71, 74, 77 | absdivd 15095 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘(∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡 / (𝑌 − 𝑋))) = ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (abs‘(𝑌 − 𝑋)))) |
112 | | 0re 10908 |
. . . . . . 7
⊢ 0 ∈
ℝ |
113 | | ltle 10994 |
. . . . . . 7
⊢ ((0
∈ ℝ ∧ (𝑌
− 𝑋) ∈ ℝ)
→ (0 < (𝑌 −
𝑋) → 0 ≤ (𝑌 − 𝑋))) |
114 | 112, 73, 113 | sylancr 586 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (0 < (𝑌 − 𝑋) → 0 ≤ (𝑌 − 𝑋))) |
115 | 76, 114 | mpd 15 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 ≤ (𝑌 − 𝑋)) |
116 | 73, 115 | absidd 15062 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘(𝑌 − 𝑋)) = (𝑌 − 𝑋)) |
117 | 116 | oveq2d 7271 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (abs‘(𝑌 − 𝑋))) = ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋))) |
118 | 110, 111,
117 | 3eqtrd 2782 |
. 2
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶))) = ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋))) |
119 | 70 | abscld 15076 |
. . . . 5
⊢ (𝜑 → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ) |
120 | 119 | adantr 480 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ) |
121 | 87 | abscld 15076 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) ∈ ℝ) |
122 | 1, 69 | iblabs 24898 |
. . . . . 6
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
𝐿1) |
123 | 121, 122 | itgrecl 24867 |
. . . . 5
⊢ (𝜑 → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 ∈ ℝ) |
124 | 123 | adantr 480 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 ∈ ℝ) |
125 | | ftc1.e |
. . . . . . 7
⊢ (𝜑 → 𝐸 ∈
ℝ+) |
126 | 125 | rpred 12701 |
. . . . . 6
⊢ (𝜑 → 𝐸 ∈ ℝ) |
127 | 72, 126 | remulcld 10936 |
. . . . 5
⊢ (𝜑 → ((𝑌 − 𝑋) · 𝐸) ∈ ℝ) |
128 | 127 | adantr 480 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((𝑌 − 𝑋) · 𝐸) ∈ ℝ) |
129 | 87, 69 | itgabs 24904 |
. . . . 5
⊢ (𝜑 → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ≤ ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡) |
130 | 129 | adantr 480 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ≤ ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡) |
131 | 76, 98 | breqtrrd 5098 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < (vol‘(𝑋(,)𝑌))) |
132 | 126 | adantr 480 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝐸 ∈ ℝ) |
133 | | fconstmpt 5640 |
. . . . . . . . . 10
⊢ ((𝑋(,)𝑌) × {𝐸}) = (𝑡 ∈ (𝑋(,)𝑌) ↦ 𝐸) |
134 | 126 | recnd 10934 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐸 ∈ ℂ) |
135 | | iblconst 24887 |
. . . . . . . . . . 11
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ 𝐸 ∈ ℂ) → ((𝑋(,)𝑌) × {𝐸}) ∈
𝐿1) |
136 | 37, 65, 134, 135 | syl3anc 1369 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝑋(,)𝑌) × {𝐸}) ∈
𝐿1) |
137 | 133, 136 | eqeltrrid 2844 |
. . . . . . . . 9
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ 𝐸) ∈
𝐿1) |
138 | 132, 137,
121, 122 | iblsub 24891 |
. . . . . . . 8
⊢ (𝜑 → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))))) ∈
𝐿1) |
139 | 138 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝑡 ∈ (𝑋(,)𝑌) ↦ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))))) ∈
𝐿1) |
140 | 26, 42 | sseldd 3918 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐶 ∈ ℝ) |
141 | | ftc1.r |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝑅 ∈
ℝ+) |
142 | 141 | rpred 12701 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝑅 ∈ ℝ) |
143 | 140, 142 | resubcld 11333 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐶 − 𝑅) ∈ ℝ) |
144 | 143 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 − 𝑅) ∈ ℝ) |
145 | 52 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑋 ∈ ℝ) |
146 | 22, 26 | sstrd 3927 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑋(,)𝑌) ⊆ ℝ) |
147 | 146 | sselda 3917 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 ∈ ℝ) |
148 | | ftc1.x2 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (abs‘(𝑋 − 𝐶)) < 𝑅) |
149 | 52, 140, 142 | absdifltd 15073 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((abs‘(𝑋 − 𝐶)) < 𝑅 ↔ ((𝐶 − 𝑅) < 𝑋 ∧ 𝑋 < (𝐶 + 𝑅)))) |
150 | 148, 149 | mpbid 231 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((𝐶 − 𝑅) < 𝑋 ∧ 𝑋 < (𝐶 + 𝑅))) |
151 | 150 | simpld 494 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐶 − 𝑅) < 𝑋) |
152 | 151 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 − 𝑅) < 𝑋) |
153 | | eliooord 13067 |
. . . . . . . . . . . . . 14
⊢ (𝑡 ∈ (𝑋(,)𝑌) → (𝑋 < 𝑡 ∧ 𝑡 < 𝑌)) |
154 | 153 | adantl 481 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝑋 < 𝑡 ∧ 𝑡 < 𝑌)) |
155 | 154 | simpld 494 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑋 < 𝑡) |
156 | 144, 145,
147, 152, 155 | lttrd 11066 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 − 𝑅) < 𝑡) |
157 | 53 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑌 ∈ ℝ) |
158 | 140, 142 | readdcld 10935 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝐶 + 𝑅) ∈ ℝ) |
159 | 158 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐶 + 𝑅) ∈ ℝ) |
160 | 154 | simprd 495 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 < 𝑌) |
161 | | ftc1.y2 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (abs‘(𝑌 − 𝐶)) < 𝑅) |
162 | 53, 140, 142 | absdifltd 15073 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((abs‘(𝑌 − 𝐶)) < 𝑅 ↔ ((𝐶 − 𝑅) < 𝑌 ∧ 𝑌 < (𝐶 + 𝑅)))) |
163 | 161, 162 | mpbid 231 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((𝐶 − 𝑅) < 𝑌 ∧ 𝑌 < (𝐶 + 𝑅))) |
164 | 163 | simprd 495 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝑌 < (𝐶 + 𝑅)) |
165 | 164 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑌 < (𝐶 + 𝑅)) |
166 | 147, 157,
159, 160, 165 | lttrd 11066 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑡 < (𝐶 + 𝑅)) |
167 | 140 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝐶 ∈ ℝ) |
168 | 142 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → 𝑅 ∈ ℝ) |
169 | 147, 167,
168 | absdifltd 15073 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((abs‘(𝑡 − 𝐶)) < 𝑅 ↔ ((𝐶 − 𝑅) < 𝑡 ∧ 𝑡 < (𝐶 + 𝑅)))) |
170 | 156, 166,
169 | mpbir2and 709 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (abs‘(𝑡 − 𝐶)) < 𝑅) |
171 | | fvoveq1 7278 |
. . . . . . . . . . . . 13
⊢ (𝑦 = 𝑡 → (abs‘(𝑦 − 𝐶)) = (abs‘(𝑡 − 𝐶))) |
172 | 171 | breq1d 5080 |
. . . . . . . . . . . 12
⊢ (𝑦 = 𝑡 → ((abs‘(𝑦 − 𝐶)) < 𝑅 ↔ (abs‘(𝑡 − 𝐶)) < 𝑅)) |
173 | 172 | imbrov2fvoveq 7280 |
. . . . . . . . . . 11
⊢ (𝑦 = 𝑡 → (((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸) ↔ ((abs‘(𝑡 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸))) |
174 | | ftc1.fc |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐷) → ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸)) |
175 | 174 | ralrimiva 3107 |
. . . . . . . . . . . 12
⊢ (𝜑 → ∀𝑦 ∈ 𝐷 ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸)) |
176 | 175 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ∀𝑦 ∈ 𝐷 ((abs‘(𝑦 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑦) − (𝐹‘𝐶))) < 𝐸)) |
177 | 173, 176,
23 | rspcdva 3554 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((abs‘(𝑡 − 𝐶)) < 𝑅 → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸)) |
178 | 170, 177 | mpd 15 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸) |
179 | | difrp 12697 |
. . . . . . . . . 10
⊢
(((abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) ∈ ℝ ∧ 𝐸 ∈ ℝ) → ((abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸 ↔ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+)) |
180 | 121, 132,
179 | syl2anc 583 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → ((abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) < 𝐸 ↔ (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+)) |
181 | 178, 180 | mpbid 231 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+) |
182 | 181 | adantlr 711 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑋 < 𝑌) ∧ 𝑡 ∈ (𝑋(,)𝑌)) → (𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) ∈
ℝ+) |
183 | 131, 139,
182 | itggt0 24913 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡) |
184 | 132, 137,
121, 122 | itgsub 24895 |
. . . . . . . 8
⊢ (𝜑 → ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡 = (∫(𝑋(,)𝑌)𝐸 d𝑡 − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
185 | 184 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡 = (∫(𝑋(,)𝑌)𝐸 d𝑡 − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
186 | | itgconst 24888 |
. . . . . . . . . . 11
⊢ (((𝑋(,)𝑌) ∈ dom vol ∧ (vol‘(𝑋(,)𝑌)) ∈ ℝ ∧ 𝐸 ∈ ℂ) → ∫(𝑋(,)𝑌)𝐸 d𝑡 = (𝐸 · (vol‘(𝑋(,)𝑌)))) |
187 | 37, 65, 134, 186 | syl3anc 1369 |
. . . . . . . . . 10
⊢ (𝜑 → ∫(𝑋(,)𝑌)𝐸 d𝑡 = (𝐸 · (vol‘(𝑋(,)𝑌)))) |
188 | 187 | adantr 480 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)𝐸 d𝑡 = (𝐸 · (vol‘(𝑋(,)𝑌)))) |
189 | 98 | oveq2d 7271 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝐸 · (vol‘(𝑋(,)𝑌))) = (𝐸 · (𝑌 − 𝑋))) |
190 | 72 | recnd 10934 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℂ) |
191 | 134, 190 | mulcomd 10927 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐸 · (𝑌 − 𝑋)) = ((𝑌 − 𝑋) · 𝐸)) |
192 | 191 | adantr 480 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (𝐸 · (𝑌 − 𝑋)) = ((𝑌 − 𝑋) · 𝐸)) |
193 | 188, 189,
192 | 3eqtrd 2782 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)𝐸 d𝑡 = ((𝑌 − 𝑋) · 𝐸)) |
194 | 193 | oveq1d 7270 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (∫(𝑋(,)𝑌)𝐸 d𝑡 − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡) = (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
195 | 185, 194 | eqtrd 2778 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(𝐸 − (abs‘((𝐹‘𝑡) − (𝐹‘𝐶)))) d𝑡 = (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
196 | 183, 195 | breqtrd 5096 |
. . . . 5
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 0 < (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) |
197 | 123, 127 | posdifd 11492 |
. . . . . 6
⊢ (𝜑 → (∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 < ((𝑌 − 𝑋) · 𝐸) ↔ 0 < (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡))) |
198 | 197 | biimpar 477 |
. . . . 5
⊢ ((𝜑 ∧ 0 < (((𝑌 − 𝑋) · 𝐸) − ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡)) → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 < ((𝑌 − 𝑋) · 𝐸)) |
199 | 196, 198 | syldan 590 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ∫(𝑋(,)𝑌)(abs‘((𝐹‘𝑡) − (𝐹‘𝐶))) d𝑡 < ((𝑌 − 𝑋) · 𝐸)) |
200 | 120, 124,
128, 130, 199 | lelttrd 11063 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) < ((𝑌 − 𝑋) · 𝐸)) |
201 | 71 | abscld 15076 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ) |
202 | 126 | adantr 480 |
. . . 4
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → 𝐸 ∈ ℝ) |
203 | | ltdivmul 11780 |
. . . 4
⊢
(((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) ∈ ℝ ∧ 𝐸 ∈ ℝ ∧ ((𝑌 − 𝑋) ∈ ℝ ∧ 0 < (𝑌 − 𝑋))) → (((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋)) < 𝐸 ↔ (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) < ((𝑌 − 𝑋) · 𝐸))) |
204 | 201, 202,
73, 76, 203 | syl112anc 1372 |
. . 3
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋)) < 𝐸 ↔ (abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) < ((𝑌 − 𝑋) · 𝐸))) |
205 | 200, 204 | mpbird 256 |
. 2
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → ((abs‘∫(𝑋(,)𝑌)((𝐹‘𝑡) − (𝐹‘𝐶)) d𝑡) / (𝑌 − 𝑋)) < 𝐸) |
206 | 118, 205 | eqbrtrd 5092 |
1
⊢ ((𝜑 ∧ 𝑋 < 𝑌) → (abs‘((((𝐺‘𝑌) − (𝐺‘𝑋)) / (𝑌 − 𝑋)) − (𝐹‘𝐶))) < 𝐸) |