Proof of Theorem ditgsplit
Step | Hyp | Ref
| Expression |
1 | | ditgsplit.a |
. . . 4
⊢ (𝜑 → 𝐴 ∈ (𝑋[,]𝑌)) |
2 | | ditgsplit.x |
. . . . 5
⊢ (𝜑 → 𝑋 ∈ ℝ) |
3 | | ditgsplit.y |
. . . . 5
⊢ (𝜑 → 𝑌 ∈ ℝ) |
4 | | elicc2 13144 |
. . . . 5
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝐴 ∈ (𝑋[,]𝑌) ↔ (𝐴 ∈ ℝ ∧ 𝑋 ≤ 𝐴 ∧ 𝐴 ≤ 𝑌))) |
5 | 2, 3, 4 | syl2anc 584 |
. . . 4
⊢ (𝜑 → (𝐴 ∈ (𝑋[,]𝑌) ↔ (𝐴 ∈ ℝ ∧ 𝑋 ≤ 𝐴 ∧ 𝐴 ≤ 𝑌))) |
6 | 1, 5 | mpbid 231 |
. . 3
⊢ (𝜑 → (𝐴 ∈ ℝ ∧ 𝑋 ≤ 𝐴 ∧ 𝐴 ≤ 𝑌)) |
7 | 6 | simp1d 1141 |
. 2
⊢ (𝜑 → 𝐴 ∈ ℝ) |
8 | | ditgsplit.b |
. . . 4
⊢ (𝜑 → 𝐵 ∈ (𝑋[,]𝑌)) |
9 | | elicc2 13144 |
. . . . 5
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝐵 ∈ (𝑋[,]𝑌) ↔ (𝐵 ∈ ℝ ∧ 𝑋 ≤ 𝐵 ∧ 𝐵 ≤ 𝑌))) |
10 | 2, 3, 9 | syl2anc 584 |
. . . 4
⊢ (𝜑 → (𝐵 ∈ (𝑋[,]𝑌) ↔ (𝐵 ∈ ℝ ∧ 𝑋 ≤ 𝐵 ∧ 𝐵 ≤ 𝑌))) |
11 | 8, 10 | mpbid 231 |
. . 3
⊢ (𝜑 → (𝐵 ∈ ℝ ∧ 𝑋 ≤ 𝐵 ∧ 𝐵 ≤ 𝑌)) |
12 | 11 | simp1d 1141 |
. 2
⊢ (𝜑 → 𝐵 ∈ ℝ) |
13 | 7 | adantr 481 |
. . 3
⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐴 ∈ ℝ) |
14 | | ditgsplit.c |
. . . . . 6
⊢ (𝜑 → 𝐶 ∈ (𝑋[,]𝑌)) |
15 | | elicc2 13144 |
. . . . . . 7
⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝐶 ∈ (𝑋[,]𝑌) ↔ (𝐶 ∈ ℝ ∧ 𝑋 ≤ 𝐶 ∧ 𝐶 ≤ 𝑌))) |
16 | 2, 3, 15 | syl2anc 584 |
. . . . . 6
⊢ (𝜑 → (𝐶 ∈ (𝑋[,]𝑌) ↔ (𝐶 ∈ ℝ ∧ 𝑋 ≤ 𝐶 ∧ 𝐶 ≤ 𝑌))) |
17 | 14, 16 | mpbid 231 |
. . . . 5
⊢ (𝜑 → (𝐶 ∈ ℝ ∧ 𝑋 ≤ 𝐶 ∧ 𝐶 ≤ 𝑌)) |
18 | 17 | simp1d 1141 |
. . . 4
⊢ (𝜑 → 𝐶 ∈ ℝ) |
19 | 18 | adantr 481 |
. . 3
⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐶 ∈ ℝ) |
20 | 12 | ad2antrr 723 |
. . . 4
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 ≤ 𝐶) → 𝐵 ∈ ℝ) |
21 | 18 | ad2antrr 723 |
. . . 4
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 ≤ 𝐶) → 𝐶 ∈ ℝ) |
22 | | ditgsplit.d |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (𝑋(,)𝑌)) → 𝐷 ∈ 𝑉) |
23 | | ditgsplit.i |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ (𝑋(,)𝑌) ↦ 𝐷) ∈
𝐿1) |
24 | | biid 260 |
. . . . . 6
⊢ ((𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝐶) ↔ (𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝐶)) |
25 | 2, 3, 1, 8, 14, 22, 23, 24 | ditgsplitlem 25024 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐵 ≤ 𝐶) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
26 | 25 | adantlr 712 |
. . . 4
⊢ ((((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 ≤ 𝐶) ∧ 𝐵 ≤ 𝐶) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
27 | | biid 260 |
. . . . . . . 8
⊢ ((𝐴 ≤ 𝐶 ∧ 𝐶 ≤ 𝐵) ↔ (𝐴 ≤ 𝐶 ∧ 𝐶 ≤ 𝐵)) |
28 | 2, 3, 1, 14, 8, 22, 23, 27 | ditgsplitlem 25024 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐶) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐴 → 𝐵]𝐷 d𝑥 = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥)) |
29 | 28 | oveq1d 7290 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐶) ∧ 𝐶 ≤ 𝐵) → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
30 | 2, 3, 1, 14, 22, 23 | ditgcl 25022 |
. . . . . . . . 9
⊢ (𝜑 → ⨜[𝐴 → 𝐶]𝐷 d𝑥 ∈ ℂ) |
31 | 2, 3, 14, 8, 22, 23 | ditgcl 25022 |
. . . . . . . . 9
⊢ (𝜑 → ⨜[𝐶 → 𝐵]𝐷 d𝑥 ∈ ℂ) |
32 | 2, 3, 8, 14, 22, 23 | ditgcl 25022 |
. . . . . . . . 9
⊢ (𝜑 → ⨜[𝐵 → 𝐶]𝐷 d𝑥 ∈ ℂ) |
33 | 30, 31, 32 | addassd 10997 |
. . . . . . . 8
⊢ (𝜑 → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥))) |
34 | 2, 3, 14, 8, 22, 23 | ditgswap 25023 |
. . . . . . . . . . 11
⊢ (𝜑 → ⨜[𝐵 → 𝐶]𝐷 d𝑥 = -⨜[𝐶 → 𝐵]𝐷 d𝑥) |
35 | 34 | oveq2d 7291 |
. . . . . . . . . 10
⊢ (𝜑 → (⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = (⨜[𝐶 → 𝐵]𝐷 d𝑥 + -⨜[𝐶 → 𝐵]𝐷 d𝑥)) |
36 | 31 | negidd 11322 |
. . . . . . . . . 10
⊢ (𝜑 → (⨜[𝐶 → 𝐵]𝐷 d𝑥 + -⨜[𝐶 → 𝐵]𝐷 d𝑥) = 0) |
37 | 35, 36 | eqtrd 2778 |
. . . . . . . . 9
⊢ (𝜑 → (⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = 0) |
38 | 37 | oveq2d 7291 |
. . . . . . . 8
⊢ (𝜑 → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + 0)) |
39 | 30 | addid1d 11175 |
. . . . . . . 8
⊢ (𝜑 → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + 0) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
40 | 33, 38, 39 | 3eqtrd 2782 |
. . . . . . 7
⊢ (𝜑 → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
41 | 40 | ad2antrr 723 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐶) ∧ 𝐶 ≤ 𝐵) → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
42 | 29, 41 | eqtr2d 2779 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐶) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
43 | 42 | adantllr 716 |
. . . 4
⊢ ((((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 ≤ 𝐶) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
44 | 20, 21, 26, 43 | lecasei 11081 |
. . 3
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 ≤ 𝐶) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
45 | 40 | ad2antrr 723 |
. . . 4
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
46 | | ancom 461 |
. . . . . . . 8
⊢ ((𝐴 ≤ 𝐵 ∧ 𝐶 ≤ 𝐴) ↔ (𝐶 ≤ 𝐴 ∧ 𝐴 ≤ 𝐵)) |
47 | 2, 3, 14, 1, 8, 22, 23, 46 | ditgsplitlem 25024 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → ⨜[𝐶 → 𝐵]𝐷 d𝑥 = (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) |
48 | 47 | oveq2d 7291 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥))) |
49 | 2, 3, 1, 14, 22, 23 | ditgswap 25023 |
. . . . . . . . . . 11
⊢ (𝜑 → ⨜[𝐶 → 𝐴]𝐷 d𝑥 = -⨜[𝐴 → 𝐶]𝐷 d𝑥) |
50 | 49 | oveq2d 7291 |
. . . . . . . . . 10
⊢ (𝜑 → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + -⨜[𝐴 → 𝐶]𝐷 d𝑥)) |
51 | 30 | negidd 11322 |
. . . . . . . . . 10
⊢ (𝜑 → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + -⨜[𝐴 → 𝐶]𝐷 d𝑥) = 0) |
52 | 50, 51 | eqtrd 2778 |
. . . . . . . . 9
⊢ (𝜑 → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) = 0) |
53 | 52 | oveq1d 7290 |
. . . . . . . 8
⊢ (𝜑 → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = (0 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) |
54 | 2, 3, 14, 1, 22, 23 | ditgcl 25022 |
. . . . . . . . 9
⊢ (𝜑 → ⨜[𝐶 → 𝐴]𝐷 d𝑥 ∈ ℂ) |
55 | 2, 3, 1, 8, 22, 23 | ditgcl 25022 |
. . . . . . . . 9
⊢ (𝜑 → ⨜[𝐴 → 𝐵]𝐷 d𝑥 ∈ ℂ) |
56 | 30, 54, 55 | addassd 10997 |
. . . . . . . 8
⊢ (𝜑 → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥))) |
57 | 55 | addid2d 11176 |
. . . . . . . 8
⊢ (𝜑 → (0 + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = ⨜[𝐴 → 𝐵]𝐷 d𝑥) |
58 | 53, 56, 57 | 3eqtr3d 2786 |
. . . . . . 7
⊢ (𝜑 → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) = ⨜[𝐴 → 𝐵]𝐷 d𝑥) |
59 | 58 | ad2antrr 723 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) = ⨜[𝐴 → 𝐵]𝐷 d𝑥) |
60 | 48, 59 | eqtrd 2778 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) = ⨜[𝐴 → 𝐵]𝐷 d𝑥) |
61 | 60 | oveq1d 7290 |
. . . 4
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
62 | 45, 61 | eqtr3d 2780 |
. . 3
⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐶 ≤ 𝐴) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
63 | 13, 19, 44, 62 | lecasei 11081 |
. 2
⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
64 | 7 | adantr 481 |
. . 3
⊢ ((𝜑 ∧ 𝐵 ≤ 𝐴) → 𝐴 ∈ ℝ) |
65 | 18 | adantr 481 |
. . 3
⊢ ((𝜑 ∧ 𝐵 ≤ 𝐴) → 𝐶 ∈ ℝ) |
66 | | biid 260 |
. . . . . 6
⊢ ((𝐵 ≤ 𝐴 ∧ 𝐴 ≤ 𝐶) ↔ (𝐵 ≤ 𝐴 ∧ 𝐴 ≤ 𝐶)) |
67 | 2, 3, 8, 1, 14, 22, 23, 66 | ditgsplitlem 25024 |
. . . . 5
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐴 ≤ 𝐶) → ⨜[𝐵 → 𝐶]𝐷 d𝑥 = (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) |
68 | 67 | oveq2d 7291 |
. . . 4
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐴 ≤ 𝐶) → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥))) |
69 | 2, 3, 1, 8, 22, 23 | ditgswap 25023 |
. . . . . . . . 9
⊢ (𝜑 → ⨜[𝐵 → 𝐴]𝐷 d𝑥 = -⨜[𝐴 → 𝐵]𝐷 d𝑥) |
70 | 69 | oveq2d 7291 |
. . . . . . . 8
⊢ (𝜑 → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + -⨜[𝐴 → 𝐵]𝐷 d𝑥)) |
71 | 55 | negidd 11322 |
. . . . . . . 8
⊢ (𝜑 → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + -⨜[𝐴 → 𝐵]𝐷 d𝑥) = 0) |
72 | 70, 71 | eqtrd 2778 |
. . . . . . 7
⊢ (𝜑 → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) = 0) |
73 | 72 | oveq1d 7290 |
. . . . . 6
⊢ (𝜑 → ((⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = (0 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) |
74 | 2, 3, 8, 1, 22, 23 | ditgcl 25022 |
. . . . . . 7
⊢ (𝜑 → ⨜[𝐵 → 𝐴]𝐷 d𝑥 ∈ ℂ) |
75 | 55, 74, 30 | addassd 10997 |
. . . . . 6
⊢ (𝜑 → ((⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥))) |
76 | 30 | addid2d 11176 |
. . . . . 6
⊢ (𝜑 → (0 + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
77 | 73, 75, 76 | 3eqtr3d 2786 |
. . . . 5
⊢ (𝜑 → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
78 | 77 | ad2antrr 723 |
. . . 4
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐴 ≤ 𝐶) → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
79 | 68, 78 | eqtr2d 2779 |
. . 3
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐴 ≤ 𝐶) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
80 | 12 | ad2antrr 723 |
. . . 4
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐴) → 𝐵 ∈ ℝ) |
81 | 18 | ad2antrr 723 |
. . . 4
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐴) → 𝐶 ∈ ℝ) |
82 | | ancom 461 |
. . . . . . . . . 10
⊢ ((𝐶 ≤ 𝐴 ∧ 𝐵 ≤ 𝐶) ↔ (𝐵 ≤ 𝐶 ∧ 𝐶 ≤ 𝐴)) |
83 | 2, 3, 8, 14, 1, 22, 23, 82 | ditgsplitlem 25024 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → ⨜[𝐵 → 𝐴]𝐷 d𝑥 = (⨜[𝐵 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥)) |
84 | 83 | oveq1d 7290 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = ((⨜[𝐵 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) |
85 | 32, 54, 30 | addassd 10997 |
. . . . . . . . . 10
⊢ (𝜑 → ((⨜[𝐵 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = (⨜[𝐵 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥))) |
86 | 2, 3, 14, 1, 22, 23 | ditgswap 25023 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = -⨜[𝐶 → 𝐴]𝐷 d𝑥) |
87 | 86 | oveq2d 7291 |
. . . . . . . . . . . 12
⊢ (𝜑 → (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = (⨜[𝐶 → 𝐴]𝐷 d𝑥 + -⨜[𝐶 → 𝐴]𝐷 d𝑥)) |
88 | 54 | negidd 11322 |
. . . . . . . . . . . 12
⊢ (𝜑 → (⨜[𝐶 → 𝐴]𝐷 d𝑥 + -⨜[𝐶 → 𝐴]𝐷 d𝑥) = 0) |
89 | 87, 88 | eqtrd 2778 |
. . . . . . . . . . 11
⊢ (𝜑 → (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = 0) |
90 | 89 | oveq2d 7291 |
. . . . . . . . . 10
⊢ (𝜑 → (⨜[𝐵 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) = (⨜[𝐵 → 𝐶]𝐷 d𝑥 + 0)) |
91 | 32 | addid1d 11175 |
. . . . . . . . . 10
⊢ (𝜑 → (⨜[𝐵 → 𝐶]𝐷 d𝑥 + 0) = ⨜[𝐵 → 𝐶]𝐷 d𝑥) |
92 | 85, 90, 91 | 3eqtrd 2782 |
. . . . . . . . 9
⊢ (𝜑 → ((⨜[𝐵 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = ⨜[𝐵 → 𝐶]𝐷 d𝑥) |
93 | 92 | ad2antrr 723 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → ((⨜[𝐵 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐶]𝐷 d𝑥) = ⨜[𝐵 → 𝐶]𝐷 d𝑥) |
94 | 84, 93 | eqtr2d 2779 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → ⨜[𝐵 → 𝐶]𝐷 d𝑥 = (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) |
95 | 94 | oveq2d 7291 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥))) |
96 | 77 | ad2antrr 723 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐶]𝐷 d𝑥)) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
97 | 95, 96 | eqtr2d 2779 |
. . . . 5
⊢ (((𝜑 ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
98 | 97 | adantllr 716 |
. . . 4
⊢ ((((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐴) ∧ 𝐵 ≤ 𝐶) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
99 | | ancom 461 |
. . . . . . . . . . . 12
⊢ ((𝐵 ≤ 𝐴 ∧ 𝐶 ≤ 𝐵) ↔ (𝐶 ≤ 𝐵 ∧ 𝐵 ≤ 𝐴)) |
100 | 2, 3, 14, 8, 1, 22, 23, 99 | ditgsplitlem 25024 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐶 → 𝐴]𝐷 d𝑥 = (⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥)) |
101 | 100 | oveq1d 7290 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = ((⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) |
102 | 31, 74, 55 | addassd 10997 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = (⨜[𝐶 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥))) |
103 | 2, 3, 8, 1, 22, 23 | ditgswap 25023 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ⨜[𝐴 → 𝐵]𝐷 d𝑥 = -⨜[𝐵 → 𝐴]𝐷 d𝑥) |
104 | 103 | oveq2d 7291 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = (⨜[𝐵 → 𝐴]𝐷 d𝑥 + -⨜[𝐵 → 𝐴]𝐷 d𝑥)) |
105 | 74 | negidd 11322 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (⨜[𝐵 → 𝐴]𝐷 d𝑥 + -⨜[𝐵 → 𝐴]𝐷 d𝑥) = 0) |
106 | 104, 105 | eqtrd 2778 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = 0) |
107 | 106 | oveq2d 7291 |
. . . . . . . . . . . 12
⊢ (𝜑 → (⨜[𝐶 → 𝐵]𝐷 d𝑥 + (⨜[𝐵 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) = (⨜[𝐶 → 𝐵]𝐷 d𝑥 + 0)) |
108 | 31 | addid1d 11175 |
. . . . . . . . . . . 12
⊢ (𝜑 → (⨜[𝐶 → 𝐵]𝐷 d𝑥 + 0) = ⨜[𝐶 → 𝐵]𝐷 d𝑥) |
109 | 102, 107,
108 | 3eqtrd 2782 |
. . . . . . . . . . 11
⊢ (𝜑 → ((⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = ⨜[𝐶 → 𝐵]𝐷 d𝑥) |
110 | 109 | ad2antrr 723 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ((⨜[𝐶 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐴]𝐷 d𝑥) + ⨜[𝐴 → 𝐵]𝐷 d𝑥) = ⨜[𝐶 → 𝐵]𝐷 d𝑥) |
111 | 101, 110 | eqtr2d 2779 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐶 → 𝐵]𝐷 d𝑥 = (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) |
112 | 111 | oveq2d 7291 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥))) |
113 | 58 | ad2antrr 723 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → (⨜[𝐴 → 𝐶]𝐷 d𝑥 + (⨜[𝐶 → 𝐴]𝐷 d𝑥 + ⨜[𝐴 → 𝐵]𝐷 d𝑥)) = ⨜[𝐴 → 𝐵]𝐷 d𝑥) |
114 | 112, 113 | eqtr2d 2779 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐴 → 𝐵]𝐷 d𝑥 = (⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥)) |
115 | 114 | oveq1d 7290 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
116 | 40 | ad2antrr 723 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ((⨜[𝐴 → 𝐶]𝐷 d𝑥 + ⨜[𝐶 → 𝐵]𝐷 d𝑥) + ⨜[𝐵 → 𝐶]𝐷 d𝑥) = ⨜[𝐴 → 𝐶]𝐷 d𝑥) |
117 | 115, 116 | eqtr2d 2779 |
. . . . 5
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
118 | 117 | adantlr 712 |
. . . 4
⊢ ((((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐴) ∧ 𝐶 ≤ 𝐵) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
119 | 80, 81, 98, 118 | lecasei 11081 |
. . 3
⊢ (((𝜑 ∧ 𝐵 ≤ 𝐴) ∧ 𝐶 ≤ 𝐴) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
120 | 64, 65, 79, 119 | lecasei 11081 |
. 2
⊢ ((𝜑 ∧ 𝐵 ≤ 𝐴) → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |
121 | 7, 12, 63, 120 | lecasei 11081 |
1
⊢ (𝜑 → ⨜[𝐴 → 𝐶]𝐷 d𝑥 = (⨜[𝐴 → 𝐵]𝐷 d𝑥 + ⨜[𝐵 → 𝐶]𝐷 d𝑥)) |