Metamath Proof Explorer


Theorem dvdssq

Description: Two integers are divisible iff their squares are. (Contributed by Scott Fenton, 18-Apr-2014) (Revised by Mario Carneiro, 19-Apr-2014)

Ref Expression
Assertion dvdssq ⊢ M ∈ ℤ ∧ N ∈ ℤ → M ∥ N ↔ M 2 ∥ N 2

Proof

Step Hyp Ref Expression
1 breq1 ⊢ M = 0 → M ∥ N ↔ 0 ∥ N
2 sq0i ⊢ M = 0 → M 2 = 0
3 2 breq1d ⊢ M = 0 → M 2 ∥ N 2 ↔ 0 ∥ N 2
4 1 3 bibi12d ⊢ M = 0 → M ∥ N ↔ M 2 ∥ N 2 ↔ 0 ∥ N ↔ 0 ∥ N 2
5 nnabscl ⊢ M ∈ ℤ ∧ M ≠ 0 → M ∈ ℕ
6 breq2 ⊢ N = 0 → M ∥ N ↔ M ∥ 0
7 sq0i ⊢ N = 0 → N 2 = 0
8 7 breq2d ⊢ N = 0 → M 2 ∥ N 2 ↔ M 2 ∥ 0
9 6 8 bibi12d ⊢ N = 0 → M ∥ N ↔ M 2 ∥ N 2 ↔ M ∥ 0 ↔ M 2 ∥ 0
10 nnabscl ⊢ N ∈ ℤ ∧ N ≠ 0 → N ∈ ℕ
11 dvdssqnn ⊢ M ∈ ℕ ∧ N ∈ ℕ → M ∥ N ↔ M 2 ∥ N 2
12 10 11 sylan2 ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M ∥ N ↔ M 2 ∥ N 2
13 nnz ⊢ M ∈ ℕ → M ∈ ℤ
14 simpl ⊢ N ∈ ℤ ∧ N ≠ 0 → N ∈ ℤ
15 dvdsabsb ⊢ M ∈ ℤ ∧ N ∈ ℤ → M ∥ N ↔ M ∥ N
16 13 14 15 syl2an ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M ∥ N ↔ M ∥ N
17 nnsqcl ⊢ M ∈ ℕ → M 2 ∈ ℕ
18 17 nnzd ⊢ M ∈ ℕ → M 2 ∈ ℤ
19 zsqcl ⊢ N ∈ ℤ → N 2 ∈ ℤ
20 19 adantr ⊢ N ∈ ℤ ∧ N ≠ 0 → N 2 ∈ ℤ
21 dvdsabsb ⊢ M 2 ∈ ℤ ∧ N 2 ∈ ℤ → M 2 ∥ N 2 ↔ M 2 ∥ N 2
22 18 20 21 syl2an ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M 2 ∥ N 2 ↔ M 2 ∥ N 2
23 zcn ⊢ N ∈ ℤ → N ∈ ℂ
24 23 adantr ⊢ N ∈ ℤ ∧ N ≠ 0 → N ∈ ℂ
25 abssq ⊢ N ∈ ℂ → N 2 = N 2
26 24 25 syl ⊢ N ∈ ℤ ∧ N ≠ 0 → N 2 = N 2
27 26 breq2d ⊢ N ∈ ℤ ∧ N ≠ 0 → M 2 ∥ N 2 ↔ M 2 ∥ N 2
28 27 adantl ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M 2 ∥ N 2 ↔ M 2 ∥ N 2
29 22 28 bitr4d ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M 2 ∥ N 2 ↔ M 2 ∥ N 2
30 12 16 29 3bitr4d ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M ∥ N ↔ M 2 ∥ N 2
31 30 anassrs ⊢ M ∈ ℕ ∧ N ∈ ℤ ∧ N ≠ 0 → M ∥ N ↔ M 2 ∥ N 2
32 dvds0 ⊢ M ∈ ℤ → M ∥ 0
33 zsqcl ⊢ M ∈ ℤ → M 2 ∈ ℤ
34 dvds0 ⊢ M 2 ∈ ℤ → M 2 ∥ 0
35 33 34 syl ⊢ M ∈ ℤ → M 2 ∥ 0
36 32 35 2thd ⊢ M ∈ ℤ → M ∥ 0 ↔ M 2 ∥ 0
37 13 36 syl ⊢ M ∈ ℕ → M ∥ 0 ↔ M 2 ∥ 0
38 37 adantr ⊢ M ∈ ℕ ∧ N ∈ ℤ → M ∥ 0 ↔ M 2 ∥ 0
39 9 31 38 pm2.61ne ⊢ M ∈ ℕ ∧ N ∈ ℤ → M ∥ N ↔ M 2 ∥ N 2
40 5 39 sylan ⊢ M ∈ ℤ ∧ M ≠ 0 ∧ N ∈ ℤ → M ∥ N ↔ M 2 ∥ N 2
41 absdvdsb ⊢ M ∈ ℤ ∧ N ∈ ℤ → M ∥ N ↔ M ∥ N
42 41 adantlr ⊢ M ∈ ℤ ∧ M ≠ 0 ∧ N ∈ ℤ → M ∥ N ↔ M ∥ N
43 zsqcl ⊢ M ∈ ℤ → M 2 ∈ ℤ
44 43 adantr ⊢ M ∈ ℤ ∧ M ≠ 0 → M 2 ∈ ℤ
45 absdvdsb ⊢ M 2 ∈ ℤ ∧ N 2 ∈ ℤ → M 2 ∥ N 2 ↔ M 2 ∥ N 2
46 44 19 45 syl2an ⊢ M ∈ ℤ ∧ M ≠ 0 ∧ N ∈ ℤ → M 2 ∥ N 2 ↔ M 2 ∥ N 2
47 zcn ⊢ M ∈ ℤ → M ∈ ℂ
48 abssq ⊢ M ∈ ℂ → M 2 = M 2
49 47 48 syl ⊢ M ∈ ℤ → M 2 = M 2
50 49 eqcomd ⊢ M ∈ ℤ → M 2 = M 2
51 50 adantr ⊢ M ∈ ℤ ∧ M ≠ 0 → M 2 = M 2
52 51 breq1d ⊢ M ∈ ℤ ∧ M ≠ 0 → M 2 ∥ N 2 ↔ M 2 ∥ N 2
53 52 adantr ⊢ M ∈ ℤ ∧ M ≠ 0 ∧ N ∈ ℤ → M 2 ∥ N 2 ↔ M 2 ∥ N 2
54 46 53 bitrd ⊢ M ∈ ℤ ∧ M ≠ 0 ∧ N ∈ ℤ → M 2 ∥ N 2 ↔ M 2 ∥ N 2
55 40 42 54 3bitr4d ⊢ M ∈ ℤ ∧ M ≠ 0 ∧ N ∈ ℤ → M ∥ N ↔ M 2 ∥ N 2
56 55 an32s ⊢ M ∈ ℤ ∧ N ∈ ℤ ∧ M ≠ 0 → M ∥ N ↔ M 2 ∥ N 2
57 0dvds ⊢ N ∈ ℤ → 0 ∥ N ↔ N = 0
58 sqeq0 ⊢ N ∈ ℂ → N 2 = 0 ↔ N = 0
59 23 58 syl ⊢ N ∈ ℤ → N 2 = 0 ↔ N = 0
60 57 59 bitr4d ⊢ N ∈ ℤ → 0 ∥ N ↔ N 2 = 0
61 0dvds ⊢ N 2 ∈ ℤ → 0 ∥ N 2 ↔ N 2 = 0
62 19 61 syl ⊢ N ∈ ℤ → 0 ∥ N 2 ↔ N 2 = 0
63 60 62 bitr4d ⊢ N ∈ ℤ → 0 ∥ N ↔ 0 ∥ N 2
64 63 adantl ⊢ M ∈ ℤ ∧ N ∈ ℤ → 0 ∥ N ↔ 0 ∥ N 2
65 4 56 64 pm2.61ne ⊢ M ∈ ℤ ∧ N ∈ ℤ → M ∥ N ↔ M 2 ∥ N 2