Metamath Proof Explorer


Theorem zesq

Description: An integer is even iff its square is even. (Contributed by Mario Carneiro, 12-Sep-2015)

Ref Expression
Assertion zesq ⊢ N ∈ ℤ → N 2 ∈ ℤ ↔ N 2 2 ∈ ℤ

Proof

Step Hyp Ref Expression
1 zcn ⊢ N ∈ ℤ → N ∈ ℂ
2 sqval ⊢ N ∈ ℂ → N 2 = N ⋅ N
3 1 2 syl ⊢ N ∈ ℤ → N 2 = N ⋅ N
4 3 oveq1d ⊢ N ∈ ℤ → N 2 2 = N ⋅ N 2
5 2cnd ⊢ N ∈ ℤ → 2 ∈ ℂ
6 2ne0 ⊢ 2 ≠ 0
7 6 a1i ⊢ N ∈ ℤ → 2 ≠ 0
8 1 1 5 7 divassd ⊢ N ∈ ℤ → N ⋅ N 2 = N ⁢ N 2
9 4 8 eqtrd ⊢ N ∈ ℤ → N 2 2 = N ⁢ N 2
10 9 adantr ⊢ N ∈ ℤ ∧ N 2 ∈ ℤ → N 2 2 = N ⁢ N 2
11 zmulcl ⊢ N ∈ ℤ ∧ N 2 ∈ ℤ → N ⁢ N 2 ∈ ℤ
12 10 11 eqeltrd ⊢ N ∈ ℤ ∧ N 2 ∈ ℤ → N 2 2 ∈ ℤ
13 1 adantr ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N ∈ ℂ
14 sqcl ⊢ N ∈ ℂ → N 2 ∈ ℂ
15 13 14 syl ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 ∈ ℂ
16 peano2cn ⊢ N 2 ∈ ℂ → N 2 + 1 ∈ ℂ
17 15 16 syl ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 ∈ ℂ
18 17 halfcld ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 2 ∈ ℂ
19 18 13 pncand ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 2 + N - N = N 2 + 1 2
20 binom21 ⊢ N ∈ ℂ → N + 1 2 = N 2 + 2 ⋅ N + 1
21 13 20 syl ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 2 = N 2 + 2 ⋅ N + 1
22 peano2cn ⊢ N ∈ ℂ → N + 1 ∈ ℂ
23 13 22 syl ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ∈ ℂ
24 sqval ⊢ N + 1 ∈ ℂ → N + 1 2 = N + 1 ⁢ N + 1
25 23 24 syl ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 2 = N + 1 ⁢ N + 1
26 2cn ⊢ 2 ∈ ℂ
27 mulcl ⊢ 2 ∈ ℂ ∧ N ∈ ℂ → 2 ⋅ N ∈ ℂ
28 26 13 27 sylancr ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → 2 ⋅ N ∈ ℂ
29 1cnd ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → 1 ∈ ℂ
30 15 28 29 add32d ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 2 ⋅ N + 1 = N 2 + 1 + 2 ⋅ N
31 21 25 30 3eqtr3d ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ⁢ N + 1 = N 2 + 1 + 2 ⋅ N
32 31 oveq1d ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ⁢ N + 1 2 = N 2 + 1 + 2 ⋅ N 2
33 2cnd ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → 2 ∈ ℂ
34 6 a1i ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → 2 ≠ 0
35 23 23 33 34 divassd ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ⁢ N + 1 2 = N + 1 ⁢ N + 1 2
36 17 28 33 34 divdird ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 + 2 ⋅ N 2 = N 2 + 1 2 + 2 ⋅ N 2
37 13 33 34 divcan3d ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → 2 ⋅ N 2 = N
38 37 oveq2d ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 2 + 2 ⋅ N 2 = N 2 + 1 2 + N
39 36 38 eqtrd ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 + 2 ⋅ N 2 = N 2 + 1 2 + N
40 32 35 39 3eqtr3d ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ⁢ N + 1 2 = N 2 + 1 2 + N
41 peano2z ⊢ N ∈ ℤ → N + 1 ∈ ℤ
42 zmulcl ⊢ N + 1 ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ⁢ N + 1 2 ∈ ℤ
43 41 42 sylan ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N + 1 ⁢ N + 1 2 ∈ ℤ
44 40 43 eqeltrrd ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 2 + N ∈ ℤ
45 simpl ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N ∈ ℤ
46 44 45 zsubcld ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 2 + N - N ∈ ℤ
47 19 46 eqeltrrd ⊢ N ∈ ℤ ∧ N + 1 2 ∈ ℤ → N 2 + 1 2 ∈ ℤ
48 47 ex ⊢ N ∈ ℤ → N + 1 2 ∈ ℤ → N 2 + 1 2 ∈ ℤ
49 48 con3d ⊢ N ∈ ℤ → ¬ N 2 + 1 2 ∈ ℤ → ¬ N + 1 2 ∈ ℤ
50 zsqcl ⊢ N ∈ ℤ → N 2 ∈ ℤ
51 zeo2 ⊢ N 2 ∈ ℤ → N 2 2 ∈ ℤ ↔ ¬ N 2 + 1 2 ∈ ℤ
52 50 51 syl ⊢ N ∈ ℤ → N 2 2 ∈ ℤ ↔ ¬ N 2 + 1 2 ∈ ℤ
53 zeo2 ⊢ N ∈ ℤ → N 2 ∈ ℤ ↔ ¬ N + 1 2 ∈ ℤ
54 49 52 53 3imtr4d ⊢ N ∈ ℤ → N 2 2 ∈ ℤ → N 2 ∈ ℤ
55 54 imp ⊢ N ∈ ℤ ∧ N 2 2 ∈ ℤ → N 2 ∈ ℤ
56 12 55 impbida ⊢ N ∈ ℤ → N 2 ∈ ℤ ↔ N 2 2 ∈ ℤ