Proof of Theorem nn0subt
| Step | Hyp | Ref
| Expression |
| 1 | | nnsubt 4451 |
. . . . . . . 8
⊢ ((A
∈ ℕ ∧ B ∈ ℕ)
→ (A < B ↔ (B
− A) ∈ ℕ)) |
| 2 | 1 | exp 291 |
. . . . . . 7
⊢ (A
∈ ℕ → (B ∈ ℕ
→ (A < B ↔ (B
− A) ∈ ℕ))) |
| 3 | | breq2 2066 |
. . . . . . . . . 10
⊢ (B = 0
→ (A < B ↔ A <
0)) |
| 4 | | opreq1 3006 |
. . . . . . . . . . 11
⊢ (B = 0
→ (B − A) = (0 − A)) |
| 5 | 4 | eleq1d 1155 |
. . . . . . . . . 10
⊢ (B = 0
→ ((B − A) ∈ ℕ ↔ (0 − A) ∈ ℕ)) |
| 6 | 3, 5 | bibi12d 477 |
. . . . . . . . 9
⊢ (B = 0
→ ((A < B ↔ (B
− A) ∈ ℕ) ↔ (A < 0 ↔ (0 − A) ∈ ℕ))) |
| 7 | | nnret 4427 |
. . . . . . . . . . 11
⊢ (A
∈ ℕ → A ∈
ℝ) |
| 8 | | lt0neg1t 4370 |
. . . . . . . . . . 11
⊢ (A
∈ ℝ → (A < 0 ↔ 0
< -A)) |
| 9 | 7, 8 | syl 12 |
. . . . . . . . . 10
⊢ (A
∈ ℕ → (A < 0 ↔ 0
< -A)) |
| 10 | | nnnegz 4566 |
. . . . . . . . . . . 12
⊢ (A
∈ ℕ → -A ∈
ℤ) |
| 11 | | elnnz 4572 |
. . . . . . . . . . . . 13
⊢ (-A
∈ ℕ ↔ (-A ∈ ℤ
∧ 0 < -A)) |
| 12 | 11 | baib 506 |
. . . . . . . . . . . 12
⊢ (-A
∈ ℤ → (-A ∈ ℕ
↔ 0 < -A)) |
| 13 | 10, 12 | syl 12 |
. . . . . . . . . . 11
⊢ (A
∈ ℕ → (-A ∈ ℕ
↔ 0 < -A)) |
| 14 | | df-neg 4135 |
. . . . . . . . . . . 12
⊢ -A =
(0 − A) |
| 15 | 14 | eleq1i 1152 |
. . . . . . . . . . 11
⊢ (-A
∈ ℕ ↔ (0 − A) ∈
ℕ) |
| 16 | 13, 15 | syl5rbbr 413 |
. . . . . . . . . 10
⊢ (A
∈ ℕ → (0 < -A ↔ (0
− A) ∈ ℕ)) |
| 17 | 9, 16 | bitrd 406 |
. . . . . . . . 9
⊢ (A
∈ ℕ → (A < 0 ↔ (0
− A) ∈ ℕ)) |
| 18 | 6, 17 | syl5bir 184 |
. . . . . . . 8
⊢ (B = 0
→ (A ∈ ℕ → (A < B ↔
(B − A) ∈ ℕ))) |
| 19 | 18 | com12 13 |
. . . . . . 7
⊢ (A
∈ ℕ → (B = 0 →
(A < B ↔ (B
− A) ∈ ℕ))) |
| 20 | 2, 19 | jaod 329 |
. . . . . 6
⊢ (A
∈ ℕ → ((B ∈ ℕ
∨ B = 0) → (A < B ↔
(B − A) ∈ ℕ))) |
| 21 | | breq1 2065 |
. . . . . . . . 9
⊢ (A = 0
→ (A < B ↔ 0 < B)) |
| 22 | | opreq2 3007 |
. . . . . . . . . 10
⊢ (A = 0
→ (B − A) = (B −
0)) |
| 23 | 22 | eleq1d 1155 |
. . . . . . . . 9
⊢ (A = 0
→ ((B − A) ∈ ℕ ↔ (B − 0) ∈ ℕ)) |
| 24 | 21, 23 | bibi12d 477 |
. . . . . . . 8
⊢ (A = 0
→ ((A < B ↔ (B
− A) ∈ ℕ) ↔ (0 <
B ↔ (B − 0) ∈ ℕ))) |
| 25 | | nnzt 4579 |
. . . . . . . . 9
⊢ (B
∈ ℕ → B ∈
ℤ) |
| 26 | | zcnt 4568 |
. . . . . . . . . . 11
⊢ (B
∈ ℤ → B ∈
ℂ) |
| 27 | | subid1t 4160 |
. . . . . . . . . . . 12
⊢ (B
∈ ℂ → (B − 0) =
B) |
| 28 | 27 | eleq1d 1155 |
. . . . . . . . . . 11
⊢ (B
∈ ℂ → ((B − 0) ∈
ℕ ↔ B ∈ ℕ)) |
| 29 | 26, 28 | syl 12 |
. . . . . . . . . 10
⊢ (B
∈ ℤ → ((B − 0) ∈
ℕ ↔ B ∈ ℕ)) |
| 30 | | elnnz 4572 |
. . . . . . . . . . 11
⊢ (B
∈ ℕ ↔ (B ∈ ℤ
∧ 0 < B)) |
| 31 | 30 | baib 506 |
. . . . . . . . . 10
⊢ (B
∈ ℤ → (B ∈ ℕ
↔ 0 < B)) |
| 32 | 29, 31 | bitr2d 407 |
. . . . . . . . 9
⊢ (B
∈ ℤ → (0 < B ↔
(B − 0) ∈ ℕ)) |
| 33 | 25, 32 | syl 12 |
. . . . . . . 8
⊢ (B
∈ ℕ → (0 < B ↔
(B − 0) ∈ ℕ)) |
| 34 | 24, 33 | syl5bir 184 |
. . . . . . 7
⊢ (A = 0
→ (B ∈ ℕ → (A < B ↔
(B − A) ∈ ℕ))) |
| 35 | | ax0re 4063 |
. . . . . . . . . . 11
⊢ 0 ∈ ℝ |
| 36 | 35 | ltnr 4338 |
. . . . . . . . . 10
⊢ ¬ 0 < 0 |
| 37 | | 0nnn 4443 |
. . . . . . . . . . 11
⊢ ¬ 0 ∈ ℕ |
| 38 | | 0cn 4100 |
. . . . . . . . . . . . 13
⊢ 0 ∈ ℂ |
| 39 | 38 | subid 4155 |
. . . . . . . . . . . 12
⊢ (0 − 0) = 0 |
| 40 | 39 | eleq1i 1152 |
. . . . . . . . . . 11
⊢ ((0 − 0) ∈ ℕ ↔ 0
∈ ℕ) |
| 41 | 37, 40 | mtbir 167 |
. . . . . . . . . 10
⊢ ¬ (0 − 0) ∈
ℕ |
| 42 | | pm5.21 502 |
. . . . . . . . . 10
⊢ ((¬ 0 < 0 ∧ ¬ (0 − 0)
∈ ℕ) → (0 < 0 ↔ (0 − 0) ∈
ℕ)) |
| 43 | 36, 41, 42 | mp2an 520 |
. . . . . . . . 9
⊢ (0 < 0 ↔ (0 − 0) ∈
ℕ) |
| 44 | | breq2 2066 |
. . . . . . . . . 10
⊢ (B = 0
→ (0 < B ↔ 0 <
0)) |
| 45 | | opreq1 3006 |
. . . . . . . . . . 11
⊢ (B = 0
→ (B − 0) = (0 −
0)) |
| 46 | 45 | eleq1d 1155 |
. . . . . . . . . 10
⊢ (B = 0
→ ((B − 0) ∈ ℕ ↔
(0 − 0) ∈ ℕ)) |
| 47 | 44, 46 | bibi12d 477 |
. . . . . . . . 9
⊢ (B = 0
→ ((0 < B ↔ (B − 0) ∈ ℕ) ↔ (0 < 0 ↔
(0 − 0) ∈ ℕ))) |
| 48 | 43, 47 | mpbiri 169 |
. . . . . . . 8
⊢ (B = 0
→ (0 < B ↔ (B − 0) ∈ ℕ)) |
| 49 | 24, 48 | syl5bir 184 |
. . . . . . 7
⊢ (A = 0
→ (B = 0 → (A < B ↔
(B − A) ∈ ℕ))) |
| 50 | 34, 49 | jaod 329 |
. . . . . 6
⊢ (A = 0
→ ((B ∈ ℕ ∨ B = 0) → (A
< B ↔ (B − A)
∈ ℕ))) |
| 51 | 20, 50 | jaoi 275 |
. . . . 5
⊢ ((A
∈ ℕ ∨ A = 0) →
((B ∈ ℕ ∨ B = 0) → (A
< B ↔ (B − A)
∈ ℕ))) |
| 52 | 51 | imp 277 |
. . . 4
⊢ (((A
∈ ℕ ∨ A = 0) ∧ (B ∈ ℕ ∨ B = 0)) → (A < B ↔
(B − A) ∈ ℕ)) |
| 53 | | subeq0t 4169 |
. . . . . . 7
⊢ ((B
∈ ℂ ∧ A ∈ ℂ)
→ ((B − A) = 0 ↔ B
= A)) |
| 54 | | cleqcom 1103 |
. . . . . . 7
⊢ (A =
B ↔ B = A) |
| 55 | 53, 54 | syl6rbbr 417 |
. . . . . 6
⊢ ((B
∈ ℂ ∧ A ∈ ℂ)
→ (A = B ↔ (B
− A) = 0)) |
| 56 | 55 | ancoms 334 |
. . . . 5
⊢ ((A
∈ ℂ ∧ B ∈ ℂ)
→ (A = B ↔ (B
− A) = 0)) |
| 57 | | nncnt 4428 |
. . . . . 6
⊢ (A
∈ ℕ → A ∈
ℂ) |
| 58 | | eleq1 1149 |
. . . . . . 7
⊢ (A = 0
→ (A ∈ ℂ ↔ 0 ∈
ℂ)) |
| 59 | 38, 58 | mpbiri 169 |
. . . . . 6
⊢ (A = 0
→ A ∈ ℂ) |
| 60 | 57, 59 | jaoi 275 |
. . . . 5
⊢ ((A
∈ ℕ ∨ A = 0) → A ∈ ℂ) |
| 61 | | nncnt 4428 |
. . . . . 6
⊢ (B
∈ ℕ → B ∈
ℂ) |
| 62 | | eleq1 1149 |
. . . . . . 7
⊢ (B = 0
→ (B ∈ ℂ ↔ 0 ∈
ℂ)) |
| 63 | 38, 62 | mpbiri 169 |
. . . . . 6
⊢ (B = 0
→ B ∈ ℂ) |
| 64 | 61, 63 | jaoi 275 |
. . . . 5
⊢ ((B
∈ ℕ ∨ B = 0) → B ∈ ℂ) |
| 65 | 56, 60, 64 | syl2an 349 |
. . . 4
⊢ (((A
∈ ℕ ∨ A = 0) ∧ (B ∈ ℕ ∨ B = 0)) → (A = B ↔
(B − A) = 0)) |
| 66 | 52, 65 | orbi12d 475 |
. . 3
⊢ (((A
∈ ℕ ∨ A = 0) ∧ (B ∈ ℕ ∨ B = 0)) → ((A < B ∨
A = B)
↔ ((B − A) ∈ ℕ ∨ (B − A) =
0))) |
| 67 | | leloet 4284 |
. . . 4
⊢ ((A
∈ ℝ ∧ B ∈ ℝ)
→ (A ≤ B ↔ (A <
B ∨ A = B))) |
| 68 | | eleq1 1149 |
. . . . . 6
⊢ (A = 0
→ (A ∈ ℝ ↔ 0 ∈
ℝ)) |
| 69 | 35, 68 | mpbiri 169 |
. . . . 5
⊢ (A = 0
→ A ∈ ℝ) |
| 70 | 7, 69 | jaoi 275 |
. . . 4
⊢ ((A
∈ ℕ ∨ A = 0) → A ∈ ℝ) |
| 71 | | nnret 4427 |
. . . . 5
⊢ (B
∈ ℕ → B ∈
ℝ) |
| 72 | | eleq1 1149 |
. . . . . 6
⊢ (B = 0
→ (B ∈ ℝ ↔ 0 ∈
ℝ)) |
| 73 | 35, 72 | mpbiri 169 |
. . . . 5
⊢ (B = 0
→ B ∈ ℝ) |
| 74 | 71, 73 | jaoi 275 |
. . . 4
⊢ ((B
∈ ℕ ∨ B = 0) → B ∈ ℝ) |
| 75 | 67, 70, 74 | syl2an 349 |
. . 3
⊢ (((A
∈ ℕ ∨ A = 0) ∧ (B ∈ ℕ ∨ B = 0)) → (A ≤ B ↔
(A < B ∨ A =
B))) |
| 76 | | elnn0 4536 |
. . . 4
⊢ ((B
− A) ∈ ℕ0
↔ ((B − A) ∈ ℕ ∨ (B − A) =
0)) |
| 77 | 76 | a1i 7 |
. . 3
⊢ (((A
∈ ℕ ∨ A = 0) ∧ (B ∈ ℕ ∨ B = 0)) → ((B − A)
∈ ℕ0 ↔ ((B
− A) ∈ ℕ ∨ (B − A) =
0))) |
| 78 | 66, 75, 77 | 3bitr4d 424 |
. 2
⊢ (((A
∈ ℕ ∨ A = 0) ∧ (B ∈ ℕ ∨ B = 0)) → (A ≤ B ↔
(B − A) ∈ ℕ0)) |
| 79 | | elnn0 4536 |
. 2
⊢ (A
∈ ℕ0 ↔ (A ∈
ℕ ∨ A = 0)) |
| 80 | | elnn0 4536 |
. 2
⊢ (B
∈ ℕ0 ↔ (B ∈
ℕ ∨ B = 0)) |
| 81 | 78, 79, 80 | syl2anb 350 |
1
⊢ ((A
∈ ℕ0 ∧ B ∈
ℕ0) → (A ≤
B ↔ (B − A)
∈ ℕ0)) |