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

Theorem lgsqrlem2 25484
Description: Lemma for lgsqr 25488. (Contributed by Mario Carneiro, 15-Jun-2015.)
Hypotheses
Ref Expression
lgsqr.y 𝑌 = (ℤ/nℤ‘𝑃)
lgsqr.s 𝑆 = (Poly1𝑌)
lgsqr.b 𝐵 = (Base‘𝑆)
lgsqr.d 𝐷 = ( deg1𝑌)
lgsqr.o 𝑂 = (eval1𝑌)
lgsqr.e = (.g‘(mulGrp‘𝑆))
lgsqr.x 𝑋 = (var1𝑌)
lgsqr.m = (-g𝑆)
lgsqr.u 1 = (1r𝑆)
lgsqr.t 𝑇 = ((((𝑃 − 1) / 2) 𝑋) 1 )
lgsqr.l 𝐿 = (ℤRHom‘𝑌)
lgsqr.1 (𝜑𝑃 ∈ (ℙ ∖ {2}))
lgsqr.g 𝐺 = (𝑦 ∈ (1...((𝑃 − 1) / 2)) ↦ (𝐿‘(𝑦↑2)))
Assertion
Ref Expression
lgsqrlem2 (𝜑𝐺:(1...((𝑃 − 1) / 2))–1-1→((𝑂𝑇) “ {(0g𝑌)}))
Distinct variable groups:   𝑦,𝑂   𝑦,𝑃   𝜑,𝑦   𝑦,𝑇   𝑦,𝐿   𝑦,𝑌
Allowed substitution hints:   𝐵(𝑦)   𝐷(𝑦)   𝑆(𝑦)   1 (𝑦)   (𝑦)   𝐺(𝑦)   (𝑦)   𝑋(𝑦)

Proof of Theorem lgsqrlem2
Dummy variables 𝑥 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 lgsqr.1 . . . . . . . . . . . . 13 (𝜑𝑃 ∈ (ℙ ∖ {2}))
21eldifad 3809 . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℙ)
3 lgsqr.y . . . . . . . . . . . . 13 𝑌 = (ℤ/nℤ‘𝑃)
43znfld 20267 . . . . . . . . . . . 12 (𝑃 ∈ ℙ → 𝑌 ∈ Field)
52, 4syl 17 . . . . . . . . . . 11 (𝜑𝑌 ∈ Field)
6 fldidom 19665 . . . . . . . . . . 11 (𝑌 ∈ Field → 𝑌 ∈ IDomn)
75, 6syl 17 . . . . . . . . . 10 (𝜑𝑌 ∈ IDomn)
8 isidom 19664 . . . . . . . . . . 11 (𝑌 ∈ IDomn ↔ (𝑌 ∈ CRing ∧ 𝑌 ∈ Domn))
98simplbi 493 . . . . . . . . . 10 (𝑌 ∈ IDomn → 𝑌 ∈ CRing)
107, 9syl 17 . . . . . . . . 9 (𝜑𝑌 ∈ CRing)
11 crngring 18911 . . . . . . . . 9 (𝑌 ∈ CRing → 𝑌 ∈ Ring)
1210, 11syl 17 . . . . . . . 8 (𝜑𝑌 ∈ Ring)
13 lgsqr.l . . . . . . . . 9 𝐿 = (ℤRHom‘𝑌)
1413zrhrhm 20219 . . . . . . . 8 (𝑌 ∈ Ring → 𝐿 ∈ (ℤring RingHom 𝑌))
1512, 14syl 17 . . . . . . 7 (𝜑𝐿 ∈ (ℤring RingHom 𝑌))
16 zringbas 20183 . . . . . . . 8 ℤ = (Base‘ℤring)
17 eqid 2824 . . . . . . . 8 (Base‘𝑌) = (Base‘𝑌)
1816, 17rhmf 19081 . . . . . . 7 (𝐿 ∈ (ℤring RingHom 𝑌) → 𝐿:ℤ⟶(Base‘𝑌))
1915, 18syl 17 . . . . . 6 (𝜑𝐿:ℤ⟶(Base‘𝑌))
2019adantr 474 . . . . 5 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝐿:ℤ⟶(Base‘𝑌))
21 elfzelz 12634 . . . . . . 7 (𝑦 ∈ (1...((𝑃 − 1) / 2)) → 𝑦 ∈ ℤ)
2221adantl 475 . . . . . 6 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℤ)
23 zsqcl 13227 . . . . . 6 (𝑦 ∈ ℤ → (𝑦↑2) ∈ ℤ)
2422, 23syl 17 . . . . 5 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦↑2) ∈ ℤ)
2520, 24ffvelrnd 6608 . . . 4 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝐿‘(𝑦↑2)) ∈ (Base‘𝑌))
26 lgsqr.s . . . . 5 𝑆 = (Poly1𝑌)
27 lgsqr.b . . . . 5 𝐵 = (Base‘𝑆)
28 lgsqr.d . . . . 5 𝐷 = ( deg1𝑌)
29 lgsqr.o . . . . 5 𝑂 = (eval1𝑌)
30 lgsqr.e . . . . 5 = (.g‘(mulGrp‘𝑆))
31 lgsqr.x . . . . 5 𝑋 = (var1𝑌)
32 lgsqr.m . . . . 5 = (-g𝑆)
33 lgsqr.u . . . . 5 1 = (1r𝑆)
34 lgsqr.t . . . . 5 𝑇 = ((((𝑃 − 1) / 2) 𝑋) 1 )
351adantr 474 . . . . 5 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ (ℙ ∖ {2}))
36 elfznn 12662 . . . . . . . . . . 11 (𝑦 ∈ (1...((𝑃 − 1) / 2)) → 𝑦 ∈ ℕ)
3736adantl 475 . . . . . . . . . 10 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℕ)
3837nncnd 11367 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℂ)
39 oddprm 15885 . . . . . . . . . . . 12 (𝑃 ∈ (ℙ ∖ {2}) → ((𝑃 − 1) / 2) ∈ ℕ)
401, 39syl 17 . . . . . . . . . . 11 (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ)
4140nnnn0d 11677 . . . . . . . . . 10 (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ0)
4241adantr 474 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑃 − 1) / 2) ∈ ℕ0)
43 2nn0 11636 . . . . . . . . . 10 2 ∈ ℕ0
4443a1i 11 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 2 ∈ ℕ0)
4538, 42, 44expmuld 13304 . . . . . . . 8 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦↑(2 · ((𝑃 − 1) / 2))) = ((𝑦↑2)↑((𝑃 − 1) / 2)))
46 prmnn 15759 . . . . . . . . . . . . . . . 16 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
472, 46syl 17 . . . . . . . . . . . . . . 15 (𝜑𝑃 ∈ ℕ)
4847nnred 11366 . . . . . . . . . . . . . 14 (𝜑𝑃 ∈ ℝ)
49 peano2rem 10668 . . . . . . . . . . . . . 14 (𝑃 ∈ ℝ → (𝑃 − 1) ∈ ℝ)
5048, 49syl 17 . . . . . . . . . . . . 13 (𝜑 → (𝑃 − 1) ∈ ℝ)
5150recnd 10384 . . . . . . . . . . . 12 (𝜑 → (𝑃 − 1) ∈ ℂ)
52 2cnd 11428 . . . . . . . . . . . 12 (𝜑 → 2 ∈ ℂ)
53 2ne0 11461 . . . . . . . . . . . . 13 2 ≠ 0
5453a1i 11 . . . . . . . . . . . 12 (𝜑 → 2 ≠ 0)
5551, 52, 54divcan2d 11128 . . . . . . . . . . 11 (𝜑 → (2 · ((𝑃 − 1) / 2)) = (𝑃 − 1))
56 phiprm 15852 . . . . . . . . . . . 12 (𝑃 ∈ ℙ → (ϕ‘𝑃) = (𝑃 − 1))
572, 56syl 17 . . . . . . . . . . 11 (𝜑 → (ϕ‘𝑃) = (𝑃 − 1))
5855, 57eqtr4d 2863 . . . . . . . . . 10 (𝜑 → (2 · ((𝑃 − 1) / 2)) = (ϕ‘𝑃))
5958adantr 474 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (2 · ((𝑃 − 1) / 2)) = (ϕ‘𝑃))
6059oveq2d 6920 . . . . . . . 8 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦↑(2 · ((𝑃 − 1) / 2))) = (𝑦↑(ϕ‘𝑃)))
6145, 60eqtr3d 2862 . . . . . . 7 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑦↑2)↑((𝑃 − 1) / 2)) = (𝑦↑(ϕ‘𝑃)))
6261oveq1d 6919 . . . . . 6 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (((𝑦↑2)↑((𝑃 − 1) / 2)) mod 𝑃) = ((𝑦↑(ϕ‘𝑃)) mod 𝑃))
632adantr 474 . . . . . . . 8 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℙ)
6463, 46syl 17 . . . . . . 7 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℕ)
6547nnzd 11808 . . . . . . . . . 10 (𝜑𝑃 ∈ ℤ)
6665adantr 474 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℤ)
67 gcdcom 15607 . . . . . . . . 9 ((𝑦 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑦 gcd 𝑃) = (𝑃 gcd 𝑦))
6822, 66, 67syl2anc 581 . . . . . . . 8 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦 gcd 𝑃) = (𝑃 gcd 𝑦))
6937nnred 11366 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℝ)
7050rehalfcld 11604 . . . . . . . . . . . . 13 (𝜑 → ((𝑃 − 1) / 2) ∈ ℝ)
7170adantr 474 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑃 − 1) / 2) ∈ ℝ)
7248adantr 474 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℝ)
73 elfzle2 12637 . . . . . . . . . . . . 13 (𝑦 ∈ (1...((𝑃 − 1) / 2)) → 𝑦 ≤ ((𝑃 − 1) / 2))
7473adantl 475 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ≤ ((𝑃 − 1) / 2))
75 prmuz2 15779 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ‘2))
762, 75syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝑃 ∈ (ℤ‘2))
77 uz2m1nn 12045 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℤ‘2) → (𝑃 − 1) ∈ ℕ)
7876, 77syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑃 − 1) ∈ ℕ)
7978nnrpd 12153 . . . . . . . . . . . . . . 15 (𝜑 → (𝑃 − 1) ∈ ℝ+)
80 rphalflt 12142 . . . . . . . . . . . . . . 15 ((𝑃 − 1) ∈ ℝ+ → ((𝑃 − 1) / 2) < (𝑃 − 1))
8179, 80syl 17 . . . . . . . . . . . . . 14 (𝜑 → ((𝑃 − 1) / 2) < (𝑃 − 1))
8248ltm1d 11285 . . . . . . . . . . . . . 14 (𝜑 → (𝑃 − 1) < 𝑃)
8370, 50, 48, 81, 82lttrd 10516 . . . . . . . . . . . . 13 (𝜑 → ((𝑃 − 1) / 2) < 𝑃)
8483adantr 474 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑃 − 1) / 2) < 𝑃)
8569, 71, 72, 74, 84lelttrd 10513 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 < 𝑃)
8669, 72ltnled 10502 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦 < 𝑃 ↔ ¬ 𝑃𝑦))
8785, 86mpbid 224 . . . . . . . . . 10 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ¬ 𝑃𝑦)
88 dvdsle 15408 . . . . . . . . . . 11 ((𝑃 ∈ ℤ ∧ 𝑦 ∈ ℕ) → (𝑃𝑦𝑃𝑦))
8966, 37, 88syl2anc 581 . . . . . . . . . 10 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑃𝑦𝑃𝑦))
9087, 89mtod 190 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ¬ 𝑃𝑦)
91 coprm 15793 . . . . . . . . . 10 ((𝑃 ∈ ℙ ∧ 𝑦 ∈ ℤ) → (¬ 𝑃𝑦 ↔ (𝑃 gcd 𝑦) = 1))
9263, 22, 91syl2anc 581 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (¬ 𝑃𝑦 ↔ (𝑃 gcd 𝑦) = 1))
9390, 92mpbid 224 . . . . . . . 8 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑃 gcd 𝑦) = 1)
9468, 93eqtrd 2860 . . . . . . 7 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦 gcd 𝑃) = 1)
95 eulerth 15858 . . . . . . 7 ((𝑃 ∈ ℕ ∧ 𝑦 ∈ ℤ ∧ (𝑦 gcd 𝑃) = 1) → ((𝑦↑(ϕ‘𝑃)) mod 𝑃) = (1 mod 𝑃))
9664, 22, 94, 95syl3anc 1496 . . . . . 6 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑦↑(ϕ‘𝑃)) mod 𝑃) = (1 mod 𝑃))
9762, 96eqtrd 2860 . . . . 5 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (((𝑦↑2)↑((𝑃 − 1) / 2)) mod 𝑃) = (1 mod 𝑃))
983, 26, 27, 28, 29, 30, 31, 32, 33, 34, 13, 35, 24, 97lgsqrlem1 25483 . . . 4 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑂𝑇)‘(𝐿‘(𝑦↑2))) = (0g𝑌))
99 eqid 2824 . . . . . . . 8 (𝑌s (Base‘𝑌)) = (𝑌s (Base‘𝑌))
100 eqid 2824 . . . . . . . 8 (Base‘(𝑌s (Base‘𝑌))) = (Base‘(𝑌s (Base‘𝑌)))
101 fvexd 6447 . . . . . . . 8 (𝜑 → (Base‘𝑌) ∈ V)
10229, 26, 99, 17evl1rhm 20055 . . . . . . . . . . 11 (𝑌 ∈ CRing → 𝑂 ∈ (𝑆 RingHom (𝑌s (Base‘𝑌))))
10310, 102syl 17 . . . . . . . . . 10 (𝜑𝑂 ∈ (𝑆 RingHom (𝑌s (Base‘𝑌))))
10427, 100rhmf 19081 . . . . . . . . . 10 (𝑂 ∈ (𝑆 RingHom (𝑌s (Base‘𝑌))) → 𝑂:𝐵⟶(Base‘(𝑌s (Base‘𝑌))))
105103, 104syl 17 . . . . . . . . 9 (𝜑𝑂:𝐵⟶(Base‘(𝑌s (Base‘𝑌))))
10626ply1ring 19977 . . . . . . . . . . . . 13 (𝑌 ∈ Ring → 𝑆 ∈ Ring)
10712, 106syl 17 . . . . . . . . . . . 12 (𝜑𝑆 ∈ Ring)
108 ringgrp 18905 . . . . . . . . . . . 12 (𝑆 ∈ Ring → 𝑆 ∈ Grp)
109107, 108syl 17 . . . . . . . . . . 11 (𝜑𝑆 ∈ Grp)
110 eqid 2824 . . . . . . . . . . . . . 14 (mulGrp‘𝑆) = (mulGrp‘𝑆)
111110ringmgp 18906 . . . . . . . . . . . . 13 (𝑆 ∈ Ring → (mulGrp‘𝑆) ∈ Mnd)
112107, 111syl 17 . . . . . . . . . . . 12 (𝜑 → (mulGrp‘𝑆) ∈ Mnd)
11331, 26, 27vr1cl 19946 . . . . . . . . . . . . 13 (𝑌 ∈ Ring → 𝑋𝐵)
11412, 113syl 17 . . . . . . . . . . . 12 (𝜑𝑋𝐵)
115110, 27mgpbas 18848 . . . . . . . . . . . . 13 𝐵 = (Base‘(mulGrp‘𝑆))
116115, 30mulgnn0cl 17910 . . . . . . . . . . . 12 (((mulGrp‘𝑆) ∈ Mnd ∧ ((𝑃 − 1) / 2) ∈ ℕ0𝑋𝐵) → (((𝑃 − 1) / 2) 𝑋) ∈ 𝐵)
117112, 41, 114, 116syl3anc 1496 . . . . . . . . . . 11 (𝜑 → (((𝑃 − 1) / 2) 𝑋) ∈ 𝐵)
11827, 33ringidcl 18921 . . . . . . . . . . . 12 (𝑆 ∈ Ring → 1𝐵)
119107, 118syl 17 . . . . . . . . . . 11 (𝜑1𝐵)
12027, 32grpsubcl 17848 . . . . . . . . . . 11 ((𝑆 ∈ Grp ∧ (((𝑃 − 1) / 2) 𝑋) ∈ 𝐵1𝐵) → ((((𝑃 − 1) / 2) 𝑋) 1 ) ∈ 𝐵)
121109, 117, 119, 120syl3anc 1496 . . . . . . . . . 10 (𝜑 → ((((𝑃 − 1) / 2) 𝑋) 1 ) ∈ 𝐵)
12234, 121syl5eqel 2909 . . . . . . . . 9 (𝜑𝑇𝐵)
123105, 122ffvelrnd 6608 . . . . . . . 8 (𝜑 → (𝑂𝑇) ∈ (Base‘(𝑌s (Base‘𝑌))))
12499, 17, 100, 5, 101, 123pwselbas 16501 . . . . . . 7 (𝜑 → (𝑂𝑇):(Base‘𝑌)⟶(Base‘𝑌))
125124ffnd 6278 . . . . . 6 (𝜑 → (𝑂𝑇) Fn (Base‘𝑌))
126125adantr 474 . . . . 5 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑂𝑇) Fn (Base‘𝑌))
127 fniniseg 6586 . . . . 5 ((𝑂𝑇) Fn (Base‘𝑌) → ((𝐿‘(𝑦↑2)) ∈ ((𝑂𝑇) “ {(0g𝑌)}) ↔ ((𝐿‘(𝑦↑2)) ∈ (Base‘𝑌) ∧ ((𝑂𝑇)‘(𝐿‘(𝑦↑2))) = (0g𝑌))))
128126, 127syl 17 . . . 4 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝐿‘(𝑦↑2)) ∈ ((𝑂𝑇) “ {(0g𝑌)}) ↔ ((𝐿‘(𝑦↑2)) ∈ (Base‘𝑌) ∧ ((𝑂𝑇)‘(𝐿‘(𝑦↑2))) = (0g𝑌))))
12925, 98, 128mpbir2and 706 . . 3 ((𝜑𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝐿‘(𝑦↑2)) ∈ ((𝑂𝑇) “ {(0g𝑌)}))
130 lgsqr.g . . 3 𝐺 = (𝑦 ∈ (1...((𝑃 − 1) / 2)) ↦ (𝐿‘(𝑦↑2)))
131129, 130fmptd 6632 . 2 (𝜑𝐺:(1...((𝑃 − 1) / 2))⟶((𝑂𝑇) “ {(0g𝑌)}))
132 fvoveq1 6927 . . . . . . . 8 (𝑦 = 𝑥 → (𝐿‘(𝑦↑2)) = (𝐿‘(𝑥↑2)))
133 fvex 6445 . . . . . . . 8 (𝐿‘(𝑥↑2)) ∈ V
134132, 130, 133fvmpt 6528 . . . . . . 7 (𝑥 ∈ (1...((𝑃 − 1) / 2)) → (𝐺𝑥) = (𝐿‘(𝑥↑2)))
135134ad2antrl 721 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝐺𝑥) = (𝐿‘(𝑥↑2)))
136 fvoveq1 6927 . . . . . . . 8 (𝑦 = 𝑧 → (𝐿‘(𝑦↑2)) = (𝐿‘(𝑧↑2)))
137 fvex 6445 . . . . . . . 8 (𝐿‘(𝑧↑2)) ∈ V
138136, 130, 137fvmpt 6528 . . . . . . 7 (𝑧 ∈ (1...((𝑃 − 1) / 2)) → (𝐺𝑧) = (𝐿‘(𝑧↑2)))
139138ad2antll 722 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝐺𝑧) = (𝐿‘(𝑧↑2)))
140135, 139eqeq12d 2839 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐺𝑥) = (𝐺𝑧) ↔ (𝐿‘(𝑥↑2)) = (𝐿‘(𝑧↑2))))
14147nnnn0d 11677 . . . . . . 7 (𝜑𝑃 ∈ ℕ0)
142141adantr 474 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℕ0)
143 elfzelz 12634 . . . . . . . 8 (𝑥 ∈ (1...((𝑃 − 1) / 2)) → 𝑥 ∈ ℤ)
144143ad2antrl 721 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℤ)
145 zsqcl 13227 . . . . . . 7 (𝑥 ∈ ℤ → (𝑥↑2) ∈ ℤ)
146144, 145syl 17 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥↑2) ∈ ℤ)
147 elfzelz 12634 . . . . . . . 8 (𝑧 ∈ (1...((𝑃 − 1) / 2)) → 𝑧 ∈ ℤ)
148147ad2antll 722 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℤ)
149 zsqcl 13227 . . . . . . 7 (𝑧 ∈ ℤ → (𝑧↑2) ∈ ℤ)
150148, 149syl 17 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑧↑2) ∈ ℤ)
1513, 13zndvds 20256 . . . . . 6 ((𝑃 ∈ ℕ0 ∧ (𝑥↑2) ∈ ℤ ∧ (𝑧↑2) ∈ ℤ) → ((𝐿‘(𝑥↑2)) = (𝐿‘(𝑧↑2)) ↔ 𝑃 ∥ ((𝑥↑2) − (𝑧↑2))))
152142, 146, 150, 151syl3anc 1496 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐿‘(𝑥↑2)) = (𝐿‘(𝑧↑2)) ↔ 𝑃 ∥ ((𝑥↑2) − (𝑧↑2))))
153 elfznn 12662 . . . . . . . . 9 (𝑥 ∈ (1...((𝑃 − 1) / 2)) → 𝑥 ∈ ℕ)
154153ad2antrl 721 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℕ)
155154nncnd 11367 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℂ)
156 elfznn 12662 . . . . . . . . 9 (𝑧 ∈ (1...((𝑃 − 1) / 2)) → 𝑧 ∈ ℕ)
157156ad2antll 722 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℕ)
158157nncnd 11367 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℂ)
159 subsq 13265 . . . . . . 7 ((𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ) → ((𝑥↑2) − (𝑧↑2)) = ((𝑥 + 𝑧) · (𝑥𝑧)))
160155, 158, 159syl2anc 581 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥↑2) − (𝑧↑2)) = ((𝑥 + 𝑧) · (𝑥𝑧)))
161160breq2d 4884 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ ((𝑥↑2) − (𝑧↑2)) ↔ 𝑃 ∥ ((𝑥 + 𝑧) · (𝑥𝑧))))
162140, 152, 1613bitrd 297 . . . 4 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐺𝑥) = (𝐺𝑧) ↔ 𝑃 ∥ ((𝑥 + 𝑧) · (𝑥𝑧))))
1632adantr 474 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℙ)
164144, 148zaddcld 11813 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ∈ ℤ)
165144, 148zsubcld 11814 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥𝑧) ∈ ℤ)
166 euclemma 15795 . . . . . 6 ((𝑃 ∈ ℙ ∧ (𝑥 + 𝑧) ∈ ℤ ∧ (𝑥𝑧) ∈ ℤ) → (𝑃 ∥ ((𝑥 + 𝑧) · (𝑥𝑧)) ↔ (𝑃 ∥ (𝑥 + 𝑧) ∨ 𝑃 ∥ (𝑥𝑧))))
167163, 164, 165, 166syl3anc 1496 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ ((𝑥 + 𝑧) · (𝑥𝑧)) ↔ (𝑃 ∥ (𝑥 + 𝑧) ∨ 𝑃 ∥ (𝑥𝑧))))
168163, 46syl 17 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℕ)
169168nnzd 11808 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℤ)
170154, 157nnaddcld 11402 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ∈ ℕ)
171 dvdsle 15408 . . . . . . . 8 ((𝑃 ∈ ℤ ∧ (𝑥 + 𝑧) ∈ ℕ) → (𝑃 ∥ (𝑥 + 𝑧) → 𝑃 ≤ (𝑥 + 𝑧)))
172169, 170, 171syl2anc 581 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥 + 𝑧) → 𝑃 ≤ (𝑥 + 𝑧)))
173170nnred 11366 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ∈ ℝ)
174168nnred 11366 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℝ)
175174, 49syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 − 1) ∈ ℝ)
176154nnred 11366 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℝ)
177157nnred 11366 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℝ)
17870adantr 474 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑃 − 1) / 2) ∈ ℝ)
179 elfzle2 12637 . . . . . . . . . . . . 13 (𝑥 ∈ (1...((𝑃 − 1) / 2)) → 𝑥 ≤ ((𝑃 − 1) / 2))
180179ad2antrl 721 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ≤ ((𝑃 − 1) / 2))
181 elfzle2 12637 . . . . . . . . . . . . 13 (𝑧 ∈ (1...((𝑃 − 1) / 2)) → 𝑧 ≤ ((𝑃 − 1) / 2))
182181ad2antll 722 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ≤ ((𝑃 − 1) / 2))
183176, 177, 178, 178, 180, 182le2addd 10970 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ≤ (((𝑃 − 1) / 2) + ((𝑃 − 1) / 2)))
18451adantr 474 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 − 1) ∈ ℂ)
1851842halvesd 11603 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (((𝑃 − 1) / 2) + ((𝑃 − 1) / 2)) = (𝑃 − 1))
186183, 185breqtrd 4898 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ≤ (𝑃 − 1))
187174ltm1d 11285 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 − 1) < 𝑃)
188173, 175, 174, 186, 187lelttrd 10513 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) < 𝑃)
189173, 174ltnled 10502 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥 + 𝑧) < 𝑃 ↔ ¬ 𝑃 ≤ (𝑥 + 𝑧)))
190188, 189mpbid 224 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ¬ 𝑃 ≤ (𝑥 + 𝑧))
191190pm2.21d 119 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ≤ (𝑥 + 𝑧) → 𝑥 = 𝑧))
192172, 191syld 47 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥 + 𝑧) → 𝑥 = 𝑧))
193 moddvds 15367 . . . . . . . . 9 ((𝑃 ∈ ℕ ∧ 𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) → ((𝑥 mod 𝑃) = (𝑧 mod 𝑃) ↔ 𝑃 ∥ (𝑥𝑧)))
194168, 144, 148, 193syl3anc 1496 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥 mod 𝑃) = (𝑧 mod 𝑃) ↔ 𝑃 ∥ (𝑥𝑧)))
195168nnrpd 12153 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℝ+)
196154nnnn0d 11677 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℕ0)
197196nn0ge0d 11680 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 0 ≤ 𝑥)
19883adantr 474 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑃 − 1) / 2) < 𝑃)
199176, 178, 174, 180, 198lelttrd 10513 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 < 𝑃)
200 modid 12989 . . . . . . . . . 10 (((𝑥 ∈ ℝ ∧ 𝑃 ∈ ℝ+) ∧ (0 ≤ 𝑥𝑥 < 𝑃)) → (𝑥 mod 𝑃) = 𝑥)
201176, 195, 197, 199, 200syl22anc 874 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 mod 𝑃) = 𝑥)
202157nnnn0d 11677 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℕ0)
203202nn0ge0d 11680 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 0 ≤ 𝑧)
204177, 178, 174, 182, 198lelttrd 10513 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 < 𝑃)
205 modid 12989 . . . . . . . . . 10 (((𝑧 ∈ ℝ ∧ 𝑃 ∈ ℝ+) ∧ (0 ≤ 𝑧𝑧 < 𝑃)) → (𝑧 mod 𝑃) = 𝑧)
206177, 195, 203, 204, 205syl22anc 874 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑧 mod 𝑃) = 𝑧)
207201, 206eqeq12d 2839 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥 mod 𝑃) = (𝑧 mod 𝑃) ↔ 𝑥 = 𝑧))
208194, 207bitr3d 273 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥𝑧) ↔ 𝑥 = 𝑧))
209208biimpd 221 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥𝑧) → 𝑥 = 𝑧))
210192, 209jaod 892 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑃 ∥ (𝑥 + 𝑧) ∨ 𝑃 ∥ (𝑥𝑧)) → 𝑥 = 𝑧))
211167, 210sylbid 232 . . . 4 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ ((𝑥 + 𝑧) · (𝑥𝑧)) → 𝑥 = 𝑧))
212162, 211sylbid 232 . . 3 ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐺𝑥) = (𝐺𝑧) → 𝑥 = 𝑧))
213212ralrimivva 3179 . 2 (𝜑 → ∀𝑥 ∈ (1...((𝑃 − 1) / 2))∀𝑧 ∈ (1...((𝑃 − 1) / 2))((𝐺𝑥) = (𝐺𝑧) → 𝑥 = 𝑧))
214 dff13 6766 . 2 (𝐺:(1...((𝑃 − 1) / 2))–1-1→((𝑂𝑇) “ {(0g𝑌)}) ↔ (𝐺:(1...((𝑃 − 1) / 2))⟶((𝑂𝑇) “ {(0g𝑌)}) ∧ ∀𝑥 ∈ (1...((𝑃 − 1) / 2))∀𝑧 ∈ (1...((𝑃 − 1) / 2))((𝐺𝑥) = (𝐺𝑧) → 𝑥 = 𝑧)))
215131, 213, 214sylanbrc 580 1 (𝜑𝐺:(1...((𝑃 − 1) / 2))–1-1→((𝑂𝑇) “ {(0g𝑌)}))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 198  wa 386  wo 880   = wceq 1658  wcel 2166  wne 2998  wral 3116  Vcvv 3413  cdif 3794  {csn 4396   class class class wbr 4872  cmpt 4951  ccnv 5340  cima 5344   Fn wfn 6117  wf 6118  1-1wf1 6119  cfv 6122  (class class class)co 6904  cc 10249  cr 10250  0cc0 10251  1c1 10252   + caddc 10254   · cmul 10256   < clt 10390  cle 10391  cmin 10584   / cdiv 11008  cn 11349  2c2 11405  0cn0 11617  cz 11703  cuz 11967  +crp 12111  ...cfz 12618   mod cmo 12962  cexp 13153  cdvds 15356   gcd cgcd 15588  cprime 15756  ϕcphi 15839  Basecbs 16221  0gc0g 16452  s cpws 16459  Mndcmnd 17646  Grpcgrp 17775  -gcsg 17777  .gcmg 17893  mulGrpcmgp 18842  1rcur 18854  Ringcrg 18900  CRingccrg 18901   RingHom crh 19067  Fieldcfield 19103  Domncdomn 19640  IDomncidom 19641  var1cv1 19905  Poly1cpl1 19906  eval1ce1 20038  ringzring 20177  ℤRHomczrh 20207  ℤ/nczn 20210   deg1 cdg1 24212
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1896  ax-4 1910  ax-5 2011  ax-6 2077  ax-7 2114  ax-8 2168  ax-9 2175  ax-10 2194  ax-11 2209  ax-12 2222  ax-13 2390  ax-ext 2802  ax-rep 4993  ax-sep 5004  ax-nul 5012  ax-pow 5064  ax-pr 5126  ax-un 7208  ax-inf2 8814  ax-cnex 10307  ax-resscn 10308  ax-1cn 10309  ax-icn 10310  ax-addcl 10311  ax-addrcl 10312  ax-mulcl 10313  ax-mulrcl 10314  ax-mulcom 10315  ax-addass 10316  ax-mulass 10317  ax-distr 10318  ax-i2m1 10319  ax-1ne0 10320  ax-1rid 10321  ax-rnegex 10322  ax-rrecex 10323  ax-cnre 10324  ax-pre-lttri 10325  ax-pre-lttrn 10326  ax-pre-ltadd 10327  ax-pre-mulgt0 10328  ax-pre-sup 10329  ax-addf 10330  ax-mulf 10331
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 881  df-3or 1114  df-3an 1115  df-tru 1662  df-ex 1881  df-nf 1885  df-sb 2070  df-mo 2604  df-eu 2639  df-clab 2811  df-cleq 2817  df-clel 2820  df-nfc 2957  df-ne 2999  df-nel 3102  df-ral 3121  df-rex 3122  df-reu 3123  df-rmo 3124  df-rab 3125  df-v 3415  df-sbc 3662  df-csb 3757  df-dif 3800  df-un 3802  df-in 3804  df-ss 3811  df-pss 3813  df-nul 4144  df-if 4306  df-pw 4379  df-sn 4397  df-pr 4399  df-tp 4401  df-op 4403  df-uni 4658  df-int 4697  df-iun 4741  df-iin 4742  df-br 4873  df-opab 4935  df-mpt 4952  df-tr 4975  df-id 5249  df-eprel 5254  df-po 5262  df-so 5263  df-fr 5300  df-se 5301  df-we 5302  df-xp 5347  df-rel 5348  df-cnv 5349  df-co 5350  df-dm 5351  df-rn 5352  df-res 5353  df-ima 5354  df-pred 5919  df-ord 5965  df-on 5966  df-lim 5967  df-suc 5968  df-iota 6085  df-fun 6124  df-fn 6125  df-f 6126  df-f1 6127  df-fo 6128  df-f1o 6129  df-fv 6130  df-isom 6131  df-riota 6865  df-ov 6907  df-oprab 6908  df-mpt2 6909  df-of 7156  df-ofr 7157  df-om 7326  df-1st 7427  df-2nd 7428  df-supp 7559  df-tpos 7616  df-wrecs 7671  df-recs 7733  df-rdg 7771  df-1o 7825  df-2o 7826  df-oadd 7829  df-er 8008  df-ec 8010  df-qs 8014  df-map 8123  df-pm 8124  df-ixp 8175  df-en 8222  df-dom 8223  df-sdom 8224  df-fin 8225  df-fsupp 8544  df-sup 8616  df-inf 8617  df-oi 8683  df-card 9077  df-cda 9304  df-pnf 10392  df-mnf 10393  df-xr 10394  df-ltxr 10395  df-le 10396  df-sub 10586  df-neg 10587  df-div 11009  df-nn 11350  df-2 11413  df-3 11414  df-4 11415  df-5 11416  df-6 11417  df-7 11418  df-8 11419  df-9 11420  df-n0 11618  df-xnn0 11690  df-z 11704  df-dec 11821  df-uz 11968  df-rp 12112  df-fz 12619  df-fzo 12760  df-fl 12887  df-mod 12963  df-seq 13095  df-exp 13154  df-hash 13410  df-cj 14215  df-re 14216  df-im 14217  df-sqrt 14351  df-abs 14352  df-dvds 15357  df-gcd 15589  df-prm 15757  df-phi 15841  df-struct 16223  df-ndx 16224  df-slot 16225  df-base 16227  df-sets 16228  df-ress 16229  df-plusg 16317  df-mulr 16318  df-starv 16319  df-sca 16320  df-vsca 16321  df-ip 16322  df-tset 16323  df-ple 16324  df-ds 16326  df-unif 16327  df-hom 16328  df-cco 16329  df-0g 16454  df-gsum 16455  df-prds 16460  df-pws 16462  df-imas 16520  df-qus 16521  df-mre 16598  df-mrc 16599  df-acs 16601  df-mgm 17594  df-sgrp 17636  df-mnd 17647  df-mhm 17687  df-submnd 17688  df-grp 17778  df-minusg 17779  df-sbg 17780  df-mulg 17894  df-subg 17941  df-nsg 17942  df-eqg 17943  df-ghm 18008  df-cntz 18099  df-cmn 18547  df-abl 18548  df-mgp 18843  df-ur 18855  df-srg 18859  df-ring 18902  df-cring 18903  df-oppr 18976  df-dvdsr 18994  df-unit 18995  df-invr 19025  df-dvr 19036  df-rnghom 19070  df-drng 19104  df-field 19105  df-subrg 19133  df-lmod 19220  df-lss 19288  df-lsp 19330  df-sra 19532  df-rgmod 19533  df-lidl 19534  df-rsp 19535  df-2idl 19592  df-nzr 19618  df-rlreg 19643  df-domn 19644  df-idom 19645  df-assa 19672  df-asp 19673  df-ascl 19674  df-psr 19716  df-mvr 19717  df-mpl 19718  df-opsr 19720  df-evls 19865  df-evl 19866  df-psr1 19909  df-vr1 19910  df-ply1 19911  df-evl1 20040  df-cnfld 20106  df-zring 20178  df-zrh 20211  df-zn 20214
This theorem is referenced by:  lgsqrlem4  25486
  Copyright terms: Public domain W3C validator