Proof of Theorem lincmb01cmp
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | simpr 484 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝑇 ∈ (0[,]1)) | 
| 2 |  | 0red 11265 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 0 ∈
ℝ) | 
| 3 |  | 1red 11263 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 1 ∈
ℝ) | 
| 4 |  | elicc01 13507 | . . . . . . . 8
⊢ (𝑇 ∈ (0[,]1) ↔ (𝑇 ∈ ℝ ∧ 0 ≤
𝑇 ∧ 𝑇 ≤ 1)) | 
| 5 | 4 | simp1bi 1145 | . . . . . . 7
⊢ (𝑇 ∈ (0[,]1) → 𝑇 ∈
ℝ) | 
| 6 | 5 | adantl 481 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝑇 ∈ ℝ) | 
| 7 |  | difrp 13074 | . . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 < 𝐵 ↔ (𝐵 − 𝐴) ∈
ℝ+)) | 
| 8 | 7 | biimp3a 1470 | . . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) → (𝐵 − 𝐴) ∈
ℝ+) | 
| 9 | 8 | adantr 480 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝐵 − 𝐴) ∈
ℝ+) | 
| 10 |  | eqid 2736 | . . . . . . 7
⊢ (0
· (𝐵 − 𝐴)) = (0 · (𝐵 − 𝐴)) | 
| 11 |  | eqid 2736 | . . . . . . 7
⊢ (1
· (𝐵 − 𝐴)) = (1 · (𝐵 − 𝐴)) | 
| 12 | 10, 11 | iccdil 13531 | . . . . . 6
⊢ (((0
∈ ℝ ∧ 1 ∈ ℝ) ∧ (𝑇 ∈ ℝ ∧ (𝐵 − 𝐴) ∈ ℝ+)) → (𝑇 ∈ (0[,]1) ↔ (𝑇 · (𝐵 − 𝐴)) ∈ ((0 · (𝐵 − 𝐴))[,](1 · (𝐵 − 𝐴))))) | 
| 13 | 2, 3, 6, 9, 12 | syl22anc 838 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 ∈ (0[,]1) ↔ (𝑇 · (𝐵 − 𝐴)) ∈ ((0 · (𝐵 − 𝐴))[,](1 · (𝐵 − 𝐴))))) | 
| 14 | 1, 13 | mpbid 232 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 · (𝐵 − 𝐴)) ∈ ((0 · (𝐵 − 𝐴))[,](1 · (𝐵 − 𝐴)))) | 
| 15 |  | simpl2 1192 | . . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝐵 ∈ ℝ) | 
| 16 |  | simpl1 1191 | . . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝐴 ∈ ℝ) | 
| 17 | 15, 16 | resubcld 11692 | . . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝐵 − 𝐴) ∈ ℝ) | 
| 18 | 17 | recnd 11290 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝐵 − 𝐴) ∈ ℂ) | 
| 19 | 18 | mul02d 11460 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (0 · (𝐵 − 𝐴)) = 0) | 
| 20 | 18 | mullidd 11280 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (1 · (𝐵 − 𝐴)) = (𝐵 − 𝐴)) | 
| 21 | 19, 20 | oveq12d 7450 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((0 · (𝐵 − 𝐴))[,](1 · (𝐵 − 𝐴))) = (0[,](𝐵 − 𝐴))) | 
| 22 | 14, 21 | eleqtrd 2842 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 · (𝐵 − 𝐴)) ∈ (0[,](𝐵 − 𝐴))) | 
| 23 | 6, 17 | remulcld 11292 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 · (𝐵 − 𝐴)) ∈ ℝ) | 
| 24 |  | eqid 2736 | . . . . 5
⊢ (0 +
𝐴) = (0 + 𝐴) | 
| 25 |  | eqid 2736 | . . . . 5
⊢ ((𝐵 − 𝐴) + 𝐴) = ((𝐵 − 𝐴) + 𝐴) | 
| 26 | 24, 25 | iccshftr 13527 | . . . 4
⊢ (((0
∈ ℝ ∧ (𝐵
− 𝐴) ∈ ℝ)
∧ ((𝑇 · (𝐵 − 𝐴)) ∈ ℝ ∧ 𝐴 ∈ ℝ)) → ((𝑇 · (𝐵 − 𝐴)) ∈ (0[,](𝐵 − 𝐴)) ↔ ((𝑇 · (𝐵 − 𝐴)) + 𝐴) ∈ ((0 + 𝐴)[,]((𝐵 − 𝐴) + 𝐴)))) | 
| 27 | 2, 17, 23, 16, 26 | syl22anc 838 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((𝑇 · (𝐵 − 𝐴)) ∈ (0[,](𝐵 − 𝐴)) ↔ ((𝑇 · (𝐵 − 𝐴)) + 𝐴) ∈ ((0 + 𝐴)[,]((𝐵 − 𝐴) + 𝐴)))) | 
| 28 | 22, 27 | mpbid 232 | . 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((𝑇 · (𝐵 − 𝐴)) + 𝐴) ∈ ((0 + 𝐴)[,]((𝐵 − 𝐴) + 𝐴))) | 
| 29 | 6 | recnd 11290 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝑇 ∈ ℂ) | 
| 30 | 15 | recnd 11290 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝐵 ∈ ℂ) | 
| 31 | 29, 30 | mulcld 11282 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 · 𝐵) ∈ ℂ) | 
| 32 | 16 | recnd 11290 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 𝐴 ∈ ℂ) | 
| 33 | 29, 32 | mulcld 11282 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 · 𝐴) ∈ ℂ) | 
| 34 | 31, 33, 32 | subadd23d 11643 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (((𝑇 · 𝐵) − (𝑇 · 𝐴)) + 𝐴) = ((𝑇 · 𝐵) + (𝐴 − (𝑇 · 𝐴)))) | 
| 35 | 29, 30, 32 | subdid 11720 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (𝑇 · (𝐵 − 𝐴)) = ((𝑇 · 𝐵) − (𝑇 · 𝐴))) | 
| 36 | 35 | oveq1d 7447 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((𝑇 · (𝐵 − 𝐴)) + 𝐴) = (((𝑇 · 𝐵) − (𝑇 · 𝐴)) + 𝐴)) | 
| 37 |  | 1re 11262 | . . . . . . . 8
⊢ 1 ∈
ℝ | 
| 38 |  | resubcl 11574 | . . . . . . . 8
⊢ ((1
∈ ℝ ∧ 𝑇
∈ ℝ) → (1 − 𝑇) ∈ ℝ) | 
| 39 | 37, 6, 38 | sylancr 587 | . . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (1 − 𝑇) ∈
ℝ) | 
| 40 | 39, 16 | remulcld 11292 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((1 − 𝑇) · 𝐴) ∈ ℝ) | 
| 41 | 40 | recnd 11290 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((1 − 𝑇) · 𝐴) ∈ ℂ) | 
| 42 | 41, 31 | addcomd 11464 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (((1 − 𝑇) · 𝐴) + (𝑇 · 𝐵)) = ((𝑇 · 𝐵) + ((1 − 𝑇) · 𝐴))) | 
| 43 |  | 1cnd 11257 | . . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → 1 ∈
ℂ) | 
| 44 | 43, 29, 32 | subdird 11721 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((1 − 𝑇) · 𝐴) = ((1 · 𝐴) − (𝑇 · 𝐴))) | 
| 45 | 32 | mullidd 11280 | . . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (1 · 𝐴) = 𝐴) | 
| 46 | 45 | oveq1d 7447 | . . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((1 · 𝐴) − (𝑇 · 𝐴)) = (𝐴 − (𝑇 · 𝐴))) | 
| 47 | 44, 46 | eqtrd 2776 | . . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((1 − 𝑇) · 𝐴) = (𝐴 − (𝑇 · 𝐴))) | 
| 48 | 47 | oveq2d 7448 | . . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((𝑇 · 𝐵) + ((1 − 𝑇) · 𝐴)) = ((𝑇 · 𝐵) + (𝐴 − (𝑇 · 𝐴)))) | 
| 49 | 42, 48 | eqtrd 2776 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (((1 − 𝑇) · 𝐴) + (𝑇 · 𝐵)) = ((𝑇 · 𝐵) + (𝐴 − (𝑇 · 𝐴)))) | 
| 50 | 34, 36, 49 | 3eqtr4d 2786 | . 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((𝑇 · (𝐵 − 𝐴)) + 𝐴) = (((1 − 𝑇) · 𝐴) + (𝑇 · 𝐵))) | 
| 51 | 32 | addlidd 11463 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (0 + 𝐴) = 𝐴) | 
| 52 | 30, 32 | npcand 11625 | . . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((𝐵 − 𝐴) + 𝐴) = 𝐵) | 
| 53 | 51, 52 | oveq12d 7450 | . 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → ((0 + 𝐴)[,]((𝐵 − 𝐴) + 𝐴)) = (𝐴[,]𝐵)) | 
| 54 | 28, 50, 53 | 3eltr3d 2854 | 1
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵) ∧ 𝑇 ∈ (0[,]1)) → (((1 − 𝑇) · 𝐴) + (𝑇 · 𝐵)) ∈ (𝐴[,]𝐵)) |