Proof of Theorem nn0opthlem2d
Step | Hyp | Ref
| Expression |
1 | | nn0opthd.1 |
. . . . . . . 8
⊢ (𝜑 → 𝐴 ∈
ℕ0) |
2 | | nn0opthd.2 |
. . . . . . . 8
⊢ (𝜑 → 𝐵 ∈
ℕ0) |
3 | 1, 2 | nn0addcld 9185 |
. . . . . . 7
⊢ (𝜑 → (𝐴 + 𝐵) ∈
ℕ0) |
4 | 3 | nn0red 9182 |
. . . . . 6
⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℝ) |
5 | 4, 4 | remulcld 7943 |
. . . . 5
⊢ (𝜑 → ((𝐴 + 𝐵) · (𝐴 + 𝐵)) ∈ ℝ) |
6 | 2 | nn0red 9182 |
. . . . 5
⊢ (𝜑 → 𝐵 ∈ ℝ) |
7 | 5, 6 | readdcld 7942 |
. . . 4
⊢ (𝜑 → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵) ∈ ℝ) |
8 | 7 | adantr 274 |
. . 3
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵) ∈ ℝ) |
9 | | nn0opthd.3 |
. . . . . . 7
⊢ (𝜑 → 𝐶 ∈
ℕ0) |
10 | 9 | nn0red 9182 |
. . . . . 6
⊢ (𝜑 → 𝐶 ∈ ℝ) |
11 | 10, 10 | remulcld 7943 |
. . . . 5
⊢ (𝜑 → (𝐶 · 𝐶) ∈ ℝ) |
12 | 11 | adantr 274 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (𝐶 · 𝐶) ∈ ℝ) |
13 | | nn0opthd.4 |
. . . . . . 7
⊢ (𝜑 → 𝐷 ∈
ℕ0) |
14 | 13 | nn0red 9182 |
. . . . . 6
⊢ (𝜑 → 𝐷 ∈ ℝ) |
15 | 11, 14 | readdcld 7942 |
. . . . 5
⊢ (𝜑 → ((𝐶 · 𝐶) + 𝐷) ∈ ℝ) |
16 | 15 | adantr 274 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → ((𝐶 · 𝐶) + 𝐷) ∈ ℝ) |
17 | | 2re 8941 |
. . . . . . . . 9
⊢ 2 ∈
ℝ |
18 | 17 | a1i 9 |
. . . . . . . 8
⊢ (𝜑 → 2 ∈
ℝ) |
19 | 18, 4 | remulcld 7943 |
. . . . . . 7
⊢ (𝜑 → (2 · (𝐴 + 𝐵)) ∈ ℝ) |
20 | 5, 19 | readdcld 7942 |
. . . . . 6
⊢ (𝜑 → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + (2 · (𝐴 + 𝐵))) ∈ ℝ) |
21 | 20 | adantr 274 |
. . . . 5
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + (2 · (𝐴 + 𝐵))) ∈ ℝ) |
22 | | nn0addge2 9175 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℝ ∧ 𝐴 ∈ ℕ0)
→ 𝐵 ≤ (𝐴 + 𝐵)) |
23 | 6, 1, 22 | syl2anc 409 |
. . . . . . . 8
⊢ (𝜑 → 𝐵 ≤ (𝐴 + 𝐵)) |
24 | | nn0addge1 9174 |
. . . . . . . . . 10
⊢ (((𝐴 + 𝐵) ∈ ℝ ∧ (𝐴 + 𝐵) ∈ ℕ0) → (𝐴 + 𝐵) ≤ ((𝐴 + 𝐵) + (𝐴 + 𝐵))) |
25 | 4, 3, 24 | syl2anc 409 |
. . . . . . . . 9
⊢ (𝜑 → (𝐴 + 𝐵) ≤ ((𝐴 + 𝐵) + (𝐴 + 𝐵))) |
26 | 4 | recnd 7941 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ) |
27 | 26 | 2timesd 9113 |
. . . . . . . . 9
⊢ (𝜑 → (2 · (𝐴 + 𝐵)) = ((𝐴 + 𝐵) + (𝐴 + 𝐵))) |
28 | 25, 27 | breqtrrd 4015 |
. . . . . . . 8
⊢ (𝜑 → (𝐴 + 𝐵) ≤ (2 · (𝐴 + 𝐵))) |
29 | 6, 4, 19, 23, 28 | letrd 8036 |
. . . . . . 7
⊢ (𝜑 → 𝐵 ≤ (2 · (𝐴 + 𝐵))) |
30 | 6, 19, 5, 29 | leadd2dd 8472 |
. . . . . 6
⊢ (𝜑 → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵) ≤ (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + (2 · (𝐴 + 𝐵)))) |
31 | 30 | adantr 274 |
. . . . 5
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵) ≤ (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + (2 · (𝐴 + 𝐵)))) |
32 | 3, 9 | nn0opthlem1d 10647 |
. . . . . 6
⊢ (𝜑 → ((𝐴 + 𝐵) < 𝐶 ↔ (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + (2 · (𝐴 + 𝐵))) < (𝐶 · 𝐶))) |
33 | 32 | biimpa 294 |
. . . . 5
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + (2 · (𝐴 + 𝐵))) < (𝐶 · 𝐶)) |
34 | 8, 21, 12, 31, 33 | lelttrd 8037 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵) < (𝐶 · 𝐶)) |
35 | | nn0addge1 9174 |
. . . . . 6
⊢ (((𝐶 · 𝐶) ∈ ℝ ∧ 𝐷 ∈ ℕ0) → (𝐶 · 𝐶) ≤ ((𝐶 · 𝐶) + 𝐷)) |
36 | 11, 13, 35 | syl2anc 409 |
. . . . 5
⊢ (𝜑 → (𝐶 · 𝐶) ≤ ((𝐶 · 𝐶) + 𝐷)) |
37 | 36 | adantr 274 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (𝐶 · 𝐶) ≤ ((𝐶 · 𝐶) + 𝐷)) |
38 | 8, 12, 16, 34, 37 | ltletrd 8335 |
. . 3
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵) < ((𝐶 · 𝐶) + 𝐷)) |
39 | 8, 38 | gtned 8025 |
. 2
⊢ ((𝜑 ∧ (𝐴 + 𝐵) < 𝐶) → ((𝐶 · 𝐶) + 𝐷) ≠ (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵)) |
40 | 39 | ex 114 |
1
⊢ (𝜑 → ((𝐴 + 𝐵) < 𝐶 → ((𝐶 · 𝐶) + 𝐷) ≠ (((𝐴 + 𝐵) · (𝐴 + 𝐵)) + 𝐵))) |