Theorem lgsquad2 25961

Description: Extend lgsquad 25958 to coprime odd integers (the domain of the Jacobi symbol). (Contributed by Mario Carneiro, 19-Jun-2015.)

Hypotheses

Ref	Expression
lgsquad2.1	⊢ (𝜑 → 𝑀 ∈ ℕ)
lgsquad2.2	⊢ (𝜑 → ¬ 2 ∥ 𝑀)
lgsquad2.3	⊢ (𝜑 → 𝑁 ∈ ℕ)
lgsquad2.4	⊢ (𝜑 → ¬ 2 ∥ 𝑁)
lgsquad2.5	⊢ (𝜑 → (𝑀 gcd 𝑁) = 1)

Assertion

Ref	Expression
lgsquad2	⊢ (𝜑 → ((𝑀 /L 𝑁) · (𝑁 /L 𝑀)) = (-1↑(((𝑀 − 1) / 2) · ((𝑁 − 1) / 2))))

Proof of Theorem lgsquad2

Dummy variables 𝑚 𝑛 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lgsquad2.1	. 2 ⊢ (𝜑 → 𝑀 ∈ ℕ)
2		lgsquad2.2	. 2 ⊢ (𝜑 → ¬ 2 ∥ 𝑀)
3		lgsquad2.3	. 2 ⊢ (𝜑 → 𝑁 ∈ ℕ)
4		lgsquad2.4	. 2 ⊢ (𝜑 → ¬ 2 ∥ 𝑁)
5		lgsquad2.5	. 2 ⊢ (𝜑 → (𝑀 gcd 𝑁) = 1)
6	3	adantr 483	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑁 ∈ ℕ)
7	4	adantr 483	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ¬ 2 ∥ 𝑁)
8		simprl 769	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑚 ∈ (ℙ ∖ {2}))
9		eldifi 4102	. . . . . 6 ⊢ (𝑚 ∈ (ℙ ∖ {2}) → 𝑚 ∈ ℙ)
10	8, 9	syl 17	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑚 ∈ ℙ)
11		prmnn 16017	. . . . 5 ⊢ (𝑚 ∈ ℙ → 𝑚 ∈ ℕ)
12	10, 11	syl 17	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑚 ∈ ℕ)
13		eldifsni 4721	. . . . . . . 8 ⊢ (𝑚 ∈ (ℙ ∖ {2}) → 𝑚 ≠ 2)
14	8, 13	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑚 ≠ 2)
15	14	necomd 3071	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 2 ≠ 𝑚)
16	15	neneqd 3021	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ¬ 2 = 𝑚)
17		2z 12013	. . . . . . 7 ⊢ 2 ∈ ℤ
18		uzid 12257	. . . . . . 7 ⊢ (2 ∈ ℤ → 2 ∈ (ℤ≥‘2))
19	17, 18	ax-mp 5	. . . . . 6 ⊢ 2 ∈ (ℤ≥‘2)
20		dvdsprm 16046	. . . . . 6 ⊢ ((2 ∈ (ℤ≥‘2) ∧ 𝑚 ∈ ℙ) → (2 ∥ 𝑚 ↔ 2 = 𝑚))
21	19, 10, 20	sylancr 589	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (2 ∥ 𝑚 ↔ 2 = 𝑚))
22	16, 21	mtbird 327	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ¬ 2 ∥ 𝑚)
23	6	nnzd 12085	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑁 ∈ ℤ)
24	12	nnzd 12085	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑚 ∈ ℤ)
25		gcdcom 15861	. . . . . 6 ⊢ ((𝑁 ∈ ℤ ∧ 𝑚 ∈ ℤ) → (𝑁 gcd 𝑚) = (𝑚 gcd 𝑁))
26	23, 24, 25	syl2anc 586	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑁 gcd 𝑚) = (𝑚 gcd 𝑁))
27		simprr 771	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑚 gcd 𝑁) = 1)
28	26, 27	eqtrd 2856	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑁 gcd 𝑚) = 1)
29		simprl 769	. . . . 5 ⊢ (((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) ∧ (𝑛 ∈ (ℙ ∖ {2}) ∧ (𝑛 gcd 𝑚) = 1)) → 𝑛 ∈ (ℙ ∖ {2}))
30	8	adantr 483	. . . . 5 ⊢ (((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) ∧ (𝑛 ∈ (ℙ ∖ {2}) ∧ (𝑛 gcd 𝑚) = 1)) → 𝑚 ∈ (ℙ ∖ {2}))
31		eldifi 4102	. . . . . . . 8 ⊢ (𝑛 ∈ (ℙ ∖ {2}) → 𝑛 ∈ ℙ)
32		prmrp 16055	. . . . . . . 8 ⊢ ((𝑛 ∈ ℙ ∧ 𝑚 ∈ ℙ) → ((𝑛 gcd 𝑚) = 1 ↔ 𝑛 ≠ 𝑚))
33	31, 10, 32	syl2anr 598	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) ∧ 𝑛 ∈ (ℙ ∖ {2})) → ((𝑛 gcd 𝑚) = 1 ↔ 𝑛 ≠ 𝑚))
34	33	biimpd 231	. . . . . 6 ⊢ (((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) ∧ 𝑛 ∈ (ℙ ∖ {2})) → ((𝑛 gcd 𝑚) = 1 → 𝑛 ≠ 𝑚))
35	34	impr 457	. . . . 5 ⊢ (((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) ∧ (𝑛 ∈ (ℙ ∖ {2}) ∧ (𝑛 gcd 𝑚) = 1)) → 𝑛 ≠ 𝑚)
36		lgsquad 25958	. . . . 5 ⊢ ((𝑛 ∈ (ℙ ∖ {2}) ∧ 𝑚 ∈ (ℙ ∖ {2}) ∧ 𝑛 ≠ 𝑚) → ((𝑛 /L 𝑚) · (𝑚 /L 𝑛)) = (-1↑(((𝑛 − 1) / 2) · ((𝑚 − 1) / 2))))
37	29, 30, 35, 36	syl3anc 1367	. . . 4 ⊢ (((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) ∧ (𝑛 ∈ (ℙ ∖ {2}) ∧ (𝑛 gcd 𝑚) = 1)) → ((𝑛 /L 𝑚) · (𝑚 /L 𝑛)) = (-1↑(((𝑛 − 1) / 2) · ((𝑚 − 1) / 2))))
38		biid 263	. . . 4 ⊢ (∀𝑥 ∈ (1...𝑦)((𝑥 gcd (2 · 𝑚)) = 1 → ((𝑥 /L 𝑚) · (𝑚 /L 𝑥)) = (-1↑(((𝑥 − 1) / 2) · ((𝑚 − 1) / 2)))) ↔ ∀𝑥 ∈ (1...𝑦)((𝑥 gcd (2 · 𝑚)) = 1 → ((𝑥 /L 𝑚) · (𝑚 /L 𝑥)) = (-1↑(((𝑥 − 1) / 2) · ((𝑚 − 1) / 2)))))
39	6, 7, 12, 22, 28, 37, 38	lgsquad2lem2 25960	. . 3 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ((𝑁 /L 𝑚) · (𝑚 /L 𝑁)) = (-1↑(((𝑁 − 1) / 2) · ((𝑚 − 1) / 2))))
40		lgscl 25886	. . . . 5 ⊢ ((𝑚 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑚 /L 𝑁) ∈ ℤ)
41	24, 23, 40	syl2anc 586	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑚 /L 𝑁) ∈ ℤ)
42		lgscl 25886	. . . . 5 ⊢ ((𝑁 ∈ ℤ ∧ 𝑚 ∈ ℤ) → (𝑁 /L 𝑚) ∈ ℤ)
43	23, 24, 42	syl2anc 586	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑁 /L 𝑚) ∈ ℤ)
44		zcn 11985	. . . . 5 ⊢ ((𝑚 /L 𝑁) ∈ ℤ → (𝑚 /L 𝑁) ∈ ℂ)
45		zcn 11985	. . . . 5 ⊢ ((𝑁 /L 𝑚) ∈ ℤ → (𝑁 /L 𝑚) ∈ ℂ)
46		mulcom 10622	. . . . 5 ⊢ (((𝑚 /L 𝑁) ∈ ℂ ∧ (𝑁 /L 𝑚) ∈ ℂ) → ((𝑚 /L 𝑁) · (𝑁 /L 𝑚)) = ((𝑁 /L 𝑚) · (𝑚 /L 𝑁)))
47	44, 45, 46	syl2an 597	. . . 4 ⊢ (((𝑚 /L 𝑁) ∈ ℤ ∧ (𝑁 /L 𝑚) ∈ ℤ) → ((𝑚 /L 𝑁) · (𝑁 /L 𝑚)) = ((𝑁 /L 𝑚) · (𝑚 /L 𝑁)))
48	41, 43, 47	syl2anc 586	. . 3 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ((𝑚 /L 𝑁) · (𝑁 /L 𝑚)) = ((𝑁 /L 𝑚) · (𝑚 /L 𝑁)))
49	12	nncnd 11653	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑚 ∈ ℂ)
50		ax-1cn 10594	. . . . . . 7 ⊢ 1 ∈ ℂ
51		subcl 10884	. . . . . . 7 ⊢ ((𝑚 ∈ ℂ ∧ 1 ∈ ℂ) → (𝑚 − 1) ∈ ℂ)
52	49, 50, 51	sylancl 588	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑚 − 1) ∈ ℂ)
53	52	halfcld 11881	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ((𝑚 − 1) / 2) ∈ ℂ)
54	6	nncnd 11653	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → 𝑁 ∈ ℂ)
55		subcl 10884	. . . . . . 7 ⊢ ((𝑁 ∈ ℂ ∧ 1 ∈ ℂ) → (𝑁 − 1) ∈ ℂ)
56	54, 50, 55	sylancl 588	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (𝑁 − 1) ∈ ℂ)
57	56	halfcld 11881	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ((𝑁 − 1) / 2) ∈ ℂ)
58	53, 57	mulcomd 10661	. . . 4 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (((𝑚 − 1) / 2) · ((𝑁 − 1) / 2)) = (((𝑁 − 1) / 2) · ((𝑚 − 1) / 2)))
59	58	oveq2d 7171	. . 3 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → (-1↑(((𝑚 − 1) / 2) · ((𝑁 − 1) / 2))) = (-1↑(((𝑁 − 1) / 2) · ((𝑚 − 1) / 2))))
60	39, 48, 59	3eqtr4d 2866	. 2 ⊢ ((𝜑 ∧ (𝑚 ∈ (ℙ ∖ {2}) ∧ (𝑚 gcd 𝑁) = 1)) → ((𝑚 /L 𝑁) · (𝑁 /L 𝑚)) = (-1↑(((𝑚 − 1) / 2) · ((𝑁 − 1) / 2))))
61		biid 263	. 2 ⊢ (∀𝑥 ∈ (1...𝑦)((𝑥 gcd (2 · 𝑁)) = 1 → ((𝑥 /L 𝑁) · (𝑁 /L 𝑥)) = (-1↑(((𝑥 − 1) / 2) · ((𝑁 − 1) / 2)))) ↔ ∀𝑥 ∈ (1...𝑦)((𝑥 gcd (2 · 𝑁)) = 1 → ((𝑥 /L 𝑁) · (𝑁 /L 𝑥)) = (-1↑(((𝑥 − 1) / 2) · ((𝑁 − 1) / 2)))))
62	1, 2, 3, 4, 5, 60, 61	lgsquad2lem2 25960	1 ⊢ (𝜑 → ((𝑀 /L 𝑁) · (𝑁 /L 𝑀)) = (-1↑(((𝑀 − 1) / 2) · ((𝑁 − 1) / 2))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1533   ∈ wcel 2110   ≠ wne 3016  ∀wral 3138   ∖ cdif 3932  {csn 4566   class class class wbr 5065  ‘cfv 6354  (class class class)co 7155  ℂcc 10534  1c1 10537   · cmul 10541   − cmin 10869  -cneg 10870   / cdiv 11296  ℕcn 11637  2c2 11691  ℤcz 11980  ℤ_≥cuz 12242  ...cfz 12891  ↑cexp 13428   ∥ cdvds 15606   gcd cgcd 15842  ℙcprime 16014   /_L clgs 25869

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5189  ax-sep 5202  ax-nul 5209  ax-pow 5265  ax-pr 5329  ax-un 7460  ax-inf2 9103  ax-cnex 10592  ax-resscn 10593  ax-1cn 10594  ax-icn 10595  ax-addcl 10596  ax-addrcl 10597  ax-mulcl 10598  ax-mulrcl 10599  ax-mulcom 10600  ax-addass 10601  ax-mulass 10602  ax-distr 10603  ax-i2m1 10604  ax-1ne0 10605  ax-1rid 10606  ax-rnegex 10607  ax-rrecex 10608  ax-cnre 10609  ax-pre-lttri 10610  ax-pre-lttrn 10611  ax-pre-ltadd 10612  ax-pre-mulgt0 10613  ax-pre-sup 10614  ax-addf 10615  ax-mulf 10616

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4838  df-int 4876  df-iun 4920  df-disj 5031  df-br 5066  df-opab 5128  df-mpt 5146  df-tr 5172  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-se 5514  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-pred 6147  df-ord 6193  df-on 6194  df-lim 6195  df-suc 6196  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-isom 6363  df-riota 7113  df-ov 7158  df-oprab 7159  df-mpo 7160  df-of 7408  df-om 7580  df-1st 7688  df-2nd 7689  df-supp 7830  df-tpos 7891  df-wrecs 7946  df-recs 8007  df-rdg 8045  df-1o 8101  df-2o 8102  df-oadd 8105  df-er 8288  df-ec 8290  df-qs 8294  df-map 8407  df-en 8509  df-dom 8510  df-sdom 8511  df-fin 8512  df-fsupp 8833  df-sup 8905  df-inf 8906  df-oi 8973  df-dju 9329  df-card 9367  df-pnf 10676  df-mnf 10677  df-xr 10678  df-ltxr 10679  df-le 10680  df-sub 10871  df-neg 10872  df-div 11297  df-nn 11638  df-2 11699  df-3 11700  df-4 11701  df-5 11702  df-6 11703  df-7 11704  df-8 11705  df-9 11706  df-n0 11897  df-xnn0 11967  df-z 11981  df-dec 12098  df-uz 12243  df-q 12348  df-rp 12389  df-fz 12892  df-fzo 13033  df-fl 13161  df-mod 13237  df-seq 13369  df-exp 13429  df-hash 13690  df-cj 14457  df-re 14458  df-im 14459  df-sqrt 14593  df-abs 14594  df-clim 14844  df-sum 15042  df-dvds 15607  df-gcd 15843  df-prm 16015  df-phi 16102  df-pc 16173  df-struct 16484  df-ndx 16485  df-slot 16486  df-base 16488  df-sets 16489  df-ress 16490  df-plusg 16577  df-mulr 16578  df-starv 16579  df-sca 16580  df-vsca 16581  df-ip 16582  df-tset 16583  df-ple 16584  df-ds 16586  df-unif 16587  df-0g 16714  df-gsum 16715  df-imas 16780  df-qus 16781  df-mgm 17851  df-sgrp 17900  df-mnd 17911  df-mhm 17955  df-submnd 17956  df-grp 18105  df-minusg 18106  df-sbg 18107  df-mulg 18224  df-subg 18275  df-nsg 18276  df-eqg 18277  df-ghm 18355  df-cntz 18446  df-cmn 18907  df-abl 18908  df-mgp 19239  df-ur 19251  df-ring 19298  df-cring 19299  df-oppr 19372  df-dvdsr 19390  df-unit 19391  df-invr 19421  df-dvr 19432  df-rnghom 19466  df-drng 19503  df-field 19504  df-subrg 19532  df-lmod 19635  df-lss 19703  df-lsp 19743  df-sra 19943  df-rgmod 19944  df-lidl 19945  df-rsp 19946  df-2idl 20004  df-nzr 20030  df-rlreg 20055  df-domn 20056  df-idom 20057  df-cnfld 20545  df-zring 20617  df-zrh 20650  df-zn 20653  df-lgs 25870

This theorem is referenced by:  lgsquad3  25962