Metamath Proof Explorer


Theorem lgsdchr

Description: The Legendre symbol function X ( m ) = ( m /L N ) , where N is an odd positive number, is a real Dirichlet character modulo N . (Contributed by Mario Carneiro, 28-Apr-2016)

Ref Expression
Hypotheses lgsdchr.g ⊢ G = DChr ⁡ N
lgsdchr.z ⊢ Z = ℤ/Nℤ
lgsdchr.d ⊢ D = Base G
lgsdchr.b ⊢ B = Base Z
lgsdchr.l ⊢ L = ℤRHom ⁡ Z
lgsdchr.x ⊢ X = y ∈ B ⟼ ι h | ∃ m ∈ ℤ y = L ⁡ m ∧ h = m / L N
Assertion lgsdchr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ∈ D ∧ X : B ⟶ ℝ

Proof

Step Hyp Ref Expression
1 lgsdchr.g ⊢ G = DChr ⁡ N
2 lgsdchr.z ⊢ Z = ℤ/Nℤ
3 lgsdchr.d ⊢ D = Base G
4 lgsdchr.b ⊢ B = Base Z
5 lgsdchr.l ⊢ L = ℤRHom ⁡ Z
6 lgsdchr.x ⊢ X = y ∈ B ⟼ ι h | ∃ m ∈ ℤ y = L ⁡ m ∧ h = m / L N
7 iotaex ⊢ ι h | ∃ m ∈ ℤ y = L ⁡ m ∧ h = m / L N ∈ V
8 7 a1i ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ y ∈ B → ι h | ∃ m ∈ ℤ y = L ⁡ m ∧ h = m / L N ∈ V
9 6 a1i ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X = y ∈ B ⟼ ι h | ∃ m ∈ ℤ y = L ⁡ m ∧ h = m / L N
10 nnnn0 ⊢ N ∈ ℕ → N ∈ ℕ 0
11 10 adantr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → N ∈ ℕ 0
12 2 4 5 znzrhfo ⊢ N ∈ ℕ 0 → L : ℤ ⟶ onto B
13 11 12 syl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → L : ℤ ⟶ onto B
14 foelrn ⊢ L : ℤ ⟶ onto B ∧ x ∈ B → ∃ a ∈ ℤ x = L ⁡ a
15 13 14 sylan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ x ∈ B → ∃ a ∈ ℤ x = L ⁡ a
16 1 2 3 4 5 6 lgsdchrval ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → X ⁡ L ⁡ a = a / L N
17 simpr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → a ∈ ℤ
18 nnz ⊢ N ∈ ℕ → N ∈ ℤ
19 18 ad2antrr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → N ∈ ℤ
20 lgscl ⊢ a ∈ ℤ ∧ N ∈ ℤ → a / L N ∈ ℤ
21 17 19 20 syl2anc ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → a / L N ∈ ℤ
22 21 zred ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → a / L N ∈ ℝ
23 16 22 eqeltrd ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → X ⁡ L ⁡ a ∈ ℝ
24 fveq2 ⊢ x = L ⁡ a → X ⁡ x = X ⁡ L ⁡ a
25 24 eleq1d ⊢ x = L ⁡ a → X ⁡ x ∈ ℝ ↔ X ⁡ L ⁡ a ∈ ℝ
26 23 25 syl5ibrcom ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → x = L ⁡ a → X ⁡ x ∈ ℝ
27 26 rexlimdva ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∃ a ∈ ℤ x = L ⁡ a → X ⁡ x ∈ ℝ
28 27 imp ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ∃ a ∈ ℤ x = L ⁡ a → X ⁡ x ∈ ℝ
29 15 28 syldan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ x ∈ B → X ⁡ x ∈ ℝ
30 8 9 29 fmpt2d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X : B ⟶ ℝ
31 ax-resscn ⊢ ℝ ⊆ ℂ
32 fss ⊢ X : B ⟶ ℝ ∧ ℝ ⊆ ℂ → X : B ⟶ ℂ
33 30 31 32 sylancl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X : B ⟶ ℂ
34 eqid ⊢ Unit ⁡ Z = Unit ⁡ Z
35 4 34 unitss ⊢ Unit ⁡ Z ⊆ B
36 foelrn ⊢ L : ℤ ⟶ onto B ∧ y ∈ B → ∃ b ∈ ℤ y = L ⁡ b
37 13 36 sylan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ y ∈ B → ∃ b ∈ ℤ y = L ⁡ b
38 15 37 anim12dan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ x ∈ B ∧ y ∈ B → ∃ a ∈ ℤ x = L ⁡ a ∧ ∃ b ∈ ℤ y = L ⁡ b
39 reeanv ⊢ ∃ a ∈ ℤ ∃ b ∈ ℤ x = L ⁡ a ∧ y = L ⁡ b ↔ ∃ a ∈ ℤ x = L ⁡ a ∧ ∃ b ∈ ℤ y = L ⁡ b
40 17 adantrr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → a ∈ ℤ
41 simprr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℤ
42 11 adantr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → N ∈ ℕ 0
43 lgsdirnn0 ⊢ a ∈ ℤ ∧ b ∈ ℤ ∧ N ∈ ℕ 0 → a ⁢ b / L N = a / L N ⁢ b / L N
44 40 41 42 43 syl3anc ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → a ⁢ b / L N = a / L N ⁢ b / L N
45 2 zncrng ⊢ N ∈ ℕ 0 → Z ∈ CRing
46 11 45 syl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → Z ∈ CRing
47 crngring ⊢ Z ∈ CRing → Z ∈ Ring
48 46 47 syl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → Z ∈ Ring
49 48 adantr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → Z ∈ Ring
50 5 zrhrhm ⊢ Z ∈ Ring → L ∈ ℤ ring RingHom Z
51 49 50 syl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → L ∈ ℤ ring RingHom Z
52 zringbas ⊢ ℤ = Base ℤ ring
53 zringmulr ⊢ × = ⋅ ℤ ring
54 eqid ⊢ ⋅ Z = ⋅ Z
55 52 53 54 rhmmul ⊢ L ∈ ℤ ring RingHom Z ∧ a ∈ ℤ ∧ b ∈ ℤ → L ⁡ a ⁢ b = L ⁡ a ⋅ Z L ⁡ b
56 51 40 41 55 syl3anc ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → L ⁡ a ⁢ b = L ⁡ a ⋅ Z L ⁡ b
57 56 fveq2d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ a ⁢ b = X ⁡ L ⁡ a ⋅ Z L ⁡ b
58 zmulcl ⊢ a ∈ ℤ ∧ b ∈ ℤ → a ⁢ b ∈ ℤ
59 1 2 3 4 5 6 lgsdchrval ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ⁢ b ∈ ℤ → X ⁡ L ⁡ a ⁢ b = a ⁢ b / L N
60 58 59 sylan2 ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ a ⁢ b = a ⁢ b / L N
61 57 60 eqtr3d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ a ⋅ Z L ⁡ b = a ⁢ b / L N
62 16 adantrr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ a = a / L N
63 1 2 3 4 5 6 lgsdchrval ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ b ∈ ℤ → X ⁡ L ⁡ b = b / L N
64 63 adantrl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ b = b / L N
65 62 64 oveq12d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ a ⁢ X ⁡ L ⁡ b = a / L N ⁢ b / L N
66 44 61 65 3eqtr4d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → X ⁡ L ⁡ a ⋅ Z L ⁡ b = X ⁡ L ⁡ a ⁢ X ⁡ L ⁡ b
67 oveq12 ⊢ x = L ⁡ a ∧ y = L ⁡ b → x ⋅ Z y = L ⁡ a ⋅ Z L ⁡ b
68 67 fveq2d ⊢ x = L ⁡ a ∧ y = L ⁡ b → X ⁡ x ⋅ Z y = X ⁡ L ⁡ a ⋅ Z L ⁡ b
69 fveq2 ⊢ y = L ⁡ b → X ⁡ y = X ⁡ L ⁡ b
70 24 69 oveqan12d ⊢ x = L ⁡ a ∧ y = L ⁡ b → X ⁡ x ⁢ X ⁡ y = X ⁡ L ⁡ a ⁢ X ⁡ L ⁡ b
71 68 70 eqeq12d ⊢ x = L ⁡ a ∧ y = L ⁡ b → X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y ↔ X ⁡ L ⁡ a ⋅ Z L ⁡ b = X ⁡ L ⁡ a ⁢ X ⁡ L ⁡ b
72 66 71 syl5ibrcom ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ ∧ b ∈ ℤ → x = L ⁡ a ∧ y = L ⁡ b → X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
73 72 rexlimdvva ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∃ a ∈ ℤ ∃ b ∈ ℤ x = L ⁡ a ∧ y = L ⁡ b → X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
74 39 73 biimtrrid ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∃ a ∈ ℤ x = L ⁡ a ∧ ∃ b ∈ ℤ y = L ⁡ b → X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
75 74 imp ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ∃ a ∈ ℤ x = L ⁡ a ∧ ∃ b ∈ ℤ y = L ⁡ b → X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
76 38 75 syldan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ x ∈ B ∧ y ∈ B → X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
77 76 ralrimivva ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∀ x ∈ B ∀ y ∈ B X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
78 ss2ralv ⊢ Unit ⁡ Z ⊆ B → ∀ x ∈ B ∀ y ∈ B X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y → ∀ x ∈ Unit ⁡ Z ∀ y ∈ Unit ⁡ Z X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
79 35 77 78 mpsyl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∀ x ∈ Unit ⁡ Z ∀ y ∈ Unit ⁡ Z X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y
80 1z ⊢ 1 ∈ ℤ
81 1 2 3 4 5 6 lgsdchrval ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ 1 ∈ ℤ → X ⁡ L ⁡ 1 = 1 / L N
82 80 81 mpan2 ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ⁡ L ⁡ 1 = 1 / L N
83 eqid ⊢ 1 Z = 1 Z
84 5 83 zrh1 ⊢ Z ∈ Ring → L ⁡ 1 = 1 Z
85 48 84 syl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → L ⁡ 1 = 1 Z
86 85 fveq2d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ⁡ L ⁡ 1 = X ⁡ 1 Z
87 18 adantr ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → N ∈ ℤ
88 1lgs ⊢ N ∈ ℤ → 1 / L N = 1
89 87 88 syl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → 1 / L N = 1
90 82 86 89 3eqtr3d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ⁡ 1 Z = 1
91 lgsne0 ⊢ a ∈ ℤ ∧ N ∈ ℤ → a / L N ≠ 0 ↔ a gcd N = 1
92 17 19 91 syl2anc ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → a / L N ≠ 0 ↔ a gcd N = 1
93 92 biimpd ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → a / L N ≠ 0 → a gcd N = 1
94 16 neeq1d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → X ⁡ L ⁡ a ≠ 0 ↔ a / L N ≠ 0
95 2 34 5 znunit ⊢ N ∈ ℕ 0 ∧ a ∈ ℤ → L ⁡ a ∈ Unit ⁡ Z ↔ a gcd N = 1
96 11 95 sylan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → L ⁡ a ∈ Unit ⁡ Z ↔ a gcd N = 1
97 93 94 96 3imtr4d ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → X ⁡ L ⁡ a ≠ 0 → L ⁡ a ∈ Unit ⁡ Z
98 24 neeq1d ⊢ x = L ⁡ a → X ⁡ x ≠ 0 ↔ X ⁡ L ⁡ a ≠ 0
99 eleq1 ⊢ x = L ⁡ a → x ∈ Unit ⁡ Z ↔ L ⁡ a ∈ Unit ⁡ Z
100 98 99 imbi12d ⊢ x = L ⁡ a → X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z ↔ X ⁡ L ⁡ a ≠ 0 → L ⁡ a ∈ Unit ⁡ Z
101 97 100 syl5ibrcom ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ a ∈ ℤ → x = L ⁡ a → X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
102 101 rexlimdva ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∃ a ∈ ℤ x = L ⁡ a → X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
103 102 imp ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ ∃ a ∈ ℤ x = L ⁡ a → X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
104 15 103 syldan ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N ∧ x ∈ B → X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
105 104 ralrimiva ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∀ x ∈ B X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
106 79 90 105 3jca ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → ∀ x ∈ Unit ⁡ Z ∀ y ∈ Unit ⁡ Z X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y ∧ X ⁡ 1 Z = 1 ∧ ∀ x ∈ B X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
107 simpl ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → N ∈ ℕ
108 1 2 4 34 107 3 dchrelbas3 ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ∈ D ↔ X : B ⟶ ℂ ∧ ∀ x ∈ Unit ⁡ Z ∀ y ∈ Unit ⁡ Z X ⁡ x ⋅ Z y = X ⁡ x ⁢ X ⁡ y ∧ X ⁡ 1 Z = 1 ∧ ∀ x ∈ B X ⁡ x ≠ 0 → x ∈ Unit ⁡ Z
109 33 106 108 mpbir2and ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ∈ D
110 109 30 jca ⊢ N ∈ ℕ ∧ ¬ 2 ∥ N → X ∈ D ∧ X : B ⟶ ℝ