Metamath Proof Explorer


Theorem lgsquad3

Description: Extend lgsquad2 to integers which share a factor. (Contributed by Mario Carneiro, 19-Jun-2015)

Ref Expression
Assertion lgsquad3 ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N → M / L N = − 1 M − 1 2 ⁢ N − 1 2 ⁢ N / L M

Proof

Step Hyp Ref Expression
1 simplrl ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N ∈ ℕ
2 nnz ⊢ N ∈ ℕ → N ∈ ℤ
3 1 2 syl ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N ∈ ℤ
4 nnz ⊢ M ∈ ℕ → M ∈ ℤ
5 4 ad3antrrr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M ∈ ℤ
6 lgscl ⊢ N ∈ ℤ ∧ M ∈ ℤ → N / L M ∈ ℤ
7 3 5 6 syl2anc ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M ∈ ℤ
8 7 zred ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M ∈ ℝ
9 absresq ⊢ N / L M ∈ ℝ → N / L M 2 = N / L M 2
10 8 9 syl ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M 2 = N / L M 2
11 3 5 gcdcomd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N gcd M = M gcd N
12 simpr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M gcd N = 1
13 11 12 eqtrd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N gcd M = 1
14 lgsabs1 ⊢ N ∈ ℤ ∧ M ∈ ℤ → N / L M = 1 ↔ N gcd M = 1
15 3 5 14 syl2anc ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M = 1 ↔ N gcd M = 1
16 13 15 mpbird ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M = 1
17 16 oveq1d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M 2 = 1 2
18 sq1 ⊢ 1 2 = 1
19 17 18 eqtrdi ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M 2 = 1
20 7 zcnd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M ∈ ℂ
21 20 sqvald ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → N / L M 2 = N / L M ⁢ N / L M
22 10 19 21 3eqtr3d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → 1 = N / L M ⁢ N / L M
23 22 oveq2d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ⋅ 1 = M / L N ⁢ N / L M ⁢ N / L M
24 lgscl ⊢ M ∈ ℤ ∧ N ∈ ℤ → M / L N ∈ ℤ
25 5 3 24 syl2anc ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ∈ ℤ
26 25 zcnd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ∈ ℂ
27 26 20 20 mulassd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ⁢ N / L M ⁢ N / L M = M / L N ⁢ N / L M ⁢ N / L M
28 23 27 eqtr4d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ⋅ 1 = M / L N ⁢ N / L M ⁢ N / L M
29 26 mulridd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ⋅ 1 = M / L N
30 simplll ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M ∈ ℕ
31 simpllr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → ¬ 2 ∥ M
32 simplrr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → ¬ 2 ∥ N
33 30 31 1 32 12 lgsquad2 ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ⁢ N / L M = − 1 M − 1 2 ⁢ N − 1 2
34 33 oveq1d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N ⁢ N / L M ⁢ N / L M = − 1 M − 1 2 ⁢ N − 1 2 ⁢ N / L M
35 28 29 34 3eqtr3d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ M gcd N = 1 → M / L N = − 1 M − 1 2 ⁢ N − 1 2 ⁢ N / L M
36 neg1cn ⊢ − 1 ∈ ℂ
37 36 a1i ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → − 1 ∈ ℂ
38 neg1ne0 ⊢ − 1 ≠ 0
39 38 a1i ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → − 1 ≠ 0
40 4 ad3antrrr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → M ∈ ℤ
41 simpllr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → ¬ 2 ∥ M
42 1zzd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → 1 ∈ ℤ
43 2prm ⊢ 2 ∈ ℙ
44 nprmdvds1 ⊢ 2 ∈ ℙ → ¬ 2 ∥ 1
45 43 44 mp1i ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → ¬ 2 ∥ 1
46 omoe ⊢ M ∈ ℤ ∧ ¬ 2 ∥ M ∧ 1 ∈ ℤ ∧ ¬ 2 ∥ 1 → 2 ∥ M − 1
47 40 41 42 45 46 syl22anc ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → 2 ∥ M − 1
48 2z ⊢ 2 ∈ ℤ
49 2ne0 ⊢ 2 ≠ 0
50 peano2zm ⊢ M ∈ ℤ → M − 1 ∈ ℤ
51 40 50 syl ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → M − 1 ∈ ℤ
52 dvdsval2 ⊢ 2 ∈ ℤ ∧ 2 ≠ 0 ∧ M − 1 ∈ ℤ → 2 ∥ M − 1 ↔ M − 1 2 ∈ ℤ
53 48 49 51 52 mp3an12i ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → 2 ∥ M − 1 ↔ M − 1 2 ∈ ℤ
54 47 53 mpbid ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → M − 1 2 ∈ ℤ
55 2 adantr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → N ∈ ℤ
56 55 ad2antlr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → N ∈ ℤ
57 simplrr ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → ¬ 2 ∥ N
58 omoe ⊢ N ∈ ℤ ∧ ¬ 2 ∥ N ∧ 1 ∈ ℤ ∧ ¬ 2 ∥ 1 → 2 ∥ N − 1
59 56 57 42 45 58 syl22anc ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → 2 ∥ N − 1
60 peano2zm ⊢ N ∈ ℤ → N − 1 ∈ ℤ
61 56 60 syl ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → N − 1 ∈ ℤ
62 dvdsval2 ⊢ 2 ∈ ℤ ∧ 2 ≠ 0 ∧ N − 1 ∈ ℤ → 2 ∥ N − 1 ↔ N − 1 2 ∈ ℤ
63 48 49 61 62 mp3an12i ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → 2 ∥ N − 1 ↔ N − 1 2 ∈ ℤ
64 59 63 mpbid ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → N − 1 2 ∈ ℤ
65 54 64 zmulcld ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → M − 1 2 ⁢ N − 1 2 ∈ ℤ
66 37 39 65 expclzd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → − 1 M − 1 2 ⁢ N − 1 2 ∈ ℂ
67 66 mul01d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → − 1 M − 1 2 ⁢ N − 1 2 ⋅ 0 = 0
68 lgsne0 ⊢ N ∈ ℤ ∧ M ∈ ℤ → N / L M ≠ 0 ↔ N gcd M = 1
69 gcdcom ⊢ N ∈ ℤ ∧ M ∈ ℤ → N gcd M = M gcd N
70 69 eqeq1d ⊢ N ∈ ℤ ∧ M ∈ ℤ → N gcd M = 1 ↔ M gcd N = 1
71 68 70 bitrd ⊢ N ∈ ℤ ∧ M ∈ ℤ → N / L M ≠ 0 ↔ M gcd N = 1
72 2 4 71 syl2anr ⊢ M ∈ ℕ ∧ N ∈ ℕ → N / L M ≠ 0 ↔ M gcd N = 1
73 72 necon1bbid ⊢ M ∈ ℕ ∧ N ∈ ℕ → ¬ M gcd N = 1 ↔ N / L M = 0
74 73 ad2ant2r ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N → ¬ M gcd N = 1 ↔ N / L M = 0
75 74 biimpa ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → N / L M = 0
76 75 oveq2d ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → − 1 M − 1 2 ⁢ N − 1 2 ⁢ N / L M = − 1 M − 1 2 ⁢ N − 1 2 ⋅ 0
77 lgsne0 ⊢ M ∈ ℤ ∧ N ∈ ℤ → M / L N ≠ 0 ↔ M gcd N = 1
78 77 necon1bbid ⊢ M ∈ ℤ ∧ N ∈ ℤ → ¬ M gcd N = 1 ↔ M / L N = 0
79 4 2 78 syl2an ⊢ M ∈ ℕ ∧ N ∈ ℕ → ¬ M gcd N = 1 ↔ M / L N = 0
80 79 ad2ant2r ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N → ¬ M gcd N = 1 ↔ M / L N = 0
81 80 biimpa ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → M / L N = 0
82 67 76 81 3eqtr4rd ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ¬ M gcd N = 1 → M / L N = − 1 M − 1 2 ⁢ N − 1 2 ⁢ N / L M
83 35 82 pm2.61dan ⊢ M ∈ ℕ ∧ ¬ 2 ∥ M ∧ N ∈ ℕ ∧ ¬ 2 ∥ N → M / L N = − 1 M − 1 2 ⁢ N − 1 2 ⁢ N / L M