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)) |