Proof of Theorem eluzgtdifelfzo
Step | Hyp | Ref
| Expression |
1 | | simpl 483 |
. . . . 5
⊢ ((𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴) → 𝑁 ∈ (ℤ≥‘𝐴)) |
2 | 1 | adantl 482 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝑁 ∈ (ℤ≥‘𝐴)) |
3 | | simpl 483 |
. . . . . 6
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈
ℤ) |
4 | 3 | adantr 481 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝐴 ∈ ℤ) |
5 | | eluzelz 12592 |
. . . . . . . 8
⊢ (𝑁 ∈
(ℤ≥‘𝐴) → 𝑁 ∈ ℤ) |
6 | 5 | ad2antrr 723 |
. . . . . . 7
⊢ (((𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴) ∧ (𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ)) → 𝑁 ∈ ℤ) |
7 | | simprr 770 |
. . . . . . 7
⊢ (((𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴) ∧ (𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ)) → 𝐵 ∈ ℤ) |
8 | 6, 7 | zsubcld 12431 |
. . . . . 6
⊢ (((𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴) ∧ (𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ)) → (𝑁 − 𝐵) ∈ ℤ) |
9 | 8 | ancoms 459 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → (𝑁 − 𝐵) ∈ ℤ) |
10 | 4, 9 | zaddcld 12430 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → (𝐴 + (𝑁 − 𝐵)) ∈ ℤ) |
11 | | zre 12323 |
. . . . . . . . 9
⊢ (𝐵 ∈ ℤ → 𝐵 ∈
ℝ) |
12 | | zre 12323 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℤ → 𝐴 ∈
ℝ) |
13 | | posdif 11468 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐵 < 𝐴 ↔ 0 < (𝐴 − 𝐵))) |
14 | 13 | biimpd 228 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐵 < 𝐴 → 0 < (𝐴 − 𝐵))) |
15 | 11, 12, 14 | syl2anr 597 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐵 < 𝐴 → 0 < (𝐴 − 𝐵))) |
16 | 15 | adantld 491 |
. . . . . . 7
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → ((𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴) → 0 < (𝐴 − 𝐵))) |
17 | 16 | imp 407 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 0 < (𝐴 − 𝐵)) |
18 | | resubcl 11285 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 − 𝐵) ∈ ℝ) |
19 | 12, 11, 18 | syl2an 596 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 − 𝐵) ∈ ℝ) |
20 | 19 | adantr 481 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → (𝐴 − 𝐵) ∈ ℝ) |
21 | | eluzelre 12593 |
. . . . . . . 8
⊢ (𝑁 ∈
(ℤ≥‘𝐴) → 𝑁 ∈ ℝ) |
22 | 21 | ad2antrl 725 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝑁 ∈ ℝ) |
23 | 20, 22 | ltaddposd 11559 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → (0 < (𝐴 − 𝐵) ↔ 𝑁 < (𝑁 + (𝐴 − 𝐵)))) |
24 | 17, 23 | mpbid 231 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝑁 < (𝑁 + (𝐴 − 𝐵))) |
25 | | zcn 12324 |
. . . . . . 7
⊢ (𝐴 ∈ ℤ → 𝐴 ∈
ℂ) |
26 | 25 | ad2antrr 723 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝐴 ∈ ℂ) |
27 | | eluzelcn 12594 |
. . . . . . 7
⊢ (𝑁 ∈
(ℤ≥‘𝐴) → 𝑁 ∈ ℂ) |
28 | 27 | ad2antrl 725 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝑁 ∈ ℂ) |
29 | | zcn 12324 |
. . . . . . . 8
⊢ (𝐵 ∈ ℤ → 𝐵 ∈
ℂ) |
30 | 29 | adantl 482 |
. . . . . . 7
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐵 ∈
ℂ) |
31 | 30 | adantr 481 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝐵 ∈ ℂ) |
32 | | addsub12 11234 |
. . . . . . 7
⊢ ((𝐴 ∈ ℂ ∧ 𝑁 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 + (𝑁 − 𝐵)) = (𝑁 + (𝐴 − 𝐵))) |
33 | 32 | breq2d 5086 |
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ 𝑁 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝑁 < (𝐴 + (𝑁 − 𝐵)) ↔ 𝑁 < (𝑁 + (𝐴 − 𝐵)))) |
34 | 26, 28, 31, 33 | syl3anc 1370 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → (𝑁 < (𝐴 + (𝑁 − 𝐵)) ↔ 𝑁 < (𝑁 + (𝐴 − 𝐵)))) |
35 | 24, 34 | mpbird 256 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝑁 < (𝐴 + (𝑁 − 𝐵))) |
36 | | elfzo2 13390 |
. . . 4
⊢ (𝑁 ∈ (𝐴..^(𝐴 + (𝑁 − 𝐵))) ↔ (𝑁 ∈ (ℤ≥‘𝐴) ∧ (𝐴 + (𝑁 − 𝐵)) ∈ ℤ ∧ 𝑁 < (𝐴 + (𝑁 − 𝐵)))) |
37 | 2, 10, 35, 36 | syl3anbrc 1342 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → 𝑁 ∈ (𝐴..^(𝐴 + (𝑁 − 𝐵)))) |
38 | | fzosubel3 13448 |
. . 3
⊢ ((𝑁 ∈ (𝐴..^(𝐴 + (𝑁 − 𝐵))) ∧ (𝑁 − 𝐵) ∈ ℤ) → (𝑁 − 𝐴) ∈ (0..^(𝑁 − 𝐵))) |
39 | 37, 9, 38 | syl2anc 584 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴)) → (𝑁 − 𝐴) ∈ (0..^(𝑁 − 𝐵))) |
40 | 39 | ex 413 |
1
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → ((𝑁 ∈
(ℤ≥‘𝐴) ∧ 𝐵 < 𝐴) → (𝑁 − 𝐴) ∈ (0..^(𝑁 − 𝐵)))) |