Proof of Theorem addltmul
Step | Hyp | Ref
| Expression |
1 | | 2re 8927 |
. . . . . . 7
⊢ 2 ∈
ℝ |
2 | | 1re 7898 |
. . . . . . 7
⊢ 1 ∈
ℝ |
3 | | ltsub1 8356 |
. . . . . . 7
⊢ ((2
∈ ℝ ∧ 𝐴
∈ ℝ ∧ 1 ∈ ℝ) → (2 < 𝐴 ↔ (2 − 1) < (𝐴 − 1))) |
4 | 1, 2, 3 | mp3an13 1318 |
. . . . . 6
⊢ (𝐴 ∈ ℝ → (2 <
𝐴 ↔ (2 − 1) <
(𝐴 −
1))) |
5 | | 2m1e1 8975 |
. . . . . . 7
⊢ (2
− 1) = 1 |
6 | 5 | breq1i 3989 |
. . . . . 6
⊢ ((2
− 1) < (𝐴 −
1) ↔ 1 < (𝐴 −
1)) |
7 | 4, 6 | bitrdi 195 |
. . . . 5
⊢ (𝐴 ∈ ℝ → (2 <
𝐴 ↔ 1 < (𝐴 − 1))) |
8 | | ltsub1 8356 |
. . . . . . 7
⊢ ((2
∈ ℝ ∧ 𝐵
∈ ℝ ∧ 1 ∈ ℝ) → (2 < 𝐵 ↔ (2 − 1) < (𝐵 − 1))) |
9 | 1, 2, 8 | mp3an13 1318 |
. . . . . 6
⊢ (𝐵 ∈ ℝ → (2 <
𝐵 ↔ (2 − 1) <
(𝐵 −
1))) |
10 | 5 | breq1i 3989 |
. . . . . 6
⊢ ((2
− 1) < (𝐵 −
1) ↔ 1 < (𝐵 −
1)) |
11 | 9, 10 | bitrdi 195 |
. . . . 5
⊢ (𝐵 ∈ ℝ → (2 <
𝐵 ↔ 1 < (𝐵 − 1))) |
12 | 7, 11 | bi2anan9 596 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((2 <
𝐴 ∧ 2 < 𝐵) ↔ (1 < (𝐴 − 1) ∧ 1 < (𝐵 − 1)))) |
13 | | peano2rem 8165 |
. . . . 5
⊢ (𝐴 ∈ ℝ → (𝐴 − 1) ∈
ℝ) |
14 | | peano2rem 8165 |
. . . . 5
⊢ (𝐵 ∈ ℝ → (𝐵 − 1) ∈
ℝ) |
15 | | mulgt1 8758 |
. . . . . 6
⊢ ((((𝐴 − 1) ∈ ℝ ∧
(𝐵 − 1) ∈
ℝ) ∧ (1 < (𝐴
− 1) ∧ 1 < (𝐵
− 1))) → 1 < ((𝐴 − 1) · (𝐵 − 1))) |
16 | 15 | ex 114 |
. . . . 5
⊢ (((𝐴 − 1) ∈ ℝ ∧
(𝐵 − 1) ∈
ℝ) → ((1 < (𝐴
− 1) ∧ 1 < (𝐵
− 1)) → 1 < ((𝐴 − 1) · (𝐵 − 1)))) |
17 | 13, 14, 16 | syl2an 287 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((1 <
(𝐴 − 1) ∧ 1 <
(𝐵 − 1)) → 1
< ((𝐴 − 1)
· (𝐵 −
1)))) |
18 | 12, 17 | sylbid 149 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((2 <
𝐴 ∧ 2 < 𝐵) → 1 < ((𝐴 − 1) · (𝐵 − 1)))) |
19 | | recn 7886 |
. . . . . 6
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℂ) |
20 | | recn 7886 |
. . . . . 6
⊢ (𝐵 ∈ ℝ → 𝐵 ∈
ℂ) |
21 | | ax-1cn 7846 |
. . . . . . 7
⊢ 1 ∈
ℂ |
22 | | mulsub 8299 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 1 ∈
ℂ) ∧ (𝐵 ∈
ℂ ∧ 1 ∈ ℂ)) → ((𝐴 − 1) · (𝐵 − 1)) = (((𝐴 · 𝐵) + (1 · 1)) − ((𝐴 · 1) + (𝐵 · 1)))) |
23 | 21, 22 | mpanl2 432 |
. . . . . . 7
⊢ ((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 1 ∈
ℂ)) → ((𝐴
− 1) · (𝐵
− 1)) = (((𝐴 ·
𝐵) + (1 · 1))
− ((𝐴 · 1) +
(𝐵 ·
1)))) |
24 | 21, 23 | mpanr2 435 |
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 − 1) · (𝐵 − 1)) = (((𝐴 · 𝐵) + (1 · 1)) − ((𝐴 · 1) + (𝐵 · 1)))) |
25 | 19, 20, 24 | syl2an 287 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((𝐴 − 1) · (𝐵 − 1)) = (((𝐴 · 𝐵) + (1 · 1)) − ((𝐴 · 1) + (𝐵 · 1)))) |
26 | 25 | breq2d 3994 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (1 <
((𝐴 − 1) ·
(𝐵 − 1)) ↔ 1
< (((𝐴 · 𝐵) + (1 · 1)) −
((𝐴 · 1) + (𝐵 ·
1))))) |
27 | | remulcl 7881 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 1 ∈
ℝ) → (𝐴 ·
1) ∈ ℝ) |
28 | 2, 27 | mpan2 422 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ → (𝐴 · 1) ∈
ℝ) |
29 | | remulcl 7881 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℝ ∧ 1 ∈
ℝ) → (𝐵 ·
1) ∈ ℝ) |
30 | 2, 29 | mpan2 422 |
. . . . . . 7
⊢ (𝐵 ∈ ℝ → (𝐵 · 1) ∈
ℝ) |
31 | | readdcl 7879 |
. . . . . . 7
⊢ (((𝐴 · 1) ∈ ℝ
∧ (𝐵 · 1) ∈
ℝ) → ((𝐴
· 1) + (𝐵 ·
1)) ∈ ℝ) |
32 | 28, 30, 31 | syl2an 287 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((𝐴 · 1) + (𝐵 · 1)) ∈
ℝ) |
33 | | remulcl 7881 |
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 · 𝐵) ∈ ℝ) |
34 | 2, 2 | remulcli 7913 |
. . . . . . 7
⊢ (1
· 1) ∈ ℝ |
35 | | readdcl 7879 |
. . . . . . 7
⊢ (((𝐴 · 𝐵) ∈ ℝ ∧ (1 · 1) ∈
ℝ) → ((𝐴
· 𝐵) + (1 ·
1)) ∈ ℝ) |
36 | 33, 34, 35 | sylancl 410 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((𝐴 · 𝐵) + (1 · 1)) ∈
ℝ) |
37 | | ltaddsub2 8335 |
. . . . . . 7
⊢ ((((𝐴 · 1) + (𝐵 · 1)) ∈ ℝ
∧ 1 ∈ ℝ ∧ ((𝐴 · 𝐵) + (1 · 1)) ∈ ℝ) →
((((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + (1 · 1)) ↔ 1 < (((𝐴 · 𝐵) + (1 · 1)) − ((𝐴 · 1) + (𝐵 ·
1))))) |
38 | 2, 37 | mp3an2 1315 |
. . . . . 6
⊢ ((((𝐴 · 1) + (𝐵 · 1)) ∈ ℝ
∧ ((𝐴 · 𝐵) + (1 · 1)) ∈
ℝ) → ((((𝐴
· 1) + (𝐵 ·
1)) + 1) < ((𝐴 ·
𝐵) + (1 · 1)) ↔
1 < (((𝐴 · 𝐵) + (1 · 1)) −
((𝐴 · 1) + (𝐵 ·
1))))) |
39 | 32, 36, 38 | syl2anc 409 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
((((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + (1 · 1)) ↔ 1 < (((𝐴 · 𝐵) + (1 · 1)) − ((𝐴 · 1) + (𝐵 ·
1))))) |
40 | | 1t1e1 9009 |
. . . . . . 7
⊢ (1
· 1) = 1 |
41 | 40 | oveq2i 5853 |
. . . . . 6
⊢ ((𝐴 · 𝐵) + (1 · 1)) = ((𝐴 · 𝐵) + 1) |
42 | 41 | breq2i 3990 |
. . . . 5
⊢ ((((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + (1 · 1)) ↔ (((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + 1)) |
43 | 39, 42 | bitr3di 194 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (1 <
(((𝐴 · 𝐵) + (1 · 1)) −
((𝐴 · 1) + (𝐵 · 1))) ↔ (((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + 1))) |
44 | | ltadd1 8327 |
. . . . . . 7
⊢ ((((𝐴 · 1) + (𝐵 · 1)) ∈ ℝ
∧ (𝐴 · 𝐵) ∈ ℝ ∧ 1 ∈
ℝ) → (((𝐴
· 1) + (𝐵 ·
1)) < (𝐴 · 𝐵) ↔ (((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + 1))) |
45 | 2, 44 | mp3an3 1316 |
. . . . . 6
⊢ ((((𝐴 · 1) + (𝐵 · 1)) ∈ ℝ
∧ (𝐴 · 𝐵) ∈ ℝ) →
(((𝐴 · 1) + (𝐵 · 1)) < (𝐴 · 𝐵) ↔ (((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + 1))) |
46 | 32, 33, 45 | syl2anc 409 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (((𝐴 · 1) + (𝐵 · 1)) < (𝐴 · 𝐵) ↔ (((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + 1))) |
47 | | ax-1rid 7860 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ → (𝐴 · 1) = 𝐴) |
48 | | ax-1rid 7860 |
. . . . . . 7
⊢ (𝐵 ∈ ℝ → (𝐵 · 1) = 𝐵) |
49 | 47, 48 | oveqan12d 5861 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((𝐴 · 1) + (𝐵 · 1)) = (𝐴 + 𝐵)) |
50 | 49 | breq1d 3992 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (((𝐴 · 1) + (𝐵 · 1)) < (𝐴 · 𝐵) ↔ (𝐴 + 𝐵) < (𝐴 · 𝐵))) |
51 | 46, 50 | bitr3d 189 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
((((𝐴 · 1) + (𝐵 · 1)) + 1) < ((𝐴 · 𝐵) + 1) ↔ (𝐴 + 𝐵) < (𝐴 · 𝐵))) |
52 | 26, 43, 51 | 3bitrd 213 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (1 <
((𝐴 − 1) ·
(𝐵 − 1)) ↔
(𝐴 + 𝐵) < (𝐴 · 𝐵))) |
53 | 18, 52 | sylibd 148 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((2 <
𝐴 ∧ 2 < 𝐵) → (𝐴 + 𝐵) < (𝐴 · 𝐵))) |
54 | 53 | imp 123 |
1
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (2 <
𝐴 ∧ 2 < 𝐵)) → (𝐴 + 𝐵) < (𝐴 · 𝐵)) |