Proof of Theorem nnc3n3p2
Step | Hyp | Ref
| Expression |
1 | | peano2 4404 |
. . . . 5
⊢ (B ∈ Nn → (B
+c 1c) ∈
Nn ) |
2 | | nnc3n3p1 6279 |
. . . . 5
⊢ (((B +c 1c) ∈ Nn ∧ A ∈ Nn ) → ¬
(((B +c
1c) +c (B +c 1c))
+c (B
+c 1c)) = (((A +c A) +c A) +c
1c)) |
3 | 1, 2 | sylan 457 |
. . . 4
⊢ ((B ∈ Nn ∧ A ∈ Nn ) → ¬ (((B +c 1c)
+c (B
+c 1c)) +c (B +c 1c)) =
(((A +c A) +c A) +c
1c)) |
4 | 3 | ancoms 439 |
. . 3
⊢ ((A ∈ Nn ∧ B ∈ Nn ) → ¬ (((B +c 1c)
+c (B
+c 1c)) +c (B +c 1c)) =
(((A +c A) +c A) +c
1c)) |
5 | | eqcom 2355 |
. . . 4
⊢ ((((A +c A) +c A) +c 1c) =
((((B +c B) +c B) +c 2c)
+c 1c) ↔ ((((B +c B) +c B) +c 2c)
+c 1c) = (((A +c A) +c A) +c
1c)) |
6 | | addc4 4418 |
. . . . . . . . 9
⊢ ((B +c 1c)
+c (B
+c 1c)) = ((B +c B) +c (1c
+c 1c)) |
7 | 6 | addceq1i 4387 |
. . . . . . . 8
⊢ (((B +c 1c)
+c (B
+c 1c)) +c B) = (((B
+c B)
+c (1c +c
1c)) +c B) |
8 | | addc32 4417 |
. . . . . . . 8
⊢ (((B +c B) +c (1c
+c 1c)) +c B) = (((B
+c B)
+c B)
+c (1c +c
1c)) |
9 | | 1p1e2c 6156 |
. . . . . . . . 9
⊢
(1c +c 1c) =
2c |
10 | 9 | addceq2i 4388 |
. . . . . . . 8
⊢ (((B +c B) +c B) +c (1c
+c 1c)) = (((B +c B) +c B) +c
2c) |
11 | 7, 8, 10 | 3eqtrri 2378 |
. . . . . . 7
⊢ (((B +c B) +c B) +c 2c) =
(((B +c
1c) +c (B +c 1c))
+c B) |
12 | 11 | addceq1i 4387 |
. . . . . 6
⊢ ((((B +c B) +c B) +c 2c)
+c 1c) = ((((B +c 1c)
+c (B
+c 1c)) +c B) +c
1c) |
13 | | addcass 4416 |
. . . . . 6
⊢ ((((B +c 1c)
+c (B
+c 1c)) +c B) +c 1c) =
(((B +c
1c) +c (B +c 1c))
+c (B
+c 1c)) |
14 | 12, 13 | eqtri 2373 |
. . . . 5
⊢ ((((B +c B) +c B) +c 2c)
+c 1c) = (((B +c 1c)
+c (B
+c 1c)) +c (B +c
1c)) |
15 | 14 | eqeq1i 2360 |
. . . 4
⊢ (((((B +c B) +c B) +c 2c)
+c 1c) = (((A +c A) +c A) +c 1c) ↔
(((B +c
1c) +c (B +c 1c))
+c (B
+c 1c)) = (((A +c A) +c A) +c
1c)) |
16 | 5, 15 | bitri 240 |
. . 3
⊢ ((((A +c A) +c A) +c 1c) =
((((B +c B) +c B) +c 2c)
+c 1c) ↔ (((B +c 1c)
+c (B
+c 1c)) +c (B +c 1c)) =
(((A +c A) +c A) +c
1c)) |
17 | 4, 16 | sylnibr 296 |
. 2
⊢ ((A ∈ Nn ∧ B ∈ Nn ) → ¬ (((A +c A) +c A) +c 1c) =
((((B +c B) +c B) +c 2c)
+c 1c)) |
18 | | nncaddccl 4420 |
. . . . 5
⊢ ((A ∈ Nn ∧ A ∈ Nn ) → (A
+c A) ∈ Nn
) |
19 | 18 | anidms 626 |
. . . 4
⊢ (A ∈ Nn → (A
+c A) ∈ Nn
) |
20 | | nncaddccl 4420 |
. . . 4
⊢ (((A +c A) ∈ Nn ∧ A ∈ Nn ) → ((A
+c A)
+c A) ∈ Nn
) |
21 | 19, 20 | mpancom 650 |
. . 3
⊢ (A ∈ Nn → ((A
+c A)
+c A) ∈ Nn
) |
22 | | nncaddccl 4420 |
. . . . . 6
⊢ ((B ∈ Nn ∧ B ∈ Nn ) → (B
+c B) ∈ Nn
) |
23 | 22 | anidms 626 |
. . . . 5
⊢ (B ∈ Nn → (B
+c B) ∈ Nn
) |
24 | | nncaddccl 4420 |
. . . . 5
⊢ (((B +c B) ∈ Nn ∧ B ∈ Nn ) → ((B
+c B)
+c B) ∈ Nn
) |
25 | 23, 24 | mpancom 650 |
. . . 4
⊢ (B ∈ Nn → ((B
+c B)
+c B) ∈ Nn
) |
26 | | 2nnc 6168 |
. . . 4
⊢
2c ∈ Nn |
27 | | nncaddccl 4420 |
. . . 4
⊢ ((((B +c B) +c B) ∈ Nn ∧
2c ∈ Nn ) → (((B
+c B)
+c B)
+c 2c) ∈
Nn ) |
28 | 25, 26, 27 | sylancl 643 |
. . 3
⊢ (B ∈ Nn → (((B
+c B)
+c B)
+c 2c) ∈
Nn ) |
29 | | suc11nnc 4559 |
. . 3
⊢ ((((A +c A) +c A) ∈ Nn ∧ (((B +c B) +c B) +c 2c) ∈ Nn ) →
((((A +c A) +c A) +c 1c) =
((((B +c B) +c B) +c 2c)
+c 1c) ↔ ((A +c A) +c A) = (((B
+c B)
+c B)
+c 2c))) |
30 | 21, 28, 29 | syl2an 463 |
. 2
⊢ ((A ∈ Nn ∧ B ∈ Nn ) → ((((A
+c A)
+c A)
+c 1c) = ((((B +c B) +c B) +c 2c)
+c 1c) ↔ ((A +c A) +c A) = (((B
+c B)
+c B)
+c 2c))) |
31 | 17, 30 | mtbid 291 |
1
⊢ ((A ∈ Nn ∧ B ∈ Nn ) → ¬ ((A +c A) +c A) = (((B
+c B)
+c B)
+c 2c)) |