MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  lgsvalmod Structured version   Visualization version   GIF version

Theorem lgsvalmod 26505
Description: The Legendre symbol is equivalent to 𝑎↑((𝑝 − 1) / 2), mod 𝑝. This theorem is also called "Euler's criterion", see theorem 9.2 in [ApostolNT] p. 180, or a representation of Euler's criterion using the Legendre symbol, see also lgsqr 26540. (Contributed by Mario Carneiro, 4-Feb-2015.)
Assertion
Ref Expression
lgsvalmod ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃))

Proof of Theorem lgsvalmod
StepHypRef Expression
1 eldifi 4067 . . . . . . . 8 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
21adantl 483 . . . . . . 7 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 𝑃 ∈ ℙ)
3 prmz 16421 . . . . . . 7 (𝑃 ∈ ℙ → 𝑃 ∈ ℤ)
42, 3syl 17 . . . . . 6 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 𝑃 ∈ ℤ)
5 lgscl 26500 . . . . . 6 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝐴 /L 𝑃) ∈ ℤ)
64, 5syldan 592 . . . . 5 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴 /L 𝑃) ∈ ℤ)
76zred 12468 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴 /L 𝑃) ∈ ℝ)
8 peano2re 11190 . . . 4 ((𝐴 /L 𝑃) ∈ ℝ → ((𝐴 /L 𝑃) + 1) ∈ ℝ)
97, 8syl 17 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) + 1) ∈ ℝ)
10 oddprm 16552 . . . . . . . 8 (𝑃 ∈ (ℙ ∖ {2}) → ((𝑃 − 1) / 2) ∈ ℕ)
1110adantl 483 . . . . . . 7 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝑃 − 1) / 2) ∈ ℕ)
1211nnnn0d 12335 . . . . . 6 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝑃 − 1) / 2) ∈ ℕ0)
13 zexpcl 13839 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝑃 − 1) / 2) ∈ ℕ0) → (𝐴↑((𝑃 − 1) / 2)) ∈ ℤ)
1412, 13syldan 592 . . . . 5 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴↑((𝑃 − 1) / 2)) ∈ ℤ)
1514zred 12468 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴↑((𝑃 − 1) / 2)) ∈ ℝ)
16 peano2re 11190 . . . 4 ((𝐴↑((𝑃 − 1) / 2)) ∈ ℝ → ((𝐴↑((𝑃 − 1) / 2)) + 1) ∈ ℝ)
1715, 16syl 17 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴↑((𝑃 − 1) / 2)) + 1) ∈ ℝ)
18 neg1rr 12130 . . . 4 -1 ∈ ℝ
1918a1i 11 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → -1 ∈ ℝ)
20 prmnn 16420 . . . . 5 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
212, 20syl 17 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 𝑃 ∈ ℕ)
2221nnrpd 12812 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 𝑃 ∈ ℝ+)
23 lgsval3 26504 . . . . . . 7 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴 /L 𝑃) = ((((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) − 1))
2423eqcomd 2742 . . . . . 6 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) − 1) = (𝐴 /L 𝑃))
2517, 22modcld 13637 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) ∈ ℝ)
2625recnd 11045 . . . . . . 7 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) ∈ ℂ)
27 ax-1cn 10971 . . . . . . . 8 1 ∈ ℂ
2827a1i 11 . . . . . . 7 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 1 ∈ ℂ)
297recnd 11045 . . . . . . 7 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴 /L 𝑃) ∈ ℂ)
3026, 28, 29subadd2d 11393 . . . . . 6 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) − 1) = (𝐴 /L 𝑃) ↔ ((𝐴 /L 𝑃) + 1) = (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃)))
3124, 30mpbid 232 . . . . 5 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) + 1) = (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃))
3231oveq1d 7318 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴 /L 𝑃) + 1) mod 𝑃) = ((((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) mod 𝑃))
33 modabs2 13667 . . . . 5 ((((𝐴↑((𝑃 − 1) / 2)) + 1) ∈ ℝ ∧ 𝑃 ∈ ℝ+) → ((((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) mod 𝑃) = (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃))
3417, 22, 33syl2anc 585 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃) mod 𝑃) = (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃))
3532, 34eqtrd 2776 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴 /L 𝑃) + 1) mod 𝑃) = (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃))
36 modadd1 13670 . . 3 (((((𝐴 /L 𝑃) + 1) ∈ ℝ ∧ ((𝐴↑((𝑃 − 1) / 2)) + 1) ∈ ℝ) ∧ (-1 ∈ ℝ ∧ 𝑃 ∈ ℝ+) ∧ (((𝐴 /L 𝑃) + 1) mod 𝑃) = (((𝐴↑((𝑃 − 1) / 2)) + 1) mod 𝑃)) → ((((𝐴 /L 𝑃) + 1) + -1) mod 𝑃) = ((((𝐴↑((𝑃 − 1) / 2)) + 1) + -1) mod 𝑃))
379, 17, 19, 22, 35, 36syl221anc 1381 . 2 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((((𝐴 /L 𝑃) + 1) + -1) mod 𝑃) = ((((𝐴↑((𝑃 − 1) / 2)) + 1) + -1) mod 𝑃))
389recnd 11045 . . . . 5 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) + 1) ∈ ℂ)
39 negsub 11311 . . . . 5 ((((𝐴 /L 𝑃) + 1) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝐴 /L 𝑃) + 1) + -1) = (((𝐴 /L 𝑃) + 1) − 1))
4038, 27, 39sylancl 587 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴 /L 𝑃) + 1) + -1) = (((𝐴 /L 𝑃) + 1) − 1))
41 pncan 11269 . . . . 5 (((𝐴 /L 𝑃) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝐴 /L 𝑃) + 1) − 1) = (𝐴 /L 𝑃))
4229, 27, 41sylancl 587 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴 /L 𝑃) + 1) − 1) = (𝐴 /L 𝑃))
4340, 42eqtrd 2776 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴 /L 𝑃) + 1) + -1) = (𝐴 /L 𝑃))
4443oveq1d 7318 . 2 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((((𝐴 /L 𝑃) + 1) + -1) mod 𝑃) = ((𝐴 /L 𝑃) mod 𝑃))
4517recnd 11045 . . . . 5 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴↑((𝑃 − 1) / 2)) + 1) ∈ ℂ)
46 negsub 11311 . . . . 5 ((((𝐴↑((𝑃 − 1) / 2)) + 1) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝐴↑((𝑃 − 1) / 2)) + 1) + -1) = (((𝐴↑((𝑃 − 1) / 2)) + 1) − 1))
4745, 27, 46sylancl 587 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴↑((𝑃 − 1) / 2)) + 1) + -1) = (((𝐴↑((𝑃 − 1) / 2)) + 1) − 1))
4815recnd 11045 . . . . 5 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝐴↑((𝑃 − 1) / 2)) ∈ ℂ)
49 pncan 11269 . . . . 5 (((𝐴↑((𝑃 − 1) / 2)) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝐴↑((𝑃 − 1) / 2)) + 1) − 1) = (𝐴↑((𝑃 − 1) / 2)))
5048, 27, 49sylancl 587 . . . 4 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴↑((𝑃 − 1) / 2)) + 1) − 1) = (𝐴↑((𝑃 − 1) / 2)))
5147, 50eqtrd 2776 . . 3 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (((𝐴↑((𝑃 − 1) / 2)) + 1) + -1) = (𝐴↑((𝑃 − 1) / 2)))
5251oveq1d 7318 . 2 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((((𝐴↑((𝑃 − 1) / 2)) + 1) + -1) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃))
5337, 44, 523eqtr3d 2784 1 ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 397   = wceq 1539  wcel 2104  cdif 3889  {csn 4565  (class class class)co 7303  cc 10911  cr 10912  1c1 10914   + caddc 10916  cmin 11247  -cneg 11248   / cdiv 11674  cn 12015  2c2 12070  0cn0 12275  cz 12361  +crp 12772   mod cmo 13631  cexp 13824  cprime 16417   /L clgs 26483
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2707  ax-rep 5218  ax-sep 5232  ax-nul 5239  ax-pow 5297  ax-pr 5361  ax-un 7616  ax-cnex 10969  ax-resscn 10970  ax-1cn 10971  ax-icn 10972  ax-addcl 10973  ax-addrcl 10974  ax-mulcl 10975  ax-mulrcl 10976  ax-mulcom 10977  ax-addass 10978  ax-mulass 10979  ax-distr 10980  ax-i2m1 10981  ax-1ne0 10982  ax-1rid 10983  ax-rnegex 10984  ax-rrecex 10985  ax-cnre 10986  ax-pre-lttri 10987  ax-pre-lttrn 10988  ax-pre-ltadd 10989  ax-pre-mulgt0 10990  ax-pre-sup 10991
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 846  df-3or 1088  df-3an 1089  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3285  df-reu 3286  df-rab 3287  df-v 3439  df-sbc 3722  df-csb 3838  df-dif 3895  df-un 3897  df-in 3899  df-ss 3909  df-pss 3911  df-nul 4263  df-if 4466  df-pw 4541  df-sn 4566  df-pr 4568  df-op 4572  df-uni 4845  df-int 4887  df-iun 4933  df-br 5082  df-opab 5144  df-mpt 5165  df-tr 5199  df-id 5496  df-eprel 5502  df-po 5510  df-so 5511  df-fr 5551  df-we 5553  df-xp 5602  df-rel 5603  df-cnv 5604  df-co 5605  df-dm 5606  df-rn 5607  df-res 5608  df-ima 5609  df-pred 6213  df-ord 6280  df-on 6281  df-lim 6282  df-suc 6283  df-iota 6406  df-fun 6456  df-fn 6457  df-f 6458  df-f1 6459  df-fo 6460  df-f1o 6461  df-fv 6462  df-riota 7260  df-ov 7306  df-oprab 7307  df-mpo 7308  df-om 7741  df-1st 7859  df-2nd 7860  df-frecs 8124  df-wrecs 8155  df-recs 8229  df-rdg 8268  df-1o 8324  df-2o 8325  df-oadd 8328  df-er 8525  df-map 8644  df-en 8761  df-dom 8762  df-sdom 8763  df-fin 8764  df-sup 9241  df-inf 9242  df-dju 9699  df-card 9737  df-pnf 11053  df-mnf 11054  df-xr 11055  df-ltxr 11056  df-le 11057  df-sub 11249  df-neg 11250  df-div 11675  df-nn 12016  df-2 12078  df-3 12079  df-n0 12276  df-xnn0 12348  df-z 12362  df-uz 12625  df-q 12731  df-rp 12773  df-fz 13282  df-fzo 13425  df-fl 13554  df-mod 13632  df-seq 13764  df-exp 13825  df-hash 14087  df-cj 14851  df-re 14852  df-im 14853  df-sqrt 14987  df-abs 14988  df-dvds 16005  df-gcd 16243  df-prm 16418  df-phi 16508  df-pc 16579  df-lgs 26484
This theorem is referenced by:  lgsdirprm  26520  lgsne0  26524  lgsqrlem3  26537  gausslemma2d  26563  fmtnoprmfac2lem1  45075
  Copyright terms: Public domain W3C validator